reserve p,p1,p2,p3,p11,p22,q,q1,q2 for Point of TOP-REAL 2,
  f,h for FinSequence of TOP-REAL 2,
  r,r1,r2,s,s1,s2 for Real,
  u,u1,u2,u5 for Point of Euclid 2,
  n,m,i,j,k for Nat,
  N for Nat,
  x,y,z for set;

theorem Th4:
  (r*p)`1 = r*(p`1) & (r*p)`2 = r*(p`2)
proof
  r*p = |[r*p`1,r*p`2]| by EUCLID:57;
  hence thesis;
end;
