Changeset 10055 for branches/UKMO/dev_r5518_GO6_package_asm_3d_bgc_v3/NEMOGCM/NEMO/OPA_SRC/ASM/asmbkg.F90
- Timestamp:
- 2018-08-20T15:17:09+02:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_GO6_package_asm_3d_bgc_v3/NEMOGCM/NEMO/OPA_SRC/ASM/asmbkg.F90
r9321 r10055 49 49 #if defined key_lim3 50 50 USE ice 51 #endif 52 #if defined key_top 53 USE asmbgc, ONLY: asm_bgc_bkg_wri 51 54 #endif 52 55 USE timing … … 125 128 IF(nn_timing == 2) CALL timing_stop('iom_rstput') 126 129 ! 130 #if defined key_top 131 CALL asm_bgc_bkg_wri( kt, inum ) 132 ! 133 #endif 127 134 CALL iom_close( inum ) 128 135 ENDIF
Note: See TracChangeset
for help on using the changeset viewer.