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

Go to the source code of this file.

Classes

struct  MDESC
 
struct  IDESC
 

Macros

#define static2   static
 
#define fortran_mr2d   pdtrmr2do
 
#define fortran_mr2dnew   pdtrmr2d
 
#define dcopy_   dcopy
 
#define dlacpy_   dlacpy
 
#define Clacpy   Cdtrlacpy
 
#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   dtrscanD0
 
#define dispmat   dtrdispmat
 
#define setmemory   dtrsetmemory
 
#define freememory   dtrfreememory
 
#define scan_intervals   dtrscan_intervals
 
#define SENDBUFF   0
 
#define RECVBUFF   1
 
#define SIZEBUFF   2
 
#define NDEBUG
 
#define DESCLEN   9
 
#define NBPARAM
 
#define MAGIC_MAX   100000000
 

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 Cdgesd2d ()
 
void Cdgerv2d ()
 
Int localindice ()
 
void * mr2d_malloc ()
 
Int ppcm ()
 
Int localsize ()
 
Int memoryblocksize ()
 
Int changeorigin ()
 
void paramcheck ()
 
void Cpdtrmr2do ()
 
void Cpdtrmr2d ()
 
void fortran_mr2d (char *uplo, char *diag, Int *m, Int *n, double *A, Int *ia, Int *ja, Int desc_A[DESCLEN], double *B, Int *ib, Int *jb, Int desc_B[DESCLEN])
 
void fortran_mr2dnew (char *uplo, char *diag, Int *m, Int *n, double *A, Int *ia, Int *ja, Int desc_A[DESCLEN], double *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 Cpdtrmr2do (char *uplo, char *diag, Int m, Int n, double *ptrmyblock, Int ia, Int ja, MDESC *ma, double *ptrmynewblock, Int ib, Int jb, MDESC *mb)
 
void Cpdtrmr2d (char *uplo, char *diag, Int m, Int n, double *ptrmyblock, Int ia, Int ja, MDESC *ma, double *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)
 
void Clacpy (Int m, Int n, double *a, Int lda, double *b, Int ldb)
 
static2 void gridreshape (Int *ctxtp)