Changeset 8206 for branches/UKMO/dev_r5518_GO6_MEDUSA_dummyrun/NEMOGCM/NEMO/OPA_SRC/SBC/cpl_oasis3.F90

Timestamp:

2017-06-22T12:31:15+02:00 (6 years ago)

Author:

frrh

Message:

Correct the way cpl_freq is set.

File:

• branches/UKMO/dev_r5518_GO6_MEDUSA_dummyrun/NEMOGCM/NEMO/OPA_SRC/SBC/cpl_oasis3.F90 (modified) (1 diff)

branches/UKMO/dev_r5518_GO6_MEDUSA_dummyrun/NEMOGCM/NEMO/OPA_SRC/SBC/cpl_oasis3.F90

@@ -462 +462 @@
 #if defined key_oa3mct_v3
          CALL oasis_get_freqs(id, mop, 1, itmp, info)
+#elseif key_oasis3
+         itmp(1) = namflddti( id )
 #else
          CALL oasis_get_freqs(id,      1, itmp, info)