Changeset 4072 for branches/2013/dev_r4028_CNRS_LIM3/NEMOGCM/NEMO/OPA_SRC/DIA

Timestamp:

2013-10-17T15:10:59+02:00 (11 years ago)

Author:

clem

Message:

few rewritings

File:

• branches/2013/dev_r4028_CNRS_LIM3/NEMOGCM/NEMO/OPA_SRC/DIA/diahsb.F90 (modified) (1 diff)

branches/2013/dev_r4028_CNRS_LIM3/NEMOGCM/NEMO/OPA_SRC/DIA/diahsb.F90

@@ -242 +242 @@
          ! 2 - Time independant variables and file opening !
          ! ----------------------------------------------- !
-         WRITE(numout,*) "dia_hsb: heat salt volume budgets activated"
+         IF(lwp) WRITE(numout,*) "dia_hsb: heat salt volume budgets activated"
          IF( lk_obc .or. lk_bdy ) THEN
             CALL ctl_warn( 'dia_hsb does not take open boundary fluxes into account' )