Cours AP "Résolution Prolog"+Exemple Humeur

\* ***********************************************

Exemple Présentation du programme Humeur
Jean et Alain sont deux personnages dont l'humeur est régie par :

X est de bonne humeur si X a de l'argent et X est en
vacances et il y a du soleil ou si X réussit dans son travail
et dans sa famille. On sait que :

Jean a de l'argent.

Alain a de l'argent.

Jean est en vacances si on est en aout.

Alain est en vacances si on est en juillet.

On est en juillet.

Il y a du soleil si on est en aout.

Jean réussit dans le travail.

Alain réussit dans le travail.

Alain réussit dans sa famille

Le programme HUMEUR est le suivant :

*/

/* programme humeur en Turbo Prolog */

Code:

PREDICATES
  est_de_bonne_humeur(symbol)
  a_de_l_argent(symbol)
  est_en_vacances(symbol)
  on_est_en(symbol)
  il_y_a_du_soleil
  reussit_dans_le_travail(symbol)
  reussit_dans_sa_famille(symbol)

CLAUSES

 est_de_bonne_humeur(X) :-
 a_de_l_argent(X),est_en_vacances(X),il_y_a_du_soleil.

 est_de_bonne_humeur(X) :- reussit_dans_le_travail(X),
                            reussit_dans_sa_famille(X).
 a_de_l_argent(jean).

 a_de_l_argent(alain).

 est_en_vacances(jean) :- on_est_en(aout).

 est_en_vacances(alain) :- on_est_en(juillet).
 on_est_en(juillet).

 il_y_a_du_soleil :- on_est_en(aout).

 reussit_dans_le_travail(jean).
 reussit_dans_le_travail(alain).

 reussit_dans_sa_famille(alain).