Ver Fonte

Create composed relation

DricomDragon há 5 anos atrás
pai
commit
187c2d683c
1 ficheiros alterados com 3 adições e 0 exclusões
  1. 3 0
      tp/1/prime.lp

+ 3 - 0
tp/1/prime.lp

@@ -0,0 +1,3 @@
+% Define
+#const n = 10.
+compose(N) :- N=1..n, I=2..N-1, N\I = 0.