theorem Th17:
  [.a,b.] = (b * a)" * (a * b)
proof
  thus [.a,b.] = (a" * b") * (a * b) by Th16
    .= (b * a)" * (a * b) by GROUP_1:17;
end;
