Changeset 11832
- Timestamp:
- 03/30/12 16:39:41 (13 years ago)
- Location:
- issm/trunk-jpl/src
- Files:
-
- 21 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/solutions/adjointbalancethickness_core.cpp
r11827 r11832 17 17 /*parameters: */ 18 18 bool save_results; 19 int solution_type;20 19 21 20 /*retrieve parameters:*/ 22 21 femmodel->parameters->FindParam(&save_results,SaveResultsEnum); 23 femmodel->parameters->FindParam(&solution_type,SolutionTypeEnum);24 22 25 23 /*compute thickness */ -
issm/trunk-jpl/src/c/solutions/adjointdiagnostic_core.cpp
r11827 r11832 19 19 bool save_results; 20 20 bool conserve_loads = true; 21 int solution_type;22 21 23 22 /*retrieve parameters:*/ 24 23 femmodel->parameters->FindParam(&isstokes,FlowequationIsstokesEnum); 25 24 femmodel->parameters->FindParam(&save_results,SaveResultsEnum); 26 femmodel->parameters->FindParam(&solution_type,SolutionTypeEnum);27 25 28 26 /*Compute velocities*/ -
issm/trunk-jpl/src/c/solutions/balancethickness_core.cpp
r11827 r11832 16 16 17 17 /*parameters: */ 18 int dim;19 int solution_type;20 18 bool save_results; 21 19 … … 24 22 25 23 /*recover parameters: */ 26 femmodel->parameters->FindParam(&dim,MeshDimensionEnum);27 24 femmodel->parameters->FindParam(&save_results,SaveResultsEnum); 28 femmodel->parameters->FindParam(&solution_type,SolutionTypeEnum);29 25 30 26 _printf_(VerboseSolution(),"call computational core:\n"); -
issm/trunk-jpl/src/c/solutions/bedslope_core.cpp
r11827 r11832 14 14 15 15 /*parameters: */ 16 int dim;17 bool isstokes;18 bool ishutter;19 16 bool save_results; 20 int solution_type;21 17 22 18 /*Recover some parameters: */ 23 femmodel->parameters->FindParam(&dim,MeshDimensionEnum);24 19 femmodel->parameters->FindParam(&save_results,SaveResultsEnum); 25 femmodel->parameters->FindParam(&solution_type,SolutionTypeEnum);26 20 27 21 _printf_(VerboseSolution(),"%s\n"," computing slope"); -
issm/trunk-jpl/src/c/solutions/hydrology_core.cpp
r11827 r11832 22 22 double dt; 23 23 bool save_results; 24 int solution_type;25 24 int output_frequency; 26 25 … … 30 29 femmodel->parameters->FindParam(&dt,TimesteppingTimeStepEnum); 31 30 femmodel->parameters->FindParam(&save_results,SaveResultsEnum); 32 femmodel->parameters->FindParam(&solution_type,SolutionTypeEnum);33 31 femmodel->parameters->FindParam(&output_frequency,SettingsOutputFrequencyEnum); 34 32 /*first compute slopes: */ -
issm/trunk-jpl/src/c/solutions/prognostic_core.cpp
r11827 r11832 15 15 16 16 /*parameters: */ 17 int solution_type;18 17 bool save_results; 19 18 … … 23 22 /*recover parameters: */ 24 23 femmodel->parameters->FindParam(&save_results,SaveResultsEnum); 25 femmodel->parameters->FindParam(&solution_type,SolutionTypeEnum);26 24 27 25 _printf_(VerboseSolution()," call computational core\n"); -
issm/trunk-jpl/src/c/solutions/steadystate_core.cpp
r11827 r11832 26 26 /*parameters: */ 27 27 bool save_results,isenthalpy; 28 int dim;29 int solution_type;30 28 int maxiter; 31 29 int numoutputs = 0; … … 33 31 34 32 /* recover parameters:*/ 35 femmodel->parameters->FindParam(&dim,MeshDimensionEnum);36 33 femmodel->parameters->FindParam(&save_results,SaveResultsEnum); 37 femmodel->parameters->FindParam(&solution_type,SolutionTypeEnum);38 34 femmodel->parameters->FindParam(&maxiter,SteadystateMaxiterEnum); 39 35 femmodel->parameters->FindParam(&numoutputs,SteadystateNumRequestedOutputsEnum); 40 36 femmodel->parameters->FindParam(&isenthalpy,ThermalIsenthalpyEnum); 37 femmodel->parameters->SetParam(false,SaveResultsEnum); 41 38 if(numoutputs) femmodel->parameters->FindParam(&requested_outputs,&numoutputs,SteadystateRequestedOutputsEnum); 42 39 -
issm/trunk-jpl/src/c/solutions/surfaceslope_core.cpp
r11827 r11832 14 14 15 15 /*parameters: */ 16 int dim;17 bool isstokes;18 bool ishutter;19 16 bool save_results; 20 int solution_type;21 17 22 18 /*Recover some parameters: */ 23 femmodel->parameters->FindParam(&dim,MeshDimensionEnum);24 19 femmodel->parameters->FindParam(&save_results,SaveResultsEnum); 25 femmodel->parameters->FindParam(&solution_type,SolutionTypeEnum);26 20 27 21 _printf_(VerboseSolution(),"%s\n","computing slope..."); -
issm/trunk-jpl/src/c/solutions/transient_core.cpp
r11830 r11832 27 27 bool save_results,dakota_analysis; 28 28 bool time_adapt=false; 29 int solution_type;30 29 int output_frequency; 31 30 int dim,groundingline_migration; … … 44 43 femmodel->parameters->FindParam(&yts,ConstantsYtsEnum); 45 44 femmodel->parameters->FindParam(&dakota_analysis,QmuIsdakotaEnum); 46 femmodel->parameters->FindParam(&solution_type,SolutionTypeEnum);47 45 femmodel->parameters->FindParam(&output_frequency,SettingsOutputFrequencyEnum); 48 46 femmodel->parameters->FindParam(&time_adapt,TimesteppingTimeAdaptEnum); -
issm/trunk-jpl/src/m/solutions/adjointbalancethickness_core.m
r11827 r11832 7 7 %recover parameters common to all solutions 8 8 save_results=femmodel.parameters.SaveResults; 9 solution_type=femmodel.parameters.SolutionType;10 9 11 10 %set analysis type to compute velocity: -
issm/trunk-jpl/src/m/solutions/adjointdiagnostic_core.m
r11827 r11832 7 7 %recover parameters common to all solutions 8 8 isstokes=femmodel.parameters.FlowequationIsstokes; 9 dim=femmodel.parameters.MeshDimension;10 9 save_results=femmodel.parameters.SaveResults; 11 solution_type=femmodel.parameters.SolutionType;12 10 conserve_loads=true; 13 11 -
issm/trunk-jpl/src/m/solutions/balancethickness_core.m
r11827 r11832 6 6 7 7 %recover parameters common to all solutions 8 dim=femmodel.parameters.MeshDimension;9 8 save_results=femmodel.parameters.SaveResults; 10 solution_type=femmodel.parameters.SolutionType;11 9 12 10 %Activate formulation -
issm/trunk-jpl/src/m/solutions/bedslope_core.m
r11827 r11832 7 7 8 8 %Recover some parameters: 9 dim=femmodel.parameters.MeshDimension;10 9 save_results=femmodel.parameters.SaveResults; 11 solution_type=femmodel.parameters.SolutionType;12 10 13 11 issmprintf(VerboseSolution,' computing bed slope'); -
issm/trunk-jpl/src/m/solutions/control_core.m
r11827 r11832 17 17 tol_cm=femmodel.parameters.InversionCostFunctionThreshold; 18 18 gradient_only=femmodel.parameters.InversionGradientOnly; 19 dim=femmodel.parameters.MeshDimension;20 19 isstokes=femmodel.parameters.FlowequationIsstokes; 21 20 femmodel.parameters.SaveResults=false; -
issm/trunk-jpl/src/m/solutions/diagnostic_core.m
r11827 r11832 11 11 12 12 %recover parameters common to all solutions 13 dim=femmodel.parameters.MeshDimension;14 13 ishutter=femmodel.parameters.FlowequationIshutter; 15 14 ismacayealpattyn=femmodel.parameters.FlowequationIsmacayealpattyn; -
issm/trunk-jpl/src/m/solutions/enthalpy_core.m
r11830 r11832 7 7 %recover parameters common to all solutions 8 8 save_results=femmodel.parameters.SaveResults; 9 solution_type=femmodel.parameters.SolutionType;10 9 11 10 issmprintf(VerboseSolution,'\n%s',[' computing enthalpy']); -
issm/trunk-jpl/src/m/solutions/prognostic_core.m
r11827 r11832 7 7 %recover parameters common to all solutions 8 8 save_results=femmodel.parameters.SaveResults; 9 solution_type=femmodel.parameters.SolutionType;10 9 11 10 %Activate formulation -
issm/trunk-jpl/src/m/solutions/steadystate_core.m
r11827 r11832 7 7 8 8 %recover parameters common to all solutions 9 dim=femmodel.parameters.MeshDimension;10 9 save_results=femmodel.parameters.SaveResults; 11 solution_type=femmodel.parameters.SolutionType;12 10 isenthalpy=femmodel.parameters.ThermalIsenthalpy; 11 femmodel.parameters.SaveResults=false; 13 12 14 13 %Initialize counter -
issm/trunk-jpl/src/m/solutions/surfaceslope_core.m
r11827 r11832 7 7 8 8 %Recover some parameters: 9 dim=femmodel.parameters.MeshDimension;10 9 save_results=femmodel.parameters.SaveResults; 11 solution_type=femmodel.parameters.SolutionType;12 10 13 11 %Call on core computations: -
issm/trunk-jpl/src/m/solutions/thermal_core.m
r11830 r11832 8 8 %recover parameters common to all solutions 9 9 save_results=femmodel.parameters.SaveResults; 10 solution_type=femmodel.parameters.SolutionType;11 10 12 11 issmprintf(VerboseSolution,'\n%s',[' computing temperature']); -
issm/trunk-jpl/src/m/solutions/transient_core.m
r11830 r11832 6 6 7 7 %recover parameters common to all solutions 8 dim=femmodel.parameters.MeshDimension;9 8 starttime=femmodel.parameters.TimesteppingStartTime; 10 9 finaltime=femmodel.parameters.TimesteppingFinalTime; 11 10 dt=femmodel.parameters.TimesteppingTimeStep; 12 11 yts=femmodel.parameters.ConstantsYts; 13 solution_type=femmodel.parameters.SolutionType;14 12 output_frequency=femmodel.parameters.SettingsOutputFrequency; 15 13 time_adapt=femmodel.parameters.TimesteppingTimeAdapt;
Note:
See TracChangeset
for help on using the changeset viewer.