src/HOL/ex/StringEx.ML
author oheimb
Mon, 21 Sep 1998 23:25:27 +0200
changeset 5526 e7617b57a3e6
parent 5278 a903b66822e2
child 8035 84c5ce912b43
permissions -rw-r--r--
*** empty log message ***
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
5199
be986f7a6def added ex/MonoidGroups (record example);
wenzelm
parents:
diff changeset
     1
be986f7a6def added ex/MonoidGroups (record example);
wenzelm
parents:
diff changeset
     2
Goal "hd(''ABCD'') = CHR ''A''";
be986f7a6def added ex/MonoidGroups (record example);
wenzelm
parents:
diff changeset
     3
by (Simp_tac 1);
be986f7a6def added ex/MonoidGroups (record example);
wenzelm
parents:
diff changeset
     4
result();
be986f7a6def added ex/MonoidGroups (record example);
wenzelm
parents:
diff changeset
     5
be986f7a6def added ex/MonoidGroups (record example);
wenzelm
parents:
diff changeset
     6
Goal "hd(''ABCD'') ~= CHR ''B''";
be986f7a6def added ex/MonoidGroups (record example);
wenzelm
parents:
diff changeset
     7
by (Simp_tac 1);
be986f7a6def added ex/MonoidGroups (record example);
wenzelm
parents:
diff changeset
     8
result();
be986f7a6def added ex/MonoidGroups (record example);
wenzelm
parents:
diff changeset
     9
be986f7a6def added ex/MonoidGroups (record example);
wenzelm
parents:
diff changeset
    10
Goal "''ABCD'' ~= ''ABCX''";
be986f7a6def added ex/MonoidGroups (record example);
wenzelm
parents:
diff changeset
    11
by (Simp_tac 1);
be986f7a6def added ex/MonoidGroups (record example);
wenzelm
parents:
diff changeset
    12
result();
be986f7a6def added ex/MonoidGroups (record example);
wenzelm
parents:
diff changeset
    13
be986f7a6def added ex/MonoidGroups (record example);
wenzelm
parents:
diff changeset
    14
Goal "''ABCD'' = ''ABCD''";
be986f7a6def added ex/MonoidGroups (record example);
wenzelm
parents:
diff changeset
    15
by (Simp_tac 1);
be986f7a6def added ex/MonoidGroups (record example);
wenzelm
parents:
diff changeset
    16
result();
be986f7a6def added ex/MonoidGroups (record example);
wenzelm
parents:
diff changeset
    17
5278
a903b66822e2 even more tidying of Goal commands
paulson
parents: 5199
diff changeset
    18
Goal "''ABCDEFGHIJKLMNOPQRSTUVWXYZ'' ~= ''ABCDEFGHIJKLMNOPQRSTUVWXY''";
5199
be986f7a6def added ex/MonoidGroups (record example);
wenzelm
parents:
diff changeset
    19
by (Simp_tac 1);
be986f7a6def added ex/MonoidGroups (record example);
wenzelm
parents:
diff changeset
    20
result();