author | paulson |
Mon, 05 Mar 2001 15:25:11 +0100 | |
changeset 11193 | 851c90b23a9e |
parent 11020 | 646c929b6293 |
child 11586 | d8a7f6318457 |
permissions | -rw-r--r-- |
header {* String examples *} theory StringEx = Main: lemma "hd ''ABCD'' = CHR ''A''" by simp lemma "hd ''ABCD'' \<noteq> CHR ''B''" by simp lemma "''ABCD'' \<noteq> ''ABCX''" by simp lemma "''ABCD'' = ''ABCD''" by simp lemma "''ABCDEFGHIJKLMNOPQRSTUVWXYZ'' \<noteq> ''ABCDEFGHIJKLMNOPQRSTUVWXY''" by simp lemma "set ''Foobar'' = {CHR ''F'', CHR ''a'', CHR ''b'', CHR ''o'', CHR ''r''}" by (simp add: insert_commute) lemma "set ''Foobar'' = ?X" by (simp add: insert_commute) end