theorem Th16:
  P.A = 1 - P.([#] Sigma \ A)
proof
  P.([#] Sigma \ A) + P.A = 1 by PROB_1:31;
  hence thesis;
end;
