Changeset 1739 for trunk/NEMO/OPA_SRC/DYN/sshwzv.F90
- Timestamp:
- 2009-11-19T14:24:00+01:00 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/OPA_SRC/DYN/sshwzv.F90
r1694 r1739 139 139 IF( neuler == 0 .AND. kt == nit000 ) z2dt =rdt 140 140 141 zraur = 1. / rau w141 zraur = 1. / rau0 142 142 143 143 ! !------------------------------!
Note: See TracChangeset
for help on using the changeset viewer.