mirror of
https://github.com/PhasicFlow/phasicFlow.git
synced 2025-08-07 03:37:02 +00:00
25 lines
1.0 KiB
C
25 lines
1.0 KiB
C
|
/*****************************************************************************
|
||
|
|
* CVS File Information :
|
||
|
|
* $RCSfile$
|
||
|
|
* Author: patmiller $
|
||
|
|
* Date: 2007/06/11 14:12:53 $
|
||
|
|
* Revision: 1.2 $
|
||
|
|
****************************************************************************/
|
||
|
|
/****************************************************************************/
|
||
|
|
/* FILE *********************** PMPI_Send_init.c ************************/
|
||
|
|
/****************************************************************************/
|
||
|
|
/* Author : Lisa Alano July 23 2002 */
|
||
|
|
/* Copyright (c) 2002 University of California Regents */
|
||
|
|
/****************************************************************************/
|
||
|
|
|
||
|
|
#include "mpi.h"
|
||
|
|
|
||
|
|
/* STUB */
|
||
|
|
int PMPI_Send_init( void *buf, int count, MPI_Datatype datatype, int dest,
|
||
|
|
int tag, MPI_Comm comm, MPI_Request *request )
|
||
|
|
{
|
||
|
|
fprintf(stderr,"%s:%d: NOT IMPLEMENTED\n",__FILE__,__LINE__);
|
||
|
|
return MPI_Abort((MPI_Comm)0, MPI_UNDEFINED);
|
||
|
|
}
|
||
|
|
|