heureux(x) :- agriculteur(x), bonne(recolte).
bonne(recolte) :- bonne(pluie), bon(prix).
bonne(pluie) :- reguliere(pluie).