theorem
  f (#) (F ^ G) = (f (#) F) ^ (f (#) G) by Lm1;
