racket/collects/tests/datalog/examples/pq.rkt
2010-06-25 22:36:12 -06:00

7 lines
84 B
Racket

#lang datalog
% p q test from Chen & Warren
q(X) :- p(X).
q(a).
p(X) :- q(X).
q(X)?