Changeset 15593

Timestamp:

2021-12-13T12:01:58+01:00 (2 years ago)

Author:

cetlod

Message:

v40-HEAD : bugfix in output of Kz for Offline configuration's purposes, see ticket #2747

File:

• NEMO/releases/r4.0/r4.0-HEAD/src/OCE/DIA/diawri.F90 (modified) (1 diff)

NEMO/releases/r4.0/r4.0-HEAD/src/OCE/DIA/diawri.F90

@@ -233 +233 @@
       CALL iom_put( "avm" , avm )                  ! T vert. eddy visc. coef.
 
-      IF( iom_use('logavt') )   CALL iom_put( "logavt", LOG( MAX( 1.e-20_wp, avt(:,:,:) ) ) )
-      IF( iom_use('logavs') )   CALL iom_put( "logavs", LOG( MAX( 1.e-20_wp, avs(:,:,:) ) ) )
+      IF( iom_use('logavt') )   CALL iom_put( "logavt", LOG10( MAX( 1.e-20_wp, avt(:,:,:) ) ) )
+      IF( iom_use('logavs') )   CALL iom_put( "logavs", LOG10( MAX( 1.e-20_wp, avs(:,:,:) ) ) )
 
       IF ( iom_use("sstgrad") .OR. iom_use("sstgrad2") ) THEN