Prog Caml : Ecrire la fonction ou_exclusif

Écrire une fonction nommée ou_exclusif qui prend en paramètre deux booléens et qui renvoie vrai si l'un seul des deux est true. Ainsi vous devez avoir :

ou_exclusif true true     --> false
ou_exclusif true false    --> true
ou_exclusif false true    --> true
ou_exclusif false false   --> false

Code à compléter Caml

let ou_exclusif a b =
(* à compléter *)
;;
 
let print_bool b =
  print_string (string_of_bool b);
  print_newline();
;;

print_bool (ou_exclusif (read_line()="true") (read_line()="true"))