Changeset 168 for trunk/SOURCES/dragging_hwatermax_0.2_mod.f90

Timestamp:

12/13/17 18:13:38 (7 years ago)

Author:

dumas

Message:

For compatibility update dragging modules

File:

• trunk/SOURCES/dragging_hwatermax_0.2_mod.f90 (modified) (2 diffs)

trunk/SOURCES/dragging_hwatermax_0.2_mod.f90

@@ -15 +15 @@
   ! Defini les zones de stream avec un critere sur la hauteur d'eau
 
-  USE module3D_phy
-
+  use module3D_phy
+  use fake_beta_iter_vitbil_mod
 
 
@@ -59 +59 @@
     write(num_rep_42,*)
 
+    inv_beta=0
     tostick=1.e5   ! valeurs pour les points non flgzmx