suite de syracuse en Caml

[invite362b41bc]

Bonsoir à tous . Débutant en Caml , je rencontre quelques difficultés à programmer la suite de syracuse de valeur initiale k . Quel est est l' erreur dans mon programme ? Merci d'avance .
let syracuse n k =
if n= 0 then k
else if (syracuse n-1 k) mod 2 =0 then (syracuse n-1 k)/2 else 3*(syracuse n-1 k)+1;;
-----

[invite43901482]

Je connais pas Caml, mais tu n'as pas traité le cas où n=1.

C'est pas plutôt (je sais pas en fonction de ta syntaxe)

else if (n mod 2 = 0) then syracuse(n/2)

?

Et je vois pas pourquoi le 2ème paramètre k dans cette ligne

let syracuse n k =

J'aurais viré le k

et remplacé

if n= 0 then k

par

if (n= 0) or (n=1) then 1