Changeset 703

Timestamp:

06/02/09 11:40:45 (16 years ago)

Author:

Mathieu Morlighem

Message:

melting in m/yr in steady

File:

• issm/trunk/src/m/solutions/ice/thermal.m (modified) (2 diffs)

issm/trunk/src/m/solutions/ice/thermal.m

@@ -48 +48 @@
         md.results.thermal.time=0;
         md.results.thermal.temperature=t_g(indx);
-        md.results.thermal.melting=melting_g(indx); %from m/s to m/a
+        md.results.thermal.melting=melting_g(indx)*md.yts; %from m/s to m/a
 else
 
@@ -61 +61 @@
         soln.melting_g=melting;
         soln.time=0;
-
 
         for n=1:nsteps,