blob: db901d29fb5de21c9e9f8e5c7dbe3f8aab5a03f2 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
|
abstract Health = {
cat
Specialization ; Patient ; Body ; Symptom ; SymptomDegree ; Illness ;
Prop ; Condition ; Medicine ;
fun
And : Prop -> Prop -> Prop ;
Complain : Patient -> Symptom -> Prop ;
FeverMod : SymptomDegree -> Symptom ;
PainIn : Patient -> Body -> Prop ;
PainInMod : Patient -> Body -> SymptomDegree -> Prop ;
Injured : Patient -> Body -> Prop ;
Broken : Patient -> Body -> Prop ;
HaveIllness : Patient -> Illness -> Prop ;
BeInCondition : Patient -> Condition -> Prop ;
NeedDoctor : Patient -> Specialization -> Prop ;
NeedMedicine : Patient -> Medicine -> Prop ;
TakeMedicine : Patient -> Medicine -> Prop ;
CatchCold : Condition ;
Pregnant : Condition ;
Fever : Symptom ;
High : SymptomDegree ;
Terrible : SymptomDegree ;
Head : Body ;
Leg : Body ;
ShePatient : Patient ;
TheyPatient : Patient ;
IPatientHe : Patient ;
Influenza : Illness ;
Malaria : Illness ;
Dentist : Specialization ;
PainKiller : Medicine ;
} ;
|
