consider x being set , R being Order of {x};
RelStr(# {x},R #) is non empty trivial RelStr ;
hence ex b1 being LATTICE st
( b1 is continuous & b1 is complete & b1 is strict ) ; :: thesis: verum