author | wenzelm |
Mon, 11 Feb 2002 10:56:33 +0100 | |
changeset 12873 | d7f8dfaad46d |
parent 11586 | d8a7f6318457 |
child 16417 | 9bc16273c2d4 |
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