blob: 283c3268088e5206c0e06d8be1dbdedb8a5748e9 (
plain)
1
2
3
4
5
|
% Simple propositional-style test
% P(a) and (P(X) → Q(X)) and ¬Q(a) should be unsatisfiable.
cnf(fact, axiom, p(a)).
cnf(rule, axiom, ~p(X) | q(X)).
cnf(goal, negated_conjecture, ~q(a)).
|