#ifndef ATL_stGetNB_geqrf /* * NB selection for GEQRF: Side='RIGHT', Uplo='UPPER' * M : 25,144,360,792,1656,2520,3384 * N : 25,144,360,792,1656,2520,3384 * NB : 4,72,72,72,72,144,144 */ #define ATL_stGetNB_geqrf(n_, nb_) \ { \ if ((n_) < 84) (nb_) = 4; \ else if ((n_) < 2088) (nb_) = 72; \ else (nb_) = 144; \ } #endif /* end ifndef ATL_stGetNB_geqrf */