OpenRadioss 2025.1.11
OpenRadioss project
Loading...
Searching...
No Matches
pblas.h File Reference
#include <stdio.h>
#include <stdlib.h>

Go to the source code of this file.

Data Structures

struct  complex
struct  complex16

Macros

#define _HAL_   0
#define _T3D_   1
#define _MACH_   _HAL_
#define _F2C_ADD_   0
#define _F2C_NOCHANGE   1
#define _F2C_UPCASE   2
#define _F2C_F77ISF2C   3
#define _F2C_CALL_   _F2C_ADD_
#define Int   int
#define F2C_CHAR(a)
#define C2F_CHAR(a)
#define F_VOID_FCT   void /* Subroutine */
#define F_INTG_FCT   Int /* INTEGER function */
#define F_DBLE_FCT   double /* DOUBLE PRECISION function */
#define DLEN_   9 /* Length of a descriptor */
#define DT_   0 /* Descriptor Type */
#define CTXT_   1 /* BLACS context */
#define M_   2 /* Global Number of Rows */
#define N_   3 /* Global Number of Columns */
#define MB_   4 /* Row Blocking Size */
#define NB_   5 /* Column Blocking Size */
#define RSRC_   6 /* Starting Processor Row */
#define CSRC_   7 /* Starting Processor Column */
#define LLD_   8 /* Local Leading Dimension */
#define BLOCK_CYCLIC_2D   1
#define BLOCK_CYCLIC_INB_2D   2
#define BROADCAST   "B" /* Blacs operation definitions */
#define COMBINE   "C"
#define ALL   "A" /* Scope definitions */
#define COLUMN   "C"
#define ROW   "R"
#define TOPDEF   " " /* Default BLACS topology, PB-BLAS routines */
#define CTOPDEF   ' '
#define TOPGET   "!"
#define YES   "Y"
#define NO   "N"
#define MULLENFAC   2
#define ONE   1.0
#define ZERO   0.0
#define ABS(a)
#define MIN(a, b)
#define MAX(a, b)
#define CEIL(a, b)
#define Mlowcase(C)
#define Mupcase(C)
#define INDXG2L(iglob, nb, iproc, isrcproc, nprocs)
#define INDXL2G(iloc, nb, iproc, isrcproc, nprocs)
#define INDXG2P(iglob, nb, iproc, isrcproc, nprocs)
#define MYROC0(nblocks, n, nb, nprocs)

Typedefs

typedef char * F_CHAR

Macro Definition Documentation

◆ _F2C_ADD_

#define _F2C_ADD_   0

Definition at line 61 of file pblas.h.

◆ _F2C_CALL_

#define _F2C_CALL_   _F2C_ADD_

Definition at line 83 of file pblas.h.

◆ _F2C_F77ISF2C

#define _F2C_F77ISF2C   3

Definition at line 64 of file pblas.h.

◆ _F2C_NOCHANGE

#define _F2C_NOCHANGE   1

Definition at line 62 of file pblas.h.

◆ _F2C_UPCASE

#define _F2C_UPCASE   2

Definition at line 63 of file pblas.h.

◆ _HAL_

#define _HAL_   0

Definition at line 22 of file pblas.h.

◆ _MACH_

#define _MACH_   _HAL_

Definition at line 30 of file pblas.h.

◆ _T3D_

#define _T3D_   1

Definition at line 23 of file pblas.h.

◆ ABS

#define ABS ( a)
Value:
(((a) < 0) ? -(a) : (a))

Definition at line 171 of file pblas.h.

◆ ALL

#define ALL   "A" /* Scope definitions */

Definition at line 149 of file pblas.h.

◆ BLOCK_CYCLIC_2D

#define BLOCK_CYCLIC_2D   1

Definition at line 143 of file pblas.h.

◆ BLOCK_CYCLIC_INB_2D

#define BLOCK_CYCLIC_INB_2D   2

Definition at line 144 of file pblas.h.

◆ BROADCAST

#define BROADCAST   "B" /* Blacs operation definitions */

Definition at line 146 of file pblas.h.

◆ C2F_CHAR

#define C2F_CHAR ( a)
Value:
(a)

Definition at line 116 of file pblas.h.

◆ CEIL

#define CEIL ( a,
b )
Value:
( ((a)+(b)-1) / (b) )

Definition at line 177 of file pblas.h.

◆ COLUMN

#define COLUMN   "C"

Definition at line 150 of file pblas.h.

◆ COMBINE

#define COMBINE   "C"

Definition at line 147 of file pblas.h.

◆ CSRC_

#define CSRC_   7 /* Starting Processor Column */

Definition at line 137 of file pblas.h.

◆ CTOPDEF

#define CTOPDEF   ' '

Definition at line 154 of file pblas.h.

◆ CTXT_

#define CTXT_   1 /* BLACS context */

Definition at line 131 of file pblas.h.

◆ DLEN_

#define DLEN_   9 /* Length of a descriptor */

Definition at line 129 of file pblas.h.

◆ DT_

#define DT_   0 /* Descriptor Type */

Definition at line 130 of file pblas.h.

◆ F2C_CHAR

#define F2C_CHAR ( a)
Value:
(a)

Definition at line 115 of file pblas.h.

◆ F_DBLE_FCT

