Changeset 12706 for NEMO/branches/UKMO/NEMO_4.0.2_ENHANCE-02_ISF_nemo/tests/CANAL/MY_SRC/diawri.F90

Timestamp:

2020-04-07T18:34:56+02:00 (4 years ago)

Author:

mathiot

Message:

NEMO_4.0.2_ENHANCE-02_ISF_nemo: in sync with trunk right before release_4.0-HEAD was created (svn merge -r 12072:12367 ^/NEMO/trunk)

File:

• NEMO/branches/UKMO/NEMO_4.0.2_ENHANCE-02_ISF_nemo/tests/CANAL/MY_SRC/diawri.F90 (modified) (2 diffs)

NEMO/branches/UKMO/NEMO_4.0.2_ENHANCE-02_ISF_nemo/tests/CANAL/MY_SRC/diawri.F90

@@ -46 +46 @@
    USE lbclnk         ! ocean lateral boundary conditions (or mpp link)
    USE in_out_manager ! I/O manager
-   USE diatmb         ! Top,middle,bottom output
    USE dia25h         ! 25h Mean output
    USE iom            ! 
@@ -492 +491 @@
       CALL iom_put( "bn2", rn2 )                      ! Brunt-Vaisala buoyancy frequency (N^2)
       !
-
-      IF (ln_diatmb)   CALL dia_tmb                   ! tmb values 
           
       IF (ln_dia25h)   CALL dia_25h( kt )             ! 25h averaging