1
0
forked from GitHub/gf-core

changed names of mkNP and mkCN in ParadigmsRus

This commit is contained in:
aarne
2007-12-07 08:35:39 +00:00
parent 5d1ad0badc
commit f7b3c218cf

View File

@@ -183,12 +183,6 @@ oper
mkPN : Str -> Gender -> Animacy -> PN ; -- "Иван", "Маша"
nounPN : N -> PN ;
-- On the top level, it is maybe $CN$ that is used rather than $N$, and
-- $NP$ rather than $PN$.
mkCN : N -> CN ;
mkNP : Str -> Gender -> Animacy -> NP ;
--2 Adjectives
@@ -517,9 +511,16 @@ regN = \ray ->
} ** {lock_PN =<>};
nounPN n = {s=\\c => n.s! SF Sg c; anim=n.anim; g=n.g; lock_PN=<>};
mkCN = UseN;
-- On the top level, it is maybe $CN$ that is used rather than $N$, and
-- $NP$ rather than $PN$.
mkNP = \x,y,z -> UsePN (mkPN x y z) ;
makeCN : N -> CN ;
makeNP : Str -> Gender -> Animacy -> NP ;
makeCN = UseN;
makeNP = \x,y,z -> UsePN (mkPN x y z) ;
-- Adjective definitions
regA = \ray, comp ->