67 int K1,
int K2,
int *
IPIV,
int INCX)
86 if (LDA <
max(1, N)) {
108 plasma_cooplap2tile( descA, A, NB, NB, LDA, N, 0, 0, K2, N,
plasma_desc_mat_free(&(descA)) );
125 status = sequence->
status;
184 if (plasma == NULL) {
191 status = sequence->
status;
233 if (plasma == NULL) {
237 if (sequence == NULL) {
241 if (request == NULL) {
253 plasma_error(
"PLASMA_claswp_Tile",
"invalid first descriptor");
257 if ( (K1 != 1) || (K2 != descA.
m) ) {
258 plasma_error(
"PLASMA_claswp_Tile",
"invalid K1 or K2 (1..M is the only interval supported right now)");
263 plasma_pcbarrier_tl2pnl,
278 plasma_pcbarrier_pnl2tl,