Changeset 4607 for trunk/NEMOGCM/NEMO/OPA_SRC/SBC

Timestamp:

2014-03-31T12:03:13+02:00 (10 years ago)

Author:

cbricaud

Message:

solve ticket 1239

File:

• trunk/NEMOGCM/NEMO/OPA_SRC/SBC/sbcmod.F90 (modified) (1 diff)

trunk/NEMOGCM/NEMO/OPA_SRC/SBC/sbcmod.F90

@@ -154 +154 @@
 #endif
       !
+#if defined key_top && ! defined key_offline
+      ltrcdm2dc = (ln_dm2dc .AND. ln_blk_core .AND. nn_ice==2)
+      IF( ltrcdm2dc )THEN
+         IF(lwp)THEN
+            WRITE(numout,*)"analytical diurnal cycle, core bulk formulation and LIM2 use: "
+            WRITE(numout,*)"Diurnal cycle on physics but not in passive tracers"
+         ENDIF
+      ENDIF
+#else 
+      ltrcdm2dc =  .FALSE.
+#endif
+
+      !
       !                              ! allocate sbc arrays
       IF( sbc_oce_alloc() /= 0 )   CALL ctl_stop( 'STOP', 'sbc_init : unable to allocate sbc_oce arrays' )