- Timestamp:
- 2010-10-15T12:59:19+02:00 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/nemo_v3_3_beta/NEMOGCM/NEMO/OPA_SRC/DOM/phycst.F90
r2236 r2276 48 48 #endif 49 49 50 REAL(wp), PUBLIC :: rau0 = 10 20._wp !: reference volumic mass (density) (kg/m3)50 REAL(wp), PUBLIC :: rau0 = 1035._wp !: reference volumic mass (density) (kg/m3) 51 51 REAL(wp), PUBLIC :: rau0r !: reference specific volume (m3/kg) 52 52 REAL(wp), PUBLIC :: rcp = 4.e+3_wp !: ocean specific heat
Note: See TracChangeset
for help on using the changeset viewer.