theorem
  S is (R9) implies (a")" * b =*=> a * b
  proof
    assume S is (R9); then
    a"" ==> a;
    hence (a")" * b =*=> a * b by Th2,ThI2;
  end;
