Changeset 27815

Timestamp:

06/30/23 15:25:38 (21 months ago)

Author:

seroussi

Message:

FIX: change time in steps but not init

File:

• issm/trunk-jpl/src/c/modules/OceanExchangeDatax/OceanExchangeDatax.cpp (modified) (2 diffs)

issm/trunk-jpl/src/c/modules/OceanExchangeDatax/OceanExchangeDatax.cpp

@@ -64 +64 @@
                         ISSM_MPI_Recv(oceangridx,ngrids_ocean,ISSM_MPI_DOUBLE,0,10001005,tomitgcmcomm,&status);
                         ISSM_MPI_Recv(oceangridy,ngrids_ocean,ISSM_MPI_DOUBLE,0,10001006,tomitgcmcomm,&status);
-
-                        /*Exchange varying parameters for the initialization*/
-                        ISSM_MPI_Send(&time,1,ISSM_MPI_DOUBLE,0,10001001,tomitgcmcomm);
-                        ISSM_MPI_Recv(&oceantime,1,ISSM_MPI_DOUBLE,0,10001002,tomitgcmcomm,&status);
                 }
                 
@@ -77 +73 @@
         }
         else{
+                /*Exchange varying parameters for the initialization*/
+                ISSM_MPI_Send(&time,1,ISSM_MPI_DOUBLE,0,10001001,tomitgcmcomm);
+                ISSM_MPI_Recv(&oceantime,1,ISSM_MPI_DOUBLE,0,10001002,tomitgcmcomm,&status);
+
                 femmodel->parameters->FindParam(&oceangridx,&ngrids_ocean,OceanGridXEnum);
                 femmodel->parameters->FindParam(&oceangridy,&ngrids_ocean,OceanGridYEnum);