File: ts1d-check0-0.c

package info (click to toggle)
swiftlang 6.0.3-2
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 2,519,992 kB
  • sloc: cpp: 9,107,863; ansic: 2,040,022; asm: 1,135,751; python: 296,500; objc: 82,456; f90: 60,502; lisp: 34,951; pascal: 19,946; sh: 18,133; perl: 7,482; ml: 4,937; javascript: 4,117; makefile: 3,840; awk: 3,535; xml: 914; fortran: 619; cs: 573; ruby: 573
file content (11 lines) | stat: -rw-r--r-- 584 bytes parent folder | download | duplicates (23) 
1
2
3
4
5
6
7
8
9
10
11
 
for (int c1 = 0; c1 < N; c1 += 1)
  s0(1, c1, 1, 0, 0);
for (int c1 = 0; c1 <= floord(T - 1, 500); c1 += 1)
  for (int c2 = 1000 * c1; c2 <= min(N + 2 * T - 3, N + 1000 * c1 + 997); c2 += 1) {
    for (int c3 = max(0, -((N + c2) % 2) - N - 1000 * c1 + c2 + 2); c3 <= min(min(998, 2 * T - 1000 * c1 - 2), -1000 * c1 + c2 - 2); c3 += 2) {
      s1(2, 1000 * c1 + c3, 0, -1000 * c1 + c2 - c3, 1);
      s2(2, 1000 * c1 + c3 + 1, 0, -1000 * c1 + c2 - c3 - 1, 1);
    }
    if (2 * T >= c2 + 1 && 1000 * c1 + 999 >= c2)
      s1(2, ((c2 + 1) % 2) + c2 - 1, 0, -((c2 + 1) % 2) + 1, 1);
  }