Changeset 4370 for branches/2013/dev_MERGE_2013/NEMOGCM/NEMO/OPA_SRC/DOM/domzgr_substitute.h90

Timestamp:

2014-01-23T18:13:16+01:00 (10 years ago)

Author:

jchanut

Message:

Time split cleaning / AMM12 restart / BDY and Agrif. See tickets #1228, #1227, #1225 and #1133

File:

• branches/2013/dev_MERGE_2013/NEMOGCM/NEMO/OPA_SRC/DOM/domzgr_substitute.h90 (modified) (2 diffs)

branches/2013/dev_MERGE_2013/NEMOGCM/NEMO/OPA_SRC/DOM/domzgr_substitute.h90

@@ -34 +34 @@
 
 #   define  fse3t_m(i,j)     e3t_m(i,j)
+
+#   define  hu_a(i,j)        ehu_a(i,j)
+#   define  hur_a(i,j)       ehur_a(i,j)
+#   define  hv_a(i,j)        ehv_a(i,j)
+#   define  hvr_a(i,j)       ehvr_a(i,j)
+#   define  hu_b(i,j)        ehu_b(i,j)
+#   define  hur_b(i,j)       ehur_b(i,j)
+#   define  hv_b(i,j)        ehv_b(i,j)
+#   define  hvr_b(i,j)       ehvr_b(i,j)
 
 ! This part should be removed one day ...
@@ -75 +84 @@
 #   define  fse3t_m(i,j)     e3t_0(i,j,1)
 
+#   define  hu_a(i,j)        hu(i,j)
+#   define  hur_a(i,j)       hur(i,j)
+#   define  hv_a(i,j)        hv(i,j)
+#   define  hvr_a(i,j)       hvr(i,j)
+#   define  hu_b(i,j)        hu(i,j)
+#   define  hur_b(i,j)       hur(i,j)
+#   define  hv_b(i,j)        hv(i,j)
+#   define  hvr_b(i,j)       hvr(i,j)
+
 ! This part should be removed one day ...
 ! ... In that case all occurence of the above statement functions