Ciao a tutti mi sto esercitando per un esame e devo scrivere una funzione che conta il numero di occorrenze in una lista ('a -> 'a list -> int).
Io ho scritto questa funzione e tutto funziona ma solo se eseguo i due let separatamente (senza usare "in").


let rec occurs' a al acc =
match al with
| [] -> acc
| x::xs when x=a -> occurs' a xs (acc+1)
| _::xs -> occurs' a xs acc
in let occurs a al = occurs' a al 0 ;;


Quando uso "in" l'interprete mi da syntax error sui ";;" finali, qualcuno sa il perché?

ciao ciao