- Timestamp:
- 2016-11-04T12:19:19+01:00 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/CNRS/dev_r6270_PISCES_QUOTA/NEMOGCM/NEMO/TOP_SRC/PISCES/P5Z/p5zrem.F90
r7180 r7190 24 24 USE p4zche ! chemical model 25 25 USE p5zlim ! Phytoplankton limitation factors 26 USE p5zsink ! Sinking of particles 26 27 USE p5zprod ! Production by phytoplankton 27 28 USE prtctl_trc ! print control for debugging … … 267 268 tra(ji,jj,jk,jpgsi) = tra(ji,jj,jk,jpgsi) - zosil 268 269 tra(ji,jj,jk,jpsil) = tra(ji,jj,jk,jpsil) + zosil 269 ENDIF270 270 END DO 271 271 END DO
Note: See TracChangeset
for help on using the changeset viewer.