Discussion :

[esmeel]

Bonjour ,
Dans le cadre d'un projet de 1 ère année , on nous demande de programmer un mastermind , de façon à ce que l'ordinateur puisse trouver la combinaison en un nombre limité de coups .On nous oblige a choisir un type arborescent pour les combinaisons ,j'ai donc défini ce type :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
type pion = Rouge| Vert|Jaune|Bleu|Magenta|Blanc|Noir|Cyan ;;
type  combinaisons= Node of bool*(pion*combinaisons)list  ;;

J'ai quelques difficultés a écrire une fonction qui génère la combinaison la plus longue possible et qui a pour paramètre l'ensemble des combinaisons encore possibles, celà dit avec un type de combinaisons string list list , j'ai réussi a écrire cette fonction , mais je ne sais pas comment l'aborder avec le type arborescent que j'ai définit :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
let rec combinaison_liste taille =
     let rec construire_aux l=
           match l with 
             |[]->[]
             |t::q->(("Rouge"::t)::(("Vert"::t)::(("Jaune"::t)::(("Bleu"::t)::(("Magenta"::t)::(("Blanc"::t)::(("Noir"::t)::(("Cyan"::t)::construire_aux q)))))))) 
     in match taille with 
             |1->(["Rouge"],["Vert"],["Jaune"],["Bleu"],["Magenta"],["Blanc"],["Noir"],["Cyan"])
             |n-> if n<=0 then failwith "n doit etre un nombre strictement positif "
                  else construire_aux (combinaison_liste(taille-1)) ;;

J'ai vraiment besoin d'aide pour écrire cette fonction et merci .

[drunkskater]

Hmmmmmm, c'est marrant, j'ai l'impression qu'il y a beaucoup de gens qui s'intéressent aux arbres et au Mastermind en ce moment.

Tu ne serais pas à ENSEEIHT par hasard ? Si oui, vu que vous êtes plusieurs à travailler sur ce projet vous pourriez peut-être travailler ensemble.

A part ça, comme tu as pu le constater ton message est illisible : il te faut utiliser les balises "code" pour insérer du code, comme ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

let f x = x + 1

Sans quoi l'indentation n'est pas conservée et des smileys apparaissent de façon random...

[esmeel]

haha , merci , c'est bien plus compréhensible maintenant .Et oui je suis de l'ENSEEIHT , le truc c'est que c'est un projet personnel donc a pars le type que presque tout le monde a fait , cela ne peux pas se réaliser en groupe .

[drunkskater]

C'est pas très cohérent ce que tu dis : si les profs vous disent que c'est un projet personnel ce n'est sans doute pas pour empêcher toute socialisation au sein de la promo, mais plus probablement pour que vous fassiez le projet seuls de manière à s'assurer que vous bien êtes capables de faire ce que le prof estime que vous devriez être capables de faire.

Du coup je tu peux par exemple jeter un coup d'oeil au topic "plus longue branche", qui se trouve juste en dessous de celui-ci...

[sorcierombre]

auquel drunkstater je viens d'ajouter la réponse