Query

?- diagnosis(Jose,A).


A = no fever ?


Model

diagnosis(Jose,no fever) , temp(Jose,B │{B #=< 38}) , reg_temp(Jose,37,-6) , reg_temp(Jose,39,-4) , diagnosis(Pedro,fever) , temp(Pedro,39) , reg_temp(Pedro,39,-2)

Justification