system_doradzwa_medycznego_prolog/asd.pl

disease('flu',[('pain',['throat']),('runny nose'),('fever',-1),('general weakness'),('cough')],[('pain',['musles'])]).
disease('malaria',[('fever',2),('general weakness')],[('pain',['head']),('chills'),('erythrocyte',-1)]).
disease('angina',[('fever',2),('cough'),('general weakness'),('magnifying lymph nodes'),('pain',['throat'])],[('cannot swallow'),('pain',['head']),('chills')]).
disease('diphtheria',[('fever',1),('general weakness'),('dyspnea')],[('Unclear Speech'),('cannot swallow')]).
disease('typhoid',[('fever',-1),('pain',['stomach']),('spleen enlargement')],['tire symptoms']).
disease('plague',[('fever',2),('general weakness'),('magnifying lymph nodes'),('liver enlargement'),('spleen enlargement')],[('cloded rash')]).
disease('haemophilia',[('epistaxis'),('impaired blood clotting'),('spleen enlargement')],[]).
disease('whooping cough',[('fever',1),('pain',['throat']),('paroxysmal cough')],[('conjunctivitis'),('vomiting')]).
disease('myasthenia',[('excessive fatigue')],[('muscle weakness'),('double vision')]).
disease('atrial fibrillation',[('dizziness'),('fainting'),('excessive fatigue')],[('cough')]).