summaryrefslogtreecommitdiff
path: root/book/examples/chapter2/TicketEng.gf
diff options
context:
space:
mode:
authoraarne <aarne@chalmers.se>2010-11-22 12:55:37 +0000
committeraarne <aarne@chalmers.se>2010-11-22 12:55:37 +0000
commit76ba03b545600054176612201de78dca16eb65e1 (patch)
tree5615286b239bee637b32465e9cbf36807ab2c318 /book/examples/chapter2/TicketEng.gf
parent0bf41793694e8b3101d09e34858eba8ab2c8c5b6 (diff)
started a subdir for the book
Diffstat (limited to 'book/examples/chapter2/TicketEng.gf')
-rw-r--r--book/examples/chapter2/TicketEng.gf19
1 files changed, 19 insertions, 0 deletions
diff --git a/book/examples/chapter2/TicketEng.gf b/book/examples/chapter2/TicketEng.gf
new file mode 100644
index 000000000..54e44741d
--- /dev/null
+++ b/book/examples/chapter2/TicketEng.gf
@@ -0,0 +1,19 @@
+concrete TicketEng of Ticket = {
+
+lincat
+ Request, Station = Str ;
+lin
+ Ticket X Y =
+ ((("I" ++ ("would like" | "want") ++ "to get" |
+ ("may" | "can") ++ "I get" |
+ "can you give me" |
+ []) ++
+ "a ticket") |
+ []) ++
+ "from" ++ X ++ "to" ++ Y ++
+ ("please" | []) ;
+
+ Hamburg = "Hamburg" ;
+ Paris = "Paris" ;
+
+}