diff options
| author | aarne <unknown> | 2005-03-11 14:37:18 +0000 |
|---|---|---|
| committer | aarne <unknown> | 2005-03-11 14:37:18 +0000 |
| commit | 328cf308f3e4c85599fbcffbd9cb62bb24fc8804 (patch) | |
| tree | 8385cd0ef488bee6fcda4d1a7404e661f08dde3d /examples/stoneage/StoneageResNor.gf | |
| parent | 1507a4afcd2b0b16d1171a5718c8e537387cb548 (diff) | |
Norwegian Swadesh (raw); bug fix in TC of variants
Diffstat (limited to 'examples/stoneage/StoneageResNor.gf')
| -rw-r--r-- | examples/stoneage/StoneageResNor.gf | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/examples/stoneage/StoneageResNor.gf b/examples/stoneage/StoneageResNor.gf new file mode 100644 index 000000000..30cd4e092 --- /dev/null +++ b/examples/stoneage/StoneageResNor.gf @@ -0,0 +1,15 @@ +resource StoneageResNor = open ResourceNor, SyntaxNor, ParadigmsNor in { + +oper + PresV : V -> NP -> Phr = \v,s -> PresCl (SPredV s v) ; + 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) ; + + PresCl : Cl -> Phr = + \c -> defaultSentence (UseCl (PosTP TPresent ASimul) c) ** {lock_Phr = <>} ; + + ModPosA : ADeg -> CN -> CN = \a -> ModAP (PositADeg a) ; + ModA : A -> CN -> CN = \a -> ModAP (UseA a) ; + +}
\ No newline at end of file |