test/polylib/cholesky2.c

   1 /* Generated from ../../../git/cloog/test/cholesky2.cloog by CLooG 0.14.0-136-gb91ef26 gmp bits in 0.11s. */
   2 if (M >= 1) {
   3   if (M >= 2) {
   4     for (c2=1;c2<=M-1;c2++) {
   5       S1(c2) ;
   6       for (c3=c2+1;c3<=M;c3++) {
   7         S4(c2,c3) ;
   8       }
   9     }
  10     S1(M) ;
  11   }
  12   if (M == 1) {
  13     S1(1) ;
  14   }
  15   if (M >= 2) {
  16     S3(1) ;
  17   }
  18   if (M >= 3) {
  19     S6(1,2) ;
  20     for (c2=3;c2<=M;c2++) {
  21       S6(1,c2) ;
  22       for (i=2;i<=c2-1;i++) {
  23         S5(i,c2,1) ;
  24       }
  25     }
  26   }
  27   if (M == 2) {
  28     S6(1,2) ;
  29   }
  30   for (c1=3;c1<=3*M-7;c1++) {
  31     if ((c1+2)%3 == 0) {
  32       S3((c1+2)/3) ;
  33     }
  34     if (c1%3 == 0) {
  35       S2((c1+3)/3,c1/3) ;
  36     }
  37     c2 = floord(c1+6,3) ;
  38     if ((c1+1)%3 == 0) {
  39       S6((c1+1)/3,c2) ;
  40     }
  41     if (c1%3 == 0) {
  42       S2(c2,c1/3) ;
  43     }
  44     for (c2=ceild(c1+7,3);c2<=M;c2++) {
  45       if ((c1+1)%3 == 0) {
  46         S6((c1+1)/3,c2) ;
  47       }
  48       if (c1%3 == 0) {
  49         S2(c2,c1/3) ;
  50       }
  51       if ((c1+1)%3 == 0) {
  52         for (i=ceild(c1+4,3);i<=c2-1;i++) {
  53           S5(i,c2,(c1+1)/3) ;
  54         }
  55       }
  56     }
  57   }
  58   for (c1=max(3,3*M-6);c1<=3*M-4;c1++) {
  59     if ((c1+2)%3 == 0) {
  60       S3((c1+2)/3) ;
  61     }
  62     if (c1%3 == 0) {
  63       S2((c1+3)/3,c1/3) ;
  64     }
  65     for (c2=ceild(c1+4,3);c2<=M;c2++) {
  66       if ((c1+1)%3 == 0) {
  67         S6((c1+1)/3,c2) ;
  68       }
  69       if (c1%3 == 0) {
  70         S2(c2,c1/3) ;
  71       }
  72     }
  73   }
  74   if (M >= 2) {
  75     S2(M,M-1) ;
  76   }
  77   S3(M) ;
  78 }