It is probably the case that John went to the bedroom. It is unlikely that Bernhard is a swan. It is probably the case that Brian is a frog. It is almost certain that if either 'Brian is a frog' or 'Bernhard is a swan' but not both then Lily is a frog. It is almost certain that if either 'John went to the bedroom' or 'Brian is a frog' but not both then Mary put down the apple. It is almost certain that if either 'Brian is a frog' or 'John went to the bedroom' but not both then Bill left the milk.
It is unlikely that 'Mary put down the apple and Lily is a frog'.
It is unlikely that 'Mary put down the apple and Lily is a frog'.
It is almost certain that 'Mary put down the apple and Lily is a frog'.

  and(A,B) :- A,B.
  or(A,B) :- A;B.
  nand(A,B) :- not(and(A,B)).
  nor(A,B) :- not(or(A,B)).
  xor(A,B) :- or(A,B), nand(A,B).

  %hop0
  0.7::factA.
  0.2::factB.
  0.7::factC.
  %hop1
  0.95::factX:-xor(factC,factB).
  0.95::factY:-xor(factA,factC).
  0.95::factZ:-xor(factC,factA).

  %hop2
  conclusion:-and(factY,factX).

  query(conclusion).
  
'Mary put down the apple and Lily is a frog'.