mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-30 02:18:55 -06:00
11 lines
224 B
Plaintext
11 lines
224 B
Plaintext
concrete ExtendTur of Extend = CatTur ** open ResTur in {
|
|
|
|
lin
|
|
GenModNP num np cn = {
|
|
s = \\c => np.s ! Nom ++ num.s ! num.n ! c ++ cn.gen ! num.n ! np.a ;
|
|
h = cn.h ;
|
|
a = {n=num.n; p=P3} ;
|
|
} ;
|
|
|
|
}
|