reserve Q,Q1,Q2 for multLoop;
reserve x,y,z,w,u,v for Element of Q;

theorem Th20c:
  1.Q in Nucl_r Q
proof
  for x,y holds (x * y) * 1.Q = x * (y * 1.Q);
  hence thesis by Def24;
end;
