author | wenzelm |
Sun, 01 Oct 2006 18:29:32 +0200 | |
changeset 20813 | 379ce56e5dc2 |
parent 17388 | 495c799df31d |
permissions | -rw-r--r-- |
(* $Id$ *) header {* String examples *} theory StringEx imports Main begin 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