Problème Array oCaml

Pour une première utilisation je bute sur un sérieux problème. D'habitude je m'arrange de sorte à trouver une structure de données adaptées sans passer par les tableaux. Mais là je suis obligé de m'en servir, je vous épargnerai les détails. Mon premier soucis :

Faire une fonction qui modifie un tableau et qui retourne une copie du tableau modifié. Jusque là je ne savais faire que du fonctionnel. J'ai toujours un syntaxe error sur la ligne en rouge.

Code:

---

1 2 3 4 5 6 7

let dim = 10 let rec updateTab tab ls = match ls with [] -> Array.copy (tab) | (a,b)::ls' -> let newTab = Array.copy (tab) in newTab.(a*dim+b)<- "a"; updateTab tab ls'

---

Un petit coup de main serait le bienvenu

et comme cela ?

Code:

---

1 2 3 4 5 6 7

let dim = 10 let rec updateTab tab ls = match ls with [] -> Array.copy (tab) | (a,b)::ls' -> let newTab = Array.copy (tab) in let _ = newTab.(a*dim+b)<- "a" in updateTab tab ls'

---

Bonjour !

Curieux le problème de l'erreur sur la ligne en rouge... Tu fais tes tests en interactif ? Est-ce que l'erreur se produit même avec une session toute neuve ?

Cordialement,
Cacophrène

Merci pour vos réponses, je vais essayer de donner plus de détails sur mes structures de données, en espérant que ça ne compliquerait pas la comprehension du problème. La première approche je l'ai changée, créer à chaque appel un tableau me parait un peu lourd. Maintenant je passe un tableau en paramètre et je modifie les éléments concernés.

Code:

---

1 2 3 4 5 6 7 8

let dim = 10 type couleurT = N|B|V type case = Vide | Case of couleurT * int let rec updateCases tab xs = match xs with [] -> tab | (a,b)::xs' -> fst(tab.(a*dim+b))<- V ; updateCases tab xs' ;;

---

tab est considéré comme un tableau de type case dont je dois modifier la couleur, d'où l'utilisation de fst().

J'ai toujours le syntax error à la ligne rouge

Je viens de trouver l'erreur, j'avais omis le constructeur Case. Je devais mettre

Code:

---

tab.(a*dim+b)<- Case(V,1)

---

Merci à vous :ccool: