let X be set ; :: thesis: Total X is connected
let x be set ; :: according to RELAT_2:def 6,RELAT_2:def 14 :: thesis: for b1 being set holds
( not x in field (Total X) or not b1 in field (Total X) or x = b1 or [x,b1] in Total X or [b1,x] in Total X )
let y be set ; :: thesis: ( not x in field (Total X) or not y in field (Total X) or x = y or [x,y] in Total X or [y,x] in Total X )
assume
( x in field (Total X) & y in field (Total X) & x <> y )
; :: thesis: ( [x,y] in Total X or [y,x] in Total X )
then
( x in X & y in X )
by ORDERS_1:97;
then
[x,y] in [:X,X:]
by ZFMISC_1:106;
hence
( [x,y] in Total X or [y,x] in Total X )
by EQREL_1:def 1; :: thesis: verum