 reserve W for WA-Lattice;
 reserve a,b,c for Element of W;
 reserve W for pcs-Compatible pcs-tol-reflexive pcs-tol-symmetric WAP-Lattice;
 reserve a,b for Element of W;
 reserve L for WA_Lattice;

theorem
  wlatt LatRelStr ExNearLattice is WA_Lattice;
