GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-22 17:42:51 -06:00
Code Issues Packages Projects Releases Wiki Activity

prelude sources to lib/src; present in StructuralEng; refactored checkGFCC

Browse Source
This commit is contained in:
aarne
2007-12-13 10:12:00 +00:00
parent e6c9cb2b52
commit 072b48065d
17 changed files with 85 additions and 44 deletions
Download Patch File Download Diff File Expand all files Collapse all files

22
lib/resource/english/StructuralEng.gf
View File

@@ -20,8 +20,15 @@ concrete StructuralEng of Structural = CatEng **
by8agent_Prep = ss "by" ;
by8means_Prep = ss "by" ;
can8know_VV, can_VV = {
s = table VVForm [["be able to"] ; "can" ; ["been able to"] ;
["being able to"] ; "could" ; "can't" ; "couldn't"] ;
s = table {
VVF VInf => ["be able to"] ;
VVF VPres => "can" ;
VVF VPPart => ["been able to"] ;
VVF VPresPart => ["being able to"] ;
VVF VPast => "could" ; --# notpresent
VVPastNeg => "couldn't" ; --# notpresent
VVPresNeg => "can't"
} ;
isAux = True
} ;
during_Prep = ss "during" ;
@@ -51,8 +58,15 @@ concrete StructuralEng of Structural = CatEng **
most_Predet = ss "most" ;
much_Det = mkDeterminer Sg "much" ;
must_VV = {
s = table VVForm [["have to"] ; "must" ; ["had to"] ;
["having to"] ; ["had to"] ; "mustn't" ; ["hadn't to"]] ; ----
s = table {
VVF VInf => ["have to"] ;
VVF VPres => "must" ;
VVF VPPart => ["had to"] ;
VVF VPresPart => ["having to"] ;
VVF VPast => ["had to"] ; --# notpresent
VVPastNeg => ["hadn't to"] ; --# notpresent
VVPresNeg => "mustn't"
} ;
isAux = True
} ;
no_Phr = ss "no" ;