File: separation_class2.c

package info (click to toggle)
cloog 0.18.4-1
  • links: PTS
  • area: main
  • in suites: stretch
  • size: 19,696 kB
  • sloc: ansic: 141,371; sh: 11,621; makefile: 1,040; fortran: 125; python: 72; perl: 9
file content (15 lines) | stat: -rw-r--r-- 538 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
{
  for (int c0 = 0; c0 < -(n % 8) + n; c0 += 8) {
    for (int c1 = 0; c1 < -(n % 8) + n; c1 += 8)
      for (int c2 = 0; c2 <= 7; c2 += 1)
        for (int c3 = 0; c3 <= 7; c3 += 1)
          A(c0 + c2, c1 + c3);
    for (int c2 = 0; c2 <= 7; c2 += 1)
      for (int c3 = 0; c3 < n % 8; c3 += 1)
        A(c0 + c2, -((n - 1) % 8) + n + c3 - 1);
  }
  for (int c1 = 0; c1 < n; c1 += 8)
    for (int c2 = 0; c2 < n % 8; c2 += 1)
      for (int c3 = 0; c3 <= min(7, n - c1 - 1); c3 += 1)
        A(-((n - 1) % 8) + n + c2 - 1, c1 + c3);
}