 reserve X,Y for set,
         n,m,k,i for Nat,
         r for Real,
         R for Element of F_Real,
         K for Field,
         f,f1,f2,g1,g2 for FinSequence,
         rf,rf1,rf2 for real-valued FinSequence,
         cf,cf1,cf2 for complex-valued FinSequence,
         F for Function;
reserve f,f1,f2 for n-element real-valued FinSequence,
        p,p1,p2 for Point of TOP-REAL n,
        M,M1,M2 for Matrix of n,m,F_Real,
        A,B for Matrix of n,F_Real;

theorem Th29:
  (Mx2Tran M).0.TOP-REAL n = 0.TOP-REAL m
proof
  set TRn=the Element of TOP-REAL n;
  set MT=Mx2Tran M;
  0.TOP-REAL n =TRn-TRn by RLVECT_1:5;
  hence MT.0.TOP-REAL n=(MT.TRn)-(MT.TRn) by Th28
   .=0.TOP-REAL m by RLVECT_1:5;
end;
