SCALAPACK 2.2.2
LAPACK: Linear Algebra PACKage
Loading...
Searching...
No Matches
pcgemr.c File Reference
#include "redist.h"
#include <stdio.h>
#include <stdlib.h>
#include <assert.h>
Include dependency graph for pcgemr.c:

Go to the source code of this file.

Classes

struct  complex
 
struct  MDESC
 
struct  IDESC
 

Macros

#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)
 

Functions

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)