thus for b1 being set st b1 = ([x,y] `2) \+\ y holds
b1 is empty ; :: thesis: verum