Chances are slight that Bernhard is a rhino. It is probable that Greg is yellow. There is almost no chance that Fred went to the garden. There is a better than even chance that if 'Fred went to the garden' or 'Bernhard is a rhino' or both then Brian is a swan. It is certain that if either 'Greg is yellow' or 'Bernhard is a rhino' but not both then Jessica is a cat. There is a better than even chance that if either 'Bernhard is a rhino' or 'Greg is yellow' but not both then Mary dropped the milk.
There is a better than even chance that 'Fred went to the garden and Bernhard is a rhino'.
It is impossible that 'Fred went to the garden and Bernhard is a rhino'.
There is a better than even chance that 'Fred went to the garden and Bernhard 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.1::factA.
  0.7::factB.
  0.02::factC.
  %hop1
  0.6::factX:-or(factC,factA).
  1.0::factY:-xor(factB,factA).
  0.6::factZ:-xor(factA,factB).

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

  query(conclusion).
  
'Fred went to the garden and Bernhard is a rhino'.