Improve declaration of multiples

tp/1/multi.lp

@@ -1,2 +1,2 @@
 % Define
-p(1,2; 2,4; 4,8; 8,16).
+p(M2, M4) :- M1 = 1..4, M2 = 2 * M1, M4 = 4 * M1.