1
0
forked from GitHub/gf-rgl

implemented compound nounds which work like adverbs

This commit is contained in:
Krasimir Angelov
2018-05-30 23:04:40 +02:00
parent 3946144833
commit 9558094911
5 changed files with 125 additions and 114 deletions
+5 -2
View File
@@ -16,8 +16,11 @@ lin
ANeut => Neut
}) Indef
in {
s = \\nf => n1.rel ! nform2aform nf n2.g ++ n2.s ! (indefNForm nf) ;
rel = \\af => n1.rel ! aform ++ n2.s ! NF Sg Indef ;
s = \\nf => case n1.relPost of {
True => n2.s ! (indefNForm nf) ++ n1.rel ! nform2aform nf n2.g ;
False => n1.rel ! nform2aform nf n2.g ++ n2.s ! indefNForm nf
} ;
rel = \\af => n1.rel ! aform ++ n2.s ! NF Sg Indef ; relPost = n1.relPost ;
g = n2.g
} ;