let y, z be Element of X2; :: thesis: ( ( for x1, x2, x3, x4, x5, x6, x7, x8, x9 being set st x = [x1,x2,x3,x4,x5,x6,x7,x8,x9] holds
y = x2 ) & ( for x1, x2, x3, x4, x5, x6, x7, x8, x9 being set st x = [x1,x2,x3,x4,x5,x6,x7,x8,x9] holds
z = x2 ) implies y = z )
assume A7: for x1, x2, x3, x4, x5, x6, x7, x8, x9 being set st x = [x1,x2,x3,x4,x5,x6,x7,x8,x9] holds
y = x2 ; :: thesis: ( ex x1, x2, x3, x4, x5, x6, x7, x8, x9 being set st
( x = [x1,x2,x3,x4,x5,x6,x7,x8,x9] & not z = x2 ) or y = z )
assume A8: for x1, x2, x3, x4, x5, x6, x7, x8, x9 being set st x = [x1,x2,x3,x4,x5,x6,x7,x8,x9] 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, xx5 being Element of X5, xx6 being Element of X6, xx7 being Element of X7, xx8 being Element of X8, xx9 being Element of X9 such that
A9: x = [xx1,xx2,xx3,xx4,xx5,xx6,xx7,xx8,xx9] by A1, Th180;
y = xx2 by A9, A7;
hence y = z by A9, A8; :: thesis: verum