Changeset 22541

Timestamp:

03/15/18 06:59:43 (7 years ago)

Author:

seroussi

Message:

CHG: fixing AD

File:

• issm/trunk-jpl/src/c/cores/transient_core.cpp (modified) (2 diffs)

issm/trunk-jpl/src/c/cores/transient_core.cpp

@@ -92 +92 @@
                 if(my_rank==0){
                         printf("starting ocean coupling rank 0 \n");
-                        printf("coupling time: %g \n",coupling_time);
+                        printf("coupling time: "<< coupling_time <<"\n");
                         ISSM_MPI_Send(&coupling_time,1,ISSM_MPI_DOUBLE,0,10001000,tomitgcmcomm);
                         ISSM_MPI_Send(&time,1,ISSM_MPI_DOUBLE,0,10001001,tomitgcmcomm);
@@ -98 +98 @@
                         ISSM_MPI_Recv(&oceannxsize,1,ISSM_MPI_INT,0,10001003,tomitgcmcomm,&status);
                         ISSM_MPI_Recv(&oceannysize,1,ISSM_MPI_INT,0,10001004,tomitgcmcomm,&status);
-                        printf("ocean time: %g \n",oceantime);
+                        printf("ocean time: "<< oceantime<<"\n");
                         printf("nx size: %i \n",oceannxsize);
                         printf("ny size: %i \n",oceannysize);