Changeset 5805 for branches/UKMO/dev_r5107_hadgem3_cplfld/NEMOGCM/NEMO/OPA_SRC/SBC/sbccpl.F90

Timestamp:

2015-10-19T13:01:43+02:00 (9 years ago)

Author:

jcastill

Message:

Added change so that this branch can be merged with branch dev_r5518_ukv_mslp@5804 - WARNING! use the previous revision of this branch if the dev_r5518_ukv_mslp branch does not have to be merged with this

File:

• branches/UKMO/dev_r5107_hadgem3_cplfld/NEMOGCM/NEMO/OPA_SRC/SBC/sbccpl.F90 (modified) (1 diff)

branches/UKMO/dev_r5107_hadgem3_cplfld/NEMOGCM/NEMO/OPA_SRC/SBC/sbccpl.F90

@@ -1138 +1138 @@
       ENDIF
       !
-      CALL wrk_dealloc( jpi,jpj, ztx, zty, zmsk, zemp, zqns, zqsr, ztx2, zty2 )
+!      CALL wrk_dealloc( jpi,jpj, ztx, zty, zmsk, zemp, zqns, zqsr, ztx2, zty2 )
       !
       IF( nn_timing == 1 )  CALL timing_stop('sbc_cpl_rcv')