#define F_DBLE_FCT   double /* DOUBLE PRECISION function */

Definition at line 120 of file pblas.h.

◆ F_INTG_FCT

#define F_INTG_FCT   Int /* INTEGER function */

Definition at line 119 of file pblas.h.

◆ F_VOID_FCT

#define F_VOID_FCT   void /* Subroutine */

Definition at line 118 of file pblas.h.

◆ INDXG2L

#define INDXG2L ( iglob,
nb,
iproc,
isrcproc,
nprocs )
Value:
( (nb) * ( ( (iglob)-1) / ( (nb) * (nprocs) ) ) +\
( ( (iglob) - 1 ) % (nb) ) + 1 )

Definition at line 183 of file pblas.h.

183#define INDXG2L( iglob, nb, iproc, isrcproc, nprocs )\
184 ( (nb) * ( ( (iglob)-1) / ( (nb) * (nprocs) ) ) +\
185 ( ( (iglob) - 1 ) % (nb) ) + 1 )

◆ INDXG2P

#define INDXG2P ( iglob,
nb,
iproc,
isrcproc,
nprocs )
Value:
( ( (isrcproc) + ( (iglob) - 1 ) / (nb) ) % (nprocs) )

Definition at line 192 of file pblas.h.

192#define INDXG2P( iglob, nb, iproc, isrcproc, nprocs ) \
193 ( ( (isrcproc) + ( (iglob) - 1 ) / (nb) ) % (nprocs) )

◆ INDXL2G

#define INDXL2G ( iloc,
nb,
iproc,
isrcproc,
nprocs )
Value:
( (nprocs) * (nb) * ( ( (iloc) - 1 ) / (nb) ) +\
( ( (iloc) - 1 ) % (nb) ) +\
( ( (nprocs) + (iproc) - (isrcproc) ) % (nprocs) ) * (nb) + 1 )

Definition at line 187 of file pblas.h.

187#define INDXL2G( iloc, nb, iproc, isrcproc, nprocs )\
188 ( (nprocs) * (nb) * ( ( (iloc) - 1 ) / (nb) ) +\
189 ( ( (iloc) - 1 ) % (nb) ) +\
190 ( ( (nprocs) + (iproc) - (isrcproc) ) % (nprocs) ) * (nb) + 1 )

◆ Int

#define Int   int

Definition at line 93 of file pblas.h.

◆ LLD_

#define LLD_   8 /* Local Leading Dimension */

Definition at line 138 of file pblas.h.

◆ M_

#define M_   2 /* Global Number of Rows */

Definition at line 132 of file pblas.h.

◆ MAX

#define MAX ( a,
b )
Value:
(((a) > (b)) ? (a) : (b))

Definition at line 175 of file pblas.h.

◆ MB_

#define MB_   4 /* Row Blocking Size */

Definition at line 134 of file pblas.h.

◆ MIN

#define MIN ( a,
b )
Value:
(((a) < (b)) ? (a) : (b))

Definition at line 173 of file pblas.h.

◆ Mlowcase

#define Mlowcase ( C)
Value:
( ((C) > 64 && (C) < 91) ? (C) | 32 : (C) )

Definition at line 179 of file pblas.h.

◆ MULLENFAC

#define MULLENFAC   2

Definition at line 160 of file pblas.h.

◆ Mupcase

#define Mupcase ( C)
Value:
( ((C) > 96 && (C) < 123) ? (C) & 0xDF : (C) )

Definition at line 181 of file pblas.h.

◆ MYROC0

#define MYROC0 ( nblocks,
n,
nb,
nprocs )
Value:
( ( (nblocks) % (nprocs) ) ? ( ( (nblocks) / (nprocs) ) * (nb) + (nb) )\
: ( ( (nblocks) / (nprocs) )* (nb) + ( (n) % (nb) ) ) )
n

Definition at line 195 of file pblas.h.

195#define MYROC0( nblocks, n, nb, nprocs )\
196 ( ( (nblocks) % (nprocs) ) ? ( ( (nblocks) / (nprocs) ) * (nb) + (nb) )\
197 : ( ( (nblocks) / (nprocs) )* (nb) + ( (n) % (nb) ) ) )

◆ N_

#define N_   3 /* Global Number of Columns */

Definition at line 133 of file pblas.h.

◆ NB_

#define NB_   5 /* Column Blocking Size */

Definition at line 135 of file pblas.h.

◆ NO

#define NO   "N"

Definition at line 158 of file pblas.h.

◆ ONE

#define ONE   1.0

Definition at line 162 of file pblas.h.

◆ ROW

#define ROW   "R"

Definition at line 151 of file pblas.h.

◆ RSRC_

#define RSRC_   6 /* Starting Processor Row */

Definition at line 136 of file pblas.h.

◆ TOPDEF

#define TOPDEF   " " /* Default BLACS topology, PB-BLAS routines */

Definition at line 153 of file pblas.h.

◆ TOPGET

#define TOPGET   "!"

Definition at line 155 of file pblas.h.

◆ YES

#define YES   "Y"

Definition at line 157 of file pblas.h.

◆ ZERO

#define ZERO   0.0

Definition at line 163 of file pblas.h.

Typedef Documentation

◆ F_CHAR

typedef char* F_CHAR

Definition at line 113 of file pblas.h.