Home
last modified time | relevance | path

Searched refs:myrank (Results 1 – 25 of 563) sorted by relevance

12345678910>>...23

/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/maloc/tools/tests/psh/
H A Dvcomtst.c43 int myrank; in main() local
50 myrank = Vcom_rank(vcom); in main()
56 if (myrank == 0) { in main()
61 myrank, i); in main()
85 if (myrank == 0) printf("\n\nPE %d: STARTING BARRIER TEST.\n",myrank); in main()
86 printf("PE %d: Hit barrier\n", myrank); in main()
93 if (myrank == 0) { in main()
106 if (myrank == 0) { in main()
116 if (myrank == 0) { in main()
119 myrank, testj, testi); in main()
[all …]
/dports/science/gromacs/gromacs-2021.4/src/external/thread_mpi/src/
H A Dscatter.cpp68 int myrank; in tMPI_Scatter() local
84 myrank = tMPI_Comm_seek_rank(comm, cur); in tMPI_Scatter()
87 cev = tMPI_Get_cev(comm, myrank, &synct); in tMPI_Scatter()
89 if (myrank == root) in tMPI_Scatter()
105 cev->met[myrank].datatype = sendtype; in tMPI_Scatter()
134 if (i != myrank) in tMPI_Scatter()
179 tMPI_Wait_for_others(cev, myrank); in tMPI_Scatter()
204 int myrank; in tMPI_Scatterv() local
227 if (myrank == root) in tMPI_Scatterv()
271 if (i != myrank) in tMPI_Scatterv()
[all …]
H A Dalltoall.cpp68 int myrank; in tMPI_Alltoall() local
94 myrank = tMPI_Comm_seek_rank(comm, cur); in tMPI_Alltoall()
102 cev->met[myrank].datatype = sendtype; in tMPI_Alltoall()
116 if (i != myrank) in tMPI_Alltoall()
131 cev->met[myrank].read_data[myrank] = TRUE; in tMPI_Alltoall()
164 tMPI_Wait_for_others(cev, myrank); in tMPI_Alltoall()
182 int myrank; in tMPI_Alltoallv() local
214 cev->met[myrank].datatype = sendtype; in tMPI_Alltoallv()
228 if (i != myrank) in tMPI_Alltoallv()
244 cev->met[myrank].read_data[myrank] = TRUE; in tMPI_Alltoallv()
[all …]
H A Dgather.cpp67 int myrank; in tMPI_Gather() local
84 myrank = tMPI_Comm_seek_rank(comm, cur); in tMPI_Gather()
87 cev = tMPI_Get_cev(comm, myrank, &synct); in tMPI_Gather()
89 if (myrank == root) in tMPI_Gather()
107 cev->met[myrank].read_data[myrank] = TRUE; in tMPI_Gather()
155 tMPI_Wait_for_others(cev, myrank); in tMPI_Gather()
174 int myrank; in tMPI_Gatherv() local
191 myrank = tMPI_Comm_seek_rank(comm, cur); in tMPI_Gatherv()
196 if (myrank == root) in tMPI_Gatherv()
214 cev->met[myrank].read_data[myrank] = TRUE; in tMPI_Gatherv()
[all …]
H A Dscan.cpp66 int myrank = tMPI_Comm_seek_rank(comm, cur); in tMPI_Scan() local
69 int next = myrank + 1; /* my next neighbor */ in tMPI_Scan()
92 tMPI_Atomic_ptr_set(&(comm->reduce_sendbuf[myrank]), sendbuf); in tMPI_Scan()
93 tMPI_Atomic_ptr_set(&(comm->reduce_recvbuf[myrank]), recvbuf); in tMPI_Scan()
96 if (myrank > 0) in tMPI_Scan()
105 tMPI_Event_wait( &(comm->csync[myrank].events[prev]) ); in tMPI_Scan()
111 printf("%d: scanning with %d \n", myrank, prev, iteration); in tMPI_Scan()
143 if (myrank < N-1) in tMPI_Scan()
146 tMPI_Event_signal( &(comm->csync[next].events[myrank]) ); in tMPI_Scan()
148 tMPI_Event_wait( &(comm->csync[myrank].events[myrank]) ); in tMPI_Scan()
[all …]
H A Dreduce.cpp80 int myrank = tMPI_Comm_seek_rank(comm, cur); in tMPI_Reduce_fast() local
122 (N+myrank+nbr_dist)%N : in tMPI_Reduce_fast()
123 (N+myrank-nbr_dist)%N; in tMPI_Reduce_fast()
127 myrank, iteration, myrank_rtr, stepping); in tMPI_Reduce_fast()
142 myrank, nbr, iteration); in tMPI_Reduce_fast()
157 myrank, nbr, iteration); in tMPI_Reduce_fast()
212 nbr, myrank, iteration); in tMPI_Reduce_fast()
248 int myrank = tMPI_Comm_seek_rank(comm, cur); in tMPI_Reduce() local
259 if (myrank == root) in tMPI_Reduce()
274 if (myrank != root) in tMPI_Reduce()
[all …]
H A Dcollective.cpp278 if (cev->met[myrank].using_cb) in tMPI_Get_cev()
289 if (cev->met[myrank].cb) in tMPI_Get_cev()
293 cev->met[myrank].cb = NULL; in tMPI_Get_cev()
294 cev->met[myrank].using_cb = FALSE; in tMPI_Get_cev()
445 cev->met[myrank].using_cb = using_cb; in tMPI_Post_multi()
455 cev->met[myrank].tag = tag; in tMPI_Post_multi()
457 cev->met[myrank].buf[index] = buf; in tMPI_Post_multi()
468 if (i != myrank) in tMPI_Post_multi()
487 if (cev->met[myrank].cb == NULL) in tMPI_Post_multi()
518 if (!(cev->met[myrank].using_cb) ) in tMPI_Wait_for_others()
[all …]
/dports/science/pnetcdf/parallel-netcdf-1.8.1/src/lib/
H A Dsubfile.c97 if (myrank == 0) in ncmpii_subfile_create()
149 if (myrank == 0) in ncmpii_subfile_open()
163 if (myrank == 0) in ncmpii_subfile_open()
499 if (myrank == 0) in ncmpii_subfile_getput_vars()
690 buf_count_my[myrank] *= my_req[myrank].count[i]; in ncmpii_subfile_getput_vars()
813 …if (myrank == 0) printf("local: rank(%d): buf_offset[%d]=%d\n", myrank, myrank, buf_offset[myrank]… in ncmpii_subfile_getput_vars()
821 myrank, buf_offset[myrank], myrank, buf_count_my[myrank]); in ncmpii_subfile_getput_vars()
826 myrank, i, my_req[myrank].start[i], myrank, i, in ncmpii_subfile_getput_vars()
827 my_req[myrank].count[i], myrank, i, in ncmpii_subfile_getput_vars()
839 printf("buf_count_my[%d]=%d\n", myrank, buf_count_my[myrank]); in ncmpii_subfile_getput_vars()
[all …]
/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/hecmw1/src/solver/precond/nn/
H A Dhecmw_ML_wrapper.c90 int loglevel, myrank; in hecmw_ML_wrapper_setup() local
104 HECMW_Comm_rank(HECMW_comm_get_comm(), &myrank); in hecmw_ML_wrapper_setup()
122 if (loglevel > 0 && myrank == 0) fprintf(stderr, "INFO: ML coarse solver is KLU\n"); in hecmw_ML_wrapper_setup()
127 if (loglevel > 0 && myrank == 0) fprintf(stderr, "INFO: ML coarse solver is MUMPS\n"); in hecmw_ML_wrapper_setup()
130 if (myrank == 0) fprintf(stderr, "WARNING: invalid solver_opt1=%d (ignored)\n", opt1); in hecmw_ML_wrapper_setup()
137 if (loglevel > 0 && myrank == 0) fprintf(stderr, "INFO: ML using default smoother\n"); in hecmw_ML_wrapper_setup()
140 if (loglevel > 0 && myrank == 0) fprintf(stderr, "INFO: ML smoother is Cheby\n"); in hecmw_ML_wrapper_setup()
150 if (loglevel > 0 && myrank == 0) fprintf(stderr, "INFO: ML smoother is Jacobi\n"); in hecmw_ML_wrapper_setup()
153 if (myrank == 0) fprintf(stderr, "WARNING: invalid solver_opt2=%d (ignored)\n", opt2); in hecmw_ML_wrapper_setup()
174 if (myrank == 0) fprintf(stderr, "WARNING: invalid solver_opt3=%d (ignored)\n", opt3); in hecmw_ML_wrapper_setup()
[all …]
/dports/science/openmx/openmx3.8/source/
H A Dexx_log.c51 int myrank; in EXX_Log_StdOut() local
55 MPI_Comm_rank(g_exx_mpicomm, &myrank); in EXX_Log_StdOut()
57 myrank = EXX_ROOT_RANK; in EXX_Log_StdOut()
60 if (EXX_ROOT_RANK == myrank) { in EXX_Log_StdOut()
71 int myrank; in EXX_Log_StdErr() local
75 MPI_Comm_rank(g_exx_mpicomm, &myrank); in EXX_Log_StdErr()
77 myrank = EXX_ROOT_RANK; in EXX_Log_StdErr()
80 if (EXX_ROOT_RANK == myrank) { in EXX_Log_StdErr()
117 int nproc, myrank; in EXX_Log_Open() local
127 myrank = EXX_ROOT_RANK; in EXX_Log_Open()
[all …]
/dports/math/combblas/CombBLAS_beta_16_2/usort/src/
H A Dmain.cpp113 int myrank, p; in verify() local
165 int myrank, p; in time_sort() local
342 int myrank; in main() local
443 if (!myrank) in main()
466 if (!myrank) { in main()
482 if(!myrank){ in main()
536 if(!myrank){ in main()
564 if (!myrank) { in printResults()
571 if (!myrank) { in printResults()
576 if (!myrank) { in printResults()
[all …]
/dports/math/dune-grid-glue/dune-grid-glue-17bd9898df80a52e2c316fc053119d190c149a2e/dune/grid-glue/adapter/
H A Dgridglue.cc36 int myrank = 0; in build() local
39 MPI_Comm_rank(mpicomm_, &myrank); in build()
65 std::cout << ">>>> rank " << myrank << " coords: " in build()
69 std::cout << ">>>> rank " << myrank << " types: " in build()
115 if (mergingrank != myrank && in build()
190 int myrank = 0; in mergePatches() local
193 MPI_Comm_rank(mpicomm_, &myrank); in mergePatches()
204 std::cout << myrank in mergePatches()
218 std::cout << myrank in mergePatches()
225 printVector(patch0types,"patch0types",myrank); in mergePatches()
[all …]
/dports/net/mpich2/mpich2-1.5/src/mpi/romio/adio/ad_testfs/
H A Dad_testfs_write.c15 int myrank, nprocs, datatype_size; in ADIOI_TESTFS_WriteContig() local
20 MPI_Comm_rank(fd->comm, &myrank); in ADIOI_TESTFS_WriteContig()
22 FPRINTF(stdout, "[%d/%d] ADIOI_TESTFS_WriteContig called on %s\n", myrank, in ADIOI_TESTFS_WriteContig()
25 myrank, nprocs, buf, (long long) offset, in ADIOI_TESTFS_WriteContig()
32 FPRINTF(stdout, "[%d/%d] new file position is %lld\n", myrank, in ADIOI_TESTFS_WriteContig()
49 int myrank, nprocs; in ADIOI_TESTFS_WriteStrided() local
54 MPI_Comm_rank(fd->comm, &myrank); in ADIOI_TESTFS_WriteStrided()
56 myrank, nprocs, fd->filename); in ADIOI_TESTFS_WriteStrided()
58 myrank, nprocs); in ADIOI_TESTFS_WriteStrided()
H A Dad_testfs_read.c15 int myrank, nprocs, datatype_size; in ADIOI_TESTFS_ReadContig() local
20 MPI_Comm_rank(fd->comm, &myrank); in ADIOI_TESTFS_ReadContig()
22 FPRINTF(stdout, "[%d/%d] ADIOI_TESTFS_ReadContig called on %s\n", myrank, in ADIOI_TESTFS_ReadContig()
35 myrank, nprocs, buf, (long long) offset, in ADIOI_TESTFS_ReadContig()
48 int myrank, nprocs; in ADIOI_TESTFS_ReadStrided() local
53 MPI_Comm_rank(fd->comm, &myrank); in ADIOI_TESTFS_ReadStrided()
54 FPRINTF(stdout, "[%d/%d] ADIOI_TESTFS_ReadStrided called on %s\n", myrank, in ADIOI_TESTFS_ReadStrided()
56 FPRINTF(stdout, "[%d/%d] calling ADIOI_GEN_ReadStrided\n", myrank, in ADIOI_TESTFS_ReadStrided()
H A Dad_testfs_iread.c21 int myrank, nprocs, typesize, len; in ADIOI_TESTFS_IreadContig() local
26 MPI_Comm_rank(fd->comm, &myrank); in ADIOI_TESTFS_IreadContig()
29 myrank, nprocs, fd->filename); in ADIOI_TESTFS_IreadContig()
31 myrank, nprocs); in ADIOI_TESTFS_IreadContig()
46 int myrank, nprocs; in ADIOI_TESTFS_IreadStrided() local
50 MPI_Comm_rank(fd->comm, &myrank); in ADIOI_TESTFS_IreadStrided()
53 myrank, nprocs, fd->filename); in ADIOI_TESTFS_IreadStrided()
55 myrank, nprocs); in ADIOI_TESTFS_IreadStrided()
H A Dad_testfs_iwrite.c24 int myrank, nprocs, typesize, len; in ADIOI_TESTFS_IwriteContig() local
30 MPI_Comm_rank(fd->comm, &myrank); in ADIOI_TESTFS_IwriteContig()
32 myrank, nprocs, fd->filename); in ADIOI_TESTFS_IwriteContig()
34 myrank, nprocs); in ADIOI_TESTFS_IwriteContig()
49 int myrank, nprocs; in ADIOI_TESTFS_IwriteStrided() local
55 MPI_Comm_rank(fd->comm, &myrank); in ADIOI_TESTFS_IwriteStrided()
59 myrank, nprocs, fd->filename); in ADIOI_TESTFS_IwriteStrided()
61 myrank, nprocs); in ADIOI_TESTFS_IwriteStrided()
/dports/net/mpich/mpich-3.4.3/src/mpi/romio/adio/ad_testfs/
H A Dad_testfs_write.c14 int myrank, nprocs; in ADIOI_TESTFS_WriteContig() local
20 MPI_Comm_rank(fd->comm, &myrank); in ADIOI_TESTFS_WriteContig()
22 FPRINTF(stdout, "[%d/%d] ADIOI_TESTFS_WriteContig called on %s\n", myrank, in ADIOI_TESTFS_WriteContig()
25 myrank, nprocs, buf, (long long) offset, (long long) datatype_size * (long long) count); in ADIOI_TESTFS_WriteContig()
30 FPRINTF(stdout, "[%d/%d] new file position is %lld\n", myrank, in ADIOI_TESTFS_WriteContig()
45 int myrank, nprocs; in ADIOI_TESTFS_WriteStrided() local
50 MPI_Comm_rank(fd->comm, &myrank); in ADIOI_TESTFS_WriteStrided()
52 myrank, nprocs, fd->filename); in ADIOI_TESTFS_WriteStrided()
53 FPRINTF(stdout, "[%d/%d] calling ADIOI_GEN_WriteStrided\n", myrank, nprocs); in ADIOI_TESTFS_WriteStrided()
H A Dad_testfs_read.c14 int myrank, nprocs; in ADIOI_TESTFS_ReadContig() local
20 MPI_Comm_rank(fd->comm, &myrank); in ADIOI_TESTFS_ReadContig()
22 FPRINTF(stdout, "[%d/%d] ADIOI_TESTFS_ReadContig called on %s\n", myrank, nprocs, fd->filename); in ADIOI_TESTFS_ReadContig()
32 myrank, nprocs, buf, (long long) offset, (long long) datatype_size * count); in ADIOI_TESTFS_ReadContig()
44 int myrank, nprocs; in ADIOI_TESTFS_ReadStrided() local
49 MPI_Comm_rank(fd->comm, &myrank); in ADIOI_TESTFS_ReadStrided()
50 FPRINTF(stdout, "[%d/%d] ADIOI_TESTFS_ReadStrided called on %s\n", myrank, in ADIOI_TESTFS_ReadStrided()
52 FPRINTF(stdout, "[%d/%d] calling ADIOI_GEN_ReadStrided\n", myrank, nprocs); in ADIOI_TESTFS_ReadStrided()
/dports/net/openmpi3/openmpi-3.1.6/ompi/mca/io/romio314/romio/adio/ad_testfs/
H A Dad_testfs_write.c15 int myrank, nprocs; in ADIOI_TESTFS_WriteContig() local
21 MPI_Comm_rank(fd->comm, &myrank); in ADIOI_TESTFS_WriteContig()
23 FPRINTF(stdout, "[%d/%d] ADIOI_TESTFS_WriteContig called on %s\n", myrank, in ADIOI_TESTFS_WriteContig()
26 myrank, nprocs, buf, (long long) offset, in ADIOI_TESTFS_WriteContig()
33 FPRINTF(stdout, "[%d/%d] new file position is %lld\n", myrank, in ADIOI_TESTFS_WriteContig()
50 int myrank, nprocs; in ADIOI_TESTFS_WriteStrided() local
55 MPI_Comm_rank(fd->comm, &myrank); in ADIOI_TESTFS_WriteStrided()
57 myrank, nprocs, fd->filename); in ADIOI_TESTFS_WriteStrided()
59 myrank, nprocs); in ADIOI_TESTFS_WriteStrided()
/dports/net/openmpi/openmpi-4.1.1/ompi/mca/io/romio321/romio/adio/ad_testfs/
H A Dad_testfs_write.c15 int myrank, nprocs; in ADIOI_TESTFS_WriteContig() local
21 MPI_Comm_rank(fd->comm, &myrank); in ADIOI_TESTFS_WriteContig()
23 FPRINTF(stdout, "[%d/%d] ADIOI_TESTFS_WriteContig called on %s\n", myrank, in ADIOI_TESTFS_WriteContig()
26 myrank, nprocs, buf, (long long) offset, in ADIOI_TESTFS_WriteContig()
33 FPRINTF(stdout, "[%d/%d] new file position is %lld\n", myrank, in ADIOI_TESTFS_WriteContig()
50 int myrank, nprocs; in ADIOI_TESTFS_WriteStrided() local
55 MPI_Comm_rank(fd->comm, &myrank); in ADIOI_TESTFS_WriteStrided()
57 myrank, nprocs, fd->filename); in ADIOI_TESTFS_WriteStrided()
59 myrank, nprocs); in ADIOI_TESTFS_WriteStrided()
/dports/net/mpich/mpich-3.4.3/test/basic/
H A Dsendrecvt.c10 int myrank, size, src = 0, dest = 1; in main() local
15 MPI_Comm_rank(MPI_COMM_WORLD, &myrank); in main()
17 if (myrank == src || myrank == dest) { in main()
19 if (myrank == partner) in main()
25 if (myrank == src) { in main()
27 } else if (myrank == dest) { in main()
/dports/net/mpich2/mpich2-1.5/test/basic/
H A Dsendrecvt.c10 int myrank, size, src=0, dest=1; in main() local
15 MPI_Comm_rank( MPI_COMM_WORLD, &myrank ); in main()
17 if (myrank == src || myrank == dest) { in main()
19 if (myrank == partner) partner = dest; in main()
25 if (myrank == src) { in main()
28 else if (myrank == dest) { in main()
/dports/french/med/med-4.0.0/tests/parallel/
H A DgetBlocksOfEntitiesPartition.c27 void getContinuousBlocksOfEntities(const int myrank, const int nproc, const int nentities, in getContinuousBlocksOfEntities() argument
48 if ( myrank < _nusedproc) in getContinuousBlocksOfEntities()
62 *start = myrank*_nblocks_pproc*_blocksize; in getContinuousBlocksOfEntities()
67 if ( myrank == _lastusedrank ) { in getContinuousBlocksOfEntities()
75 myrank,*start,*stride,*blocksize,*count,*lastblocksize); in getContinuousBlocksOfEntities()
79 void getCyclicBlocksOfEntities(const int myrank, const int nproc, const int nentities, in getCyclicBlocksOfEntities() argument
111 getContinuousBlocksOfEntities(myrank, nproc, nentities, in getCyclicBlocksOfEntities()
119 *start = _blocksize*myrank; in getCyclicBlocksOfEntities()
122 if (myrank == _lastusedrank) { in getCyclicBlocksOfEntities()
/dports/science/cantera/cantera-2.5.1-611-gc4d6ecc15/ext/sundials/examples/sunmatrix/
H A Dtest_sunmatrix.h41 #define TEST_STATUS(fmt, myrank) \ argument
42 if (print_all_ranks == 0 && myrank == 0) { \
45 printf("process %06d: ", myrank); \
48 #define TEST_STATUS2(fmt, retval, myrank) \ argument
49 if (print_all_ranks == 0 && myrank == 0) { \
52 printf("process %06d: ", myrank); \
55 #define TEST_STATUS3(fmt, val1, val2, myrank) \ argument
56 if (print_all_ranks == 0 && myrank == 0) { \
59 printf("process %06d: ", myrank); \
/dports/math/sundials/sundials-5.7.0/examples/sunmatrix/
H A Dtest_sunmatrix.h41 #define TEST_STATUS(fmt, myrank) \ argument
42 if (print_all_ranks == 0 && myrank == 0) { \
45 printf("process %06d: ", myrank); \
48 #define TEST_STATUS2(fmt, retval, myrank) \ argument
49 if (print_all_ranks == 0 && myrank == 0) { \
52 printf("process %06d: ", myrank); \
55 #define TEST_STATUS3(fmt, val1, val2, myrank) \ argument
56 if (print_all_ranks == 0 && myrank == 0) { \
59 printf("process %06d: ", myrank); \

12345678910>>...23