|  | 
| #define | static2   static | 
|  | 
| #define | fortran_mr2d   pcgemr2do | 
|  | 
| #define | fortran_mr2dnew   pcgemr2d | 
|  | 
| #define | ccopy_   ccopy | 
|  | 
| #define | clacpy_   clacpy | 
|  | 
| #define | Clacpy   Ccgelacpy | 
|  | 
| #define | BLOCK_CYCLIC_2D   1 | 
|  | 
| #define | SHIFT(row,  sprow,  nbrow)   ((row)-(sprow)+ ((row) >= (sprow) ? 0 : (nbrow))) | 
|  | 
| #define | max(A,  B)   ((A)>(B)?(A):(B)) | 
|  | 
| #define | min(A,  B)   ((A)>(B)?(B):(A)) | 
|  | 
| #define | DIVUP(a,  b)   ( ((a)-1) /(b)+1) | 
|  | 
| #define | ROUNDUP(a,  b)   (DIVUP(a,b)*(b)) | 
|  | 
| #define | scanD0   cgescanD0 | 
|  | 
| #define | dispmat   cgedispmat | 
|  | 
| #define | setmemory   cgesetmemory | 
|  | 
| #define | freememory   cgefreememory | 
|  | 
| #define | scan_intervals   cgescan_intervals | 
|  | 
| #define | SENDBUFF   0 | 
|  | 
| #define | RECVBUFF   1 | 
|  | 
| #define | SIZEBUFF   2 | 
|  | 
| #define | NDEBUG | 
|  | 
| #define | DESCLEN   9 | 
|  | 
| #define | NBPARAM | 
|  | 
| #define | MAGIC_MAX   100000000 | 
|  | 
| #define | Mlacpy(mo,  no,  ao,  ldao,  bo,  ldbo) | 
|  | 
|  | 
| void | Cblacs_pcoord () | 
|  | 
| Int | Cblacs_pnum () | 
|  | 
| void | Csetpvmtids () | 
|  | 
| void | Cblacs_get () | 
|  | 
| void | Cblacs_pinfo () | 
|  | 
| void | Cblacs_gridinfo () | 
|  | 
| void | Cblacs_gridinit () | 
|  | 
| void | Cblacs_exit () | 
|  | 
| void | Cblacs_gridexit () | 
|  | 
| void | Cblacs_setup () | 
|  | 
| void | Cigebs2d () | 
|  | 
| void | Cigebr2d () | 
|  | 
| void | Cigesd2d () | 
|  | 
| void | Cigerv2d () | 
|  | 
| void | Cigsum2d () | 
|  | 
| void | Cigamn2d () | 
|  | 
| void | Cigamx2d () | 
|  | 
| void | Ccgesd2d () | 
|  | 
| void | Ccgerv2d () | 
|  | 
| Int | localindice () | 
|  | 
| void * | mr2d_malloc () | 
|  | 
| Int | ppcm () | 
|  | 
| Int | localsize () | 
|  | 
| Int | memoryblocksize () | 
|  | 
| Int | changeorigin () | 
|  | 
| void | paramcheck () | 
|  | 
| void | Cpcgemr2do () | 
|  | 
| void | Cpcgemr2d () | 
|  | 
| void | fortran_mr2d (Int *m, Int *n, complex *A, Int *ia, Int *ja, Int desc_A[DESCLEN], complex *B, Int *ib, Int *jb, Int desc_B[DESCLEN]) | 
|  | 
| void | fortran_mr2dnew (Int *m, Int *n, complex *A, Int *ia, Int *ja, Int desc_A[DESCLEN], complex *B, Int *ib, Int *jb, Int desc_B[DESCLEN], Int *gcontext) | 
|  | 
| static2 void | init_chenille () | 
|  | 
| static2 Int | inter_len () | 
|  | 
| static2 Int | block2buff () | 
|  | 
| static2 void | buff2block () | 
|  | 
| static2 void | gridreshape () | 
|  | 
| void | Cpcgemr2do (Int m, Int n, complex *ptrmyblock, Int ia, Int ja, MDESC *ma, complex *ptrmynewblock, Int ib, Int jb, MDESC *mb) | 
|  | 
| void | Cpcgemr2d (Int m, Int n, complex *ptrmyblock, Int ia, Int ja, MDESC *ma, complex *ptrmynewblock, Int ib, Int jb, MDESC *mb, Int globcontext) | 
|  | 
| static2 void | init_chenille (Int mypnum, Int nprocs, Int n0, Int *proc0, Int n1, Int *proc1, Int **psend, Int **precv, Int *myrang) | 
|  | 
| static2 Int | block2buff (IDESC *vi, Int vinb, IDESC *hi, Int hinb, complex *ptra, MDESC *ma, complex *buff) | 
|  | 
| static2 void | buff2block (IDESC *vi, Int vinb, IDESC *hi, Int hinb, complex *buff, complex *ptrb, MDESC *mb) | 
|  | 
| static2 Int | inter_len (Int hinb, IDESC *hi, Int vinb, IDESC *vi) | 
|  | 
| void | Clacpy (Int m, Int n, complex *a, Int lda, complex *b, Int ldb) | 
|  | 
| static2 void | gridreshape (Int *ctxtp) | 
|  |