asp3.lp 54 B

12345
  1. q(1..4).
  2. {r(U+1) : q(U)}.
  3. :- not {r(U)}2.
  4. #show r/1.