GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-07-03 04:28:33 -06:00
Code Issues Packages Projects Releases Wiki Activity

make use of CommonX.CAdv

Browse Source
This commit is contained in:
Krasimir Angelov
2018-07-10 13:59:01 +02:00
parent 5d734f9a6c
commit 43950360a6
5 changed files with 11 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/bulgarian/AdverbBul.gf
+4 -3
View File
@@ -5,10 +5,10 @@ concrete AdverbBul of Adverb = CatBul ** open ResBul, Prelude in {
lin
PositAdvAdj a = {s = a.adv} ;
ComparAdvAdj cadv a np = {
s = cadv.s ++ "ïî" ++ "-" ++ a.s ! ASg Neut Indef ++ "îò" ++ np.s ! RObj CPrep
s = cadv.s ++ a.s ! ASg Neut Indef ++ cadv.p ++ np.s ! RObj CPrep
} ;
ComparAdvAdjS cadv a s = {
s = cadv.s ++ "ïî" ++ "-" ++ a.s ! ASg Neut Indef ++ "îò" ++ "êîëêîòî" ++ s.s
s = cadv.s ++ a.s ! ASg Neut Indef ++ cadv.p ++ "êîëêîòî" ++ s.s
} ;
PrepNP prep np = {s = prep.s ++ np.s ! RObj prep.c} ;
@@ -19,5 +19,6 @@ concrete AdverbBul of Adverb = CatBul ** open ResBul, Prelude in {
SubjS = cc2 ;
AdnCAdv cadv = {s = cadv.sn ++ "îò"} ;
AdnCAdv cadv = {s = cadv.s ++ cadv.p} ;
}