It is improbable that Winona is a wolf. We doubt that Jessica is a cat. It is almost certain that Julius is a swan. It is highly unlikely that if either 'Winona is a wolf' or 'Julius is a swan' but not both then Brian is a frog. It is highly unlikely that if 'Winona is a wolf and Julius is a swan' then Greg is a rhino. It is highly likely that if 'Winona is a wolf' or 'Jessica is a cat' or both then Bernhard is gray.
It is almost certain that 'Greg is a rhino and Winona is a wolf'.
It is impossible that 'Greg is a rhino and Winona is a wolf'.
It is almost certain that 'Greg is a rhino and Winona is a wolf'.

  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.1::factA.
  0.2::factB.
  0.95::factC.
  %hop1
  0.05::factX:-xor(factA,factC).
  0.05::factY:-and(factA,factC).
  0.9::factZ:-or(factA,factB).

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

  query(conclusion).
  
'Greg is a rhino and Winona is a wolf'.