Advertisement
logicmoo

forall(X,exists(M,person(X)=>mother(X,M)))

Aug 7th, 2017
237
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Prolog 1.12 KB | None | 0 0
  1. [04:58] <dmiles> ?- kif_to_boxlog(forall(X,exists(M,person(X)=>mother(X,M))),_BL),wdmsgl(_BL).
  2. [04:58] <PrologMUD> dmiles: reify(skArg2ofMotherIsPersonIn_1FnSk(_4974)) :-  \+ not_reify(skArg2ofMotherIsPersonIn_1FnSk(_4974)),
  3. [04:58] <PrologMUD> dmiles:    not_mother(_4974, _4980) & proven_person(_4974))).
  4. [04:58] <PrologMUD> dmiles: (mother(_4974, _4980);~person(_4974))) :-
  5. [04:58] <PrologMUD> dmiles:    not_reify(skArg2ofMotherIsPersonIn_1FnSk(_4974)).
  6. [04:58] <PrologMUD> dmiles: (not_reify(skArg2ofMotherIsPersonIn_1FnSk(_4974))) :-
  7. [04:58] <PrologMUD> dmiles:    proven_not_mother(_4974, skArg2ofMotherIsPersonIn_1FnSk(_4974)),
  8. [04:58] <PrologMUD> dmiles:    proven_person(_4974).
  9. [04:58] <PrologMUD> dmiles: mother(_4974, skArg2ofMotherIsPersonIn_1FnSk(_4974)) :-
  10. [04:58] <PrologMUD> dmiles:    proven_person(_4974),
  11. [04:58] <PrologMUD> dmiles:    reify(skArg2ofMotherIsPersonIn_1FnSk(_4974)).
  12. [04:58] <PrologMUD> dmiles: proven_not_person(_4974) :-
  13. [04:58] <PrologMUD> dmiles:    proven_not_mother(_4974, skArg2ofMotherIsPersonIn_1FnSk(_4974)),
  14. [04:58] <PrologMUD> dmiles:    reify(skArg2ofMotherIsPersonIn_1FnSk(_4974)).
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement