Prog Caml : Ecrire la fonction detail_signe

Ecrivez une fonction nommée detail_signe qui prend en paramètre un entier p et qui retourne une chaîne :

• si p est positif, la fonction doit retourner "Le nombre p est positif", en remplaçant p par sa valeur;
• si p est négatif, la fonction doit retourner "Le nombre p est negatif", en remplaçant p par sa valeur;
• si p est nul, la fonction doit retourner "Le nombre 0 est nul".

Par exemple, si p = 53, la fonction renvoie : "Le nombre 53 est positif".

Code à compléter Caml

let detail_signe p =
(*à compléter*)
in

print_string (detail_signe (read_int()));;