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 12900 for NEMO/releases – NEMO

Changeset 12900 for NEMO/releases


Ignore:
Timestamp:
2020-05-11T15:16:30+02:00 (4 years ago)
Author:
laurent
Message:

My mistake! Undoing change from last commit (12896), release is frozen.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/releases/release-4.0.1/src/OCE/SBC/sbcblk.F90

    r12896 r12900  
    7878   REAL(wp), PARAMETER ::   R_vap = 461.495_wp    !: Specific gas constant for water vapor          [J/K/kg] 
    7979   REAL(wp), PARAMETER ::   reps0 = R_dry/R_vap   !: ratio of gas constant for dry air and water vapor => ~ 0.622 
    80    REAL(wp), PARAMETER ::   rctv0 = R_vap/R_dry-1._wp  !: for virtual temperature (== (1-eps)/eps) => ~ 0.608 
     80   REAL(wp), PARAMETER ::   rctv0 = R_vap/R_dry   !: for virtual temperature (== (1-eps)/eps) => ~ 0.608 
    8181 
    8282   INTEGER , PARAMETER ::   jpfld   =10           ! maximum number of files to read 
Note: See TracChangeset for help on using the changeset viewer.