a.
b.
-ok :- a, b.
ok :- not -ok.
% 
%   WHAT ABOUT
%   a :- not a.
%