/dports/math/blacs/BLACS_shared/TESTING/ |
H A D | Cbt.c | 5 int *ConTxt; in blacs_gridinit_() 32 int *ConTxt; in blacs_gridmap_() 43 int *ConTxt; in blacs_gridexit_() 50 int *ConTxt; in blacs_abort_() 65 int *ConTxt; in blacs_freebuff_() 73 int *ConTxt; in blacs_gridinfo_() 84 int *ConTxt; in blacs_barrier_() 92 int *ConTxt; in blacs_pnum_() 101 int *ConTxt; in blacs_pcoord_() 111 int *ConTxt; in blacs_get_() [all …]
|
/dports/math/blacs/BLACS/TESTING/ |
H A D | Cbt.c | 5 int *ConTxt; in blacs_gridinit_() 32 int *ConTxt; in blacs_gridmap_() 43 int *ConTxt; in blacs_gridexit_() 50 int *ConTxt; in blacs_abort_() 65 int *ConTxt; in blacs_freebuff_() 73 int *ConTxt; in blacs_gridinfo_() 84 int *ConTxt; in blacs_barrier_() 92 int *ConTxt; in blacs_pnum_() 101 int *ConTxt; in blacs_pcoord_() 111 int *ConTxt; in blacs_get_() [all …]
|
/dports/math/scalapack/scalapack-2.1.0/BLACS/TESTING/ |
H A D | Cbt.c | 5 int *ConTxt; in blacs_gridinit_() 32 int *ConTxt; in blacs_gridmap_() 43 int *ConTxt; in blacs_gridexit_() 50 int *ConTxt; in blacs_abort_() 65 int *ConTxt; in blacs_freebuff_() 73 int *ConTxt; in blacs_gridinfo_() 84 int *ConTxt; in blacs_barrier_() 92 int *ConTxt; in blacs_pnum_() 101 int *ConTxt; in blacs_pcoord_() 111 int *ConTxt; in blacs_get_() [all …]
|
/dports/math/blacs/BLACS/SRC/MPI/ |
H A D | blacs_set_.c | 4 void Cblacs_set(int ConTxt, int what, int *val) in Cblacs_set() argument 6 F_VOID_FUNC blacs_set_(int *ConTxt, int *what, int *val) in Cblacs_set() 14 BI_BlacsWarn(Mpval(ConTxt), __LINE__, __FILE__, in Cblacs_set() 18 BI_BlacsWarn(Mpval(ConTxt), __LINE__, __FILE__, in Cblacs_set() 22 BI_BlacsWarn(Mpval(ConTxt), __LINE__, __FILE__, in Cblacs_set() 30 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_set() 36 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_set() 43 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_set() 49 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_set() 56 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_set() [all …]
|
H A D | blacs_gridexit_.c | 4 void Cblacs_gridexit(int ConTxt) in Cblacs_gridexit() argument 6 F_VOID_FUNC blacs_gridexit_(int *ConTxt) in Cblacs_gridexit() 14 if ( (Mpval(ConTxt) < 0) || (Mpval(ConTxt) >= BI_MaxNCtxt) ) in Cblacs_gridexit() 15 BI_BlacsErr(Mpval(ConTxt), __LINE__, __FILE__, in Cblacs_gridexit() 18 if (BI_MyContxts[Mpval(ConTxt)] == NULL) in Cblacs_gridexit() 19 BI_BlacsErr(Mpval(ConTxt), __LINE__, __FILE__, in Cblacs_gridexit() 22 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_gridexit() 43 BI_MyContxts[Mpval(ConTxt)] = NULL; in Cblacs_gridexit()
|
H A D | blacs_get_.c | 3 void Cblacs_get(int ConTxt, int what, int *val) in Cblacs_get() argument 5 F_VOID_FUNC blacs_get_(int *ConTxt, int *what, int *val) in Cblacs_get() 39 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_get() 84 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_get() 88 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_get() 92 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_get() 96 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_get() 100 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_get() 104 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_get() 108 BI_BlacsWarn(Mpval(ConTxt), __LINE__, __FILE__, "Unknown WHAT (%d)", in Cblacs_get()
|
H A D | blacs_gridmap_.c | 5 void Cblacs_gridmap(int *ConTxt, int *usermap, int ldup, int nprow0, int npcol0) in Cblacs_gridmap() argument 7 F_VOID_FUNC blacs_gridmap_(int *ConTxt, int *usermap, int *ldup, int *nprow0, in Cblacs_gridmap() 75 comm = BI_TransUserComm(Cblacs2sys_handle(*ConTxt), Ng, iptr); in Cblacs_gridmap() 81 Ucomm = Cblacs2sys_handle(*ConTxt); in Cblacs_gridmap() 90 tcomm = Cblacs2sys_handle(*ConTxt); in Cblacs_gridmap() 97 tcomm = *ConTxt; in Cblacs_gridmap() 99 comm = BI_TransUserComm(*ConTxt, Ng, iptr); in Cblacs_gridmap() 102 mpi_comm_group_(ConTxt, &Fgrp, &info); in Cblacs_gridmap() 104 mpi_comm_create_(ConTxt, &Fgrp2, Fcomm, &info); in Cblacs_gridmap() 124 *ConTxt = NOTINCONTEXT; in Cblacs_gridmap() [all …]
|
H A D | blacs_gridinfo_.c | 4 void Cblacs_gridinfo(int ConTxt, int *nprow, int *npcol, int *myrow, int *mycol) in Cblacs_gridinfo() argument 6 F_VOID_FUNC blacs_gridinfo_(int *ConTxt, int *nprow, int *npcol, in Cblacs_gridinfo() 16 if ( (Mpval(ConTxt) >= 0) && (Mpval(ConTxt) < BI_MaxNCtxt) ) in Cblacs_gridinfo() 21 ctxt = BI_MyContxts[Mpval(ConTxt)]; in Cblacs_gridinfo()
|
/dports/math/blacs/BLACS_shared/SRC/MPI/ |
H A D | blacs_set_.c | 4 void Cblacs_set(int ConTxt, int what, int *val) in Cblacs_set() argument 6 F_VOID_FUNC blacs_set_(int *ConTxt, int *what, int *val) in Cblacs_set() 14 BI_BlacsWarn(Mpval(ConTxt), __LINE__, __FILE__, in Cblacs_set() 18 BI_BlacsWarn(Mpval(ConTxt), __LINE__, __FILE__, in Cblacs_set() 22 BI_BlacsWarn(Mpval(ConTxt), __LINE__, __FILE__, in Cblacs_set() 30 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_set() 36 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_set() 43 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_set() 49 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_set() 56 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_set() [all …]
|
H A D | blacs_gridexit_.c | 4 void Cblacs_gridexit(int ConTxt) in Cblacs_gridexit() argument 6 F_VOID_FUNC blacs_gridexit_(int *ConTxt) in Cblacs_gridexit() 14 if ( (Mpval(ConTxt) < 0) || (Mpval(ConTxt) >= BI_MaxNCtxt) ) in Cblacs_gridexit() 15 BI_BlacsErr(Mpval(ConTxt), __LINE__, __FILE__, in Cblacs_gridexit() 18 if (BI_MyContxts[Mpval(ConTxt)] == NULL) in Cblacs_gridexit() 19 BI_BlacsErr(Mpval(ConTxt), __LINE__, __FILE__, in Cblacs_gridexit() 22 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_gridexit() 43 BI_MyContxts[Mpval(ConTxt)] = NULL; in Cblacs_gridexit()
|
H A D | blacs_get_.c | 3 void Cblacs_get(int ConTxt, int what, int *val) in Cblacs_get() argument 5 F_VOID_FUNC blacs_get_(int *ConTxt, int *what, int *val) in Cblacs_get() 39 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_get() 84 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_get() 88 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_get() 92 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_get() 96 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_get() 100 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_get() 104 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_get() 108 BI_BlacsWarn(Mpval(ConTxt), __LINE__, __FILE__, "Unknown WHAT (%d)", in Cblacs_get()
|
H A D | blacs_gridmap_.c | 5 void Cblacs_gridmap(int *ConTxt, int *usermap, int ldup, int nprow0, int npcol0) in Cblacs_gridmap() argument 7 F_VOID_FUNC blacs_gridmap_(int *ConTxt, int *usermap, int *ldup, int *nprow0, in Cblacs_gridmap() 75 comm = BI_TransUserComm(Cblacs2sys_handle(*ConTxt), Ng, iptr); in Cblacs_gridmap() 81 Ucomm = Cblacs2sys_handle(*ConTxt); in Cblacs_gridmap() 90 tcomm = Cblacs2sys_handle(*ConTxt); in Cblacs_gridmap() 97 tcomm = *ConTxt; in Cblacs_gridmap() 99 comm = BI_TransUserComm(*ConTxt, Ng, iptr); in Cblacs_gridmap() 102 mpi_comm_group_(ConTxt, &Fgrp, &info); in Cblacs_gridmap() 104 mpi_comm_create_(ConTxt, &Fgrp2, Fcomm, &info); in Cblacs_gridmap() 124 *ConTxt = NOTINCONTEXT; in Cblacs_gridmap() [all …]
|
H A D | blacs_gridinfo_.c | 4 void Cblacs_gridinfo(int ConTxt, int *nprow, int *npcol, int *myrow, int *mycol) in Cblacs_gridinfo() argument 6 F_VOID_FUNC blacs_gridinfo_(int *ConTxt, int *nprow, int *npcol, in Cblacs_gridinfo() 16 if ( (Mpval(ConTxt) >= 0) && (Mpval(ConTxt) < BI_MaxNCtxt) ) in Cblacs_gridinfo() 21 ctxt = BI_MyContxts[Mpval(ConTxt)]; in Cblacs_gridinfo()
|
/dports/math/scalapack/scalapack-2.1.0/BLACS/SRC/ |
H A D | blacs_set_.c | 4 void Cblacs_set(int ConTxt, int what, int *val) in Cblacs_set() argument 6 F_VOID_FUNC blacs_set_(int *ConTxt, int *what, int *val) in Cblacs_set() 14 BI_BlacsWarn(Mpval(ConTxt), __LINE__, __FILE__, in Cblacs_set() 18 BI_BlacsWarn(Mpval(ConTxt), __LINE__, __FILE__, in Cblacs_set() 22 BI_BlacsWarn(Mpval(ConTxt), __LINE__, __FILE__, in Cblacs_set() 30 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_set() 36 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_set() 43 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_set() 49 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_set() 56 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_set() [all …]
|
H A D | BI_ArgCheck.c | 13 MGetConTxt(ConTxt, ctxt); in BI_ArgCheck() 21 BI_BlacsWarn(ConTxt, -1, routine, in BI_ArgCheck() 27 if (i) BI_BlacsWarn(ConTxt, -1, routine, in BI_ArgCheck() 37 BI_BlacsWarn(ConTxt, -1, routine, in BI_ArgCheck() 48 BI_BlacsErr(ConTxt, -1, routine, in BI_ArgCheck() 61 BI_BlacsErr(ConTxt, -1, routine, in BI_ArgCheck() 68 BI_BlacsErr(ConTxt, -1, routine, in BI_ArgCheck() 80 BI_BlacsWarn(ConTxt, -1, routine, in BI_ArgCheck() 86 BI_BlacsErr(ConTxt, -1, routine, in BI_ArgCheck() 92 BI_BlacsWarn(ConTxt, -1, routine, in BI_ArgCheck() [all …]
|
H A D | blacs_grid_.c | 4 void Cblacs_gridexit(int ConTxt) in Cblacs_gridexit() argument 6 F_VOID_FUNC blacs_gridexit_(int *ConTxt) in Cblacs_gridexit() 14 if ( (Mpval(ConTxt) < 0) || (Mpval(ConTxt) >= BI_MaxNCtxt) ) in Cblacs_gridexit() 15 BI_BlacsErr(Mpval(ConTxt), __LINE__, __FILE__, in Cblacs_gridexit() 18 if (BI_MyContxts[Mpval(ConTxt)] == NULL) in Cblacs_gridexit() 19 BI_BlacsErr(Mpval(ConTxt), __LINE__, __FILE__, in Cblacs_gridexit() 22 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_gridexit() 31 BI_MyContxts[Mpval(ConTxt)] = NULL; in Cblacs_gridexit()
|
H A D | blacs_get_.c | 3 void Cblacs_get(int ConTxt, int what, int *val) in Cblacs_get() argument 5 F_VOID_FUNC blacs_get_(int *ConTxt, int *what, int *val) in Cblacs_get() 33 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_get() 41 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_get() 45 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_get() 49 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_get() 53 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_get() 57 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_get() 61 MGetConTxt(Mpval(ConTxt), ctxt); in Cblacs_get() 65 BI_BlacsWarn(Mpval(ConTxt), __LINE__, __FILE__, "Unknown WHAT (%d)", in Cblacs_get()
|
H A D | BI_BlacsWarn.c | 3 void BI_BlacsWarn(int ConTxt, int line, char *file, char *form, ...) in BI_BlacsWarn() argument 15 if (ConTxt > -1) in BI_BlacsWarn() 17 myrow = BI_MyContxts[ConTxt]->cscp.Iam; in BI_BlacsWarn() 18 mycol = BI_MyContxts[ConTxt]->rscp.Iam; in BI_BlacsWarn() 24 cline, myrow, mycol, BI_Iam, ConTxt, line, file); in BI_BlacsWarn()
|
H A D | blacs_info_.c | 4 void Cblacs_gridinfo(int ConTxt, int *nprow, int *npcol, int *myrow, int *mycol) in Cblacs_gridinfo() argument 6 F_VOID_FUNC blacs_gridinfo_(int *ConTxt, int *nprow, int *npcol, in Cblacs_gridinfo() 16 if ( (Mpval(ConTxt) >= 0) && (Mpval(ConTxt) < BI_MaxNCtxt) ) in Cblacs_gridinfo() 21 ctxt = BI_MyContxts[Mpval(ConTxt)]; in Cblacs_gridinfo()
|
/dports/math/blacs/BLACS_shared/SRC/MPI/INTERNAL/ |
H A D | BI_ArgCheck.c | 13 MGetConTxt(ConTxt, ctxt); in BI_ArgCheck() 21 BI_BlacsWarn(ConTxt, -1, routine, in BI_ArgCheck() 27 if (i) BI_BlacsWarn(ConTxt, -1, routine, in BI_ArgCheck() 37 BI_BlacsWarn(ConTxt, -1, routine, in BI_ArgCheck() 48 BI_BlacsErr(ConTxt, -1, routine, in BI_ArgCheck() 61 BI_BlacsErr(ConTxt, -1, routine, in BI_ArgCheck() 68 BI_BlacsErr(ConTxt, -1, routine, in BI_ArgCheck() 80 BI_BlacsWarn(ConTxt, -1, routine, in BI_ArgCheck() 86 BI_BlacsErr(ConTxt, -1, routine, in BI_ArgCheck() 92 BI_BlacsWarn(ConTxt, -1, routine, in BI_ArgCheck() [all …]
|
H A D | BI_BlacsWarn.c | 4 void BI_BlacsWarn(int ConTxt, int line, char *file, char *form, ...) in BI_BlacsWarn() argument 20 int ConTxt, line; in BI_BlacsWarn() local 23 ConTxt = va_arg(argptr, int); in BI_BlacsWarn() 31 if (ConTxt > -1) in BI_BlacsWarn() 33 myrow = BI_MyContxts[ConTxt]->cscp.Iam; in BI_BlacsWarn() 34 mycol = BI_MyContxts[ConTxt]->rscp.Iam; in BI_BlacsWarn() 40 cline, myrow, mycol, BI_Iam, ConTxt, line, file); in BI_BlacsWarn()
|
H A D | BI_BlacsErr.c | 4 void BI_BlacsErr(int ConTxt, int line, char *file, char *form, ...) in BI_BlacsErr() argument 25 int ConTxt, line; in BI_BlacsErr() local 28 ConTxt = va_arg(argptr, int); in BI_BlacsErr() 36 if (ConTxt > -1) in BI_BlacsErr() 38 MGetConTxt(ConTxt, ctxt); in BI_BlacsErr() 46 cline, myrow, mycol, BI_Iam, ConTxt, line, file); in BI_BlacsErr()
|
/dports/math/blacs/BLACS/SRC/MPI/INTERNAL/ |
H A D | BI_ArgCheck.c | 13 MGetConTxt(ConTxt, ctxt); in BI_ArgCheck() 21 BI_BlacsWarn(ConTxt, -1, routine, in BI_ArgCheck() 27 if (i) BI_BlacsWarn(ConTxt, -1, routine, in BI_ArgCheck() 37 BI_BlacsWarn(ConTxt, -1, routine, in BI_ArgCheck() 48 BI_BlacsErr(ConTxt, -1, routine, in BI_ArgCheck() 61 BI_BlacsErr(ConTxt, -1, routine, in BI_ArgCheck() 68 BI_BlacsErr(ConTxt, -1, routine, in BI_ArgCheck() 80 BI_BlacsWarn(ConTxt, -1, routine, in BI_ArgCheck() 86 BI_BlacsErr(ConTxt, -1, routine, in BI_ArgCheck() 92 BI_BlacsWarn(ConTxt, -1, routine, in BI_ArgCheck() [all …]
|
H A D | BI_BlacsWarn.c | 4 void BI_BlacsWarn(int ConTxt, int line, char *file, char *form, ...) in BI_BlacsWarn() argument 20 int ConTxt, line; in BI_BlacsWarn() local 23 ConTxt = va_arg(argptr, int); in BI_BlacsWarn() 31 if (ConTxt > -1) in BI_BlacsWarn() 33 myrow = BI_MyContxts[ConTxt]->cscp.Iam; in BI_BlacsWarn() 34 mycol = BI_MyContxts[ConTxt]->rscp.Iam; in BI_BlacsWarn() 40 cline, myrow, mycol, BI_Iam, ConTxt, line, file); in BI_BlacsWarn()
|
H A D | BI_BlacsErr.c | 4 void BI_BlacsErr(int ConTxt, int line, char *file, char *form, ...) in BI_BlacsErr() argument 25 int ConTxt, line; in BI_BlacsErr() local 28 ConTxt = va_arg(argptr, int); in BI_BlacsErr() 36 if (ConTxt > -1) in BI_BlacsErr() 38 MGetConTxt(ConTxt, ctxt); in BI_BlacsErr() 46 cline, myrow, mycol, BI_Iam, ConTxt, line, file); in BI_BlacsErr()
|