 (-10.0) $ ask "P(Cancer(Jerry) | Smoking(George), Friend(George, Jerry))"
p2 = fromMayb
p1 = fromMaybe (-10.0) $ ask "P(Cancer(Jerry) | Smoking(George), Friend(George, Jerry))"
p1 = fromMaybe (-10.0) $ ask "P(Cancer(Jerry) | Smoking(George), Friend(George, Jerry))"