Changeset 10366 for branches/UKMO/AMM15_v3_6_STABLE_package_collate_bgc_diagnostics/NEMOGCM/NEMO/TOP_SRC/trc.F90

Timestamp:

2018-12-03T12:26:33+01:00 (5 years ago)

Author:

dford

Message:

Remove visibility, as now available through FABM, and switch from deprecated get_bulk to get_interior.

File:

• branches/UKMO/AMM15_v3_6_STABLE_package_collate_bgc_diagnostics/NEMOGCM/NEMO/TOP_SRC/trc.F90 (modified) (2 diffs)

branches/UKMO/AMM15_v3_6_STABLE_package_collate_bgc_diagnostics/NEMOGCM/NEMO/TOP_SRC/trc.F90

@@ -149 +149 @@
    LOGICAL            , PUBLIC                                        ::  ln_diatrc      !: boolean term for additional diagnostic
    INTEGER            , PUBLIC                                        ::  nn_writedia    !: frequency of additional outputs
-#if defined key_fabm
-   REAL(wp)           , PUBLIC, ALLOCATABLE, SAVE, DIMENSION(:,:,:)   ::  visib          !: visibility
-#endif
 
    !! Biological trends
@@ -256 +253 @@
 ! FABM <<<+++
          &      ln_trc_sbc(jptra)     , ln_trc_cbc(jptra)     , ln_trc_obc(jptra)     ,       &
-         &      visib(jpi,jpj,jpk)    ,                                                       &
 #endif
 #if defined key_bdy