Changeset 12912 for NEMO/branches/UKMO/NEMO_4.0.2_FKOSM/src/OCE/TRD/trdtra.F90

Timestamp:

2020-05-12T14:51:37+02:00 (4 years ago)

Author:

cguiavarch

Message:

OSMOSIS and Fox-Kemper changes (merged from NEMO_4.0.1_FKOSM)

File:

• NEMO/branches/UKMO/NEMO_4.0.2_FKOSM/src/OCE/TRD/trdtra.F90 (modified) (1 diff)

NEMO/branches/UKMO/NEMO_4.0.2_FKOSM/src/OCE/TRD/trdtra.F90

@@ -346 +346 @@
          CASE( jptra_bbl  )   ;   CALL iom_put( "ttrd_bbl"  , ptrdx )        ! bottom boundary layer
                                   CALL iom_put( "strd_bbl"  , ptrdy )
+         CASE( jptra_osm  )   ;   CALL iom_put( "ttrd_osm"  , ptrdx )        ! OSMOSIS non-local forcing
+                                  CALL iom_put( "strd_osm"  , ptrdy )
          CASE( jptra_npc  )   ;   CALL iom_put( "ttrd_npc"  , ptrdx )        ! static instability mixing
                                   CALL iom_put( "strd_npc"  , ptrdy )