theorem Th24:
  V is Subspace of V
proof
A1: the lmult of V = (the lmult of V) |([:the carrier of GF, the carrier of
  V:] qua set) by RELSET_1:19;
  0.V = 0.V & the addF of V = (the addF of V)||the carrier of V by RELSET_1:19;
  hence thesis by A1,Def2;
end;
