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
+2 -2
View File
@@ -82,7 +82,7 @@ concrete CatBul of Cat = CommonX - [IAdv,CAdv,SC] ** open ResBul, Prelude, Prede
A = {s : AForm => Str; adv : Str} ;
A2 = {s : AForm => Str; adv : Str; c2 : Str} ;
N = {s : NForm => Str; rel : AForm => Str; g : AGender} ;
N = {s : NForm => Str; rel : AForm => Str; relPost : Bool; g : AGender} ;
N2 = {s : NForm => Str; g : AGender} ** {c2 : Preposition} ;
N3 = {s : NForm => Str; g : AGender} ** {c2,c3 : Preposition} ;
PN = {s : Str; g : Gender} ;
@@ -103,7 +103,7 @@ concrete CatBul of Cat = CommonX - [IAdv,CAdv,SC] ** open ResBul, Prelude, Prede
A = \s -> {s = \\_ => s; adv = s};
A2 = \s -> {s = \\_ => s; adv = s; c2 = ""};
N = \s -> {s = \\_ => s; rel = \\_ => s; g = AMasc NonHuman};
N = \s -> {s = \\_ => s; rel = \\_ => s; relPost = False; g = AMasc NonHuman};
N2 = \s -> {s = \\_ => s; g = AMasc NonHuman; c2 = {s=""; c=Acc}};
N3 = \s -> {s = \\_ => s; g = AMasc NonHuman; c2,c3 = {s=""; c=Acc}};