Changeset 1739 for trunk/NEMO/OPA_SRC/DOM/phycst.F90
- Timestamp:
- 2009-11-19T14:24:00+01:00 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/OPA_SRC/DOM/phycst.F90
r1732 r1739 49 49 rt0_ice = 273.05_wp , & !: melting point of ice (Kelvin) 50 50 #endif 51 rau0 = 10 20._wp , & !: volumic mass of reference (kg/m3)51 rau0 = 1035._wp , & !: volumic mass of reference (kg/m3) 52 52 rauw = 1000._wp , & !: volumic mass of pure water (kg/m3) 53 53 rcp = 4.e+3_wp, & !: ocean specific heat
Note: See TracChangeset
for help on using the changeset viewer.