src/HOL/Library/Char_ord.thy
changeset 57437 0baf08c075b9
parent 55426 90f2ceed2828
child 58881 b9556a055632
     1.1 --- a/src/HOL/Library/Char_ord.thy	Sun Jun 29 21:07:53 2014 +0200
     1.2 +++ b/src/HOL/Library/Char_ord.thy	Mon Jun 30 08:00:36 2014 +0200
     1.3 @@ -113,11 +113,11 @@
     1.4  end
     1.5  
     1.6  lemma less_literal_code [code]: 
     1.7 -  "op < = (\<lambda>xs ys. ord.lexordp op < (explode xs) (explode ys))"
     1.8 +  "op < = (\<lambda>xs ys. ord.lexordp op < (String.explode xs) (String.explode ys))"
     1.9  by(simp add: less_literal.rep_eq fun_eq_iff)
    1.10  
    1.11  lemma less_eq_literal_code [code]:
    1.12 -  "op \<le> = (\<lambda>xs ys. ord.lexordp_eq op < (explode xs) (explode ys))"
    1.13 +  "op \<le> = (\<lambda>xs ys. ord.lexordp_eq op < (String.explode xs) (String.explode ys))"
    1.14  by(simp add: less_eq_literal.rep_eq fun_eq_iff)
    1.15  
    1.16  lifting_update literal.lifting