doc-src/TutorialI/Overview/LNCS/FP1.thy
changeset 17656 a8b83a82c4c6
parent 14138 ca5029d391d1
child 21324 a5089fc012b5
--- a/doc-src/TutorialI/Overview/LNCS/FP1.thy	Mon Sep 26 19:19:12 2005 +0200
+++ b/doc-src/TutorialI/Overview/LNCS/FP1.thy	Mon Sep 26 19:19:13 2005 +0200
@@ -154,7 +154,7 @@
                      | Vex 'a
                      | Bex "'v binop"  "('a,'v)expr"  "('a,'v)expr"
 
-consts value :: "('a,'v)expr \<Rightarrow> ('a \<Rightarrow> 'v) \<Rightarrow> 'v"
+consts "value" :: "('a,'v)expr \<Rightarrow> ('a \<Rightarrow> 'v) \<Rightarrow> 'v"
 primrec
 "value (Cex v) env = v"
 "value (Vex a) env = env a"