- Timestamp:
- 2010-08-02T12:57:40+02:00 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/DEV_r2006_merge_TRA_TRC/NEMO/TOP_SRC/PISCES/trcrst_pisces.F90
r1970 r2038 130 130 DO ji = 1, jpi 131 131 zvol = cvol(ji,jj,jk) 132 # if defined key_ off_degrad132 # if defined key_degrad 133 133 zvol = zvol * facvol(ji,jj,jk) 134 134 # endif
Note: See TracChangeset
for help on using the changeset viewer.