src/HOL/ex/Term.ML
changeset 972 e61b058d58d2
parent 969 b051e2fc2e34
child 1266 3ae9fe3c0f68
--- a/src/HOL/ex/Term.ML	Thu Mar 23 15:39:13 1995 +0100
+++ b/src/HOL/ex/Term.ML	Fri Mar 24 12:30:35 1995 +0100
@@ -119,7 +119,7 @@
 
 val [prem] = goal Term.thy
     "N: list(term(A)) ==>  \
-\    !M. <N,M>: pred_sexp^+ --> \
+\    !M. (N,M): pred_sexp^+ --> \
 \        Abs_map (cut h (pred_sexp^+) M) N = \
 \        Abs_map h N";
 by (rtac (prem RS list.induct) 1);