From f323d48fbbabee7213b5a61ba160f7fd438a684c Mon Sep 17 00:00:00 2001 From: aarne Date: Wed, 31 Aug 2005 20:43:38 +0000 Subject: experiment with dep resource --- grammars/dep/DepEng.gf | 26 ++++++++++++++++++++++++++ 1 file changed, 26 insertions(+) create mode 100644 grammars/dep/DepEng.gf (limited to 'grammars/dep/DepEng.gf') diff --git a/grammars/dep/DepEng.gf b/grammars/dep/DepEng.gf new file mode 100644 index 000000000..9f95dfba9 --- /dev/null +++ b/grammars/dep/DepEng.gf @@ -0,0 +1,26 @@ +-- to test: +-- p -cat=SG -tr "who walks" | pt -transform=typecheck -tr | l + +concrete DepEng of Dep = { + lincat + NType, VType = {s : Str} ; + SG = {s : Str} ; + NG = {s : Str} ; + VG = {s : Str} ; + CG = {s : Str} ; + + lin + NtS, NtQ = {s = []} ; + Vt1, Vt2, VtS = {s = []} ; + + MkSG n v ng vg cg = {s = n.s ++ v.s ++ ng.s ++ vg.s ++ cg.s} ; + + CG1 = {s = []} ; + CG2 ng = ng ; + + John = {s = "John"} ; + Who = {s = "who"} ; + + Walk = {s = "walks"} ; + Love = {s = "loves"} ; +} -- cgit v1.2.3