Import code from TD1 exercice 3

td/td1/asp3.lp

@@ -0,0 +1,5 @@
+q(1..4).
+{r(U+1) : q(U)}.
+:- not {r(U)}2.
+
+#show r/1.