source: CIVL/examples/mpi/routines/mpiSysStatus.c@ 890ec0f

1.23 2.0 acw/focus-triggers main test-branch
Last change on this file since 890ec0f was ff51d87, checked in by Ziqing Luo <ziqing@…>, 11 years ago

git-svn-id: svn://vsl.cis.udel.edu/civl/trunk@2476 fb995dde-84ed-4084-dfe6-e5aef3e2452c

  • Property mode set to 100644
File size: 399 bytes
Line 
1#ifdef _CIVL
2#include <civlc.cvh>
3#endif
4#include <mpi.h>
5#include <civl-mpi.cvh>
6#include <assert.h>
7
8#ifdef _CIVL
9$input int _NPROCS_LOWER_BOUND = 1;
10$input int _NPROCS_UPPER_BOUND = 6;
11#endif
12
13int main(int argc, char * argv[]) {
14 $mpi_sys_status curr_status;
15
16 MPI_Init(&argc, &argv);
17#ifdef _CIVL
18 curr_status = $mpi_get_status();
19 $assert(__INIT == curr_status);
20#endif
21 MPI_Finalize();
22}
Note: See TracBrowser for help on using the repository browser.