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