mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-28 01:18:57 -06:00
(Hun) Fix bugs in Cons,ConjNP
This commit is contained in:
@@ -31,8 +31,12 @@ lincat
|
|||||||
|
|
||||||
lin
|
lin
|
||||||
BaseNP x y = twoTable Case x y ** y ;
|
BaseNP x y = twoTable Case x y ** y ;
|
||||||
ConsNP x xs = consrTable Case comma x xs ** xs ;
|
ConsNP x xs = xs ** consrTable Case comma x xs ;
|
||||||
ConjNP co xs = conjunctDistrTable Case co xs ** xs ** {agr = <P3,co.n>};
|
ConjNP co xs = conjunctDistrTable Case co xs ** xs ** {
|
||||||
|
agr = <P3, case xs.agr.p2 of {
|
||||||
|
Pl => Pl ;
|
||||||
|
_ => co.n }>
|
||||||
|
} ;
|
||||||
|
|
||||||
-- Relative sentences
|
-- Relative sentences
|
||||||
lincat
|
lincat
|
||||||
|
|||||||
Reference in New Issue
Block a user