source:
trunk/WRF.COMMON/WRFV3/tools/mpi2_thread_test.c
@
3151
| Last change on this file since 3151 was 2759, checked in by , 3 years ago | |
|---|---|
| File size: 189 bytes | |
| Rev | Line | |
|---|---|---|
| [2759] | 1 | #include <stdio.h> |
| 2 | #include <mpi.h> | |
| 3 | main( int argc, char ** argv ) | |
| 4 | { | |
| 5 | int y, retval ; | |
| 6 | MPI_Comm x ; | |
| 7 | y = 1 ; | |
| 8 | ||
| 9 | MPI_Init_thread( &argc, &argv, MPI_THREAD_FUNNELED, &retval ) ; | |
| 10 | } | |
| 11 | ||
| 12 |
Note: See TracBrowser
for help on using the repository browser.
