From e7439d65b0e153434d3acc07df6e2a0972ee79ca Mon Sep 17 00:00:00 2001 From: aarne Date: Tue, 11 Jan 2011 15:46:43 +0000 Subject: gf-book web page index and toc --- gf-book/examples/chapter7/QueryFin.gf | 13 +++++++++++++ 1 file changed, 13 insertions(+) create mode 100644 gf-book/examples/chapter7/QueryFin.gf (limited to 'gf-book/examples/chapter7/QueryFin.gf') diff --git a/gf-book/examples/chapter7/QueryFin.gf b/gf-book/examples/chapter7/QueryFin.gf new file mode 100644 index 000000000..b3461e34a --- /dev/null +++ b/gf-book/examples/chapter7/QueryFin.gf @@ -0,0 +1,13 @@ +concrete QueryFin of Query = { + lincat + Answer, Question, Object = Str ; + lin + Even = pred "parillinen" ; + Odd = pred "pariton" ; + Prime = pred "alkuluku" ; + Number i = i.s ; + Yes = "kyllä" ; + No = "ei" ; + oper + pred : Str -> Str -> Str = \f,x -> "onko" ++ x ++ f ; +} -- cgit v1.2.3