Changeset 9612 for issm/trunk/src/m/model/extrude.m

Timestamp:

09/06/11 12:22:11 (14 years ago)

Author:

seroussi

Message:

moved fields into basalforcings

File:

• issm/trunk/src/m/model/extrude.m (modified) (1 diff)

issm/trunk/src/m/model/extrude.m

@@ -221 +221 @@
 
 %special for thermal modeling:
-md.basal_melting_rate=project3d(md,'vector',md.basal_melting_rate,'type','node','layer',1); 
-if ~isnan(md.geothermalflux)
-        md.geothermalflux=project3d(md,'vector',md.geothermalflux,'type','node','layer',1); %bedrock only gets geothermal flux
+md.basalforcings.melting_rate=project3d(md,'vector',md.basalforcings.melting_rate,'type','node','layer',1); 
+if ~isnan(md.basalforcings.geothermalflux)
+        md.basalforcings.geothermalflux=project3d(md,'vector',md.basalforcings.geothermalflux,'type','node','layer',1); %bedrock only gets geothermal flux
 end