Changeset 685 for codes/icosagcm/devel/Python/src/kernels_caldyn_hydro.jin

Timestamp:

03/07/18 18:43:51 (6 years ago)

Author:

dubos

Message:

devel/unstructured : towards vertical remapping

File:

• codes/icosagcm/devel/Python/src/kernels_caldyn_hydro.jin (modified) (3 diffs)

codes/icosagcm/devel/Python/src/kernels_caldyn_hydro.jin

@@ -7 +7 @@
 #define BALANCE(formula) {% call(thecell) balance() %} formula {% endcall %}
 {% macro balance() %} {% set formula=caller %}
-SEQUENCE_EXT
+SEQUENCE_C1
   PROLOGUE(llm)
     pk(CELL) = ptop + .5*g*{{ formula('CELL') }}
@@ -29 +29 @@
 #define GEOPOT(var) {% call geopot(var) %}
 {% macro geopot(var) %} {% set formula=caller %}
-  SEQUENCE_EXT
+  SEQUENCE_C1
     BODY('1,llm')
       p_ik = pk(CELL)
@@ -48 +48 @@
     ! now pk contains the Lagrange multiplier (pressure)
     ! specific volume 1 = dphi/g/rhodz
-    SEQUENCE_EXT
+    SEQUENCE_C1
       BODY('1,llm')
         geopot(UP(CELL)) = geopot(CELL) + g*rhodz(CELL)