Inicio Explorar Axuda
Iniciar sesión
CNI
/
Prlog
2
0
Fork 0
Ficheiros Incidencias 0 Pull Requests 0 Wiki
Explorar o código

Derive prime property from compose

DricomDragon %!s(int64=5) %!d(string=hai) anos
pai
187c2d683c
achega
50d79371b8
Modificáronse 1 ficheiros con 1 adicións e 0 borrados
Dividir vista Mostrar estatísticas de Diff
  1. 1 0
      tp/1/prime.lp

+ 1 - 0
tp/1/prime.lp
Ver ficheiro 

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