Changeset 1052 for codes/icosagcm/devel/src/base/init_grid_param.f90

Timestamp:

09/23/20 16:00:58 (4 years ago)

Author:

dubos

Message:

devel : diagnose divergence and vorticity

File:

• codes/icosagcm/devel/src/base/init_grid_param.f90 (modified) (4 diffs)

codes/icosagcm/devel/src/base/init_grid_param.f90

@@ -55 +55 @@
     USE compute_pression_mod
     USE compute_temperature_mod
+    USE compute_vorticity_mod
+    USE compute_divergence_mod
     USE vertical_interp_mod
     
@@ -68 +70 @@
     compute_pression_mid => compute_pression_mid_hex
     compute_temperature => compute_temperature_hex
+    compute_vorticity => compute_vorticity_hex
+    compute_divergence => compute_divergence_hex
     compute_hydrostatic_pressure => compute_hydrostatic_pressure_hex
     compute_vertical_interp => compute_vertical_interp_hex
@@ -83 +87 @@
     USE compute_pression_mod
     USE compute_temperature_mod
+    USE compute_vorticity_mod
+    USE compute_divergence_mod
     USE vertical_interp_mod
     
@@ -96 +102 @@
     compute_pression_mid => compute_pression_mid_unst
     compute_temperature => compute_temperature_unst
+    compute_vorticity => compute_vorticity_unst
+    compute_divergence => compute_divergence_unst
     compute_hydrostatic_pressure => compute_hydrostatic_pressure_unst
     compute_vertical_interp => compute_vertical_interp_unst