It is highly likely that Bernhard is a lion. We believe that Greg is white. We believe that Yann is thirsty. It is improbable that if 'Yann is thirsty and Bernhard is a lion' then Emily is a wolf. It is unlikely that if 'Greg is white and Bernhard is a lion' then Lily is a rhino. It is improbable that if 'Greg is white' or 'Bernhard is a lion' or both then Winona is a mouse.
It is unlikely that 'Lily is a rhino' or 'Emily is a wolf' or both.
It is unlikely that 'Lily is a rhino' or 'Emily is a wolf' or both.
It is almost certain that 'Lily is a rhino' or 'Emily is a wolf' or both.

  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.9::factA.
  0.75::factB.
  0.75::factC.
  %hop1
  0.1::factX:-and(factC,factA).
  0.2::factY:-and(factB,factA).
  0.1::factZ:-or(factB,factA).

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

  query(conclusion).
  
'Lily is a rhino' or 'Emily is a wolf' or both.