source: CPL/oasis3-mct/branches/OASIS3-MCT_5.0_branch/lib/mct/mpi-serial/ic_merge.c @ 6331

Last change on this file since 6331 was 6331, checked in by aclsce, 17 months ago

Moved oasis-mct_5.0 in oasis3-mct/branches directory.

File size: 443 bytes
Line 
1
2#include "mpiP.h"
3
4/*
5 * MPI_Intercomm_merge - Creates an intracommunicator from an intercommunicator
6 * This is just a stub for now to support mpi function calls even in Serial
7 * applications. In the case of a serial program, this function is a no-op and
8 * only ever returns MPI_SUCCESS
9 */
10
11int MPI_Intercomm_merge( MPI_Comm intercomm, int high, MPI_Comm *newintracomm )
12{
13  newintracomm = (MPI_Comm *)intercomm;
14  return(MPI_SUCCESS);
15}
Note: See TracBrowser for help on using the repository browser.