Changeset 6716

Timestamp:

2016-06-17T10:55:26+02:00 (9 years ago)

Author:

kuniko

Message:

Reverted to multiplying by sss_m in sbcflx_adj.f90

File:

• branches/UKMO/dev_r5518_flux_adjust/NEMOGCM/NEMO/OPA_SRC/SBC/sbcflx_adj.F90 (modified) (1 diff)

branches/UKMO/dev_r5518_flux_adjust/NEMOGCM/NEMO/OPA_SRC/SBC/sbcflx_adj.F90

@@ -118 +118 @@
                      zerp = ( 1. - 2.*rnfmsk(ji,jj) )  &              ! No damping in vicinity of river mouths
                         &        * sf_erp(1)%fnow(ji,jj,1)
+                        &        * MAX( sss_m(ji,jj), 1.e-20 )! reconverted into salinity flux
+                     !ky 16/06/2016 restored above line (multiplication by MAX...)
                      !ky 11/12/2015 recommented out 1 line below
                      !!ky 3/12/2015 1 line below for FA test!