ierr_c 72 ompi/mpi/fortran/mpif-h/abort_f.c int ierr_c; ierr_c 75 ompi/mpi/fortran/mpif-h/abort_f.c ierr_c = PMPI_Abort(c_comm, OMPI_FINT_2_INT(*errorcode)); ierr_c 76 ompi/mpi/fortran/mpif-h/abort_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 77 ompi/mpi/fortran/mpif-h/accumulate_f.c int ierr_c; ierr_c 84 ompi/mpi/fortran/mpif-h/accumulate_f.c ierr_c = PMPI_Accumulate(OMPI_F2C_BOTTOM(origin_addr), ierr_c 92 ompi/mpi/fortran/mpif-h/accumulate_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 71 ompi/mpi/fortran/mpif-h/add_error_class_f.c int ierr_c; ierr_c 74 ompi/mpi/fortran/mpif-h/add_error_class_f.c ierr_c = PMPI_Add_error_class(OMPI_SINGLE_NAME_CONVERT(errorclass)); ierr_c 75 ompi/mpi/fortran/mpif-h/add_error_class_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 77 ompi/mpi/fortran/mpif-h/add_error_class_f.c if (MPI_SUCCESS == ierr_c) { ierr_c 71 ompi/mpi/fortran/mpif-h/add_error_code_f.c int ierr_c; ierr_c 74 ompi/mpi/fortran/mpif-h/add_error_code_f.c ierr_c = PMPI_Add_error_code(OMPI_FINT_2_INT(*errorclass), ierr_c 78 ompi/mpi/fortran/mpif-h/add_error_code_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 79 ompi/mpi/fortran/mpif-h/add_error_code_f.c if (MPI_SUCCESS == ierr_c) { ierr_c 76 ompi/mpi/fortran/mpif-h/add_error_string_f.c int ierr_c; ierr_c 79 ompi/mpi/fortran/mpif-h/add_error_string_f.c ierr_c = OMPI_ERRHANDLER_INVOKE(MPI_COMM_WORLD, MPI_ERR_ARG, ierr_c 81 ompi/mpi/fortran/mpif-h/add_error_string_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 86 ompi/mpi/fortran/mpif-h/add_error_string_f.c ierr_c = PMPI_Add_error_string(OMPI_FINT_2_INT(*errorcode), c_string); ierr_c 87 ompi/mpi/fortran/mpif-h/add_error_string_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 71 ompi/mpi/fortran/mpif-h/address_f.c int ierr_c; ierr_c 74 ompi/mpi/fortran/mpif-h/address_f.c ierr_c = PMPI_Address(location, &addr); ierr_c 75 ompi/mpi/fortran/mpif-h/address_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 77 ompi/mpi/fortran/mpif-h/address_f.c if (MPI_SUCCESS == ierr_c) { ierr_c 74 ompi/mpi/fortran/mpif-h/allgather_f.c int ierr_c; ierr_c 86 ompi/mpi/fortran/mpif-h/allgather_f.c ierr_c = PMPI_Allgather(sendbuf, ierr_c 93 ompi/mpi/fortran/mpif-h/allgather_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 76 ompi/mpi/fortran/mpif-h/allgatherv_f.c int size, ierr_c; ierr_c 92 ompi/mpi/fortran/mpif-h/allgatherv_f.c ierr_c = PMPI_Allgatherv(sendbuf, ierr_c 100 ompi/mpi/fortran/mpif-h/allgatherv_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 104 ompi/mpi/fortran/mpif-h/alloc_mem_f.c int ierr_c; ierr_c 107 ompi/mpi/fortran/mpif-h/alloc_mem_f.c ierr_c = PMPI_Alloc_mem(*size, c_info, baseptr); ierr_c 108 ompi/mpi/fortran/mpif-h/alloc_mem_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 74 ompi/mpi/fortran/mpif-h/allreduce_f.c int ierr_c; ierr_c 87 ompi/mpi/fortran/mpif-h/allreduce_f.c ierr_c = PMPI_Allreduce(sendbuf, recvbuf, ierr_c 90 ompi/mpi/fortran/mpif-h/allreduce_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 71 ompi/mpi/fortran/mpif-h/barrier_f.c int ierr_c; ierr_c 76 ompi/mpi/fortran/mpif-h/barrier_f.c ierr_c = PMPI_Barrier(c_comm); ierr_c 77 ompi/mpi/fortran/mpif-h/barrier_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 82 ompi/mpi/fortran/mpif-h/get_processor_name_f.c int ierr_c, ret; ierr_c 86 ompi/mpi/fortran/mpif-h/get_processor_name_f.c ierr_c = PMPI_Get_processor_name(c_name, ierr_c 89 ompi/mpi/fortran/mpif-h/get_processor_name_f.c if (MPI_SUCCESS == ierr_c) { ierr_c 96 ompi/mpi/fortran/mpif-h/get_processor_name_f.c ierr_c = OMPI_ERRHANDLER_INVOKE(MPI_COMM_WORLD, ret, FUNC_NAME); ierr_c 100 ompi/mpi/fortran/mpif-h/get_processor_name_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 74 ompi/mpi/fortran/mpif-h/iallgather_f.c int ierr_c; ierr_c 87 ompi/mpi/fortran/mpif-h/iallgather_f.c ierr_c = PMPI_Iallgather(sendbuf, ierr_c 94 ompi/mpi/fortran/mpif-h/iallgather_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 96 ompi/mpi/fortran/mpif-h/iallgather_f.c if (MPI_SUCCESS == ierr_c) *request = PMPI_Request_c2f(c_req); ierr_c 78 ompi/mpi/fortran/mpif-h/iallgatherv_f.c int size, ierr_c; ierr_c 94 ompi/mpi/fortran/mpif-h/iallgatherv_f.c ierr_c = PMPI_Iallgatherv(sendbuf, ierr_c 102 ompi/mpi/fortran/mpif-h/iallgatherv_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 103 ompi/mpi/fortran/mpif-h/iallgatherv_f.c if (MPI_SUCCESS == ierr_c) *request = PMPI_Request_c2f(c_request); ierr_c 74 ompi/mpi/fortran/mpif-h/iallreduce_f.c int ierr_c; ierr_c 88 ompi/mpi/fortran/mpif-h/iallreduce_f.c ierr_c = PMPI_Iallreduce(sendbuf, recvbuf, ierr_c 91 ompi/mpi/fortran/mpif-h/iallreduce_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 92 ompi/mpi/fortran/mpif-h/iallreduce_f.c if (MPI_SUCCESS == ierr_c) *request = PMPI_Request_c2f(c_request); ierr_c 71 ompi/mpi/fortran/mpif-h/ibarrier_f.c int ierr_c; ierr_c 77 ompi/mpi/fortran/mpif-h/ibarrier_f.c ierr_c = PMPI_Ibarrier(c_comm, &c_req); ierr_c 78 ompi/mpi/fortran/mpif-h/ibarrier_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 80 ompi/mpi/fortran/mpif-h/ibarrier_f.c if (MPI_SUCCESS == ierr_c) *request = PMPI_Request_c2f(c_req); ierr_c 77 ompi/mpi/fortran/mpif-h/ineighbor_allgather_f.c int ierr_c; ierr_c 90 ompi/mpi/fortran/mpif-h/ineighbor_allgather_f.c ierr_c = PMPI_Ineighbor_allgather(sendbuf, ierr_c 97 ompi/mpi/fortran/mpif-h/ineighbor_allgather_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 99 ompi/mpi/fortran/mpif-h/ineighbor_allgather_f.c if (MPI_SUCCESS == ierr_c) *request = PMPI_Request_c2f(c_req); ierr_c 81 ompi/mpi/fortran/mpif-h/ineighbor_allgatherv_f.c int size, ierr_c; ierr_c 97 ompi/mpi/fortran/mpif-h/ineighbor_allgatherv_f.c ierr_c = PMPI_Ineighbor_allgatherv(sendbuf, ierr_c 105 ompi/mpi/fortran/mpif-h/ineighbor_allgatherv_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 106 ompi/mpi/fortran/mpif-h/ineighbor_allgatherv_f.c if (MPI_SUCCESS == ierr_c) *request = PMPI_Request_c2f(c_request); ierr_c 77 ompi/mpi/fortran/mpif-h/neighbor_allgather_f.c int ierr_c; ierr_c 89 ompi/mpi/fortran/mpif-h/neighbor_allgather_f.c ierr_c = PMPI_Neighbor_allgather(sendbuf, ierr_c 96 ompi/mpi/fortran/mpif-h/neighbor_allgather_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 79 ompi/mpi/fortran/mpif-h/neighbor_allgatherv_f.c int size, ierr_c; ierr_c 95 ompi/mpi/fortran/mpif-h/neighbor_allgatherv_f.c ierr_c = PMPI_Neighbor_allgatherv(sendbuf, ierr_c 103 ompi/mpi/fortran/mpif-h/neighbor_allgatherv_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 80 ompi/mpi/fortran/mpif-h/raccumulate_f.c int ierr_c; ierr_c 88 ompi/mpi/fortran/mpif-h/raccumulate_f.c ierr_c = PMPI_Raccumulate(OMPI_F2C_BOTTOM(origin_addr), ierr_c 97 ompi/mpi/fortran/mpif-h/raccumulate_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 99 ompi/mpi/fortran/mpif-h/raccumulate_f.c if (MPI_SUCCESS == ierr_c) { ierr_c 75 ompi/mpiext/pcollreq/mpif-h/allgather_init_f.c int ierr_c; ierr_c 90 ompi/mpiext/pcollreq/mpif-h/allgather_init_f.c ierr_c = PMPIX_Allgather_init(sendbuf, ierr_c 97 ompi/mpiext/pcollreq/mpif-h/allgather_init_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 99 ompi/mpiext/pcollreq/mpif-h/allgather_init_f.c if (MPI_SUCCESS == ierr_c) *request = PMPI_Request_c2f(c_req); ierr_c 80 ompi/mpiext/pcollreq/mpif-h/allgatherv_init_f.c int size, ierr_c; ierr_c 97 ompi/mpiext/pcollreq/mpif-h/allgatherv_init_f.c ierr_c = PMPIX_Allgatherv_init(sendbuf, ierr_c 105 ompi/mpiext/pcollreq/mpif-h/allgatherv_init_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 106 ompi/mpiext/pcollreq/mpif-h/allgatherv_init_f.c if (MPI_SUCCESS == ierr_c) *request = PMPI_Request_c2f(c_request); ierr_c 75 ompi/mpiext/pcollreq/mpif-h/allreduce_init_f.c int ierr_c; ierr_c 91 ompi/mpiext/pcollreq/mpif-h/allreduce_init_f.c ierr_c = PMPIX_Allreduce_init(sendbuf, recvbuf, ierr_c 94 ompi/mpiext/pcollreq/mpif-h/allreduce_init_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 95 ompi/mpiext/pcollreq/mpif-h/allreduce_init_f.c if (MPI_SUCCESS == ierr_c) *request = PMPI_Request_c2f(c_request); ierr_c 72 ompi/mpiext/pcollreq/mpif-h/barrier_init_f.c int ierr_c; ierr_c 80 ompi/mpiext/pcollreq/mpif-h/barrier_init_f.c ierr_c = PMPIX_Barrier_init(c_comm, c_info, &c_req); ierr_c 81 ompi/mpiext/pcollreq/mpif-h/barrier_init_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 83 ompi/mpiext/pcollreq/mpif-h/barrier_init_f.c if (MPI_SUCCESS == ierr_c) *request = PMPI_Request_c2f(c_req); ierr_c 78 ompi/mpiext/pcollreq/mpif-h/neighbor_allgather_init_f.c int ierr_c; ierr_c 93 ompi/mpiext/pcollreq/mpif-h/neighbor_allgather_init_f.c ierr_c = PMPIX_Neighbor_allgather_init(sendbuf, ierr_c 100 ompi/mpiext/pcollreq/mpif-h/neighbor_allgather_init_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 102 ompi/mpiext/pcollreq/mpif-h/neighbor_allgather_init_f.c if (MPI_SUCCESS == ierr_c) *request = PMPI_Request_c2f(c_req); ierr_c 83 ompi/mpiext/pcollreq/mpif-h/neighbor_allgatherv_init_f.c int size, ierr_c; ierr_c 100 ompi/mpiext/pcollreq/mpif-h/neighbor_allgatherv_init_f.c ierr_c = PMPIX_Neighbor_allgatherv_init(sendbuf, ierr_c 108 ompi/mpiext/pcollreq/mpif-h/neighbor_allgatherv_init_f.c if (NULL != ierr) *ierr = OMPI_INT_2_FINT(ierr_c); ierr_c 109 ompi/mpiext/pcollreq/mpif-h/neighbor_allgatherv_init_f.c if (MPI_SUCCESS == ierr_c) *request = PMPI_Request_c2f(c_request);