theorem Th15:
  the RLSStruct of REAL-NS(n) = RealVectSpace(Seg n)
  proof
    thus the RLSStruct of REAL-NS(n)
     = the RLSStruct of TOP-REAL(n) by REAL_NS2:1
    .= RealVectSpace(Seg n) by EUCLID:def 8;
  end;
