OpenRadioss 2025.1.11
OpenRadioss project
Loading...
Searching...
No Matches
tools.h File Reference
#include "./pblas.h"

Go to the source code of this file.

Data Structures

struct  DCOMPLEX
struct  SCOMPLEX

Macros

#define SLVOID   char
#define ErrPrnt   fprintf(stderr, "line %d of file %s\n",__LINE__, __FILE__);
#define Mdescset(desc, m, n, mb, nb, rsrc, csrc, ictxt, lld)
#define MCindxg2p(IG, nb, srcproc, nprocs)
#define Mmalloc(M_ptr, M_type, M_elt, M_i, M_ctxt)

Typedefs

typedef void(* CPYPTR) ()

Macro Definition Documentation

◆ ErrPrnt

#define ErrPrnt   fprintf(stderr, "line %d of file %s\n",__LINE__, __FILE__);

Definition at line 11 of file tools.h.

◆ MCindxg2p

#define MCindxg2p ( IG,
nb,
srcproc,
nprocs )
Value:
( ((srcproc) + (IG)/(nb)) % nprocs )

Definition at line 26 of file tools.h.

26#define MCindxg2p(IG, nb, srcproc, nprocs) \
27 ( ((srcproc) + (IG)/(nb)) % nprocs )

◆ Mdescset

#define Mdescset ( desc,
m,
n,
mb,
nb,
rsrc,
csrc,
ictxt,
lld )
Value:
{ \
(desc)[DT_] = BLOCK_CYCLIC_2D; \
(desc)[CTXT_] = (ictxt); \
(desc)[M_] = (m); \
(desc)[N_] = (n); \
(desc)[MB_] = (mb); \
(desc)[NB_] = (nb); \
(desc)[RSRC_] = (rsrc); \
(desc)[CSRC_] = (csrc); \
(desc)[LLD_] = (lld); \
}
#define CTXT_
Definition PBtools.h:38
#define MB_
Definition PBtools.h:43
#define LLD_
Definition PBtools.h:47
#define RSRC_
Definition PBtools.h:45
#define M_
Definition PBtools.h:39
#define CSRC_
Definition PBtools.h:46
#define BLOCK_CYCLIC_2D
Definition PBtools.h:20
#define NB_
Definition PBtools.h:44
#define N_
Definition PBtools.h:40
#define DT_
Definition pblas.h:130
n

Definition at line 13 of file tools.h.

13#define Mdescset(desc, m, n, mb, nb, rsrc, csrc, ictxt, lld) \
14{ \
15 (desc)[DT_] = BLOCK_CYCLIC_2D; \
16 (desc)[CTXT_] = (ictxt); \
17 (desc)[M_] = (m); \
18 (desc)[N_] = (n); \
19 (desc)[MB_] = (mb); \
20 (desc)[NB_] = (nb); \
21 (desc)[RSRC_] = (rsrc); \
22 (desc)[CSRC_] = (csrc); \
23 (desc)[LLD_] = (lld); \
24}

◆ Mmalloc

#define Mmalloc ( M_ptr,
M_type,
M_elt,
M_i,
M_ctxt )
Value:
{ \
void pberror_(); \
(M_ptr) = ( M_type * ) malloc((M_elt)*(sizeof(M_type))); \
if (!(M_ptr)) \
{ \
if ((M_elt) > 0) \
{ \
(M_i) = 1; \
fprintf(stderr, "Not enough memory on line %d of file %s!!\n", \
__LINE__, __FILE__); \
pberror_(&(M_ctxt), __FILE__, &(M_i)); \
} \
} \
}

Definition at line 32 of file tools.h.

32#define Mmalloc(M_ptr, M_type, M_elt, M_i, M_ctxt) \
33{ \
34 void pberror_(); \
35 (M_ptr) = ( M_type * ) malloc((M_elt)*(sizeof(M_type))); \
36 if (!(M_ptr)) \
37 { \
38 if ((M_elt) > 0) \
39 { \
40 (M_i) = 1; \
41 fprintf(stderr, "Not enough memory on line %d of file %s!!\n", \
42 __LINE__, __FILE__); \
43 pberror_(&(M_ctxt), __FILE__, &(M_i)); \
44 } \
45 } \
46}

◆ SLVOID

#define SLVOID   char

Definition at line 8 of file tools.h.

Typedef Documentation

◆ CPYPTR

typedef void(* CPYPTR) ()

Definition at line 7 of file tools.h.