- Timestamp:
- 2017-09-01T17:28:24+02:00 (7 years ago)
- Location:
- branches/NERC/dev_r5518_GO6_MEDUSA_conserv/NEMOGCM/NEMO/TOP_SRC
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/NERC/dev_r5518_GO6_MEDUSA_conserv/NEMOGCM/NEMO/TOP_SRC/MEDUSA/bio_medusa_fin.F90
r8489 r8490 256 256 ENDIF 257 257 IF ( med_diag%OCAL_LVL%dgsave ) THEN 258 !! AXY (16/08/17): hijack! 259 CALL iom_put( "OCAL_LVL" , fchl_ml ) 260 !! CALL iom_put( "OCAL_LVL" , fccd ) 258 CALL iom_put( "OCAL_LVL" , fccd ) 259 ENDIF 260 IF ( med_diag%CHL_MLD%dgsave ) THEN 261 CALL iom_put( "CHL_MLD" , fchl_ml ) 261 262 ENDIF 262 263 IF ( med_diag%PN_JLIM%dgsave ) THEN -
branches/NERC/dev_r5518_GO6_MEDUSA_conserv/NEMOGCM/NEMO/TOP_SRC/MEDUSA/trcnam_medusa.F90
r8442 r8490 2053 2053 med_diag%OCN_DPCO2%dgsave = .FALSE. 2054 2054 ENDIF 2055 !! 2055 !! UKESM additional 2056 IF (iom_use("CHL_MLD")) THEN 2057 med_diag%CHL_MLD%dgsave = .TRUE. 2058 ELSE 2059 med_diag%CHL_MLD%dgsave = .FALSE. 2060 ENDIF 2061 !! 3D 2056 2062 IF (iom_use("TPP3")) THEN 2057 2063 med_diag%TPP3%dgsave = .TRUE. -
branches/NERC/dev_r5518_GO6_MEDUSA_conserv/NEMOGCM/NEMO/TOP_SRC/trc.F90
r8280 r8490 134 134 OCN_KWCO2, OCN_K0, CO2STARAIR, OCN_DPCO2, & ! end of regular 2D 135 135 TPP3, DETFLUX3, REMIN3N, PH3, OM_CAL3, & ! end of regular 3D 136 ! JPALM (01/09/17): additional UKESM 2D diag 137 CHL_MLD, & 136 138 ! AXY (11/11/16): additional CMIP6 2D diagnostics 137 139 epC100, epCALC100, epN100, epSI100, &
Note: See TracChangeset
for help on using the changeset viewer.