theorem
  Sum<* v,u *> * a = v * a + u * a
proof
  thus Sum<* v,u *> * a = (v + u) * a by RLVECT_1:45
    .= v * a + u * a by VECTSP_2:def 9;
end;
