Changeset 2595 for branches/dev_r2586_dynamic_mem

Timestamp:

2011-02-18T18:31:20+01:00 (13 years ago)

Author:

trackstand2

Message:

Added calls to _alloc() routines for traldf_iso_grif and top-level TOP modules

File:

• branches/dev_r2586_dynamic_mem/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90 (modified) (2 diffs)

branches/dev_r2586_dynamic_mem/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90

@@ -561 +561 @@
 #endif
      USE traldf,       ONLY: tra_ldf_alloc
+#if   defined key_ldfslp   ||   defined key_esopa
+     USE traldf_iso_grif,ONLY: traldf_iso_grif_alloc
+#endif
      USE traldf_lap,   ONLY: tra_ldf_lap_alloc
      USE tranxt,       ONLY: tra_nxt_alloc
      USE trazdf,       ONLY: tra_zdf_alloc
+#if defined key_top
+     USE trc,          ONLY: trc_alloc
+#endif
+#if defined key_top && ! defined key_iomput
+     USE trcdia,       ONLY: trc_dia_alloc
+#endif
+#if  defined key_top  &&  defined key_dtatrc
+     USE trcdta,       ONLY: trc_dta_alloc
+#endif
      USE trc_oce,      ONLY: trc_oce_alloc
 #if   defined key_trdmld   ||   defined key_esopa
@@ -707 +719 @@
 #endif
      ierr = ierr + tra_ldf_alloc()
+#if   defined key_ldfslp   ||   defined key_esopa
+     ierr = ierr + traldf_iso_grif_alloc()
+#endif
      ierr = ierr + tra_ldf_lap_alloc()
      ierr = ierr + tra_nxt_alloc()
      ierr = ierr + tra_zdf_alloc()
+#if defined key_top
+     ierr = ierr + trc_alloc()
+#endif
+#if defined key_top && ! defined key_iomput
+     ierr = ierr + trc_dia_alloc()
+#endif
+#if  defined key_top  &&  defined key_dtatrc
+     ierr = ierr + trc_dta_alloc()
+#endif
      ierr = ierr + trc_oce_alloc()
 #if   defined key_trdmld   ||   defined key_esopa