theorem
  x<>0.F implies (v*x)*x"=v
proof
  assume
A1: x<>0.F;
  (v*x)*x" = v*(x*x") by Def8
    .= v* 1_F by A1,Th9
    .= v by Def8;
  hence thesis;
end;
