summaryrefslogtreecommitdiff
path: root/examples/wiki/Restaurant.gf
blob: 447c6cf1409ce62d024e93a8a90ed54a28abf4f8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111

abstract Restaurant = {

	flags startcat = Paragraph ;
		  coding = utf8 ;

    cat
		Paragraph ;
		Phrase ;
		Item ;
		Quality ;
		ListQual ;
		Adverb ;
		STense ;

    fun

-- Paragraphs
		Sentence					: Phrase -> Paragraph -> Paragraph ;
		Empty_Sentence				: Paragraph ;

-- Sentences

		The_Item_Is					: Item -> Quality -> Phrase ;
		The_Item_Is_Not				: Item -> Quality -> Phrase ;
		I_Recommend					: Adverb -> Item -> Phrase ;
		I_Do_Not_Recommend			: Adverb -> Item -> Phrase ;

-- Noun Phrases
		The_Restaurant				: Item ;
		The_Food					: Item ;
		The_Staff					: Item ;
		The_Wine					: Item ;
		The_Wines					: Item ;
		The_Cheese					: Item ;
		The_Cheeses					: Item ;
		The_Fish					: Item ;
		The_Pizza					: Item ;
		The_Dishes					: Item ;
		The_Drinks					: Item ;
		The_Desserts				: Item ;

-- Adjectival Phrases

		Adjective_And_Adjective		: Quality -> Quality -> ListQual ;
		Adj_Comma_List_Of_Adjs		: Quality -> ListQual -> ListQual ;
		A_List_Of_Adjectives		: ListQual -> Quality ;
		Very_Adjective				: Quality -> Quality ;

-- Adjectives
--	Restaurant
		Chinese						: Quality ;
		French						: Quality ;
		Italian						: Quality ;
		Japanese					: Quality ;
		Mexican						: Quality ;
		Thai						: Quality ;

		Expensive					: Quality ;
		Cheap						: Quality ;
		Nice						: Quality ;
		Clean						: Quality ;
		Dirty						: Quality ;

--	Food

		Fresh						: Quality ;
		Delicious					: Quality ;
		Fatty						: Quality ;
		Tasteless					: Quality ;
		Authentic					: Quality ;

--	Service
		Efficient					: Quality ;
		Courteous					: Quality ;
		Helpful						: Quality ;
		Friendly					: Quality ;
		Personal					: Quality ;
		Warm						: Quality ;
		Prompt						: Quality ;
		Attentive					: Quality ;

		Inefficient					: Quality ;
		Rude						: Quality ;
		Impersonal					: Quality ;
		Slow						: Quality ;
		UnAttentive					: Quality ;

--	General
		Good, Great, Excellent				: Quality ;
		Bad, Awful, Horrible, Disgusting	: Quality ;
		Boring								: Quality ;

-- General Plural
		Diverse						: Quality ;

-- Adverbs
		NoAdverb					: Adverb ;
		Strongly					: Adverb ;
		Completely					: Adverb ;
		Certainly					: Adverb ;
		Honestly					: Adverb ;
		Really						: Adverb ;
		Reluctantly					: Adverb ;
		Hardly						: Adverb ;

-- Tenses
		Present_Tense				: STense ;
		Conditional_Tense			: STense ;

}