New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 6727 for branches/2016/dev_r6711_SIMPLIF_6_aerobulk/NEMOGCM/NEMO/OPA_SRC/SBC/sbcblk_algo_ecmwf.F90 – NEMO

Ignore:
Timestamp:
2016-06-21T16:25:51+02:00 (8 years ago)
Author:
gm
Message:

#1751 - branch SIMPLIF_6_aerobulk: minor correction

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/2016/dev_r6711_SIMPLIF_6_aerobulk/NEMOGCM/NEMO/OPA_SRC/SBC/sbcblk_algo_ecmwf.F90

    r6723 r6727  
    1919   !! ** Author: L. Brodeau, june 2016 / AeroBulk (https://sourceforge.net/p/aerobulk) 
    2020   !!---------------------------------------------------------------------- 
    21    !! 
    22    !! History :  4.0  !  2016-06  (L.Brodeau) Original code 
    23    !! 
     21   !! History :  4.0  !  2016-02  (L.Brodeau)   Original code 
     22   !!---------------------------------------------------------------------- 
     23 
    2424   !!---------------------------------------------------------------------- 
    2525   !!   turb_ecmwf  : computes the bulk turbulent transfer coefficients 
    … …  
    4747   PRIVATE 
    4848 
    49    PUBLIC :: TURB_ECMWF 
     49   PUBLIC ::   TURB_ECMWF   ! called by sbcblk.F90 
    5050 
    5151   !                   !! ECMWF own values for given constants, taken form IFS documentation... 
Note: See TracChangeset for help on using the changeset viewer.