Publicité
+ Répondre à la discussion
Affichage des résultats 1 à 3 sur 3
  1. #1
    Invité régulier
    Inscrit en
    décembre 2010
    Messages
    30
    Détails du profil
    Informations forums :
    Inscription : décembre 2010
    Messages : 30
    Points : 8
    Points
    8

    Par défaut findall puissance 2

    Bonjour à tous,

    j'ai à nouveau besoin de l'aide de la communauté developpez.com pour résoudre un petit problème:


    j'ai un enssemble de faits de le forme:

    Code :
    1
    2
    3
    4
    5
    6
    profile(user1,profil1).
    profile(user1,profil2).
    profile(user3,profil3).
    
    scopeProfile(profil1,'nothing','equals','0','editable').
    scopeProfile(profil2,'aaaa','equals','0','editable').
    et enfin la règle suivante:

    Code :
    1
    2
    3
    4
    scopep(UserId) :- 
        profil(UserId,A),
        findall([X,Y,Z,R],scopeProfile(A,X,Y,Z,R),List),
        maplist(writeln,List).
    qd j'appel scopep avec un utilisateur n'ayant qu'un seul profil, prolog me retourne correctement la liste de ses "scopes", donc tout va bien
    qd j'appel scopep avec un utilisateur ayant plus d'un profil, alors prolog me retourne la liste de ses "scopes" pour le premier de ses profils et attend.
    Pour réseoudre cela, je suppose qu'il faut imbriquer deux findall, mais je n'ai pas trouvé d'exemple ni réussi malgrès de nombreux essais.

    je suis prenneur de toute suggestion,

    d'avance merci à tous,

    cdt,

    jfv.work

  2. #2
    Rédacteur/Modérateur
    Avatar de Trap D
    Inscrit en
    septembre 2003
    Messages
    4 571
    Détails du profil
    Informations forums :
    Inscription : septembre 2003
    Messages : 4 571
    Points : 6 001
    Points
    6 001

    Par défaut

    Il suffit de mettre profile dans le findall :
    Code :
    1
    2
    3
    scopep(UserId) :-
        findall([X,Y,Z,R],(profile(UserId,A),scopeProfile(A,X,Y,Z,R)),List),
        maplist(writeln,List).
    "La haine seule fait des choix" - Koan Zen
    "Il ne faut pas être meilleur que les autres, il faut être meilleur que soi." Albert Jacquard
    "Ceux qui savent où ils ont posé leur parapluie ne sont pas alcooliques." - pgibonne.
    Faites du Prolog, ça vous changera les idées !
    Ma page Prolog
    Mes codes sources commentés

    Mon avatar : Intérieur avec jeune femme de Vilhelm Hammershoi

  3. #3
    Invité régulier
    Inscrit en
    décembre 2010
    Messages
    30
    Détails du profil
    Informations forums :
    Inscription : décembre 2010
    Messages : 30
    Points : 8
    Points
    8

    Par défaut

    Merci beaucoup, ça marche très bien: encore une fois je cherche compliqué là ou c'est simple

+ Répondre à la discussion
Cette discussion est résolue.

Liens sociaux

Règles de messages

  • Vous ne pouvez pas créer de nouvelles discussions
  • Vous ne pouvez pas envoyer des réponses
  • Vous ne pouvez pas envoyer des pièces jointes
  • Vous ne pouvez pas modifier vos messages
  •