Changeset 9009
- Timestamp:
- 2017-12-13T12:54:21+01:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/NERC/dev_r5518_GO6_ScalingCoupledChl/NEMOGCM/NEMO/TOP_SRC/trcrst.F90
r9008 r9009 279 279 !! 07-12-2017 -- To make things cleaner, we want to store an 280 280 !! unscaled Chl field in the restart and only 281 ||scale it when reading it in.281 !! scale it when reading it in. 282 282 283 283 IF( iom_varid( numrtr, 'N_CHL_srf', ldstop = .FALSE. ) > 0 ) THEN … … 464 464 !! JPALM 07-12-2017 -- To make things cleaner, we want to store an 465 465 !! unscaled Chl field in the restart and only 466 ||scale it when reading it in.466 !! scale it when reading it in. 467 467 zn_chl_srf(:,:) = zn_chl_srf(:,:) / scl_chl 468 468 CALL iom_rstput( kt, nitrst, numrtw, 'N_CHL_srf', zn_chl_srf(:,:) )
Note: See TracChangeset
for help on using the changeset viewer.