theorem
  f (#) <* v *> = <* f.v * v *> by VECTSP_6:10;
