Changeset 9613


Ignore:
Timestamp:
2018-05-21T11:29:37+02:00 (2 years ago)
Author:
lovato
Message:

trunk : redo bugfix of CFC gas transfer velocity and add CDIAC forcing file (#2065)

Location:
NEMO/trunk
Files:
1 added
2 edited

Legend:

Unmodified
Added
Removed
  • NEMO/trunk/cfgs/SHARED/namelist_trc_ref

    r9572 r9613  
    1111   ! 
    1212   ! Formatted file of annual hemisperic CFCs concentration in the atmosphere (ppt) 
    13    clname     = 'CFCs_CMIP6.dat' 
     13   clname     = 'CFCs_CDIAC.dat' 
    1414/ 
    1515! 
  • NEMO/trunk/src/TOP/CFC/trcsms_cfc.F90

    r9598 r9613  
    151151               zv2     = wndm(ji,jj) * wndm(ji,jj) 
    152152               zsch    = zsch / 660. 
    153                zak_cfc = ( 0.31 * xconv2 * zv2 / SQRT(zsch) ) * tmask(ji,jj,1) 
     153               zak_cfc = ( 0.251 * xconv2 * zv2 / SQRT(zsch) ) * tmask(ji,jj,1) 
    154154 
    155155               ! Input function  : speed *( conc. at equil - concen at surface ) 
Note: See TracChangeset for help on using the changeset viewer.