reserve V for RealLinearSpace;
reserve u,u1,u2,v,v1,v2,w,w1,y for VECTOR of V;
reserve a,a1,a2,b,b1,b2,c1,c2 for Real;
reserve x,z for set;
reserve p,p1,q,q1 for Element of Lambda(OASpace(V));

theorem Th16:
  the carrier of Lambda(OASpace(V)) = the carrier of V
proof
  Lambda(OASpace(V)) = AffinStruct(#the carrier of OASpace(V), lambda(the
CONGR of OASpace(V))#) & OASpace(V) = AffinStruct (#the carrier of V, DirPar(V)
  #) by ANALOAF:def 4,DIRAF:def 2;
  hence thesis;
end;
