Changeset 392 for trunk/NEMO/OPA_SRC/SBC/tau_forced_monthly.h90

Timestamp:

2006-03-10T11:55:45+01:00 (18 years ago)

Author:

opalod

Message:

RB:nemo_v1_update_038: first integration of Agrif :

• add agrif to dynspg_flt_jki.F90
• cosmetic change of key_AGRIF in key_agrif

File:

• trunk/NEMO/OPA_SRC/SBC/tau_forced_monthly.h90 (modified) (2 diffs)

trunk/NEMO/OPA_SRC/SBC/tau_forced_monthly.h90

@@ -109 +109 @@
          ! title, dimensions and tests
 
-#if defined key_AGRIF
+#if defined key_agrif
       if ( .NOT. Agrif_Root() ) then
          cl_taux = TRIM(Agrif_CFixed())//'_'//TRIM(cl_taux)
@@ -134 +134 @@
             nstop = nstop + 1
          ENDIF
-#if defined key_AGRIF
+#if defined key_agrif
       if ( .NOT. Agrif_Root() ) then
          cl_tauy = TRIM(Agrif_CFixed())//'_'//TRIM(cl_tauy)