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

controlling the substantival and adjectival det forms in english

Browse Source
This commit is contained in:
aarne
2010-12-17 14:04:05 +00:00
parent b3dc045e3f
commit 6250c85417
3 changed files with 11 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
lib/src/english/MorphoEng.gf
View File

@@ -16,10 +16,13 @@ resource MorphoEng = open Prelude, (Predef=Predef), ResEng in {
oper
mkDeterminer : Number -> Str -> {s : Str ; sp : Case => Str; n : Number} = \n,s ->
mkDeterminer : Number -> Str ->
{s : Str ; sp : Case => Str; n : Number ; hasNum : Bool} = \n,s ->
{s = s;
sp = regGenitiveS s ;
n = n} ;
n = n ;
hasNum = True ; -- doesn't matter since s = sp
} ;
--2 Pronouns