test/openscop/matmult.c

   1 /* Generated from ./openscop/matmult.scop by CLooG 0.18.3 gmp bits in 0.01s. */
   2 /* Useful macros. */
   3 #define floord(n,d) (((n)<0) ? -((-(n)+(d)-1)/(d)) : (n)/(d))
   4 #define ceild(n,d)  (((n)<0) ? -((-(n))/(d)) : ((n)+(d)-1)/(d))
   5 #define max(x,y)    ((x) > (y) ? (x) : (y))
   6 #define min(x,y)    ((x) < (y) ? (x) : (y))
   7
   8 #ifdef TIME
   9 #define IF_TIME(foo) foo;
  10 #else
  11 #define IF_TIME(foo)
  12 #endif
  13
  14 /* Scattering iterators. */
  15 int c2, c4, c6;
  16 /* Original iterators. */
  17 int i, j, k;
  18
  19 for (c2=0;c2<=N-1;c2++) {
  20   for (c4=0;c4<=N-1;c4++) {
  21     C[c2][c4] = 0.0;
  22     for (c6=0;c6<=N-1;c6++) {
  23       C[c2][c4] = C[c2][c4] + A[c2][c6] * B[c6][c4];
  24     }
  25   }
  26 }