 reserve L for non empty LattStr;
 reserve v100,v102,v2,v1,v0,v3,v101 for Element of L;
 reserve L for WA_Lattice;
 reserve x,y,z,u for Element of L;
 reserve L for non empty LattStr;
 reserve v100,v101,v102,v0,v1,v2 for Element of L;

theorem :: automatically accepted thanks to registrations of clusters
  ExNearLattice is NearLattice &
    not ExNearLattice is Lattice;
