Changeset 3793
- Timestamp:
- 05/18/10 08:57:44 (15 years ago)
- Location:
- issm/trunk/src/m/solutions/jpl
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/m/solutions/jpl/ModelUpdateInputsFromVector.m
r3770 r3793 1 1 function ModelUpdateInputsFromVector(models, vector, enum, typeenum); 2 % INPUT ModelUpdateInputsFromVector(models, vector, enum, typeenum);2 %MODELUPDATEINPUTSFROMVECTOR - Update inputs using a vector 3 3 % 4 % Update inputs using a vector, just calls the FemModelUpdateInputsFromVector routine for all models in the 'models' structure 4 % Update inputs using a vector, just calls the FemModelUpdateInputsFromVector 5 % routine for all models in the 'models' structure 5 6 % 6 % Usage: ModelUpdateInputsFromVector(models, vector, enum, typeenum); 7 % Usage: 8 % ModelUpdateInputsFromVector(models, vector, enum, typeenum); 7 9 % 8 % ex: ModelUpdateInputsFromVector(models, vx, VxEnum, VertexEnum); 9 % ModelUpdateInputsFromVector(models, vxelem, VxEnum, ElementEnum); 10 % Example: 11 % ModelUpdateInputsFromVector(models, vx, VxEnum, VertexEnum); 12 % ModelUpdateInputsFromVector(models, vxelem, VxEnum, ElementEnum); 10 13 % 11 14 % 12 13 15 14 16 %go through models and call UpdateInputsFromVector 15 17 modelfields=fields(models); 16 18 for i=1:length(modelfields), 17 field=modelfields(i); field=field{1}; model=models.(field);19 field=modelfields(i); field=field{1}; model=models.(field); 18 20 19 21 [model.elements,model.nodes,model.vertices,model.loads,model.materials,model.parameters] = UpdateInputsFromVector(model.elements,model.nodes,model.vertices,model.loads,model.materials,model.parameters,vector,enum, typeenum); -
issm/trunk/src/m/solutions/jpl/diagnostic.m
r3752 r3793 30 30 31 31 %compute solution 32 if ~models.dh.parameters. qmu_analysis,32 if ~models.dh.parameters.QmuAnalysis, 33 33 if md.control_analysis, 34 34 %launch core of control solution. -
issm/trunk/src/m/solutions/jpl/diagnostic_core.m
r3780 r3793 14 14 15 15 %recover parameters common to all solutions 16 verbose=m_dhu.parameters. verbose;17 dim=m_dh.parameters. dim;18 ishutter=m_dhu.parameters. ishutter;19 ismacayealpattyn=m_dh.parameters. ismacayealpattyn;20 isstokes=m_ds.parameters. isstokes;21 numrifts=m_dhu.parameters. numrifts;22 qmu_analysis=m_dh.parameters. qmu_analysis;16 verbose=m_dhu.parameters.Verbose; 17 dim=m_dh.parameters.Dim; 18 ishutter=m_dhu.parameters.IsHutter; 19 ismacayealpattyn=m_dh.parameters.IsMacAyealPattyn; 20 isstokes=m_ds.parameters.IsStokes; 21 numrifts=m_dhu.parameters.NumRifts; 22 qmu_analysis=m_dh.parameters.QmuAnalysis; 23 23 24 24 -
issm/trunk/src/m/solutions/jpl/slope_core.m
r3780 r3793 1 1 function [slopex, slopey]=slope_core(fem,AnalysisEnum) 2 % INPUT [slopex, slopey]=slope_core(fem,AnalysisEnum)2 %SLOPE_CORE - Core solution to compute the slope 3 3 % 4 % Usage: [slopex, slopey]=slope_core(fem,AnalysisEnum) 4 % Usage: 5 % [slopex, slopey]=slope_core(fem,AnalysisEnum) 5 6 % 6 % Ex:7 % 8 % 7 % Examples: 8 % [bedslopex, bedslopey]=slope_core(fem,BedEnum); 9 % [surfaceslopex, surfaceslopey]=slope_core(fem,SurfaceEnum); 9 10 % 10 11 11 12 verbose=m_dhu.parameters.verbose; 13 dim=m_dh.parameters.dim; 14 isstokes=m_ds.parameters.isstokes; 15 ishutter=m_dhu.parameters.ishutter; 12 verbose=fem.parameters.Verbose; 13 dim=fem.parameters.Dim; 14 isstokes=fem.parameters.IsStokes; 15 ishutter=fem.parameters.IsHutter; 16 16 17 17 displaystring(verbose,'\n%s',['computing slope (x and y derivatives...)']); … … 27 27 displaystring(verbose,'%s%s%s','analysis ',EnumAsString(AnalysisEnum),' not supported yet!'); 28 28 end 29 30 29 31 30 %Early return possible? … … 49 48 slopey=diagnostic_core_linear(fem,SlopecomputeAnalysisEnum,yanalysis); 50 49 51 52 50 %extrude if we are in 3D: 53 51 if dim==3,
Note:
See TracChangeset
for help on using the changeset viewer.