Changeset 9401 for trunk/NEMOGCM/NEMO

Timestamp:

2018-03-14T18:19:35+01:00 (6 years ago)

Author:

lovato

Message:

trunk : Revise CFC gas transfer velocity and add CDIAC forcing file (#2065)

File:

• trunk/NEMOGCM/NEMO/TOP_SRC/CFC/trcsms_cfc.F90 (modified) (1 diff)

trunk/NEMOGCM/NEMO/TOP_SRC/CFC/trcsms_cfc.F90

@@ -152 +152 @@
                zv2     = wndm(ji,jj) * wndm(ji,jj)
                zsch    = zsch / 660.
-               zak_cfc = ( 0.31 * xconv2 * zv2 / SQRT(zsch) ) * tmask(ji,jj,1)
+               zak_cfc = ( 0.251 * xconv2 * zv2 / SQRT(zsch) ) * tmask(ji,jj,1)
 
                ! Input function  : speed *( conc. at equil - concen at surface )