File: vasilache.c

package info (click to toggle)
isl 0.20-2
  • links: PTS
  • area: main
  • in suites: buster
  • size: 12,708 kB
  • sloc: ansic: 125,702; python: 5,770; sh: 4,291; cpp: 1,057; makefile: 497; lisp: 54; perl: 9
file content (24 lines) | stat: -rw-r--r-- 600 bytes parent folder | download | duplicates (13) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 
{
  S1();
  S2();
  for (int c0 = 0; c0 < N; c0 += 1)
    for (int c1 = 0; c1 < N; c1 += 1) {
      S4(c0, c1);
      S5(c0, c1);
    }
  for (int c0 = 0; c0 < N; c0 += 1)
    for (int c1 = 0; c1 < N; c1 += 1)
      for (int c2 = 0; c2 <= (N - 1) / 32; c2 += 1) {
        S7(c0, c1, c2, 32 * c2);
        for (int c3 = 32 * c2 + 1; c3 <= min(N - 1, 32 * c2 + 31); c3 += 1) {
          S6(c0, c1, c2, c3 - 1);
          S7(c0, c1, c2, c3);
        }
        if (32 * c2 + 31 >= N) {
          S6(c0, c1, c2, N - 1);
        } else {
          S6(c0, c1, c2, 32 * c2 + 31);
        }
      }
  S8();
}