Changeset 68 for trunk/SOURCES/GrIce2sea_files

Timestamp:

06/03/16 16:06:35 (8 years ago)

Author:

dumas

Message:

No sliding in module_choix | Antarctic 15km configuration usable | Use depth instade of dist_talus in bmelt-ant-regions_mod.f90

File:

• trunk/SOURCES/GrIce2sea_files/climat_GrIce2sea_years_perturb_mod.f90 (modified) (1 diff)

trunk/SOURCES/GrIce2sea_files/climat_GrIce2sea_years_perturb_mod.f90

@@ -421 +421 @@
         end if
         
-        coefbmshelf=(1.+tafor/10.)
+        ! coefmshelf est un coefficient qui fait varier bmgrz et bmshelf en fonction de tafor
+        coefbmshelf=(1.+tafor/10.)       ! coefbmshelf=0 pour tafor=-10deg
         coefbmshelf=max(coefbmshelf,0.)  
         coefbmshelf=min(coefbmshelf,2.)