mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-01 15:22:50 -06:00
FixedRon
This commit is contained in:
@@ -16,11 +16,13 @@ concrete RelativeRon of Relative =
|
||||
True => {s = \\ag =>
|
||||
(mkClause
|
||||
(rp.s ! {g = ag.g ; n = ag.n} ! No)
|
||||
False
|
||||
{g = rp.a.g ; n = rp.a.n ; p = P3}
|
||||
vp).s ! DDir ; c = No} ;
|
||||
False => {s = \\ag =>
|
||||
(mkClause
|
||||
(rp.s ! {g = ag.g ; n = ag.n} ! No)
|
||||
False
|
||||
ag
|
||||
vp).s ! DDir ; c = No
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user