Changeset 11109 for NEMO/trunk
- Timestamp:
- 2019-06-14T13:57:22+02:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/TOP/PISCES/P4Z/p4zpoc.F90
r10973 r11109 102 102 ! particle scheme. Does not work with Kriest parameterization. 103 103 ! ----------------------------------------------------------------------- 104 ztremint(:,:,:) = zremigoc(:,:,:) 104 105 DO jk = 2, jpkm1 105 106 DO jj = 1, jpj … … 285 286 ! layer, this spectrum is supposed to be uniform. 286 287 ! --------------------------------------------------------------------- 288 ztremint(:,:,:) = zremigoc(:,:,:) 287 289 DO jk = 1, jpkm1 288 290 DO jj = 1, jpj
Note: See TracChangeset
for help on using the changeset viewer.