Changeset 5177

Timestamp:

2015-03-25T17:42:48+01:00 (8 years ago)

Author:

clem

Message:

LIM3 improvement: part of conservation check put to false if key_bdy activated.

File:

• trunk/NEMOGCM/NEMO/LIM_SRC_3/limcons.F90 (modified) (2 diffs)

trunk/NEMOGCM/NEMO/LIM_SRC_3/limcons.F90

@@ -284 +284 @@
       REAL(wp), PARAMETER             :: zconv = 1.e-9 ! convert W to GW and kg to Mt
 
+#if ! defined key_bdy
       ! heat flux
       zhfx  = glob_sum( ( hfx_in - hfx_out - diag_heat - diag_trp_ei - diag_trp_es - hfx_sub ) * e12t * tmask(:,:,1) * zconv ) 
@@ -300 +301 @@
       IF( ABS( zsfx ) > zs_sill ) WRITE(numout,*) 'violation sfx    [psu*Mt/day]   (',cd_routine,')  = ',(zsfx)
       IF( ABS( zhfx ) > zh_sill ) WRITE(numout,*) 'violation hfx    [GW]           (',cd_routine,')  = ',(zhfx)
+#endif
 
    END SUBROUTINE lim_cons_final