GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-21 17:12:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

fixes in French

Browse Source
This commit is contained in:
aarne
2006-01-26 21:46:12 +00:00
parent 21ec0645fa
commit 3e693579b5
6 changed files with 23 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
lib/resource-1.0/romance/ConjunctionRomance.gf
View File

@@ -33,8 +33,16 @@ incomplete concrete ConjunctionRomance of Conjunction =
ConsS = consrTable Mood comma ;
BaseAdv = twoSS ;
ConsAdv = consrSS comma ;
BaseNP x y = twoTable NPForm x y ** {a = conjAgr x.a y.a} ;
ConsNP xs x = consrTable NPForm comma xs x ** {a = conjAgr xs.a x.a} ;
BaseNP x y = {
s1 = \\c => x.s ! c ;
s2 = \\c => y.s ! (conjunctCase c) ;
a = conjAgr x.a y.a
} ;
ConsNP x xs = {
s1 = \\c => x.s ! c ++ comma ++ xs.s1 ! (conjunctCase c) ;
s2 = \\c => xs.s2 ! (conjunctCase c) ;
a = conjAgr x.a xs.a
} ;
BaseAP x y = twoTable AForm x y ** {isPre = andB x.isPre y.isPre} ;
ConsAP xs x = consrTable AForm comma xs x ** {isPre = andB xs.isPre x.isPre} ;