Changeset 11527 for issm/trunk/src/m/model/extrude.m
- Timestamp:
- 02/24/12 08:12:47 (13 years ago)
- Location:
- issm/trunk
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk
-
issm/trunk/src/m
-
Property svn:ignore
set to
Makefile.in
Makefile
-
Property svn:ignore
set to
-
issm/trunk/src/m/model
-
Property svn:ignore
set to
Makefile.in
Makefile
-
Property svn:ignore
set to
-
issm/trunk/src/m/model/extrude.m
r11055 r11527 137 137 md.inversion.vel_obs=project3d(md,'vector',md.inversion.vel_obs,'type','node'); 138 138 md.surfaceforcings.mass_balance=project3d(md,'vector',md.surfaceforcings.mass_balance,'type','node'); 139 md.surfaceforcings.accumulation_rate=project3d(md,'vector',md.surfaceforcings.accumulation_rate,'type','node'); 140 md.surfaceforcings.ablation_rate=project3d(md,'vector',md.surfaceforcings.ablation_rate,'type','node'); 139 md.surfaceforcings.precipitation=project3d(md,'vector',md.surfaceforcings.precipitation,'type','node'); 141 140 md.balancethickness.thickening_rate=project3d(md,'vector',md.balancethickness.thickening_rate,'type','node'); 142 141 … … 194 193 for i=2:numlayers-1, 195 194 md.mesh.elementconnectivity((i-1)*md.mesh.numberofelements2d+1:(i)*md.mesh.numberofelements2d,:)... 196 =md.mesh.elementconnectivity((i-1)*md.mesh.numberofelements2d+1:(i)*md.mesh.numberofelements2d,:)+md.mesh.numberofelements2d;195 =md.mesh.elementconnectivity((i-1)*md.mesh.numberofelements2d+1:(i)*md.mesh.numberofelements2d,:)+md.mesh.numberofelements2d; 197 196 end 198 197 md.mesh.elementconnectivity(find(isnan(md.mesh.elementconnectivity)))=0; … … 216 215 md.mask.vertexonwater=project3d(md,'vector',md.mask.vertexonwater,'type','node'); 217 216 if ~isnan(md.inversion.cost_functions_coefficients),md.inversion.cost_functions_coefficients=project3d(md,'vector',md.inversion.cost_functions_coefficients,'type','node');end; 218 219 %Put lithostatic pressure is there is an existing pressure 217 if ~isnan(md.qmu.partition),md.qmu.partition=project3d(md,'vector',md.qmu.partition','type','node');end 218 219 %Put lithostatic pressure if there is an existing pressure 220 220 if ~isnan(md.initialization.pressure), 221 221 md.initialization.pressure=md.constants.g*md.materials.rho_ice*(md.geometry.surface-md.mesh.z);
Note:
See TracChangeset
for help on using the changeset viewer.