File: p.delft2-0.c

package info (click to toggle)
isl 0.27-1
  • links: PTS
  • area: main
  • in suites: forky, sid, trixie
  • size: 20,476 kB
  • sloc: ansic: 230,339; python: 19,348; cpp: 7,165; sh: 4,701; makefile: 767; lisp: 207; perl: 9
file content (11 lines) | stat: -rw-r--r-- 546 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
 
if (P1 >= 0 && P1 <= 3 && P2 >= 0 && P2 <= 3)
  for (int c0 = P1 - 1; c0 <= 3; c0 += 1)
    for (int c2 = 0; c2 <= 7; c2 += 1)
      for (int c3 = 0; c3 <= 7; c3 += 1)
        if ((4 * P2 - 2 * c3 + 17) % 9 >= 5) {
          if (P1 >= 1 && c0 + 1 == P1 && (4 * P1 - 2 * c2 + 17) % 9 >= 6) {
            s0(P1 - 1, P2, c2, c3, ((-4 * P1 + 2 * c2 + 18) % 9) + 1, (-4 * P2 + 2 * c3 + 18) % 9);
          } else if (P1 == 0 && c0 == 3 && c2 % 4 == 0) {
            s0(3, P2, c2, c3, (-c2 / 4) + 3, (-4 * P2 + 2 * c3 + 18) % 9);
          }
        }