c_intercomm        72 ompi/mpi/fortran/mpif-h/comm_join_f.c     MPI_Comm c_intercomm;
c_intercomm        74 ompi/mpi/fortran/mpif-h/comm_join_f.c     c_ierr = PMPI_Comm_join(OMPI_FINT_2_INT(*fd), &c_intercomm);
c_intercomm        78 ompi/mpi/fortran/mpif-h/comm_join_f.c         *intercomm = PMPI_Comm_c2f(c_intercomm);
c_intercomm        74 ompi/mpi/fortran/mpif-h/intercomm_merge_f.c     MPI_Comm c_intercomm = PMPI_Comm_f2c(*intercomm);
c_intercomm        76 ompi/mpi/fortran/mpif-h/intercomm_merge_f.c     c_ierr = PMPI_Intercomm_merge(c_intercomm, OMPI_LOGICAL_2_INT(*high),