71     const int p = n / b;  in create_tile_array()  local
72     double ***tile = (double ***)calloc(sizeof(double **), p);  in create_tile_array()
74     for (int j = 0; j < p; ++j) {  in create_tile_array()
75         tile[j] = (double **)calloc(sizeof(double *), p);  in create_tile_array()
78     for (int j = 0; j < p; ++j) {  in create_tile_array()
79         for (int i = 0; i < p; ++i) {  in create_tile_array()
95     const int p = n / b;  in collapse_tile_array()  local
97     for (int j = 0; j < p; ++j) {  in collapse_tile_array()
98         for (int i = 0; i < p; ++i) {  in collapse_tile_array()
271         const int p = n / b;  in func()  local
273         for (int k = 0; k < p; ++k) {  in func()
276             for (int j = k + 1; j < p; ++j) {  in func()
325     int p;  member in dpotf2_body
329     dpotf2_body(int p_, int b_) : p(p_), b(b_) {}  in dpotf2_body()
344         for (int j = k + 1; j < p; ++j) {  in operator ()()
352     int p;  member in dtrsm_body
356     dtrsm_body(int p_, int b_) : p(p_), b(b_) {}  in dtrsm_body()
381         for (int i = j; i < p; ++i) {  in operator ()()
389     int p;  member in dsyr2k_body
393     dsyr2k_body(int p_, int b_) : p(p_), b(b_) {}  in dsyr2k_body()
437         if (k != p - 1 && j == k + 1 && i == k + 1) {  in operator ()()
441         if (k < p - 2) {  in operator ()()
475         const int p = n / b;  in func()  local
478         dpotf2_node_t dpotf2_node(g, unlimited, dpotf2_body(p, b));  in func()
479         dtrsm_node_t dtrsm_node(g, unlimited, dtrsm_body(p, b));  in func()
480         dsyr2k_node_t dsyr2k_node(g, unlimited, dsyr2k_body(p, b));  in func()
509         for (int j = 1; j < p; ++j) {  in func()
516         for (int i = 1; i < p; ++i) {  in func()
519             for (int j = i; j < p; ++j) {  in func()
548         const int p = n / b;  in func()  local
549         continue_ptr_type *c = new continue_ptr_type[p];  in func()
550         continue_ptr_type **t = new continue_ptr_type *[p];  in func()
551         continue_ptr_type ***u = new continue_ptr_type **[p];  in func()
554         for (int k = p - 1; k >= 0; --k) {  in func()
558             t[k] = new continue_ptr_type[p];  in func()
559             u[k] = new continue_ptr_type *[p];  in func()
561             for (int j = k + 1; j < p; ++j) {  in func()
566                 u[k][j] = new continue_ptr_type[p];  in func()
573                     if (k < p - 2 && k + 1 != j && k + 1 != i) {  in func()
583                     if (k < p - 2 && j > i && i == k + 1) {  in func()
589             if (k != p - 1) {  in func()
597         for (int k = p - 1; k >= 0; --k) {  in func()
598             for (int j = k + 1; j < p; ++j) {  in func()