Ignore:
Timestamp:
2015-03-25T17:42:48+01:00 (6 years ago)
Author:
clem
Message:

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

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMOGCM/NEMO/LIM_SRC_3/limcons.F90

    r5176 r5177  
    284284      REAL(wp), PARAMETER             :: zconv = 1.e-9 ! convert W to GW and kg to Mt 
    285285 
     286#if ! defined key_bdy 
    286287      ! heat flux 
    287288      zhfx  = glob_sum( ( hfx_in - hfx_out - diag_heat - diag_trp_ei - diag_trp_es - hfx_sub ) * e12t * tmask(:,:,1) * zconv )  
     
    300301      IF( ABS( zsfx ) > zs_sill ) WRITE(numout,*) 'violation sfx    [psu*Mt/day]   (',cd_routine,')  = ',(zsfx) 
    301302      IF( ABS( zhfx ) > zh_sill ) WRITE(numout,*) 'violation hfx    [GW]           (',cd_routine,')  = ',(zhfx) 
     303#endif 
    302304 
    303305   END SUBROUTINE lim_cons_final 
Note: See TracChangeset for help on using the changeset viewer.