diff options
| author | aarne <aarne@cs.chalmers.se> | 2006-02-24 13:57:41 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2006-02-24 13:57:41 +0000 |
| commit | e8b4d1697dc9ac8834d66ed7533a5de992803292 (patch) | |
| tree | 10c63c3942959e133bdd400ed6a4584bc89c920b /examples/stoneage1/StoneageI.gf | |
| parent | f4775347f9dc749229bd14adbbc4f3cc1c076c81 (diff) | |
bronzeage
Diffstat (limited to 'examples/stoneage1/StoneageI.gf')
| -rw-r--r-- | examples/stoneage1/StoneageI.gf | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/examples/stoneage1/StoneageI.gf b/examples/stoneage1/StoneageI.gf index 392fc6ebf..50a76c9e4 100644 --- a/examples/stoneage1/StoneageI.gf +++ b/examples/stoneage1/StoneageI.gf @@ -1,4 +1,4 @@ -incomplete concrete StoneageI of Stoneage = open Lang, Swadesh in { +incomplete concrete StoneageI of Stoneage = open Mathematical, Swadesh in { flags startcat=S ; @@ -230,6 +230,14 @@ lin oper PresV : V -> NP -> Phr = \v,s -> + PhrUtt NoPConj (UttS (PosCl (predV v s))) NoVoc ; + PresV2 : V2 -> NP -> NP -> Phr = \v,s,o -> + PhrUtt NoPConj (UttS (PosCl (predV2 v s o))) NoVoc ; + PresV3 : V3 -> NP -> NP -> NP -> Phr = \v,s,o,r -> + PhrUtt NoPConj (UttS (PosCl (predV3 v s o r))) NoVoc ; + +{- + PresV : V -> NP -> Phr = \v,s -> PhrUtt NoPConj (UttS (UseCl TPres ASimul PPos (PredVP s (UseV v)))) NoVoc ; PresV2 : V2 -> NP -> NP -> Phr = \v,s,o -> @@ -238,6 +246,7 @@ oper PresV3 : V3 -> NP -> NP -> NP -> Phr = \v,s,o,r -> PhrUtt NoPConj (UttS (UseCl TPres ASimul PPos (PredVP s (ComplV3 v o r)))) NoVoc ; +-} ModA : A -> CN -> CN = \a -> AdjCN (PositA a) ; |