Changeset 392 for trunk/NEMO/OPA_SRC/TRA/tranxt.F90

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/TRA/tranxt.F90 (modified) (2 diffs)

trunk/NEMO/OPA_SRC/TRA/tranxt.F90

@@ -110 +110 @@
          !                                             ! ===============
 #endif
-#if defined key_AGRIF
+#if defined key_agrif
          !                                             ! ===============
       END DO                                           !   End of slab
@@ -185 +185 @@
       ENDIF
       
-#if defined key_AGRIF
+#if defined key_agrif
       IF (.NOT.Agrif_Root())    CALL Agrif_Update_Tra( kt )
 #endif