--- a/src/CCL/Term.thy Tue Jun 06 19:24:05 2006 +0200
+++ b/src/CCL/Term.thy Tue Jun 06 20:42:25 2006 +0200
@@ -14,7 +14,7 @@
one :: "i"
- if :: "[i,i,i]=>i" ("(3if _/ then _/ else _)" [0,0,60] 60)
+ "if" :: "[i,i,i]=>i" ("(3if _/ then _/ else _)" [0,0,60] 60)
inl :: "i=>i"
inr :: "i=>i"