take y1 ; :: thesis: for y1, y2, y3, y4, y5 being object st x = [y1,y2,y3,y4,y5] holds
y1 = y1

thus for y1, y2, y3, y4, y5 being object st x = [y1,y2,y3,y4,y5] holds
y1 = y1 by A1, Th10; :: thesis: verum