enfermedades prolog

Enfermo de (pedro, gripe).

Enfermo de (pedro, hepatitis).

Enfermo de (juan, hepatitis).

Enfermo de (maría, gripe).

Enfermo de (Carlos, intoxicación).

Síntoma de (fiebre, gripe).

Síntoma de (cansancio, hepatitis).

Síntoma de (diarrea, intoxicación).

Síntoma de (cansancio, gripe).

Elimina (aspirina, fiebre).

Elimina(lomotil,diarrea).

Alivia (Enfermedad, Pastillas):-   síntoma (Síntoma,Enfermedad),    elimina (Pastillas, Síntoma).

Debe tomar (Persona, Pastillas):-   enfermo de (Persona, Enfermedad),  alivia (Enfermedad, Pastillas).

Comparte(Persona A, PersonaB, Síntoma):- enfermo de (PersonaA, EnfermedadA), enfermo de (PersonaB, EnfermedadB), PersonaA \= PersonaB,sintoma(Sintoma,EnfermedadA),sintoma(Sintoma,EnfermedadB).