let z, A, B, C, D be set ; :: thesis: ( z in [:A,B,C,D:] implies ( z `1_4 in A & z `2_4 in B & z `3_4 in C & z `4_4 in D ) )
assume A1: z in [:A,B,C,D:] ; :: thesis: ( z `1_4 in A & z `2_4 in B & z `3_4 in C & z `4_4 in D )
then A2: ( not A is empty & not B is empty & not C is empty & not D is empty ) by MCART_1:55;
then consider a being Element of A, b being Element of B, c being Element of C, d being Element of D such that
A3: z = [a,b,c,d] by A1, DOMAIN_1:31;
( z `1_4 = a & z `2_4 = b & z `3_4 = c & z `4_4 = d ) by A3, Def4, Def5, Def6, Def7;
hence ( z `1_4 in A & z `2_4 in B & z `3_4 in C & z `4_4 in D ) by A2; :: thesis: verum