let x1 be object ; :: thesis: {x1,x1,x1,x1,x1} = {x1}
thus {x1,x1,x1,x1,x1} = {x1,x1} by Th43
.= {x1} by Th29 ; :: thesis: verum