Advertisement
logicmoo

Untitled

Aug 17th, 2018
623
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Prolog 0.48 KB | None | 0 0
  1. ?- mpred_ain([aa(x), b(x,z), cc(t), ((aa(A),b(A,C),cc(C)) ==> dd(A,C)), aa(y), b(y,x), cc(y), aa(y), b(y,t), cc(z), b(z,y), cc(x)]).
  2.  
  3. ?- listing(dd/2).
  4. :- dynamic dd/2.
  5. :- multifile dd/2.
  6. :- public dd/2.
  7. :- module_transparent dd/2.
  8.  
  9. dd(y, t).
  10. dd(x, z).
  11. dd(y, x).
  12.  
  13. true.
  14.  
  15. baseKB:  ?- mpred_ain(aa(z)).
  16. true.
  17.  
  18. baseKB:  ?- listing(dd/2).
  19. :- dynamic dd/2.
  20. :- multifile dd/2.
  21. :- public dd/2.
  22. :- module_transparent dd/2.
  23.  
  24. dd(y, t).
  25. dd(x, z).
  26. dd(y, x).
  27. dd(z, y).
  28.  
  29. true.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement