File: client.lp

package info (click to toggle)
gringo 5.8.0-2
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 32,128 kB
  • sloc: cpp: 210,867; ansic: 37,507; python: 11,271; yacc: 825; javascript: 627; sh: 368; xml: 364; makefile: 102
file content (14 lines) | stat: -rw-r--r-- 282 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
#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.