Changeset 1739 for trunk/NEMO/OPA_SRC/DYN/dynspg_ts.F90
- Timestamp:
- 2009-11-19T14:24:00+01:00 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/OPA_SRC/DYN/dynspg_ts.F90
r1708 r1739 148 148 z1_8 = 0.5 * 0.25 ! coefficient for vorticity estimates 149 149 z1_4 = 0.5 * 0.5 150 zraur = 1. / rau w ! 1 / volumic mass of pure water150 zraur = 1. / rau0 ! 1 / volumic mass 151 151 ! 152 152 zhdiv(:,:) = 0.e0 ! barotropic divergence
Note: See TracChangeset
for help on using the changeset viewer.