Changeset 15838 for issm/trunk-jpl/src/c/analyses/EnvironmentInit.cpp

Timestamp:

08/19/13 15:15:59 (12 years ago)

Author:

Eric.Larour

Message:

CHG: initial conversion from mpi to issmmpi layer. Starting validation of the new code changes

File:

• issm/trunk-jpl/src/c/analyses/EnvironmentInit.cpp (modified) (2 diffs)

issm/trunk-jpl/src/c/analyses/EnvironmentInit.cpp ¶

@@ -17 +17 @@
         /*Initialize MPI environment: */
         #if defined(_HAVE_MPI_)
-        MPI_Init(&argc,&argv);
-        comm = MPI_COMM_WORLD;
+        ISSM_MPI_Init(&argc,&argv);
+        comm = ISSM_MPI_COMM_WORLD;
         #else
         comm = 1; //bogus number for comm, which does not exist anyway.
@@ -25 +25 @@
         /*Print Banner*/
         int my_rank = 0;
-        #ifdef _HAVE_MPI_
-        MPI_Comm_rank(comm,&my_rank);
-        #endif
+        ISSM_MPI_Comm_rank(comm,&my_rank);
         if(!my_rank) printf("\n");
         if(!my_rank) printf("Ice Sheet System Model (%s) version  %s\n",PACKAGE_NAME,PACKAGE_VERSION);