add adverbial form to each adjective in bulgarian-1.4

This commit is contained in:
krasimir
2008-06-08 11:06:30 +00:00
parent 220e7eed63
commit 3b974a0b6c
6 changed files with 25 additions and 15 deletions

View File

@@ -1,6 +1,6 @@
concrete AdverbBul of Adverb = CatBul ** open ResBul, Prelude in {
lin
PositAdvAdj a = {s = a.s ! ASg Neut Indef} ;
PositAdvAdj a = {s = a.adv} ;
ComparAdvAdj cadv a np = {
s = cadv.s ++ "ïî" ++ "-" ++ a.s ! ASg Neut Indef ++ "îò" ++ np.s ! RObj Acc
} ;