소스 검색

Create composed relation

DricomDragon 5 년 전
부모
커밋
187c2d683c
1개의 변경된 파일3개의 추가작업 그리고 0개의 파일을 삭제
  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.