mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-21 17:12:50 -06:00
few more fixes in the NLG grammar
This commit is contained in:
23
examples/nlg/LogicCnc.gf
Normal file
23
examples/nlg/LogicCnc.gf
Normal file
@@ -0,0 +1,23 @@
|
||||
--# -path=present
|
||||
concrete LogicCnc of Logic = {
|
||||
|
||||
lincat
|
||||
Ind = {s : Str};
|
||||
Prop = {s:Str};
|
||||
|
||||
lin
|
||||
john = {s="john"};
|
||||
mary = {s="mary"};
|
||||
boy x = {s="boy"++"("++x.s++")"};
|
||||
smart x = {s="smart"++"("++x.s++")"};
|
||||
love x y = {s="love"++"("++x.s++","++y.s++")"};
|
||||
leave x = {s="leave"++"("++x.s++")"};
|
||||
and x y = {s=x.s++"&&"++y.s};
|
||||
or x y = {s=x.s++"||"++y.s};
|
||||
impl x y = {s=x.s++"=>"++y.s};
|
||||
forall f = {s="forall"++f.$0++"."++"("++f.s++")"};
|
||||
exists f = {s="exists"++f.$0++"."++"("++f.s++")"};
|
||||
not p = {s="not"++"("++p.s++")"};
|
||||
eq x y = {s=x.s++"="++y.s};
|
||||
|
||||
}
|
||||
Reference in New Issue
Block a user