forked from GitHub/gf-core
*** empty log message ***
This commit is contained in:
@@ -20,8 +20,11 @@ fun
|
|||||||
Complain : Patient -> Symptom -> Prop ;
|
Complain : Patient -> Symptom -> Prop ;
|
||||||
|
|
||||||
ShePatient : Patient ;
|
ShePatient : Patient ;
|
||||||
|
HePatient : Patient ;
|
||||||
|
WePatient : Patient ;
|
||||||
TheyPatient : Patient ;
|
TheyPatient : Patient ;
|
||||||
IPatientHe : Patient ;
|
IPatientHe : Patient ;
|
||||||
|
IPatientShe : Patient ;
|
||||||
|
|
||||||
Influenza : Illness ;
|
Influenza : Illness ;
|
||||||
Malaria : Illness ;
|
Malaria : Illness ;
|
||||||
@@ -68,8 +71,9 @@ fun
|
|||||||
Arm : BodyPart ;
|
Arm : BodyPart ;
|
||||||
Back : BodyPart ;
|
Back : BodyPart ;
|
||||||
Shoulder : BodyPart ;
|
Shoulder : BodyPart ;
|
||||||
-- Knee : BodyPart ;
|
|
||||||
-- Tooth : BodyPart ;
|
-- Tooth : BodyPart ;
|
||||||
|
-- Knee : BodyPart ;
|
||||||
|
|
||||||
|
|
||||||
Fever : Symptom ;
|
Fever : Symptom ;
|
||||||
-- Sickness: Symptom ;
|
-- Sickness: Symptom ;
|
||||||
|
|||||||
@@ -22,6 +22,9 @@ lin
|
|||||||
ShePatient = SheNP ;
|
ShePatient = SheNP ;
|
||||||
TheyPatient = TheyNP ;
|
TheyPatient = TheyNP ;
|
||||||
IPatientHe = INP ;
|
IPatientHe = INP ;
|
||||||
|
IPatientShe = INP ;
|
||||||
|
HePatient = HeNP ;
|
||||||
|
WePatient = WeNP ;
|
||||||
|
|
||||||
And x y = ConjS AndConj (TwoS x y) ;
|
And x y = ConjS AndConj (TwoS x y) ;
|
||||||
|
|
||||||
|
|||||||
@@ -28,6 +28,9 @@ lin
|
|||||||
ShePatient = SheNP ;
|
ShePatient = SheNP ;
|
||||||
TheyPatient = TheyNP ;
|
TheyPatient = TheyNP ;
|
||||||
IPatientHe = INP ;
|
IPatientHe = INP ;
|
||||||
|
IPatientShe = INP ;
|
||||||
|
HePatient = HeNP ;
|
||||||
|
WePatient = WeNP ;
|
||||||
|
|
||||||
HaveIllness = predV2 (tvDir vAvoir) ;
|
HaveIllness = predV2 (tvDir vAvoir) ;
|
||||||
Complain = predV2 (tvDir vAvoir) ;
|
Complain = predV2 (tvDir vAvoir) ;
|
||||||
@@ -106,8 +109,9 @@ lin
|
|||||||
Arm = mkCNomReg "bras" Masc ** {lock_CN = <> };
|
Arm = mkCNomReg "bras" Masc ** {lock_CN = <> };
|
||||||
Back = mkCNomReg "dos" Masc ** {lock_CN = <> };
|
Back = mkCNomReg "dos" Masc ** {lock_CN = <> };
|
||||||
Shoulder = mkCNomReg "epaule" Fem ** {lock_CN = <> };
|
Shoulder = mkCNomReg "epaule" Fem ** {lock_CN = <> };
|
||||||
-- Knee = mkCNomReg "genou" Masc ** {lock_CN = <> };
|
|
||||||
-- Tooth = mkCNomReg "dents" Masc ** {lock_CN = <> };
|
-- Tooth = mkCNomReg "dents" Masc ** {lock_CN = <> };
|
||||||
|
-- Knee = mkCNomReg "genou" Masc ** {lock_CN = <> };
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
-- High = AdjP1 (mkAdjReg "élevé" adjPost ** {lock_Adj1 = <> }) ;
|
-- High = AdjP1 (mkAdjReg "élevé" adjPost ** {lock_Adj1 = <> }) ;
|
||||||
|
|||||||
@@ -24,6 +24,11 @@ lin
|
|||||||
TheyPatient = TheyNP ;
|
TheyPatient = TheyNP ;
|
||||||
IPatientHe = { s = INP.s ; g = PGen Masc; anim = INP.anim ;
|
IPatientHe = { s = INP.s ; g = PGen Masc; anim = INP.anim ;
|
||||||
n = INP.n ; nComp = INP.nComp ; p = INP.p ; pron = INP.pron; lock_NP = <>} ;
|
n = INP.n ; nComp = INP.nComp ; p = INP.p ; pron = INP.pron; lock_NP = <>} ;
|
||||||
|
IPatientShe = { s = INP.s ; g = PGen Fem; anim = INP.anim ;
|
||||||
|
n = INP.n ; nComp = INP.nComp ; p = INP.p ; pron = INP.pron; lock_NP = <>} ;
|
||||||
|
HePatient = HeNP ;
|
||||||
|
WePatient = WeNP ;
|
||||||
|
|
||||||
|
|
||||||
Influenza = UseN ( gripp**{lock_N = <>}) ;
|
Influenza = UseN ( gripp**{lock_N = <>}) ;
|
||||||
Malaria = UseN ( malaria**{lock_N = <>}) ;
|
Malaria = UseN ( malaria**{lock_N = <>}) ;
|
||||||
|
|||||||
@@ -30,6 +30,9 @@ lin
|
|||||||
ShePatient = mkPronPatient hon_35 ;
|
ShePatient = mkPronPatient hon_35 ;
|
||||||
TheyPatient = mkPronPatient de_38 ;
|
TheyPatient = mkPronPatient de_38 ;
|
||||||
IPatientHe = mkPronPatient jag_32 ;
|
IPatientHe = mkPronPatient jag_32 ;
|
||||||
|
IPatientShe = mkPronPatient jag_32 ;
|
||||||
|
HePatient = mkPronPatient han_34 ;
|
||||||
|
WePatient = mkPronPatient vi_36 ;
|
||||||
|
|
||||||
Influenza = UseN (nApa "influens") ;
|
Influenza = UseN (nApa "influens") ;
|
||||||
Malaria = UseN (nApa "malari");
|
Malaria = UseN (nApa "malari");
|
||||||
|
|||||||
Reference in New Issue
Block a user