Changeset 15535

Timestamp:

2021-11-25T10:30:37+01:00 (2 years ago)

Author:

jcastill

Message:

Changes as proposed in the ticket description

File:

• NEMO/branches/UKMO/v15531_wave_radiation_diurnal_cycle/src/OCE/SBC/sbccpl.F90 (modified) (1 diff)

NEMO/branches/UKMO/v15531_wave_radiation_diurnal_cycle/src/OCE/SBC/sbccpl.F90

@@ -1195 +1195 @@
       !   cannot be done in the init phase when we use agrif as cpl_freq requires that oasis_enddef is done
          ncpl_qsr_freq = cpl_freq( 'O_QsrOce' ) + cpl_freq( 'O_QsrMix' ) + cpl_freq( 'I_QsrOce' ) + cpl_freq( 'I_QsrMix' )
-         IF( ln_dm2dc .AND. ncpl_qsr_freq /= 86400 )   &
+         IF( ln_dm2dc .AND. ln_cpl .AND. ncpl_qsr_freq /= 86400 )   &
             &   CALL ctl_stop( 'sbc_cpl_rcv: diurnal cycle reconstruction (ln_dm2dc) needs daily couping for solar radiation' )