It is almost certain that Greg is a frog. There is a very good chance that Mary left the football. It is almost certain that Bernhard is white. There is almost no chance that if 'Greg is a frog' or 'Bernhard is white' or both then Emily is a wolf. There is little chance that if either 'Bernhard is white' or 'Mary left the football' but not both then Brian is a lion. It is probably the case that if 'Mary left the football' or 'Bernhard is white' or both then Lily is a rhino.
There is almost no chance that 'Emily is a wolf and Lily is a rhino'.
There is almost no chance that 'Emily is a wolf and Lily is a rhino'.
It is almost certain that 'Emily is a wolf and Lily is a rhino'.

  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.95::factA.
  0.8::factB.
  0.95::factC.
  %hop1
  0.02::factX:-or(factA,factC).
  0.1::factY:-xor(factC,factB).
  0.7::factZ:-or(factB,factC).

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

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