Ignore:
Timestamp:
2015-11-30T12:15:48+01:00 (5 years ago)
Author:
timgraham
Message:

Minor correction in step.F90

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2014/dev_r4650_UKMO12_CFL_diags_take2/NEMOGCM/NEMO/OPA_SRC/step.F90

    r5948 r5949  
    237237      IF( nn_diacfl == 1 )   CALL dia_cfl( kstp )         ! Courant number diagnostics 
    238238      IF( lk_diahth  )   CALL dia_hth( kstp )         ! Thermocline depth (20 degres isotherm depth) 
    239       IF( lk_diafwb )   CALL dia_fwb( kstp )         ! Fresh water budget diagnostics 
     239      IF(.NOT.ln_cpl )   CALL dia_fwb( kstp )         ! Fresh water budget diagnostics 
    240240      IF( lk_diadct  )   CALL dia_dct( kstp )         ! Transports 
    241241      IF( lk_diaar5  )   CALL dia_ar5( kstp )         ! ar5 diag 
Note: See TracChangeset for help on using the changeset viewer.