Changeset 22490

Timestamp:

03/01/18 15:26:17 (7 years ago)

Author:

seroussi

Message:

CHG: removing test to exchange information

File:

• issm/trunk-jpl/src/c/main/issm_ocean.cpp (modified) (1 diff)

issm/trunk-jpl/src/c/main/issm_ocean.cpp

@@ -42 +42 @@
         ISSM_MPI_Intercomm_create( modelcomm, 0, worldcomm, my_local_size, 0, &tomitgcmcomm); 
 
-        /*send an integer:*/
-        int dummy1,dummy2;
-        dummy1=3; dummy2=0;
-        if(my_local_rank==0){
-                MPI_Send(&dummy1,1,MPI_INT,0,1,tomitgcmcomm);
-                MPI_Recv(&dummy2,1,MPI_INT,0,1,tomitgcmcomm,&status);
-        }
-        MPI_Bcast(&dummy2,1,MPI_INT,0,modelcomm);
-        printf("Ice: dummy received: %i\n",dummy2);
+//      /*send an integer:*/
+//      int dummy1,dummy2;
+//      dummy1=3; dummy2=0;
+//      if(my_local_rank==0){
+//              MPI_Send(&dummy1,1,MPI_INT,0,1,tomitgcmcomm);
+//              MPI_Recv(&dummy2,1,MPI_INT,0,1,tomitgcmcomm,&status);
+//      }
+//      MPI_Bcast(&dummy2,1,MPI_INT,0,modelcomm);
+//      printf("Ice: dummy received: %i\n",dummy2);
 
         /*Initialize femmodel from arguments provided command line: */