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 12492 for NEMO/branches/2020/dev_r12377_KERNEL-06_techene_e3/src/OCE/steplf.F90 – NEMO

Ignore:
Timestamp:
2020-03-01T21:49:40+01:00 (4 years ago)
Author:
techene
Message:

change the way to compute e3, gde and h where it makes small (10-7 or 10-10) and localised errors wrt to the reference version in the GYRE configuration

File:
1 edited

Legend:

Unmodified
Added
Removed

  • NEMO/branches/2020/dev_r12377_KERNEL-06_techene_e3/src/OCE/steplf.F90

    r12482 r12492  
    126126                         CALL sbc     ( kstp, Nbb, Nnn )              ! Sea Boundary Condition (including sea-ice) 
    127127 
     128      !             !!st      !!!!!!!!!!!!!!!!!!!!!!! 
     129      ! 
     130      ! emp = 0._wp 
     131      ! emp_b = 0._wp 
     132      ! qns = 0._wp 
     133      ! qsr = 0._wp 
     134      ! qns_b = 0._wp 
     135      ! 
     136      !             !!st 
     137 
    128138      !>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> 
    129139      ! Update stochastic parameters and random T/S fluctuations 
Note: See TracChangeset for help on using the changeset viewer.