Changeset 949 for codes/icosagcm/devel/src/dynamics

Timestamp:

07/13/19 17:01:16 (5 years ago)

Author:

dubos

Message:

devel : generic compute_caldyn_slow_hydro + fixes

File:

• codes/icosagcm/devel/src/dynamics/caldyn_hevi.f90 (modified) (2 diffs)

codes/icosagcm/devel/src/dynamics/caldyn_hevi.f90

@@ -6 +6 @@
   USE compute_caldyn_vert_NH_mod, ONLY : compute_caldyn_vert_NH => compute_caldyn_vert_NH_manual
   USE compute_caldyn_kv_mod, ONLY : compute_caldyn_kv
-  USE compute_caldyn_slow_hydro_mod, ONLY : compute_caldyn_slow_hydro => compute_caldyn_slow_hydro_manual
   USE compute_caldyn_slow_NH_mod, ONLY : compute_caldyn_slow_NH
   USE compute_caldyn_solver_mod, ONLY : compute_caldyn_solver
@@ -32 +31 @@
     USE checksum_mod
     USE compute_caldyn_mod, ONLY : compute_pvort_only, compute_theta, &
-         compute_geopot, compute_caldyn_fast, compute_caldyn_coriolis
+         compute_geopot, compute_caldyn_fast, compute_caldyn_coriolis, compute_caldyn_slow_hydro
     IMPLICIT NONE
     LOGICAL,INTENT(IN)    :: write_out