s452652/system_doradzwa_medycznego_prolog
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

initial comit

Browse Source
This commit is contained in:
Tomek Sidoruk 2021-06-12 16:14:29 +02:00
commit b5f6b65141
Signed by: s452652
GPG Key ID: 3E83A65E74849A08
1 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
asd.pl Normal file
View File

@ -0,0 +1,10 @@
disease('flu',[('pain',['sore']),('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')],[('cannot swallow'),('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',['sore']),('paroxysmal cough')],[('conjunctivitis'),('vomiting')]).
disease('myasthenia',[('excessive fatigue')],[('muscle weakness'),('double vision')]).
disease('atrial fibrillation',[('dizziness'),('fainting'),('excessive fatigue')],[('cough')]).