reserve E for non empty set;
reserve a for Element of E;
reserve A, B for Subset of E;
reserve Y for set;
reserve p for FinSequence;
reserve e, e1, e2 for Singleton of E;

theorem Th24:
  for E being finite non empty set, A,B being Event of E st B c= A
  holds prob(A \ B) = prob(A) - prob(B)
proof
  let E be finite non empty set, A,B be Event of E;
  assume B c= A;
  then prob(A /\ B) = prob(B) by XBOOLE_1:28;
  hence thesis by Th23;
end;
