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 7739 for branches/UKMO/r6232_INGV1_WAVE-coupling/NEMOGCM/NEMO/OPA_SRC/SBC/sbccpl.F90 – NEMO

Ignore:
Timestamp:
2017-02-27T13:07:05+01:00 (7 years ago)
Author:
jcastill
Message:

Add a 'standard formulation' for calculating momentum from forcing winds using a constant drag coefficient; remove drag coefficient checks after fixing the wave model

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/UKMO/r6232_INGV1_WAVE-coupling/NEMOGCM/NEMO/OPA_SRC/SBC/sbccpl.F90

    r7717 r7739  
    956956      !!---------------------------------------------------------------------- 
    957957      USE zdf_oce,  ONLY : ln_zdfqiao 
    958       USE sbcflx ,  ONLY : ln_shelf_flx 
     958      USE sbcflx ,  ONLY : ln_shelf_flx, nn_drag, jp_std 
    959959 
    960960      INTEGER, INTENT(in)           ::   kt          ! ocean model time step index 
Note: See TracChangeset for help on using the changeset viewer.