reserve a,b for object, I,J for set;

theorem Th2:
  for N being multLoopStr, M being RelExtension of N holds
  a is Element of M iff a is Element of N
  proof
    let N be multLoopStr;
    let M be RelExtension of N;
    the multLoopStr of N = the multLoopStr of M by RE;
    hence thesis;
  end;
