Changeset 10241 for branches/UKMO/AMM15_v3_6_STABLE_package_bgc_updates/NEMOGCM/NEMO/TOP_SRC/FABM/trcwri_fabm.F90

Timestamp:

2018-10-26T18:02:18+02:00 (6 years ago)

Author:

dford

Message:

Add visibility diagnostic (can't currently be done via fabm.yaml without changing the FABM code).

File:

• branches/UKMO/AMM15_v3_6_STABLE_package_bgc_updates/NEMOGCM/NEMO/TOP_SRC/FABM/trcwri_fabm.F90 (modified) (1 diff)

branches/UKMO/AMM15_v3_6_STABLE_package_bgc_updates/NEMOGCM/NEMO/TOP_SRC/FABM/trcwri_fabm.F90

@@ -105 +105 @@
              CALL iom_put( model%diagnostic_variables(jn)%name, fabm_get_bulk_diagnostic_data(model,jn))
       END DO
+      CALL iom_put( 'visib', visib(:,:,:) )
 
       ! write 2D diagnostics in the file