src/HOL/ex/StringEx.ML
author wenzelm
Sat, 02 Sep 2000 21:56:24 +0200
changeset 9811 39ffdb8cab03
parent 8035 84c5ce912b43
permissions -rw-r--r--
HOL/Lambda: converted into new-style theory and document;


Goal "hd(''ABCD'') = CHR ''A''";
by (Simp_tac 1);
qed "";

Goal "hd(''ABCD'') ~= CHR ''B''";
by (Simp_tac 1);
qed "";

Goal "''ABCD'' ~= ''ABCX''";
by (Simp_tac 1);
qed "";

Goal "''ABCD'' = ''ABCD''";
by (Simp_tac 1);
qed "";

Goal "''ABCDEFGHIJKLMNOPQRSTUVWXYZ'' ~= ''ABCDEFGHIJKLMNOPQRSTUVWXY''";
by (Simp_tac 1);
qed "";