diff options
| author | aarne <unknown> | 2005-08-31 20:43:38 +0000 |
|---|---|---|
| committer | aarne <unknown> | 2005-08-31 20:43:38 +0000 |
| commit | f323d48fbbabee7213b5a61ba160f7fd438a684c (patch) | |
| tree | 691f4562a260a4074e75f4e2d6ecb59f9822600a /grammars/dep/DepEng.gf | |
| parent | 919ebaade9a4595191697f122f5024772021db0b (diff) | |
experiment with dep resource
Diffstat (limited to 'grammars/dep/DepEng.gf')
| -rw-r--r-- | grammars/dep/DepEng.gf | 26 |
1 files changed, 26 insertions, 0 deletions
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"} ; +} |
