fonction en caml

[houta90]

On a corrigé et voici la réponse ...merci pour les suggestions

Code : Tout sélectionner

let imprime_monome c d = if d=0 then print_int c else 
if c <>0 then begin 
print_string"+";
if c<>1 then print_int c ;
 print_string"x" ;
 if d<>1 then 
begin print_string "^";	
print_int d;
end
end;;