Ocaml type

[tak9am5ura]

Bonjour a tous!

Je suis en L1 et en programmation nous sommes en train d'étudier les types .

Mon chargé de TD ne parlant pas tres bien le français, il se contente de noter la correction d'un exercice au tableau, et ce sans nous fournir des explications.

Je prends donc en note son corrigé et de retour chez moi je m'appercoi qu'il ne compile pas, pourtant j'ai essayé toutes les variante possibles..

L'enonce est le suivant : definir un type note puis une fonction calculant la moyenne des notes de maths.
Le type note est

type note= |Maths of float|Info of float|Langue of float|Humanite of float;;

et la fonction est

let f l= let rec g ll= match ll with |[]->0 |h::t-> begin match h with |math x->(x +. f t) |_->f t; end in let rec fi ll= match ll with |[]->0 |h::t->begin match h with |math x->1 + fi t |_->fi t; end in g 1 /. float_of_int (fi 1);;

Pourquoi cela ne marche pas? Y aurai-il moyen d'y remedier? Merci d'avance!