Changeset 14632
- Timestamp:
- 04/17/13 11:23:14 (12 years ago)
- Location:
- issm/trunk-jpl/src/c
- Files:
-
- 5 edited
- 1 moved
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/Makefile.am
r14628 r14632 198 198 ./shared/Numerics/UnitConversion.cpp\ 199 199 ./shared/Numerics/OptionsFromAnalysis.cpp\ 200 ./shared/Numerics/ToolkitsOptionsFromAnalysis.cpp\ 200 201 ./shared/Exceptions/exceptions.h\ 201 202 ./shared/Exceptions/Exceptions.cpp\ … … 728 729 ./toolkits/petsc/objects/PetscVec.cpp\ 729 730 ./toolkits/petsc/petscincludes.h\ 730 ./shared/Numerics/PetscOptionsFromAnalysis.cpp\731 731 ./modules/Solverx/SolverxPetsc.cpp\ 732 732 ./modules/Solverx/DofTypesToIndexSet.cpp -
issm/trunk-jpl/src/c/classes/FemModel.cpp
r14628 r14632 270 270 this->loads->SetCurrentConfiguration(elements, loads, nodes,vertices, materials,parameters); 271 271 272 #ifdef _HAVE_PETSC_ 273 /*take care of petsc options, that depend on this analysis type (present only after model processor)*/ 274 if(this->parameters->Exist(PetscOptionsStringsEnum)){ 275 PetscOptionsFromAnalysis(this->parameters,analysis_type); 276 if(VerboseSolver()) _pprintLine_(" petsc Options set for analysis type: " << EnumToStringx(analysis_type)); 277 } 278 #endif 272 /*take care of toolkits options, that depend on this analysis type (present only after model processor)*/ 273 if(this->parameters->Exist(ToolkitsOptionsStringsEnum)){ 274 ToolkitsOptionsFromAnalysis(this->parameters,analysis_type); 275 if(VerboseSolver()) _pprintLine_(" toolkits Options set for analysis type: " << EnumToStringx(analysis_type)); 276 } 279 277 280 278 } -
issm/trunk-jpl/src/c/modules/modules.h
r14279 r14632 69 69 #include "./SurfaceAverageVelMisfitx/SurfaceAverageVelMisfitx.h" 70 70 #include "./ModelProcessorx/ModelProcessorx.h" 71 #include "./Parse PetscOptionsx/ParsePetscOptionsx.h"71 #include "./ParseToolkitsOptionsx/ParseToolkitsOptionsx.h" 72 72 #include "./NodalValuex/NodalValuex.h" 73 73 #include "./NodeConnectivityx/NodeConnectivityx.h" -
issm/trunk-jpl/src/c/shared/Numerics/OptionsFromAnalysis.cpp
r13622 r14632 30 30 31 31 numanalyses=0; 32 parameters->FindParam(&strings,&numanalyses, PetscOptionsStringsEnum);32 parameters->FindParam(&strings,&numanalyses,ToolkitsOptionsStringsEnum); 33 33 34 parameters->FindParam(&analyses,&dummy, PetscOptionsAnalysesEnum);34 parameters->FindParam(&analyses,&dummy,ToolkitsOptionsAnalysesEnum); 35 35 36 36 if(numanalyses==0)return NULL; //we did not find petsc options, don't bother. -
issm/trunk-jpl/src/c/shared/Numerics/ToolkitsOptionsFromAnalysis.cpp
r14625 r14632 1 /*!\file: PetscOptionsFromAnalysis.cpp 2 * \brief: change petsc options using analysis type and parameters 1 /*!\file: ToolkitsOptionsFromAnalysis.cpp 2 * \brief: this is mainly for the case where we run our toolkits using petsc. In this case, we need to 3 * plug our toolkits options directly into the petsc options database. This is the case for each analysis type 4 * and parameters 3 5 */ 4 6 … … 13 15 #include "../../toolkits/toolkits.h" 14 16 15 void PetscOptionsFromAnalysis(Parameters* parameters,int analysis_type){17 void ToolkitsOptionsFromAnalysis(Parameters* parameters,int analysis_type){ 16 18 17 19 /*intermediary: */ … … 21 23 options=OptionsFromAnalysis(parameters,analysis_type); 22 24 23 /*now, reset the options database with this string. Taken from petsc/install/src/sys/objects/pinit.c. This25 /*now, reset the petsc options database with this string. Taken from petsc/install/src/sys/objects/pinit.c. This 24 26 *capability is not covered by Petsc!: */ 27 28 #ifdef _HAVE_PETSC_ 25 29 26 30 #if _PETSC_MAJOR_ == 2 … … 38 42 #endif 39 43 44 #endif 45 40 46 /*Free ressources:*/ 41 47 xDelete<char>(options); -
issm/trunk-jpl/src/c/shared/Numerics/numerics.h
r13061 r14632 31 31 void XZvectorsToCoordinateSystem(IssmDouble *T,IssmDouble*xzvectors); 32 32 int cubic(IssmDouble a, IssmDouble b, IssmDouble c, IssmDouble d, double X[3], int *num); 33 #ifdef _HAVE_PETSC_ 34 void PetscOptionsFromAnalysis(Parameters* parameters,int analysis_type); 35 #endif 33 void ToolkitsOptionsFromAnalysis(Parameters* parameters,int analysis_type); 36 34 37 35 #endif //ifndef _NUMERICS_H_
Note:
See TracChangeset
for help on using the changeset viewer.