Publicité
+ Répondre à la discussion
Affichage des résultats 1 à 6 sur 6
  1. #1
    Membre à l'essai
    Femme Profil pro Chloé Garcia
    Étudiant
    Inscrit en
    avril 2012
    Messages
    59
    Détails du profil
    Informations personnelles :
    Nom : Femme Chloé Garcia
    Localisation : France

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : avril 2012
    Messages : 59
    Points : 24
    Points
    24

    Par défaut Problème sur fonction simple

    Bonjour,

    J'apprends actuellement le lisp et j'ai quelques problèmes, notamment avec la compréhension des retour de fonctions.

    J'ai une BaseTest, constituée d'une liste de personnes :
    Code :
    1
    2
    3
    4
    5
    6
    7
    (setq BaseTest '((Dupond Pierre Lyon 45 150)
    (Dupond Marie Nice 32 200)
    (Dupond Jacques Lyon 69 20)
    (Perrot Jacques Geneve 28 500)
    (Perrot Jean Nice 55 60)
    (Perrot Anna Grenoble 19 180)
    ))
    La fonction que je cherche à faire :
    En argument, je prends la BaseTest et je dois ressortir une liste composée des personnes dont le nom est Perrot.

    Voilà ce que j'ai essayé de faire :

    Code :
    (defun F2 (base) (dotimes (i (length base)) (if(member 'Perrot (nth i base)) (setq liste(list(member 'Perrot (nth i base)))) (return-from F2 liste))))
    Je ne pense pas avoir bien saisir le rôle de la fonction 'return-from' d'une part ... et la fonction me renvoie forcément la dernière valeur de la BaseTest!

    Comment faire pour tout renvoyer ?

    Merci pour votre aide.

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

    Par défaut

    Je ne connais pas bien la syntaxe LISP mais il faut peut-être faire un append des résultats connus avec l'appel de la fonction.
    D'après ton code, mais je ne sais pas où tu en es de l'apprentissage du LISP, tu n'utilises pas les possibilités de programmation fonctionnelle du LISP.
    Je penses que tu as entendu parler de car et cdr pour les listes non ?
    Voilà ce qu'on pourrait écrire en Scheme :
    Code :
    1
    2
    3
    4
    5
    6
    7
    (define (F2 Liste)
      (cond ((null? Liste) Liste)
            ((member 'Perrot (car Liste)) (cons (car Liste) (F2 (cdr Liste))))
            (else (F2 (cdr Liste)))))
    
    
    (F2 BaseTest)
    Avec comme résultat
    ((Perrot Jacques Geneve 28 500) (Perrot Jean Nice 55 60) (Perrot Anna Grenoble 19 180))
    "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
    Membre à l'essai
    Femme Profil pro Chloé Garcia
    Étudiant
    Inscrit en
    avril 2012
    Messages
    59
    Détails du profil
    Informations personnelles :
    Nom : Femme Chloé Garcia
    Localisation : France

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : avril 2012
    Messages : 59
    Points : 24
    Points
    24

    Par défaut

    La fonction null? ne fonctionne pas chez moi.

    Que veut-elle dire ? je vais chercher un équivalent.

  4. #4
    Rédacteur/Modérateur
    Avatar de Trap D
    Inscrit en
    septembre 2003
    Messages
    4 560
    Détails du profil
    Informations forums :
    Inscription : septembre 2003
    Messages : 4 560
    Points : 5 488
    Points
    5 488

    Par défaut

    Elle teste si une liste est vide.
    "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

  5. #5
    Membre à l'essai
    Femme Profil pro Chloé Garcia
    Étudiant
    Inscrit en
    avril 2012
    Messages
    59
    Détails du profil
    Informations personnelles :
    Nom : Femme Chloé Garcia
    Localisation : France

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : avril 2012
    Messages : 59
    Points : 24
    Points
    24

    Par défaut

    Ok, merci.;

    Le else non plus n'existe pas dans ma version -.-

    Je vais donc refaire le programme en mettant les bons clés et je reviendrai vers toi si je rencontre encore des soucis!

    merci en tout cas

  6. #6
    Membre à l'essai
    Femme Profil pro Chloé Garcia
    Étudiant
    Inscrit en
    avril 2012
    Messages
    59
    Détails du profil
    Informations personnelles :
    Nom : Femme Chloé Garcia
    Localisation : France

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : avril 2012
    Messages : 59
    Points : 24
    Points
    24

    Par défaut

    Voilà le code avec mes mots clés :

    (
    Code :
    1
    2
    3
    4
    defun F2 (Liste)
      (cond ((null Liste) Liste)
            ((member 'Perrot (car Liste)) (cons (car Liste) (F2 (cdr Liste))))
            (T (F2 (cdr Liste)))))
    Encore merci.

+ 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
  •