diff options
| author | aarne <aarne@cs.chalmers.se> | 2008-06-25 16:54:35 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2008-06-25 16:54:35 +0000 |
| commit | e9e80fc389365e24d4300d7d5390c7d833a96c50 (patch) | |
| tree | f0b58473adaa670bd8fc52ada419d8cad470ee03 /examples/restaurant | |
| parent | b96b36f43de3e2f8b58d5f539daa6f6d47f25870 (diff) | |
changed names of resource-1.3; added a note on homepage on release
Diffstat (limited to 'examples/restaurant')
| -rw-r--r-- | examples/restaurant/LexRestaurant.gf | 8 | ||||
| -rw-r--r-- | examples/restaurant/LexRestaurantEng.gf | 12 | ||||
| -rw-r--r-- | examples/restaurant/LexRestaurantFin.gf | 12 | ||||
| -rw-r--r-- | examples/restaurant/LexRestaurantGer.gf | 12 | ||||
| -rw-r--r-- | examples/restaurant/LexRestaurantSwe.gf | 12 | ||||
| -rw-r--r-- | examples/restaurant/Restaurant.gf | 19 | ||||
| -rw-r--r-- | examples/restaurant/RestaurantEng.gf | 5 | ||||
| -rw-r--r-- | examples/restaurant/RestaurantFin.gf | 5 | ||||
| -rw-r--r-- | examples/restaurant/RestaurantGer.gf | 5 | ||||
| -rw-r--r-- | examples/restaurant/RestaurantI.gf | 21 | ||||
| -rw-r--r-- | examples/restaurant/RestaurantSwe.gf | 5 |
11 files changed, 0 insertions, 116 deletions
diff --git a/examples/restaurant/LexRestaurant.gf b/examples/restaurant/LexRestaurant.gf deleted file mode 100644 index fc25d2080..000000000 --- a/examples/restaurant/LexRestaurant.gf +++ /dev/null @@ -1,8 +0,0 @@ -interface LexRestaurant = open Syntax in { - -oper - restaurant_N : N ; - cheap_A : A ; - italian_A, thai_A, swedish_A, french_A : A ; - konkanok_PN : PN ; -} diff --git a/examples/restaurant/LexRestaurantEng.gf b/examples/restaurant/LexRestaurantEng.gf deleted file mode 100644 index 029144565..000000000 --- a/examples/restaurant/LexRestaurantEng.gf +++ /dev/null @@ -1,12 +0,0 @@ -instance LexRestaurantEng of LexRestaurant = open SyntaxEng, ParadigmsEng in { - -oper - restaurant_N = mkN "restaurant" ; - cheap_A = mkA "cheap" ; - italian_A = mkA "Italian" ; - thai_A = mkA "Thai" ; - swedish_A = mkA "Swedish" ; - french_A = mkA "French" ; - - konkanok_PN = mkPN "Konkanok" ; -} diff --git a/examples/restaurant/LexRestaurantFin.gf b/examples/restaurant/LexRestaurantFin.gf deleted file mode 100644 index 1755faa5e..000000000 --- a/examples/restaurant/LexRestaurantFin.gf +++ /dev/null @@ -1,12 +0,0 @@ -instance LexRestaurantFin of LexRestaurant = open SyntaxFin, ParadigmsFin in { - -oper - restaurant_N = mkN "ravintola" ; - cheap_A = mkA "halpa" ; - italian_A = mkA "italialainen" ; - thai_A = mkA "thaimaalainen" ; - swedish_A = mkA "ruotsalainen" ; - french_A = mkA "ranskalainen" ; - - konkanok_PN = mkPN "Konkanok" ; -} diff --git a/examples/restaurant/LexRestaurantGer.gf b/examples/restaurant/LexRestaurantGer.gf deleted file mode 100644 index 349a11fd7..000000000 --- a/examples/restaurant/LexRestaurantGer.gf +++ /dev/null @@ -1,12 +0,0 @@ -instance LexRestaurantGer of LexRestaurant = open SyntaxGer, ParadigmsGer in { - -oper - restaurant_N = mkN "Restaurant" "Restaurants" neuter ; - cheap_A = mkA "billig" ; - italian_A = mkA "italienisch" ; - thai_A = mkA "thailändisch" ; - swedish_A = mkA "schwedisch" ; - french_A = mkA "französisch" ; - - konkanok_PN = mkPN "Konkanok" ; -} diff --git a/examples/restaurant/LexRestaurantSwe.gf b/examples/restaurant/LexRestaurantSwe.gf deleted file mode 100644 index 57d4e0487..000000000 --- a/examples/restaurant/LexRestaurantSwe.gf +++ /dev/null @@ -1,12 +0,0 @@ -instance LexRestaurantSwe of LexRestaurant = open SyntaxSwe, ParadigmsSwe in { - -oper - restaurant_N = mkN "restaurang" ; - cheap_A = mkA "billig" ; - italian_A = mkA "italiensk" ; - thai_A = mkA "thailändsk" ; - swedish_A = mkA "svensk" ; - french_A = mkA "fransk" ; - - konkanok_PN = mkPN "Konkanok" ; -} diff --git a/examples/restaurant/Restaurant.gf b/examples/restaurant/Restaurant.gf deleted file mode 100644 index 7b0a586de..000000000 --- a/examples/restaurant/Restaurant.gf +++ /dev/null @@ -1,19 +0,0 @@ -abstract Restaurant = { - -flags startcat = Descr ; - -cat - Descr ; - Name ; - Nationality ; - PriceLevel ; - -fun - MkDescr : Name -> PriceLevel -> Nationality -> Descr ; - - Cheap : PriceLevel ; - Italian, Thai, Swedish, French : Nationality ; - Konkanok : Name ; - - -} diff --git a/examples/restaurant/RestaurantEng.gf b/examples/restaurant/RestaurantEng.gf deleted file mode 100644 index a6440219a..000000000 --- a/examples/restaurant/RestaurantEng.gf +++ /dev/null @@ -1,5 +0,0 @@ ---# -path=.:present:prelude - -concrete RestaurantEng of Restaurant = RestaurantI with - (Syntax = SyntaxEng), - (LexRestaurant = LexRestaurantEng) ; diff --git a/examples/restaurant/RestaurantFin.gf b/examples/restaurant/RestaurantFin.gf deleted file mode 100644 index 18aa08ced..000000000 --- a/examples/restaurant/RestaurantFin.gf +++ /dev/null @@ -1,5 +0,0 @@ ---# -path=.:present:prelude - -concrete RestaurantFin of Restaurant = RestaurantI with - (Syntax = SyntaxFin), - (LexRestaurant = LexRestaurantFin) ; diff --git a/examples/restaurant/RestaurantGer.gf b/examples/restaurant/RestaurantGer.gf deleted file mode 100644 index af711766c..000000000 --- a/examples/restaurant/RestaurantGer.gf +++ /dev/null @@ -1,5 +0,0 @@ ---# -path=.:present:prelude - -concrete RestaurantGer of Restaurant = RestaurantI with - (Syntax = SyntaxGer), - (LexRestaurant = LexRestaurantGer) ; diff --git a/examples/restaurant/RestaurantI.gf b/examples/restaurant/RestaurantI.gf deleted file mode 100644 index c84a738ce..000000000 --- a/examples/restaurant/RestaurantI.gf +++ /dev/null @@ -1,21 +0,0 @@ -incomplete concrete RestaurantI of Restaurant = open Syntax, LexRestaurant in { - -lincat - Descr = Phr ; - Name = NP ; - Nationality = A ; - PriceLevel = A ; - -lin - MkDescr name price nat = - mkPhr (mkCl name (mkNP indefSgDet (mkCN price (mkCN nat (mkCN restaurant_N))))) ; - - Cheap = cheap_A ; - Italian = italian_A ; - Thai = thai_A ; - Swedish = swedish_A ; - French = french_A ; - Konkanok = mkNP konkanok_PN ; - - -} diff --git a/examples/restaurant/RestaurantSwe.gf b/examples/restaurant/RestaurantSwe.gf deleted file mode 100644 index a8081b7f1..000000000 --- a/examples/restaurant/RestaurantSwe.gf +++ /dev/null @@ -1,5 +0,0 @@ ---# -path=.:present:prelude - -concrete RestaurantSwe of Restaurant = RestaurantI with - (Syntax = SyntaxSwe), - (LexRestaurant = LexRestaurantSwe) ; |
