Ignore:
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:
1 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk-jpl/src/c/analyses/EnvironmentInit.cpp

    r14917 r15838  
    1717        /*Initialize MPI environment: */
    1818        #if defined(_HAVE_MPI_)
    19         MPI_Init(&argc,&argv);
    20         comm = MPI_COMM_WORLD;
     19        ISSM_MPI_Init(&argc,&argv);
     20        comm = ISSM_MPI_COMM_WORLD;
    2121        #else
    2222        comm = 1; //bogus number for comm, which does not exist anyway.
     
    2525        /*Print Banner*/
    2626        int my_rank = 0;
    27         #ifdef _HAVE_MPI_
    28         MPI_Comm_rank(comm,&my_rank);
    29         #endif
     27        ISSM_MPI_Comm_rank(comm,&my_rank);
    3028        if(!my_rank) printf("\n");
    3129        if(!my_rank) printf("Ice Sheet System Model (%s) version  %s\n",PACKAGE_NAME,PACKAGE_VERSION);
Note: See TracChangeset for help on using the changeset viewer.