103 |
break; |
break; |
104 |
} |
} |
105 |
#ifdef _OPENMP |
#ifdef _OPENMP |
106 |
iparm[2] = omp_get_max_threads(); |
iparm[2] =omp_get_max_threads(); |
107 |
#else |
#else |
108 |
iparm[2] = 1; |
iparm[2] = 1; |
109 |
#endif |
#endif |
227 |
/* set iparm */ |
/* set iparm */ |
228 |
for (i=0;i<64;++i) iparm[i]=0; |
for (i=0;i<64;++i) iparm[i]=0; |
229 |
iparm[0] = 1; /* no default settings*/ |
iparm[0] = 1; /* no default settings*/ |
230 |
iparm[1]=MKL_REORDERING_NESTED_DISSECTION; |
iparm[1]=MKL_REORDERING_MINIMUM_DEGREE; |
231 |
#ifdef _OPENMP |
#ifdef _OPENMP |
232 |
iparm[2] = omp_get_max_threads(); |
iparm[2] = omp_get_max_threads(); |
233 |
#else |
#else |