src/HOL/Library/Char_ord.thy
changeset 22845 5f9138bcb3d7
parent 22805 1166a966e7b4
child 23394 474ff28210c0
--- a/src/HOL/Library/Char_ord.thy	Sun May 06 21:49:44 2007 +0200
+++ b/src/HOL/Library/Char_ord.thy	Sun May 06 21:50:17 2007 +0200
@@ -47,7 +47,7 @@
     n1 < n2 \<or> n1 = n2 \<and> m1 < m2"
   by default (auto simp: char_less_eq_def char_less_def split: char.splits)
 
-lemmas [code nofunc] = char_less_eq_def char_less_def
+lemmas [code func del] = char_less_eq_def char_less_def
 
 instance char :: distrib_lattice
   "inf \<equiv> min"