msyds/gf-rgl
1
0
Fork 0
forked from GitHub/gf-rgl
Code Pull Requests Activity

most Cl rules ok

Browse Source
This commit is contained in:
aarne
2005-06-26 09:49:33 +00:00
parent e6b1556f6b
commit 67670694e7
4 changed files with 115 additions and 189 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
resource/finnish/CategoriesFin.gf
View File

@@ -48,7 +48,7 @@ lincat
V = Verb ;
-- = {s : VForm => Str}
---- VP = {s,s2 : Bool => SForm => Agr => Str ; isAux : Bool} ;
---- VPI = {s : VIForm => Agr => Str ; s1 : Str} ; -- s1 is "not" or []
VPI = {s : VIForm => Str} ;
----- VP = Verb ** {s2 : VForm => Str ; c : ComplCase} ;
---- VG = {s,s2 : Bool => VForm => Str ; c : ComplCase} ;
V2 = TransVerb ;
@@ -57,12 +57,12 @@ lincat
VS = Verb ;
VV = Verb ** {c : ComplCase} ;
VQ = Verb ;
VA = Verb ** {c : ComplCase} ;
VA = Verb ** {c : Case} ;
V2S = TransVerb ;
V2Q = TransVerb ;
V2V = TransVerb ; ----
V2A = TransVerb ; ----
V2A = TransVerb ** {c2 : Case} ;
V0 = Verb ;
TP = {s : Str ; b : Bool ; t : Tense ; a : Anteriority} ; --- the Str field is dummy
@@ -77,7 +77,7 @@ lincat
S = {s : Str} ;
Cl = Clause ;
-- = {s : SType => Bool => SForm => Str} ;
-- = {s : Bool => SForm => Str} ;
Slash = Sentence ** {s2 : Str ; c : Case} ;
@@ -88,7 +88,7 @@ lincat
IP = {s : NPForm => Str ; n : Number} ;
IDet = {s : Gender => Case => Str ; n : Number} ;
IAdv = {s : Str} ;
---- QCl = {s : Bool => SForm => QuestForm => Str} ;
QCl = {s : Bool => SForm => Str} ;
QS = {s : Str} ;
Imp = {s : Number => Str} ;
Phr = {s : Str} ;