diff options
| author | aarne <unknown> | 2005-06-30 22:09:36 +0000 |
|---|---|---|
| committer | aarne <unknown> | 2005-06-30 22:09:36 +0000 |
| commit | 4d94cdfd66c63eb01ad90c292f3dc75878a0e8a7 (patch) | |
| tree | 59eb283aeb626419b5f5b0beae48827e2eb0ba48 /examples/stoneage/StoneageResFin.gf | |
| parent | 7bb9e88cb875372bd3e288b8831b1b60c3b9bc17 (diff) | |
gfcm in Java ; Finnish close to finished
Diffstat (limited to 'examples/stoneage/StoneageResFin.gf')
| -rw-r--r-- | examples/stoneage/StoneageResFin.gf | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/examples/stoneage/StoneageResFin.gf b/examples/stoneage/StoneageResFin.gf index 3542f5f07..f7b47ffe2 100644 --- a/examples/stoneage/StoneageResFin.gf +++ b/examples/stoneage/StoneageResFin.gf @@ -5,6 +5,7 @@ oper PresV2 : V2 -> NP -> NP -> Phr = \v,s,o -> PresCl (SPredV2 s v o) ; PresV3 : V3 -> NP -> NP -> NP -> Phr = \v,s,o,r -> PresCl (SPredV3 s v o r) ; PresVasV2 : V -> NP -> NP -> Phr = \ v -> PresV2 (dirV2 v) ; + PresPartV2 : V -> NP -> NP -> Phr = \ v -> PresV2 (caseV2 v partitive) ; PresCl : Cl -> Phr = \c -> { s = (UseCl (PosTP TPresent ASimul) c).s } ** {lock_Phr = <>} ; @@ -12,4 +13,6 @@ oper ModPosA : ADeg -> CN -> CN = \a -> ModAP (PositADeg a) ; ModA : A -> CN -> CN = \a -> ModAP (UseA a) ; + partV2 : V -> V2 = \v -> caseV2 v partitive ; + } |