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 7854 for branches/UKMO/r6232_HZG_WAVE-coupling/NEMOGCM/NEMO/OPA_SRC/SBC/sbcflx.F90 – NEMO

Ignore:
Timestamp:
2017-03-30T18:42:37+02:00 (7 years ago)
Author:
jcastill
Message:

Addition of the HZG drag coefficient modification for core forcing - the input winds will be read from the core forcing input files, instead of being calculated from a wind wave forcing file

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/UKMO/r6232_HZG_WAVE-coupling/NEMOGCM/NEMO/OPA_SRC/SBC/sbcflx.F90

    r7792 r7854  
    3333   INTEGER , PARAMETER ::   jp_vtau = 2   ! index of wind stress (j-component) file 
    3434   INTEGER , PARAMETER ::   jp_qtot = 3   ! index of total (non solar+solar) heat file 
    35  
    36    ! These lines are here just to allow merging with another branch 
    37    INTEGER, PUBLIC            ::   nn_drag        ! type of formula to calculate wind stress from wind components 
    38    INTEGER, PUBLIC, PARAMETER ::   jp_ukmo  = 0        ! UKMO SHELF formulation 
    39    INTEGER, PUBLIC, PARAMETER ::   jp_std   = 1        ! standard formulation with forced or coupled drag coefficient  
    40    INTEGER, PUBLIC, PARAMETER ::   jp_const = 2        ! standard formulation with constant drag coefficient  
    41  
    4235   INTEGER , PARAMETER ::   jp_qsr  = 4   ! index of solar heat file 
    4336   INTEGER , PARAMETER ::   jp_emp  = 5   ! index of evaporation-precipation file 
Note: See TracChangeset for help on using the changeset viewer.