theorem
  for P,A,B,C st 0 < P.(A /\ B) holds P.(A /\ B /\ C) = P.A * P.|.A.B *
  P.|.(A /\ B).C
proof
  let P,A,B,C;
  assume
A1: 0 < P.(A /\ B);
  then
A2: 0 < P.A by PROB_1:34,XBOOLE_1:17;
  P.(A /\ B /\ C) = P.(B /\ A) * P.|.(A /\ B).C by A1,Th29
    .= P.A * P.|.A.B * P.|.(A /\ B).C by A2,Th29;
  hence thesis;
end;
