let x1, x2, x3, x4 be object ; :: thesis: for X1, X2, X3, X4 being set holds
( [x1,x2,x3,x4] in [:X1,X2,X3,X4:] iff ( x1 in X1 & x2 in X2 & x3 in X3 & x4 in X4 ) )
let X1, X2, X3, X4 be set ; :: thesis: ( [x1,x2,x3,x4] in [:X1,X2,X3,X4:] iff ( x1 in X1 & x2 in X2 & x3 in X3 & x4 in X4 ) )
A1: ( [x1,x2] in [:X1,X2:] iff ( x1 in X1 & x2 in X2 ) ) by ZFMISC_1:87;
( [:X1,X2,X3,X4:] = [:[:X1,X2:],X3,X4:] & [x1,x2,x3,x4] = [[x1,x2],x3,x4] ) by Th38;
hence ( [x1,x2,x3,x4] in [:X1,X2,X3,X4:] iff ( x1 in X1 & x2 in X2 & x3 in X3 & x4 in X4 ) ) by A1, Th55; :: thesis: verum