Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Prolog Discussion :

Problème avec assert


Sujet :

Prolog

  1. #1
    Candidat au Club
    Homme Profil pro
    Étudiant
    Inscrit en
    novembre 2017
    Messages
    4
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Meurthe et Moselle (Lorraine)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : novembre 2017
    Messages : 4
    Points : 2
    Points
    2
    Par défaut Problème avec assert
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    % set_echo: ce prédicat active l'affichage par le prédicat echo
    set_echo :- assert(echo_on).
     
    % clr_echo: ce prédicat inhibe l'affichage par le prédicat echo
    clr_echo :- retractall(echo_on).
     
    % echo(T): si le flag echo_on est positionné, echo(T) affiche le termeT
    %  sinon, echo(T) réussit simplement en ne faisant rien.
     
    echo(T) :- echo_on, !, write(T).
    echo(_).
    exécution:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
         set_echo, echo('salut').
    Voila mon problème au lancement de echo j'ai le droit à: "procedure `echo_on' does not exist" hors quand je fais "set_echo, listing" echo_on est bien rajouté.
    Si vous avez une idée je suis preneur.

  2. #2
    Rédacteur/Modérateur
    Avatar de Trap D
    Profil pro
    Inscrit en
    septembre 2003
    Messages
    4 889
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : septembre 2003
    Messages : 4 889
    Points : 6 329
    Points
    6 329
    Par défaut
    Quel Prolog utilisez-vus ?
    "Sur le mien", SWI-Prolog 7.7.2 sous Windows 10 je n'ai pas ce problème (alors que je devrais l'avoir, puisque effectivement echo_on n'est pas déclaré !
    Cependant, je pense qu'il y a un problème de conception quelque part.
    Que désirez-vous faire exactement ?
    Est-ce ceci ?
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    :- dynamic(echo/1).
    % set_echo: ce prédicat active l'affichage par le prédicat echo
    set_echo :- retractall(echo(_)), assert(echo(on)).
     
    % clr_echo: ce prédicat inhibe l'affichage par le prédicat echo
    clr_echo :- retractall(echo(_)), assert(echo(off)).
     
    % echo(T): si le flag echo_on est positionné, echo(T) affiche le termeT
    % sinon, echo(T) réussit simplement en ne faisant rien.
     
    affiche(T) :-
        echo(on), write(T).
    affiche(_).
    Avec à l'exécution :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
     
    ?- affiche(toto).
    true.
     
    ?- set_echo, affiche(toto).
    toto
    true.
     
    ?- clr_echo.
    true.
     
    ?- affiche(toto).
    true.
    "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 : La Madeleine à la veilleuse de Georges de La Tour

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo