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

After checkign with tests, identified problems, fixed some - eg more fine-grained animNumSizeNum

Browse Source
This commit is contained in:
Roman Suzi
2020-08-10 00:03:05 +03:00
parent 84361d473d
commit bcadbaaf32
9 changed files with 58 additions and 23 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/russian/ConstructionRus.gf
+3 -3
View File
@@ -130,7 +130,7 @@ lin
let ap=adjFormsAdjective a in
let as_n_units=(how_IAdv.s
++ card.s ! Neut ! Inanimate ! Nom
++ cn.s ! numSizeNum Nom card.size ! (numSizeCase Nom card.size)) in { --? Nom?
++ cn.s ! animNumSizeNum cn.anim Nom card.size ! (numSizeCase Nom card.size)) in { --? Nom?
s=\\gn,anim,cas=> ap.s!gn!anim!cas ++ as_n_units ;
short=\\a=> ap.short ! a ++ as_n_units ;
preferShort=PreferFull ;
@@ -140,7 +140,7 @@ lin
-- : Card -> CN -> NP -> NP ; -- x ounces of this flour
n_units_of_NP card cn np = {
s = \\cas => card.s ! Neut ! Inanimate ! cas
++ cn.s ! numSizeNum cas card.size ! (numSizeCase cas card.size)
++ cn.s ! animNumSizeNum cn.anim cas card.size ! (numSizeCase cas card.size)
++ np.s ! Gen ;
pron=False ;
a = Ag (gennum cn.g (numSizeNumber card.size)) P3
@@ -150,7 +150,7 @@ lin
s=\\n,cas=> cn.s ! n ! cas
++ "на"
++ card.s ! Neut ! Inanimate ! Nom
++ cn_unit.s ! numSizeNum Nom card.size ! numSizeCase Nom card.size
++ cn_unit.s ! animNumSizeNum cn_unit.anim Nom card.size ! numSizeCase Nom card.size
} ;
----------------------------------------------