Changeset 13315
- Timestamp:
- 2020-07-16T19:02:30+02:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_GO6_package_FOAMv14_phytobal3d/NEMOGCM/NEMO/OPA_SRC/ASM/asmbgc.F90
r13097 r13315 837 837 !!------------------------------------------------------------------------ 838 838 839 #if defined key_hadocc || defined key_medusa 839 840 CALL iom_rstput( kt, nitbkg_r, knum, 'pgrow_avg' , pgrow_avg ) 840 841 CALL iom_rstput( kt, nitbkg_r, knum, 'ploss_avg' , ploss_avg ) … … 870 871 CALL iom_rstput( kt, nitbkg_r, knum, 'medusa_oxy' , trn(:,:,:,jpoxy) ) 871 872 #endif 873 #endif 872 874 873 875 END SUBROUTINE asm_bgc_bkg_wri
Note: See TracChangeset
for help on using the changeset viewer.