source: trunk/MESOSCALE/LMD_MM_MARS/SRC/WRFV2/tools/mpi2_test.c @ 2754

Last change on this file since 2754 was 11, checked in by aslmd, 14 years ago

spiga@svn-planeto:ajoute le modele meso-echelle martien

File size: 185 bytes
Line 
1#include <stdio.h>
2#include <mpi.h>
3main()
4{
5   int y ;
6   MPI_Comm x ;
7   y = 1 ;
8#if 1
9   x = MPI_Comm_f2c( y ) ;
10   y = MPI_Comm_c2f( x ) ;
11#endif
12   fprintf(stderr,"y %d \n",y) ;
13}
Note: See TracBrowser for help on using the repository browser.