Página inicial Explorar Ajuda
Entrar
CNI
/
Prlog
2
0
Fork 0
Arquivos Issues 0 Pull Requests 0 Wiki
Tree: 96920e094b
Branches Tags
Prlog
/
tp
/
1
/
prime.lp

prime.lp 101 B
Histórico Raw

1234 
  1. % Define
    2. 

  2. #const n = 10.
    3. 

  3. compose(N) :- N=1..n, I=2..N-1, N\I = 0.
    4. 

  4. prime(N) :- N=2..n, not compose(N).
    5.