Changeset 4302
- Timestamp:
- 06/29/10 08:47:59 (15 years ago)
- Location:
- issm/trunk/src/m/solutions
- Files:
-
- 6 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/m/solutions/bedslope.m
r4296 r4302 1 function md=bedslope compute(md);2 % SLOPECOMPUTE - compute the bed slope of a model1 function md=bedslope(md); 2 %BEDSLOPE - compute the bed slope of a model 3 3 % 4 4 % Usage: … … 9 9 10 10 numanalyses=1; 11 analyses= SlopeAnalysisEnum;12 solution_type= SlopeSolutionEnum;11 analyses=BedSlopeAnalysisEnum; 12 solution_type=BedSlopeSolutionEnum; 13 13 14 14 displaystring(md.verbose,'%s',['create finite element model']); -
issm/trunk/src/m/solutions/bedslope_core.m
r4222 r4302 1 1 function femmodel=bedslope_core(femmodel) 2 % SURFACESLOPE_CORE - core of the bed slope computation solution2 %BEDSLOPE_CORE - core of the bed slope computation solution 3 3 % 4 4 % Usage: … … 13 13 14 14 %Call on core computations: 15 femmodel=SetCurrentAnalysisAlias(femmodel, SlopeAnalysisEnum,SurfaceSlopeXAnalysisEnum);15 femmodel=SetCurrentAnalysisAlias(femmodel,BedSlopeAnalysisEnum,BedSlopeXAnalysisEnum); 16 16 femmodel=solver_linear(femmodel); 17 femmodel=SetCurrentAnalysisAlias(femmodel, SlopeAnalysisEnum,SurfaceSlopeYAnalysisEnum);17 femmodel=SetCurrentAnalysisAlias(femmodel,BedSlopeAnalysisEnum,BedSlopeYAnalysisEnum); 18 18 femmodel=solver_linear(femmodel); 19 19 20 20 %extrude inputs if we are in 3D: */ 21 21 if dim==3, 22 displaystring(verbose,'\n%s',['extruding bed slope in 3d...']);23 femmodel.elements=InputExtrude(femmodel.elements,femmodel.nodes, femmodel.vertices,femmodel.loads, femmodel.materials,femmodel.parameters, SurfaceSlopeXEnum);24 femmodel.elements=InputExtrude(femmodel.elements,femmodel.nodes, femmodel.vertices,femmodel.loads, femmodel.materials,femmodel.parameters, SurfaceSlopeYEnum);22 displaystring(verbose,'\n%s',['extruding bed slope in 3d...']); 23 femmodel.elements=InputExtrude(femmodel.elements,femmodel.nodes, femmodel.vertices,femmodel.loads, femmodel.materials,femmodel.parameters,BedSlopeXEnum); 24 femmodel.elements=InputExtrude(femmodel.elements,femmodel.nodes, femmodel.vertices,femmodel.loads, femmodel.materials,femmodel.parameters,BedSlopeYEnum); 25 25 } 26 26 27 27 displaystring(verbose,'\n%s',['saving results...']); 28 femmodel.elements=InputToResult(femmodel.elements,femmodel.nodes,femmodel.vertices,femmodel.loads,femmodel.materials,femmodel.parameters, SurfaceSlopeXEnum);29 femmodel.elements=InputToResult(femmodel.elements,femmodel.nodes,femmodel.vertices,femmodel.loads,femmodel.materials,femmodel.parameters, SurfaceSlopeYEnum);28 femmodel.elements=InputToResult(femmodel.elements,femmodel.nodes,femmodel.vertices,femmodel.loads,femmodel.materials,femmodel.parameters,BedSlopeXEnum); 29 femmodel.elements=InputToResult(femmodel.elements,femmodel.nodes,femmodel.vertices,femmodel.loads,femmodel.materials,femmodel.parameters,BedSlopeYEnum); -
issm/trunk/src/m/solutions/steadystate.m
r4296 r4302 9 9 t1=clock; 10 10 11 numanalyses= 7;12 analyses=[DiagnosticHorizAnalysisEnum;DiagnosticVertAnalysisEnum;DiagnosticStokesAnalysisEnum;DiagnosticHutterAnalysisEnum;S lopeAnalysisEnum;ThermalAnalysisEnum;MeltingAnalysisEnum];11 numanalyses=8; 12 analyses=[DiagnosticHorizAnalysisEnum;DiagnosticVertAnalysisEnum;DiagnosticStokesAnalysisEnum;DiagnosticHutterAnalysisEnum;SurfaceSlopeAnalysisEnum;BedSlopeAnalysisEnum;ThermalAnalysisEnum;MeltingAnalysisEnum]; 13 13 solution_type=SteadyStateSolutionEnum; 14 14 -
issm/trunk/src/m/solutions/surfaceslope.m
r4296 r4302 1 function md=surfaceslope compute(md);2 %S LOPECOMPUTE - compute the surface slope of a model1 function md=surfaceslope(md); 2 %SURFACESLOPE - compute the surface slope of a model 3 3 % 4 4 % Usage: … … 9 9 10 10 numanalyses=1; 11 analyses=[S lopeAnalysisEnum];12 solution_type=S lopeSolutionEnum;11 analyses=[SurfaceSlopeAnalysisEnum]; 12 solution_type=SurfaceSlopeSolutionEnum; 13 13 14 14 displaystring(md.verbose,'%s',['create finite element model']); -
issm/trunk/src/m/solutions/surfaceslope_core.m
r4136 r4302 13 13 14 14 %Call on core computations: 15 femmodel=SetCurrentAnalysisAlias(femmodel,S lopeAnalysisEnum,SurfaceSlopeXAnalysisEnum);15 femmodel=SetCurrentAnalysisAlias(femmodel,SurfaceSlopeAnalysisEnum,SurfaceSlopeXAnalysisEnum); 16 16 femmodel=solver_linear(femmodel); 17 femmodel=SetCurrentAnalysisAlias(femmodel,S lopeAnalysisEnum,SurfaceSlopeYAnalysisEnum);17 femmodel=SetCurrentAnalysisAlias(femmodel,SurfaceSlopeAnalysisEnum,SurfaceSlopeYAnalysisEnum); 18 18 femmodel=solver_linear(femmodel); 19 19 -
issm/trunk/src/m/solutions/transient3d.m
r4296 r4302 9 9 t1=clock; 10 10 11 numanalyses= 8;12 analyses=[DiagnosticHorizAnalysisEnum;DiagnosticVertAnalysisEnum;DiagnosticStokesAnalysisEnum;DiagnosticHutterAnalysisEnum;S lopeAnalysisEnum;PrognosticAnalysisEnum;ThermalAnalysisEnum;MeltingAnalysisEnum];11 numanalyses=9; 12 analyses=[DiagnosticHorizAnalysisEnum;DiagnosticVertAnalysisEnum;DiagnosticStokesAnalysisEnum;DiagnosticHutterAnalysisEnum;SurfaceSlopeAnalysisEnum;BedSlopeAnalysisEnum;PrognosticAnalysisEnum;ThermalAnalysisEnum;MeltingAnalysisEnum]; 13 13 solution_type=Transient3DSolutionEnum; 14 14
Note:
See TracChangeset
for help on using the changeset viewer.