summaryrefslogtreecommitdiff
path: root/examples/stoneage/StoneageResSwe.gf
diff options
context:
space:
mode:
authorbringert <unknown>2005-03-02 13:48:06 +0000
committerbringert <unknown>2005-03-02 13:48:06 +0000
commit0caa34b163a48863327920bc0776fe3fa30a0845 (patch)
tree22f86c1e9a768a585cce1058fc8892c9bfa8c5b7 /examples/stoneage/StoneageResSwe.gf
parentdf0db79480c064e3e3672e8ee8ed7534192f5409 (diff)
Added not yet working swedish stoneage stuff.
Diffstat (limited to 'examples/stoneage/StoneageResSwe.gf')
-rw-r--r--examples/stoneage/StoneageResSwe.gf13
1 files changed, 13 insertions, 0 deletions
diff --git a/examples/stoneage/StoneageResSwe.gf b/examples/stoneage/StoneageResSwe.gf
new file mode 100644
index 000000000..8d303d875
--- /dev/null
+++ b/examples/stoneage/StoneageResSwe.gf
@@ -0,0 +1,13 @@
+resource StoneageResSwe = open ResourceSwe, ParadigmsSwe in {
+
+oper
+ PresV : V -> NP -> S = \v,s -> PresCl (SPredV s v) ;
+ PresV2 : V2 -> NP -> NP -> S = \v,s,o -> PresCl (SPredV2 s v o) ;
+ PresVasV2 : V -> NP -> NP -> S = \ v -> PresV2 (dirV2 v) ;
+
+ PresCl : Cl -> S = UseCl (PosTP TPresent ASimul) ;
+
+ ModPosA : ADeg -> CN -> CN = \a -> ModAP (PositADeg a) ;
+ ModA : A -> CN -> CN = \a -> ModAP (UseA a) ;
+
+} \ No newline at end of file