Ice Sheet System Model
4.18
Code documentation
src
c
main
EnvironmentFinalize.cpp
Go to the documentation of this file.
1
4
#ifdef HAVE_CONFIG_H
5
#include <config.h>
6
#else
7
#error "Cannot compile with HAVE_CONFIG_H symbol! run configure first!"
8
#endif
9
#include "../toolkits/toolkits.h"
10
#include "../shared/shared.h"
11
12
void
EnvironmentFinalize
(
void
){
13
14
int
my_rank;
15
16
/*Make sure we are all here*/
17
ISSM_MPI_Barrier
(
ISSM_MPI_COMM_WORLD
);
18
19
/*Print closing statement*/
20
ISSM_MPI_Comm_rank
(
ISSM_MPI_COMM_WORLD
,&my_rank);
21
22
/*Finalize: */
23
//if(!my_rank) printf("closing MPI\n");
24
ISSM_MPI_Finalize
();
25
}
ISSM_MPI_COMM_WORLD
#define ISSM_MPI_COMM_WORLD
Definition:
issmmpi.h:137
ISSM_MPI_Comm_rank
int ISSM_MPI_Comm_rank(ISSM_MPI_Comm comm, int *rank)
Definition:
issmmpi.cpp:198
ISSM_MPI_Finalize
int ISSM_MPI_Finalize(void)
Definition:
issmmpi.cpp:220
EnvironmentFinalize
void EnvironmentFinalize(void)
Definition:
EnvironmentFinalize.cpp:12
ISSM_MPI_Barrier
int ISSM_MPI_Barrier(ISSM_MPI_Comm comm)
Definition:
issmmpi.cpp:148
Generated on Thu Jul 2 2020 08:09:19 for Ice Sheet System Model by
1.8.19