let y, z be Element of X2; :: thesis: ( ( for x1, x2, x3, x4 being set st x = [x1,x2,x3,x4] holds
y = x2 ) & ( for x1, x2, x3, x4 being set st x = [x1,x2,x3,x4] holds
z = x2 ) implies y = z )
assume A7: for x1, x2, x3, x4 being set st x = [x1,x2,x3,x4] holds
y = x2 ; :: thesis: ( ex x1, x2, x3, x4 being set st
( x = [x1,x2,x3,x4] & not z = x2 ) or y = z )
assume A8: for x1, x2, x3, x4 being set st x = [x1,x2,x3,x4] holds
z = x2 ; :: thesis: y = z
consider xx1 being Element of X1, xx2 being Element of X2, xx3 being Element of X3, xx4 being Element of X4 such that
A9: x = [xx1,xx2,xx3,xx4] by A1, Lm3;
y = xx2 by A9, A7;
hence y = z by A9, A8; :: thesis: verum