Changeset 7079 for branches/2016/dev_r7012_ROBUST5_CMCC/NEMOGCM/NEMO/OPA_SRC/C1D/step_c1d.F90

Timestamp:

2016-10-24T18:30:30+02:00 (8 years ago)

Author:

lovato

Message:

#1788 - trunk: Solve compilation bug of C1D when including TOP component

File:

• branches/2016/dev_r7012_ROBUST5_CMCC/NEMOGCM/NEMO/OPA_SRC/C1D/step_c1d.F90 (modified) (1 diff)

branches/2016/dev_r7012_ROBUST5_CMCC/NEMOGCM/NEMO/OPA_SRC/C1D/step_c1d.F90

@@ -60 +60 @@
 
                              indic = 0                ! reset to no error condition
-      IF( kstp == nit000 )   CALL iom_init( "nemo")   ! iom_put initialization (must be done after nemo_init for AGRIF+XIOS+OASIS)
+      IF( kstp == nit000 )   CALL iom_init( cxios_context )   ! iom_put initialization (must be done after nemo_init for AGRIF+XIOS+OASIS)
       IF( kstp /= nit000 )   CALL day( kstp )         ! Calendar (day was already called at nit000 in day_init)
-                             CALL iom_setkt( kstp - nit000 + 1, "nemo" )   ! say to iom that we are at time step kstp
+                             CALL iom_setkt( kstp - nit000 + 1, cxios_context )   ! say to iom that we are at time step kstp
 
       !>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>