Bonjour a tous,
je viens de commencer la programmation fonctionnelle avec le langage caml .
mon problème est le suivant :
Je doit récupérer le nombres d’occurrences de chaque lettre a partir d'un fichier texte.
voila mon code.
Ma fonction parcours me renvoie le type <unit> alors que normalement elle me revoie le type <(int * char) list> qui est le type de la fonction occurrences
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20 let x = "text.txt";; let canal_entree = open_in x;; let liste =[];; let rec occurrences a list = match list with |[] -> (1,a)::[] |(nb,lettre)::ls -> if(lettre = a) then (nb+1,lettre)::ls else (nb,lettre)::(occurrences a ls) ;; let parcourt inChannel list= while(true) do let a = input_char canal_entree in occurrences a list done ;; parcourt canal_entree liste;;
Merci d'avance pour l'aide et bon courage a tous .
Partager