src/ZF/Resid/SubUnion.thy
changeset 3840 e0baea4d485a
parent 1478 2b8c2a7547ab
--- a/src/ZF/Resid/SubUnion.thy	Fri Oct 10 18:17:17 1997 +0200
+++ b/src/ZF/Resid/SubUnion.thy	Fri Oct 10 18:23:31 1997 +0200
@@ -51,9 +51,8 @@
 
 defs
   union_def  "u un v == redex_rec(u,   
-         %i.lam t:redexes.redexes_case(%j.Var(i), %x.0, %b x y.0, t),   
-      %x m.lam t:redexes.redexes_case(%j.0, %y.Fun(m`y), %b y z.0, t),   
-%b x y m p.lam t:redexes.redexes_case(%j.0, %y.0,   
+         %i. lam t:redexes. redexes_case(%j. Var(i), %x.0, %b x y.0, t),   
+      %x m. lam t:redexes. redexes_case(%j.0, %y. Fun(m`y), %b y z.0, t),   
+%b x y m p. lam t:redexes. redexes_case(%j.0, %y.0,   
                                        %c z u. App(b or c, m`z, p`u), t))`v"
 end
-