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 2292 for branches/DEV_r1879_FCM/NEMOGCM/NEMO/OPA_SRC/DOM/phycst.F90 – NEMO

Ignore:
Timestamp:
2010-10-19T12:15:40+02:00 (14 years ago)
Author:
smasson
Message:

update DEV_r1879_FCM for additional tests...

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/DEV_r1879_FCM/NEMOGCM/NEMO/OPA_SRC/DOM/phycst.F90

    r2160 r2292  
    4848#endif 
    4949 
    50    REAL(wp), PUBLIC ::   rau0     = 1020._wp      !: reference volumic mass (density)  (kg/m3) 
     50   REAL(wp), PUBLIC ::   rau0     = 1035._wp      !: reference volumic mass (density)  (kg/m3) 
    5151   REAL(wp), PUBLIC ::   rau0r                    !: reference specific volume         (m3/kg) 
    5252   REAL(wp), PUBLIC ::   rcp      =    4.e+3_wp   !: ocean specific heat 
Note: See TracChangeset for help on using the changeset viewer.