 reserve L for AD_Lattice;
 reserve x,y,z for Element of L;
 reserve L for GAD_Lattice;
 reserve x,y,z for Element of L;

theorem  :: Theorem 3.8. 1) <=> 6)
  x "\/" y = y "\/" x iff ex_lub_of x,y & y "\/" x = lub (x,y)
  proof
    hereby
      assume x "\/" y = y "\/" x; then
      x [= y "\/" x by LemX3;
      hence ex_lub_of x,y & y "\/" x = lub (x,y) by Th3856;
    end;
    assume ex_lub_of x,y & y "\/" x = lub (x,y);
    hence thesis by Th3851,Th3865;
  end;
