Changeset 15593 for NEMO/releases/r4.0/r4.0-HEAD/src
- Timestamp:
- 2021-12-13T12:01:58+01:00 (3 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/releases/r4.0/r4.0-HEAD/src/OCE/DIA/diawri.F90
r14580 r15593 233 233 CALL iom_put( "avm" , avm ) ! T vert. eddy visc. coef. 234 234 235 IF( iom_use('logavt') ) CALL iom_put( "logavt", LOG ( MAX( 1.e-20_wp, avt(:,:,:) ) ) )236 IF( iom_use('logavs') ) CALL iom_put( "logavs", LOG ( MAX( 1.e-20_wp, avs(:,:,:) ) ) )235 IF( iom_use('logavt') ) CALL iom_put( "logavt", LOG10( MAX( 1.e-20_wp, avt(:,:,:) ) ) ) 236 IF( iom_use('logavs') ) CALL iom_put( "logavs", LOG10( MAX( 1.e-20_wp, avs(:,:,:) ) ) ) 237 237 238 238 IF ( iom_use("sstgrad") .OR. iom_use("sstgrad2") ) THEN
Note: See TracChangeset
for help on using the changeset viewer.