doc-src/Tutorial/Datatype/tidproof.ML
author wenzelm
Sat, 01 Jul 2000 19:49:20 +0200
changeset 9226 cbe6144f0f15
parent 7848 6ddcc24038e1
permissions -rw-r--r--
tuned;
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
5851
15ce4c1c8313 New section on advanced datatypes.
nipkow
parents:
diff changeset
     1
Goal "subst  Var t  = (t ::('a,'b)term)  & \
15ce4c1c8313 New section on advanced datatypes.
nipkow
parents:
diff changeset
     2
\     substs Var ts = (ts::('a,'b)term list)";
7848
6ddcc24038e1 Eliminated mutual_induct_tac.
berghofe
parents: 5851
diff changeset
     3
by(induct_tac "t ts" 1);
5851
15ce4c1c8313 New section on advanced datatypes.
nipkow
parents:
diff changeset
     4
by(Auto_tac);