File: client.lp

package info (click to toggle)
gringo 4.4.0-1
  • links: PTS, VCS
  • area: main
  • in suites: jessie, jessie-kfreebsd
  • size: 8,260 kB
  • ctags: 10,755
  • sloc: cpp: 55,049; python: 629; yacc: 569; sh: 124; makefile: 23
file content (15 lines) | stat: -rw-r--r-- 283 bytes parent folder | download | duplicates (16) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
#const m = 10.
#const n = 190.

#program pigeon.
#external p.

1 { p(X); q(X) } 1 :- X = 1..n, p.
:- not n+1 { p(1..n); q(1..n) }, p.

#program sleep(k).
#external sleep(k).

1 { p(k,X); q(k,X) } 1 :- X = 1..m, sleep(k), not p.
:- not m+1 { p(k,1..m); q(k,1..m) }, sleep(k), not p.