Changeset 10419 for NEMO/branches/2018/dev_r10164_HPC09_ESIWACE_PREP_MERGE/src/TOP/PISCES/trcini_pisces.F90
- Timestamp:
- 2018-12-19T20:46:30+01:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2018/dev_r10164_HPC09_ESIWACE_PREP_MERGE/src/TOP/PISCES/trcini_pisces.F90
r10402 r10419 168 168 IF( cltra == 'PFe' ) jppfe = jn !: Picophytoplankton Fe biomass 169 169 IF( cltra == 'LGW' ) jplgw = jn !: Weak ligands 170 IF( cltra == 'LFe' ) jpfep = jn !: Fe nanoparticle171 170 END DO 172 171 … … 216 215 IF( ln_ligand) THEN 217 216 trn(:,:,:,jplgw) = 0.6E-9 218 trn(:,:,:,jpfep) = 0. * 5.e-6219 217 ENDIF 220 218 IF( ln_p5z ) THEN
Note: See TracChangeset
for help on using the changeset viewer.