/dports/science/pnetcdf/parallel-netcdf-1.8.1/test/fandc/ |
H A D | pnf_test.f | 106 & comm_cart, ierr) 149 call MPI_Barrier (comm_cart, ierr) 221 call MPI_Comm_Free (comm_cart, ierr) 251 integer comm_cart 307 call MPI_Barrier (comm_cart, ierr) 356 call MPI_Barrier (comm_cart, ierr) 396 integer comm_cart 452 call MPI_Barrier (comm_cart, ierr) 482 call MPI_Barrier (comm_cart, ierr) 621 & (mype, comm_cart, locsiz, tt, buf) [all …]
|
H A D | csnap.c | 59 MPI_Comm comm_cart; /* Cartesian communicator */ variable 110 MPI_Comm_rank(comm_cart,&mype); in main() 111 MPI_Cart_coords(comm_cart,mype,3,pe_coords); in main() 146 MPI_Barrier(comm_cart); in main() 169 MPI_Allreduce(rates_l, rates_g, 4, MPI_DOUBLE, MPI_MIN, comm_cart); in main() 170 MPI_Allreduce(t, t_g, 20, MPI_DOUBLE, MPI_MAX, comm_cart); in main() 183 MPI_Comm_free(&comm_cart); in main() 243 MPI_Barrier(comm_cart); in write_file() 282 MPI_Barrier(comm_cart); in write_file() 340 MPI_Barrier(comm_cart); in read_file() [all …]
|
H A D | pnctestf.f | 20 integer comm_cart variable 45 + reorder, comm_cart, ierr) 47 ierr = nfmpi_create(comm_cart, "pnf_test.nc", NF_CLOBBER, 64 call MPI_Comm_Free(comm_cart, ierr)
|
H A D | pnctest.c | 25 MPI_Comm comm_cart; in main() local 32 MPI_Cart_create (MPI_COMM_WORLD, 3, numpes, isperiodic, reorder, &comm_cart); in main() 34 err = ncmpi_create (comm_cart, "testfile.nc", NC_CLOBBER, MPI_INFO_NULL, in main() 51 MPI_Comm_free (&comm_cart); in main()
|
/dports/science/pnetcdf/parallel-netcdf-1.8.1/test/nonblocking/ |
H A D | mcoll_testf77.f | 151 call MPI_Barrier (comm_cart, ierr) 189 + comm_cart, ierr) 191 + comm_cart, ierr) 205 call MPI_Comm_Free (comm_cart, ierr) 234 integer comm_cart 287 call MPI_Barrier (comm_cart, ierr) 349 call MPI_Barrier (comm_cart, ierr) 468 integer comm_cart local 509 + comm_cart, ierr) 511 + comm_cart, ierr) [all …]
|
H A D | mcoll_testf.f90 | 129 call MPI_Barrier (comm_cart, ierr) 166 comm_cart, ierr) 168 comm_cart, ierr) 181 call MPI_Comm_Free (comm_cart, ierr) 209 integer comm_cart local 257 call MPI_Barrier (comm_cart, ierr) 313 call MPI_Barrier (comm_cart, ierr) 417 integer comm_cart local 452 comm_cart, ierr) 454 comm_cart, ierr) [all …]
|
/dports/science/gromacs/gromacs-2021.4/src/external/thread_mpi/src/ |
H A D | topology.cpp | 265 if (*comm_cart) in tMPI_Cart_init() 267 tMPI_Comm_rank(*comm_cart, &newrank); in tMPI_Cart_init() 276 (*comm_cart)->cart->ndims = ndims; in tMPI_Cart_init() 279 (*comm_cart)->cart->dims[i] = dims[i]; in tMPI_Cart_init() 280 (*comm_cart)->cart->periods[i] = periods[i]; in tMPI_Cart_init() 286 if (*comm_cart) in tMPI_Cart_init() 288 tMPI_Barrier_wait( &( (*comm_cart)->barrier) ); in tMPI_Cart_init() 302 int reorder, tMPI_Comm *comm_cart) in tMPI_Cart_create() argument 327 *comm_cart = TMPI_COMM_NULL; in tMPI_Cart_create() 348 tMPI_Comm_split(comm_old, color, key, comm_cart); in tMPI_Cart_create() [all …]
|
/dports/net/mpich/mpich-3.4.3/src/mpi/topo/ |
H A D | cart_create.c | 17 int reorder, MPI_Comm * comm_cart) 34 const int periods[], int reorder, MPI_Comm * comm_cart) in MPIR_Cart_create() argument 42 *comm_cart = MPI_COMM_NULL; in MPIR_Cart_create() 85 *comm_cart = MPI_COMM_NULL; in MPIR_Cart_create() 117 *comm_cart = MPI_COMM_NULL; in MPIR_Cart_create() 150 MPIR_OBJ_PUBLISH_HANDLE(*comm_cart, newcomm_ptr->handle); in MPIR_Cart_create() 163 const int periods[], int reorder, MPI_Comm * comm_cart) in MPIR_Cart_create_impl() argument 219 const int periods[], int reorder, MPI_Comm * comm_cart) in MPI_Cart_create() argument 262 MPIR_ERRTEST_ARGNULL(comm_cart, "comm_cart", mpi_errno); in MPI_Cart_create() 283 (const int *) periods, reorder, comm_cart); in MPI_Cart_create() [all …]
|
/dports/net/mpich2/mpich2-1.5/src/mpi/topo/ |
H A D | cart_create.c | 37 const int periods[], int reorder, MPI_Comm *comm_cart ) in MPIR_Cart_create() argument 45 *comm_cart = MPI_COMM_NULL; in MPIR_Cart_create() 89 *comm_cart = MPI_COMM_NULL; in MPIR_Cart_create() 122 *comm_cart = MPI_COMM_NULL; in MPIR_Cart_create() 156 MPIU_OBJ_PUBLISH_HANDLE(*comm_cart, newcomm_ptr->handle); in MPIR_Cart_create() 173 const int periods[], int reorder, MPI_Comm *comm_cart) in MPIR_Cart_create_impl() argument 183 comm_cart ); in MPIR_Cart_create_impl() 190 comm_cart ); in MPIR_Cart_create_impl() 279 MPIR_ERRTEST_ARGNULL( comm_cart, "comm_cart", mpi_errno ); in MPI_Cart_create() 301 comm_cart ); in MPI_Cart_create() [all …]
|
/dports/net/openmpi3/openmpi-3.1.6/ompi/mpi/fortran/mpif-h/ |
H A D | cart_create_f.c | 41 …_fortran_logical_t *periods, ompi_fortran_logical_t *reorder, MPI_Fint *comm_cart, MPI_Fint *ierr), 42 (old_comm, ndims, dims, periods, reorder, comm_cart, ierr) ) 61 …_fortran_logical_t *periods, ompi_fortran_logical_t *reorder, MPI_Fint *comm_cart, MPI_Fint *ierr), 62 (old_comm, ndims, dims, periods, reorder, comm_cart, ierr) ) 71 MPI_Fint *comm_cart, MPI_Fint *ierr) in ompi_cart_create_f() argument 92 *comm_cart = PMPI_Comm_c2f(c_comm2); in ompi_cart_create_f()
|
/dports/net/openmpi/openmpi-4.1.1/ompi/mpi/fortran/mpif-h/ |
H A D | cart_create_f.c | 42 …_fortran_logical_t *periods, ompi_fortran_logical_t *reorder, MPI_Fint *comm_cart, MPI_Fint *ierr), 43 (old_comm, ndims, dims, periods, reorder, comm_cart, ierr) ) 62 …_fortran_logical_t *periods, ompi_fortran_logical_t *reorder, MPI_Fint *comm_cart, MPI_Fint *ierr), 63 (old_comm, ndims, dims, periods, reorder, comm_cart, ierr) ) 72 MPI_Fint *comm_cart, MPI_Fint *ierr) in ompi_cart_create_f() argument 93 *comm_cart = PMPI_Comm_c2f(c_comm2); in ompi_cart_create_f()
|
/dports/net/mpich/mpich-3.4.3/src/binding/fortran/use_mpi_f08/wrappers_f/profiling/ |
H A D | pcart_create_f08ts.f90 | 19 type(MPI_Comm), intent(out) :: comm_cart local 34 …rror_c = MPIR_Cart_create_c(comm_old%MPI_VAL, ndims, dims, periods_c, reorder_c, comm_cart%MPI_VAL) 40 comm_cart%MPI_VAL = comm_cart_c
|
/dports/net/mpich/mpich-3.4.3/src/binding/fortran/use_mpi_f08/wrappers_f/ |
H A D | cart_create_f08ts.f90 | 19 type(MPI_Comm), intent(out) :: comm_cart local 34 …rror_c = MPIR_Cart_create_c(comm_old%MPI_VAL, ndims, dims, periods_c, reorder_c, comm_cart%MPI_VAL) 40 comm_cart%MPI_VAL = comm_cart_c
|
/dports/net/openmpi3/openmpi-3.1.6/ompi/mpi/c/ |
H A D | cart_create.c | 46 const int periods[], int reorder, MPI_Comm *comm_cart) in MPI_Cart_create() argument 69 (NULL == dims || NULL == periods || NULL == comm_cart)) { in MPI_Cart_create() 106 (0 == reorder) ? false : true, comm_cart); in MPI_Cart_create()
|
/dports/net/openmpi/openmpi-4.1.1/ompi/mpi/c/ |
H A D | cart_create.c | 46 const int periods[], int reorder, MPI_Comm *comm_cart) in MPI_Cart_create() argument 69 (NULL == dims || NULL == periods || NULL == comm_cart)) { in MPI_Cart_create() 106 (0 == reorder) ? false : true, comm_cart); in MPI_Cart_create()
|
/dports/net/mpich2/mpich2-1.5/src/mpe2/src/collchk/src/ |
H A D | cart_create.c | 8 int reorder, MPI_Comm *comm_cart) in MPI_Cart_create() argument 26 comm_cart); in MPI_Cart_create()
|
/dports/net/openmpi3/openmpi-3.1.6/ompi/mpi/fortran/use-mpi-f08/profile/ |
H A D | pcart_create_f08.F90 | 18 TYPE(MPI_Comm), INTENT(OUT) :: comm_cart local 23 reorder,comm_cart%MPI_VAL,c_ierror)
|
/dports/net/openmpi3/openmpi-3.1.6/ompi/mpi/fortran/use-mpi-f08/ |
H A D | cart_create_f08.F90 | 18 TYPE(MPI_Comm), INTENT(OUT) :: comm_cart local 23 reorder,comm_cart%MPI_VAL,c_ierror)
|
/dports/net/openmpi/openmpi-4.1.1/ompi/mpi/fortran/use-mpi-f08/profile/ |
H A D | pcart_create_f08.F90 | 18 TYPE(MPI_Comm), INTENT(OUT) :: comm_cart local 23 reorder,comm_cart%MPI_VAL,c_ierror)
|
/dports/net/openmpi/openmpi-4.1.1/ompi/mpi/fortran/use-mpi-f08/ |
H A D | cart_create_f08.F90 | 18 TYPE(MPI_Comm), INTENT(OUT) :: comm_cart local 23 reorder,comm_cart%MPI_VAL,c_ierror)
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
H A D | replica_methods.F | 104 INTEGER :: comm_cart, comm_f, comm_inter_rep, forcedim, i, i0, ierr, ip, ir, irep, lp, & local 132 CALL mp_cart_create(comm_old=para_env%group, ndims=2, dims=dims, pos=pos, comm_cart=comm_cart) 133 IF (comm_cart /= mp_comm_null) THEN 134 CALL cp_cart_create(cart, comm_cart, ndims=2, owns_group=.TRUE.) 136 CALL cp_para_env_create(para_env_full, comm_cart, owns_group=.FALSE.) 139 CALL mp_cart_sub(comm=comm_cart, rdim=rdim, sub_comm=comm_f) 143 CALL mp_cart_sub(comm=comm_cart, rdim=rdim, sub_comm=comm_inter_rep)
|
H A D | kpoint_methods.F | 275 INTEGER :: comm_cart, comm_inter_kp, comm_kp, & local 355 comm_cart=comm_cart) 357 CALL cp_cart_create(cart, comm_cart, ndims=2, owns_group=.TRUE.) 358 CALL cp_para_env_create(para_env_full, comm_cart, owns_group=.FALSE.) 361 CALL mp_cart_sub(comm=comm_cart, rdim=rdim, sub_comm=comm_kp) 365 CALL mp_cart_sub(comm=comm_cart, rdim=rdim, sub_comm=comm_inter_kp)
|
/dports/science/cp2k-data/cp2k-7.1.0/src/ |
H A D | replica_methods.F | 104 INTEGER :: comm_cart, comm_f, comm_inter_rep, forcedim, i, i0, ierr, ip, ir, irep, lp, & local 132 CALL mp_cart_create(comm_old=para_env%group, ndims=2, dims=dims, pos=pos, comm_cart=comm_cart) 133 IF (comm_cart /= mp_comm_null) THEN 134 CALL cp_cart_create(cart, comm_cart, ndims=2, owns_group=.TRUE.) 136 CALL cp_para_env_create(para_env_full, comm_cart, owns_group=.FALSE.) 139 CALL mp_cart_sub(comm=comm_cart, rdim=rdim, sub_comm=comm_f) 143 CALL mp_cart_sub(comm=comm_cart, rdim=rdim, sub_comm=comm_inter_rep)
|
H A D | kpoint_methods.F | 275 INTEGER :: comm_cart, comm_inter_kp, comm_kp, & local 355 comm_cart=comm_cart) 357 CALL cp_cart_create(cart, comm_cart, ndims=2, owns_group=.TRUE.) 358 CALL cp_para_env_create(para_env_full, comm_cart, owns_group=.FALSE.) 361 CALL mp_cart_sub(comm=comm_cart, rdim=rdim, sub_comm=comm_kp) 365 CALL mp_cart_sub(comm=comm_cart, rdim=rdim, sub_comm=comm_inter_kp)
|
/dports/net/mpich/mpich-3.4.3/src/include/ |
H A D | mpir_topo.h | 87 const int periods[], int reorder, MPI_Comm * comm_cart);
|