changeset 7848 | 6ddcc24038e1 |
parent 5851 | 15ce4c1c8313 |
--- a/doc-src/Tutorial/Datatype/abgoalfind.ML Wed Oct 13 15:18:15 1999 +0200 +++ b/doc-src/Tutorial/Datatype/abgoalfind.ML Wed Oct 13 15:41:24 1999 +0200 @@ -1,4 +1,4 @@ Goal "evala env (substa s a) = evala (%x. evala env (s x)) a & \ \ evalb env (substb s b) = evalb (%x. evala env (s x)) b"; -by(mutual_induct_tac ["a","b"] 1); +by(induct_tac "a b" 1);