forked from GitHub/gf-rgl
make MorphoPol usable as an API
This commit is contained in:
@@ -15,12 +15,12 @@
|
||||
|
||||
-- DO NOT EDIT THIS FILE
|
||||
|
||||
resource NounMorphoPol = ResPol ** open Prelude, (Predef=Predef) in {
|
||||
resource NounMorphoPol = open CatPol, ResPol, Prelude, (Predef=Predef) in {
|
||||
|
||||
flags coding=utf8;
|
||||
|
||||
oper mkN: (SubstForm => Str) -> Gender -> CommNoun;
|
||||
oper mkN tab gen = { s = tab; g = gen };
|
||||
oper mkN: (SubstForm => Str) -> Gender -> N;
|
||||
oper mkN tab gen = lin N { s = tab; g = gen };
|
||||
|
||||
oper nounPN : (SubstForm => Str) -> GenNum -> NounPhrase;
|
||||
oper nounPN forms gn =
|
||||
|
||||
Reference in New Issue
Block a user