It is certain that Emily is a mouse. It is probably the case that Brian is a rhino. It is impossible that Bernhard is a swan. It is highly likely that if 'Emily is a mouse' or 'Brian is a rhino' or both then Winona is a wolf. It is probable that if 'Emily is a mouse' or 'Brian is a rhino' or both then Mary went to the bedroom. It is probably the case that if 'Bernhard is a swan' or 'Emily is a mouse' or both then Jessica is a sheep.
It is probably the case that 'Mary went to the bedroom and Emily is a mouse'.
It is probably the case that 'Mary went to the bedroom and Emily is a mouse'.
It is improbable that 'Mary went to the bedroom and Emily is a mouse'.

  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
  1.0::factA.
  0.7::factB.
  0.0::factC.
  %hop1
  0.9::factX:-or(factA,factB).
  0.7::factY:-or(factA,factB).
  0.7::factZ:-or(factC,factA).

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

  query(conclusion).
  
'Mary went to the bedroom and Emily is a mouse'.