
theorem ThEME1:
  for L being Z_Lattice, x being object holds
  x is Vector of EMLat(L) iff x is Vector of EMbedding(L)
  proof
    let L be Z_Lattice, x be object;
    hereby
      assume x is Vector of EMLat(L);
      then x in the ModuleStr of EMLat(L);
      hence x is Vector of EMbedding(L) by LmEMDetX0;
    end;
    assume x is Vector of EMbedding(L);
    then x in EMbedding(L);
    then x in the ModuleStr of EMLat(L) by LmEMDetX0;
    hence x is Vector of EMLat(L);
  end;
