summaryrefslogtreecommitdiff
path: root/examples/tutorial/syntax
diff options
context:
space:
mode:
authoraarne <aarne@cs.chalmers.se>2008-06-25 16:54:35 +0000
committeraarne <aarne@cs.chalmers.se>2008-06-25 16:54:35 +0000
commite9e80fc389365e24d4300d7d5390c7d833a96c50 (patch)
treef0b58473adaa670bd8fc52ada419d8cad470ee03 /examples/tutorial/syntax
parentb96b36f43de3e2f8b58d5f539daa6f6d47f25870 (diff)
changed names of resource-1.3; added a note on homepage on release
Diffstat (limited to 'examples/tutorial/syntax')
-rw-r--r--examples/tutorial/syntax/FoodsEng.gf5
-rw-r--r--examples/tutorial/syntax/FoodsI.gf26
-rw-r--r--examples/tutorial/syntax/FoodsIta.gf5
-rw-r--r--examples/tutorial/syntax/Syntax.gf12
4 files changed, 6 insertions, 42 deletions
diff --git a/examples/tutorial/syntax/FoodsEng.gf b/examples/tutorial/syntax/FoodsEng.gf
deleted file mode 100644
index fb8c44610..000000000
--- a/examples/tutorial/syntax/FoodsEng.gf
+++ /dev/null
@@ -1,5 +0,0 @@
---# -path=.:../foods:prelude
-
-concrete FoodsEng of Foods = FoodsI with
- (Syntax = SyntaxEng),
- (Test = TestEng) ;
diff --git a/examples/tutorial/syntax/FoodsI.gf b/examples/tutorial/syntax/FoodsI.gf
deleted file mode 100644
index d67302235..000000000
--- a/examples/tutorial/syntax/FoodsI.gf
+++ /dev/null
@@ -1,26 +0,0 @@
-incomplete concrete FoodsI of Foods = open Syntax, Test in {
- lincat
- Phrase = S ;
- Item = NP ;
- Kind = CN ;
- Quality = AP ;
- lin
- Is = mkS ;
- This = mkNP this_Det ;
- That = mkNP that_Det ;
- These = mkNP these_Det ;
- Those = mkNP those_Det ;
- QKind = mkCN ;
- Very = mkAP very_AdA ;
-
- Wine = mkCN wine_N ;
- Pizza = mkCN pizza_N ;
- Cheese = mkCN cheese_N ;
- Fish = mkCN fish_N ;
- Fresh = mkAP fresh_A ;
- Warm = mkAP warm_A ;
- Italian = mkAP italian_A ;
- Expensive = mkAP expensive_A ;
- Delicious = mkAP delicious_A ;
- Boring = mkAP boring_A ;
-}
diff --git a/examples/tutorial/syntax/FoodsIta.gf b/examples/tutorial/syntax/FoodsIta.gf
deleted file mode 100644
index 57beab918..000000000
--- a/examples/tutorial/syntax/FoodsIta.gf
+++ /dev/null
@@ -1,5 +0,0 @@
---# -path=.:../foods:prelude
-
-concrete FoodsIta of Foods = FoodsI with
- (Syntax = SyntaxIta),
- (Test = TestIta) ;
diff --git a/examples/tutorial/syntax/Syntax.gf b/examples/tutorial/syntax/Syntax.gf
index 31f3fc127..e5b27504d 100644
--- a/examples/tutorial/syntax/Syntax.gf
+++ b/examples/tutorial/syntax/Syntax.gf
@@ -10,17 +10,17 @@ oper
mkS = overload {
mkS : Pol -> NP -> VP -> S
- = PredVP ;
+ = \p,np,vp -> UseCl p (PredVP np vp) ;
mkS : NP -> VP -> S
- = PredVP PPos ;
+ = \np,vp -> UseCl PPos (PredVP np vp) ;
mkS : Pol -> NP -> V2 -> NP -> S
- = \p,np,v,o -> PredVP p np (ComplV2 v o) ;
+ = \p,np,v,o -> UseCl p (PredVP np (ComplV2 v o)) ;
mkS : NP -> V2 -> NP -> S
- = \np,v,o -> PredVP PPos np (ComplV2 v o) ;
+ = \np,v,o -> UseCl PPos (PredVP np (ComplV2 v o)) ;
mkS : Pol -> NP -> AP -> S
- = \p,np,ap -> PredVP p np (ComplAP ap) ;
+ = \p,np,ap -> UseCl p (PredVP np (ComplAP ap)) ;
mkS : NP -> AP -> S
- = \np,ap -> PredVP PPos np (ComplAP ap) ;
+ = \np,ap -> UseCl PPos (PredVP np (ComplAP ap)) ;
} ;
mkNP : Det -> CN -> NP