diff options
| author | bjorn <bjorn@bringert.net> | 2008-10-30 14:37:54 +0000 |
|---|---|---|
| committer | bjorn <bjorn@bringert.net> | 2008-10-30 14:37:54 +0000 |
| commit | bed2d9068e3bd064342639de14a02b3d8cfa366a (patch) | |
| tree | 00ee2ec18ff61a9f911a9f2f8c3bc26712bec642 /next-lib/src/english/ParadigmsEng.gf | |
| parent | 9e26b4f85224132ecf01847bb260eec3c04a4611 (diff) | |
More English morphology clean-up.
Diffstat (limited to 'next-lib/src/english/ParadigmsEng.gf')
| -rw-r--r-- | next-lib/src/english/ParadigmsEng.gf | 12 |
1 files changed, 9 insertions, 3 deletions
diff --git a/next-lib/src/english/ParadigmsEng.gf b/next-lib/src/english/ParadigmsEng.gf index 27f05892d..beea42b4e 100644 --- a/next-lib/src/english/ParadigmsEng.gf +++ b/next-lib/src/english/ParadigmsEng.gf @@ -28,6 +28,7 @@ resource ParadigmsEng = open (Predef=Predef), Prelude, MorphoEng, + ResEng, CatEng in { --2 Parameters @@ -177,6 +178,10 @@ oper mkAdA : Str -> AdA ; +-- Adverbs modifying numerals + + mkAdN : Str -> AdN ; + --2 Prepositions -- -- A preposition as used for rection in the lexicon, as well as to @@ -287,9 +292,9 @@ oper -- The definitions should not bother the user of the API. So they are -- hidden from the document. - Gender = MorphoEng.Gender ; - Number = MorphoEng.Number ; - Case = MorphoEng.Case ; + Gender = ResEng.Gender ; + Number = ResEng.Number ; + Case = ResEng.Case ; human = Masc ; nonhuman = Neutr ; masculine = Masc ; @@ -405,6 +410,7 @@ oper mkAdv x = ss x ** {lock_Adv = <>} ; mkAdV x = ss x ** {lock_AdV = <>} ; mkAdA x = ss x ** {lock_AdA = <>} ; + mkAdN x = ss x ** {lock_AdN = <>} ; mkPrep p = ss p ** {lock_Prep = <>} ; noPrep = mkPrep [] ; |