24 #define ipt_call( name, m1, n1, mb, nb ) \
25 ipt_d##name(plasma, (m1), (n1), (A+A11), (mb), (nb), sequence, request); \
26 ipt_d##name(plasma, (m1), (n-(n1)), (A+A12), (mb), (n-(n1)), sequence, request); \
27 ipt_d##name(plasma, (m-(m1)), (n1), (A+A21), (m-(m1)), (nb), sequence, request); \
28 ipt_d##name(plasma, (m-(m1)), (n-(n1)), (A+A22), (m-(m1)), (n-(n1)), sequence, request);
30 #define ipt_cal2( name, m1, n1, mb, nb ) \
31 ipt_d##name(plasma, PlasmaIPT_NoDep, PlasmaIPT_NoDep, (m1), (n1), (A+A11), (mb), (nb), sequence, request); \
32 ipt_d##name(plasma, PlasmaIPT_NoDep, PlasmaIPT_NoDep, (m1), (n-(n1)), (A+A12), (mb), (n-(n1)), sequence, request); \
33 ipt_d##name(plasma, PlasmaIPT_NoDep, PlasmaIPT_NoDep, (m-(m1)), (n1), (A+A21), (m-(m1)), (nb), sequence, request); \
34 ipt_d##name(plasma, PlasmaIPT_NoDep, PlasmaIPT_NoDep, (m-(m1)), (n-(n1)), (A+A22), (m-(m1)), (n-(n1)), sequence, request);
37 #define ipt_drm2rrrb( plasma, m, n, A, mb, nb, seq, req) ipt_dcm2ccrb( (plasma), (n), (m), (A), (nb), (mb), (seq), (req));
38 #define ipt_drrrb2rm( plasma, m, n, A, mb, nb, seq, req) ipt_dccrb2cm( (plasma), (n), (m), (A), (nb), (mb), (seq), (req));
42 int ipt_dccrb2crrb(plasma_context_t *plasma, PLASMA_enum idep, PLASMA_enum odep,
int m,
int n,
double *A,
int mb,
int nb,
PLASMA_sequence *seq,
PLASMA_request *req);
43 int ipt_dcrrb2ccrb(plasma_context_t *plasma, PLASMA_enum idep, PLASMA_enum odep,
int m,
int n,
double *A,
int mb,
int nb,
PLASMA_sequence *seq,
PLASMA_request *req);
44 int ipt_drcrb2rrrb(plasma_context_t *plasma, PLASMA_enum idep, PLASMA_enum odep,
int m,
int n,
double *A,
int mb,
int nb,
PLASMA_sequence *seq,
PLASMA_request *req);
45 int ipt_drrrb2rcrb(plasma_context_t *plasma, PLASMA_enum idep, PLASMA_enum odep,
int m,
int n,
double *A,
int mb,
int nb,
PLASMA_sequence *seq,
PLASMA_request *req);
47 #define ipt_dcrrb2rrrb(plasma, m, n, A, mb, nb, seq, req) ipt_dccrb2rcrb((plasma), (m), (n), (A), (mb), (nb), (seq), (req));
48 #define ipt_drcrb2ccrb(plasma, m, n, A, mb, nb, seq, req) ipt_dccrb2rcrb((plasma), (n), (m), (A), (nb), (mb), (seq), (req));
49 #define ipt_drrrb2crrb(plasma, m, n, A, mb, nb, seq, req) ipt_dccrb2rcrb((plasma), (n), (m), (A), (nb), (mb), (seq), (req));
53 #define ipt_drm2crrb( plasma, m, n, A, mb, nb, seq, req) ipt_dcm2rcrb( (plasma), (n), (m), (A), (nb), (mb), (seq), (req));
54 #define ipt_dcrrb2rm( plasma, m, n, A, mb, nb, seq, req) ipt_drcrb2cm( (plasma), (n), (m), (A), (nb), (mb), (seq), (req));