(* tri de trois entiers *) (* Objectif 1 écrire une fonction "tri" telle que tri a b c renvoie comme valeur un tableau [|x;y;z|] tel que l'on ait 1°) x<=y<=z 2°) le triplet (x,y,z) est une permutation du triplet (a,b,c) Il s'agit uniquement ici d'emboîter des if ... then ... else selon la syntaxe d'une fonction caml Objectif 2 représenter sous forme d'arbre binaire les divers choix qui sont faits par votre programme; quelle est la hauteur de votre arbre? pouvait-on faire ce même tri avec un arbre de hauteur inférieure? *) let tri a b c= if a<=b then if b<=c then [|a;b;c|] else if c