Changeset 168 for trunk/SOURCES/dragging_neff_slope_mod.f90

Timestamp:

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

Author:

dumas

Message:

For compatibility update dragging modules

File:

• trunk/SOURCES/dragging_neff_slope_mod.f90 (modified) (2 diffs)

trunk/SOURCES/dragging_neff_slope_mod.f90

@@ -27 +27 @@
 use interface_input
 use io_netcdf_grisli
+use fake_beta_iter_vitbil_mod
 
 implicit none
@@ -121 +122 @@
 write(num_rep_42,*)
 
-!tostick=1.e5   ! valeurs pour les points non flgzmx
+inv_beta=0
 tob_ile=betamax/2.
 moteurmax=toblim