:: deftheorem defines `1_3 MCART_1:def 5 :
for X1, X2, X3 being non empty set
for x being Element of [:X1,X2,X3:]
for b5 being Element of X1 holds
( b5 = x `1_3 iff for x1, x2, x3 being object st x = [x1,x2,x3] holds
b5 = x1 );