doc-src/TutorialI/Overview/LNCS/FP1.thy
changeset 42765 aec61b60ff7b
parent 35416 d8d7d1b785af
--- a/doc-src/TutorialI/Overview/LNCS/FP1.thy	Thu May 12 16:58:55 2011 +0200
+++ b/doc-src/TutorialI/Overview/LNCS/FP1.thy	Thu May 12 17:17:57 2011 +0200
@@ -148,7 +148,7 @@
 
 subsubsection{*Expressions*}
 
-types 'v binop = "'v \<Rightarrow> 'v \<Rightarrow> 'v"
+type_synonym 'v binop = "'v \<Rightarrow> 'v \<Rightarrow> 'v"
 
 datatype ('a,'v)expr = Cex 'v
                      | Vex 'a