 reserve K,F,E for Field,
         R,S for Ring;

theorem
  for S being RingExtension of R holds VecSp(S,R) is VectSp of R;
