Changeset 14688
- Timestamp:
- 04/22/13 09:38:21 (12 years ago)
- Location:
- issm/trunk-jpl/src/c
- Files:
-
- 10 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/EnumDefinitions/EnumDefinitions.h
r14656 r14688 11 11 12 12 enum definitions{ 13 /*Model fields {{{ 1*/13 /*Model fields {{{*/ 14 14 AutodiffIsautodiffEnum, 15 15 AutodiffNumDependentsEnum, … … 233 233 TransientRequestedOutputsEnum, 234 234 /*}}}*/ 235 /*Solutions and Analyses{{{ 1*/235 /*Solutions and Analyses{{{ */ 236 236 SolutionTypeEnum, 237 237 AnalysisTypeEnum, … … 241 241 AdjointSolutionEnum, 242 242 AnalysisCounterEnum, 243 NoneAnalysisEnum, 244 DefaultAnalysisEnum, 243 245 BalancethicknessAnalysisEnum, 244 246 BalancethicknessSolutionEnum, … … 260 262 HydrologySolutionEnum, 261 263 MeltingAnalysisEnum, 262 NoneAnalysisEnum,263 264 PrognosticAnalysisEnum, 264 265 PrognosticSolutionEnum, … … 274 275 GiaAnalysisEnum, 275 276 /*}}}*/ 276 /*Approximations {{{ 1*/277 /*Approximations {{{*/ 277 278 ApproximationEnum, 278 279 NoneApproximationEnum, … … 286 287 StokesApproximationEnum, 287 288 /*}}}*/ 288 /*Datasets {{{ 1*/289 /*Datasets {{{*/ 289 290 ConstraintsEnum, 290 291 LoadsEnum, … … 295 296 ResultsEnum, 296 297 /*}}}*/ 297 /*Objects {{{ 1*/298 /*Objects {{{*/ 298 299 GenericParamEnum, 299 300 AdolcParamEnum, … … 321 322 IntVecParamEnum, 322 323 TransientParamEnum, 324 IceFrontTypeEnum, 323 325 MacAyeal2dIceFrontEnum, 324 326 MacAyeal3dIceFrontEnum, … … 328 330 NodeEnum, 329 331 NumericalfluxEnum, 332 NumericalfluxTypeEnum, 330 333 ParamEnum, 331 334 L1L2IceFrontEnum, … … 339 342 VectorParamEnum, 340 343 RiftfrontEnum, 344 RiftfrontTypeEnum, 341 345 SegmentEnum, 342 346 SegmentRiftfrontEnum, … … 351 355 VertexEnum, 352 356 /*}}}*/ 353 /*Fill {{{ 1*/357 /*Fill {{{*/ 354 358 AirEnum, 355 359 IceEnum, … … 357 361 WaterEnum, 358 362 /*}}}*/ 359 /*Rift state {{{ 1*/363 /*Rift state {{{*/ 360 364 ClosedEnum, 361 365 FreeEnum, 362 366 OpenEnum, 363 367 /*}}}*/ 364 /*Inputs {{{ 1*/368 /*Inputs {{{*/ 365 369 AdjointpEnum, 366 370 AdjointxEnum, … … 410 414 TemperaturePicardEnum, 411 415 ThicknessAbsMisfitEnum, 412 TypeEnum,413 416 VelEnum, 414 417 VelocityEnum, … … 453 456 GiaWEnum, 454 457 /*}}}*/ 455 /*Element Interpolations{{{ 1*/458 /*Element Interpolations{{{*/ 456 459 P0Enum, 457 460 P1Enum, 458 461 P1DGEnum, 459 462 /*}}}*/ 460 /*Results{{{ 1*/463 /*Results{{{*/ 461 464 SaveResultsEnum, 462 465 BoolElementResultEnum, … … 477 480 WaterColumnOldEnum, 478 481 /*}}}*/ 479 /*Responses{{{ 1*/482 /*Responses{{{*/ 480 483 MinVelEnum, 481 484 MaxVelEnum, … … 492 495 TotalSmbEnum, 493 496 /*}}}*/ 494 /*Convergence{{{ 1*/497 /*Convergence{{{*/ 495 498 RelativeEnum, 496 499 AbsoluteEnum, 497 500 IncrementalEnum, 498 501 /*}}}*/ 499 /*Grounding Line{{{ 1*/502 /*Grounding Line{{{*/ 500 503 AgressiveMigrationEnum, 501 504 NoneEnum, … … 505 508 GLlevelsetEnum, 506 509 /*}}}*/ 507 /*Solver{{{ 1*/510 /*Solver{{{*/ 508 511 StokesSolverEnum, 509 512 /*}}}*/ 510 /*Parameters{{{ 1*/513 /*Parameters{{{*/ 511 514 AdjointEnum, 512 515 ColinearEnum, … … 538 541 VerboseEnum, 539 542 /*}}}*/ 540 /*Interpolation {{{ 1*/543 /*Interpolation {{{*/ 541 544 TriangleInterpEnum, 542 545 BilinearInterpEnum, 543 546 NearestInterpEnum, 544 547 /*}}}*/ 545 /*Coordinate Systems{{{ 1*/548 /*Coordinate Systems{{{*/ 546 549 XYEnum, 547 550 XYZPEnum, 548 551 /*}}}*/ 549 /*Toolkits{{{ 1*/552 /*Toolkits{{{*/ 550 553 DenseEnum, 551 554 MpiDenseEnum, … … 553 556 MpiEnum, 554 557 /*}}}*/ 555 /*Options{{{ 1*/558 /*Options{{{*/ 556 559 OptionEnum, 557 560 GenericOptionEnum, … … 562 565 OptionLogicalEnum, 563 566 /*}}}*/ 564 /*Rheology law (move too Material) {{{ 1*/567 /*Rheology law (move too Material) {{{*/ 565 568 PatersonEnum, 566 569 ArrheniusEnum, -
issm/trunk-jpl/src/c/classes/ToolkitOptions.cpp
r14687 r14688 35 35 36 36 }/*}}}*/ 37 char* ToolkitOptions::GetToolkitOptionValue(c har* option){ /*{{{*/37 char* ToolkitOptions::GetToolkitOptionValue(const char* option){ /*{{{*/ 38 38 39 39 return TokenValue(toolkitoptions,option); -
issm/trunk-jpl/src/c/classes/ToolkitOptions.h
r14656 r14688 26 26 static void Init(char* options); 27 27 static char* GetToolkitType(void); 28 static char* GetToolkitOptionValue(c har* option);28 static char* GetToolkitOptionValue(const char* option); 29 29 }; 30 30 -
issm/trunk-jpl/src/c/classes/objects/Loads/Icefront.cpp
r13925 r14688 103 103 this->inputs=new Inputs(); 104 104 this->inputs->AddInput(new IntInput(FillEnum,icefront_fill)); 105 this->inputs->AddInput(new IntInput( TypeEnum,in_icefront_type));105 this->inputs->AddInput(new IntInput(IceFrontTypeEnum,in_icefront_type)); 106 106 107 107 //parameters and hooked fields: we still can't point to them, they may not even exist. Configure will handle this. … … 275 275 276 276 int type; 277 inputs->GetInputValue(&type, TypeEnum);277 inputs->GetInputValue(&type,IceFrontTypeEnum); 278 278 _assert_(sidlist); 279 279 _assert_(nodes); … … 299 299 300 300 int type; 301 inputs->GetInputValue(&type, TypeEnum);301 inputs->GetInputValue(&type,IceFrontTypeEnum); 302 302 303 303 switch(type){ … … 461 461 462 462 int type; 463 inputs->GetInputValue(&type, TypeEnum);463 inputs->GetInputValue(&type,IceFrontTypeEnum); 464 464 465 465 switch(type){ … … 589 589 icefront=(Icefront*)this->copy(); 590 590 icefront->element=tria; 591 icefront->inputs->AddInput(new IntInput( TypeEnum,MacAyeal2dIceFrontEnum));591 icefront->inputs->AddInput(new IntInput(IceFrontTypeEnum,MacAyeal2dIceFrontEnum)); 592 592 ElementVector* pe=icefront->CreatePVectorDiagnosticMacAyeal2d(); 593 593 … … 767 767 768 768 /*recover type: */ 769 inputs->GetInputValue(&type, TypeEnum);769 inputs->GetInputValue(&type,IceFrontTypeEnum); 770 770 771 771 /*Some checks for debugging*/ -
issm/trunk-jpl/src/c/classes/objects/Loads/Numericalflux.cpp
r13925 r14688 131 131 //intialize and add as many inputs per element as requested: 132 132 this->inputs=new Inputs(); 133 this->inputs->AddInput(new IntInput( TypeEnum,numericalflux_type));133 this->inputs->AddInput(new IntInput(NumericalfluxTypeEnum,numericalflux_type)); 134 134 135 135 //this->parameters: we still can't point to it, it may not even exist. Configure will handle this. … … 309 309 310 310 int type; 311 inputs->GetInputValue(&type, TypeEnum);311 inputs->GetInputValue(&type,NumericalfluxTypeEnum); 312 312 _assert_(sidlist); 313 313 _assert_(nodes); … … 329 329 330 330 int type; 331 inputs->GetInputValue(&type, TypeEnum);331 inputs->GetInputValue(&type,NumericalfluxTypeEnum); 332 332 333 333 switch(type){ … … 426 426 427 427 int type; 428 inputs->GetInputValue(&type, TypeEnum);428 inputs->GetInputValue(&type,NumericalfluxTypeEnum); 429 429 430 430 switch(type){ … … 579 579 580 580 int type; 581 inputs->GetInputValue(&type, TypeEnum);581 inputs->GetInputValue(&type,NumericalfluxTypeEnum); 582 582 583 583 switch(type){ … … 730 730 731 731 int type; 732 inputs->GetInputValue(&type, TypeEnum);732 inputs->GetInputValue(&type,NumericalfluxTypeEnum); 733 733 734 734 switch(type){ … … 762 762 763 763 int type; 764 inputs->GetInputValue(&type, TypeEnum);764 inputs->GetInputValue(&type,NumericalfluxTypeEnum); 765 765 766 766 switch(type){ … … 856 856 857 857 int type; 858 inputs->GetInputValue(&type, TypeEnum);858 inputs->GetInputValue(&type,NumericalfluxTypeEnum); 859 859 860 860 switch(type){ -
issm/trunk-jpl/src/c/classes/objects/Loads/Riftfront.cpp
r13925 r14688 104 104 riftfront_shelf=reCast<bool,IssmDouble>(iomodel->Data(MaskVertexonfloatingiceEnum)[node1-1]); 105 105 106 this->inputs->AddInput(new IntInput( TypeEnum,riftfront_type));106 this->inputs->AddInput(new IntInput(RiftfrontTypeEnum,riftfront_type)); 107 107 this->inputs->AddInput(new IntInput(FillEnum,riftfront_fill)); 108 108 this->inputs->AddInput(new DoubleInput(FrictionEnum,riftfront_friction)); -
issm/trunk-jpl/src/c/modules/EnumToStringx/EnumToStringx.cpp
r14656 r14688 244 244 case AdjointSolutionEnum : return "AdjointSolution"; 245 245 case AnalysisCounterEnum : return "AnalysisCounter"; 246 case NoneAnalysisEnum : return "NoneAnalysis"; 247 case DefaultAnalysisEnum : return "DefaultAnalysis"; 246 248 case BalancethicknessAnalysisEnum : return "BalancethicknessAnalysis"; 247 249 case BalancethicknessSolutionEnum : return "BalancethicknessSolution"; … … 263 265 case HydrologySolutionEnum : return "HydrologySolution"; 264 266 case MeltingAnalysisEnum : return "MeltingAnalysis"; 265 case NoneAnalysisEnum : return "NoneAnalysis";266 267 case PrognosticAnalysisEnum : return "PrognosticAnalysis"; 267 268 case PrognosticSolutionEnum : return "PrognosticSolution"; … … 318 319 case IntVecParamEnum : return "IntVecParam"; 319 320 case TransientParamEnum : return "TransientParam"; 321 case IceFrontTypeEnum : return "IceFrontType"; 320 322 case MacAyeal2dIceFrontEnum : return "MacAyeal2dIceFront"; 321 323 case MacAyeal3dIceFrontEnum : return "MacAyeal3dIceFront"; … … 325 327 case NodeEnum : return "Node"; 326 328 case NumericalfluxEnum : return "Numericalflux"; 329 case NumericalfluxTypeEnum : return "NumericalfluxType"; 327 330 case ParamEnum : return "Param"; 328 331 case L1L2IceFrontEnum : return "L1L2IceFront"; … … 336 339 case VectorParamEnum : return "VectorParam"; 337 340 case RiftfrontEnum : return "Riftfront"; 341 case RiftfrontTypeEnum : return "RiftfrontType"; 338 342 case SegmentEnum : return "Segment"; 339 343 case SegmentRiftfrontEnum : return "SegmentRiftfront"; … … 401 405 case TemperaturePicardEnum : return "TemperaturePicard"; 402 406 case ThicknessAbsMisfitEnum : return "ThicknessAbsMisfit"; 403 case TypeEnum : return "Type";404 407 case VelEnum : return "Vel"; 405 408 case VelocityEnum : return "Velocity"; -
issm/trunk-jpl/src/c/modules/StringToEnumx/StringToEnumx.cpp
r14656 r14688 248 248 else if (strcmp(name,"AdjointSolution")==0) return AdjointSolutionEnum; 249 249 else if (strcmp(name,"AnalysisCounter")==0) return AnalysisCounterEnum; 250 else if (strcmp(name,"NoneAnalysis")==0) return NoneAnalysisEnum; 251 else if (strcmp(name,"DefaultAnalysis")==0) return DefaultAnalysisEnum; 250 252 else if (strcmp(name,"BalancethicknessAnalysis")==0) return BalancethicknessAnalysisEnum; 251 253 else if (strcmp(name,"BalancethicknessSolution")==0) return BalancethicknessSolutionEnum; … … 259 261 else if (strcmp(name,"DiagnosticHutterAnalysis")==0) return DiagnosticHutterAnalysisEnum; 260 262 else if (strcmp(name,"DiagnosticSolution")==0) return DiagnosticSolutionEnum; 261 else if (strcmp(name,"DiagnosticVertAnalysis")==0) return DiagnosticVertAnalysisEnum;262 else if (strcmp(name,"EnthalpyAnalysis")==0) return EnthalpyAnalysisEnum;263 263 else stage=3; 264 264 } 265 265 if(stage==3){ 266 if (strcmp(name,"EnthalpySolution")==0) return EnthalpySolutionEnum; 266 if (strcmp(name,"DiagnosticVertAnalysis")==0) return DiagnosticVertAnalysisEnum; 267 else if (strcmp(name,"EnthalpyAnalysis")==0) return EnthalpyAnalysisEnum; 268 else if (strcmp(name,"EnthalpySolution")==0) return EnthalpySolutionEnum; 267 269 else if (strcmp(name,"FlaimAnalysis")==0) return FlaimAnalysisEnum; 268 270 else if (strcmp(name,"FlaimSolution")==0) return FlaimSolutionEnum; … … 270 272 else if (strcmp(name,"HydrologySolution")==0) return HydrologySolutionEnum; 271 273 else if (strcmp(name,"MeltingAnalysis")==0) return MeltingAnalysisEnum; 272 else if (strcmp(name,"NoneAnalysis")==0) return NoneAnalysisEnum;273 274 else if (strcmp(name,"PrognosticAnalysis")==0) return PrognosticAnalysisEnum; 274 275 else if (strcmp(name,"PrognosticSolution")==0) return PrognosticSolutionEnum; … … 325 326 else if (strcmp(name,"IntVecParam")==0) return IntVecParamEnum; 326 327 else if (strcmp(name,"TransientParam")==0) return TransientParamEnum; 328 else if (strcmp(name,"IceFrontType")==0) return IceFrontTypeEnum; 327 329 else if (strcmp(name,"MacAyeal2dIceFront")==0) return MacAyeal2dIceFrontEnum; 328 330 else if (strcmp(name,"MacAyeal3dIceFront")==0) return MacAyeal3dIceFrontEnum; … … 332 334 else if (strcmp(name,"Node")==0) return NodeEnum; 333 335 else if (strcmp(name,"Numericalflux")==0) return NumericalfluxEnum; 336 else if (strcmp(name,"NumericalfluxType")==0) return NumericalfluxTypeEnum; 334 337 else if (strcmp(name,"Param")==0) return ParamEnum; 335 338 else if (strcmp(name,"L1L2IceFront")==0) return L1L2IceFrontEnum; … … 343 346 else if (strcmp(name,"VectorParam")==0) return VectorParamEnum; 344 347 else if (strcmp(name,"Riftfront")==0) return RiftfrontEnum; 348 else if (strcmp(name,"RiftfrontType")==0) return RiftfrontTypeEnum; 345 349 else if (strcmp(name,"Segment")==0) return SegmentEnum; 346 350 else if (strcmp(name,"SegmentRiftfront")==0) return SegmentRiftfrontEnum; … … 380 384 else if (strcmp(name,"MassFlux")==0) return MassFluxEnum; 381 385 else if (strcmp(name,"MaxPenetration")==0) return MaxPenetrationEnum; 382 else if (strcmp(name,"MeltingOffset")==0) return MeltingOffsetEnum; 386 else stage=4; 387 } 388 if(stage==4){ 389 if (strcmp(name,"MeltingOffset")==0) return MeltingOffsetEnum; 383 390 else if (strcmp(name,"Misfit")==0) return MisfitEnum; 384 391 else if (strcmp(name,"NumberNodeToElementConnectivity")==0) return NumberNodeToElementConnectivityEnum; 385 392 else if (strcmp(name,"Pressure")==0) return PressureEnum; 386 else stage=4; 387 } 388 if(stage==4){ 389 if (strcmp(name,"PressurePicard")==0) return PressurePicardEnum; 393 else if (strcmp(name,"PressurePicard")==0) return PressurePicardEnum; 390 394 else if (strcmp(name,"QmuPressure")==0) return QmuPressureEnum; 391 395 else if (strcmp(name,"QmuVx")==0) return QmuVxEnum; … … 411 415 else if (strcmp(name,"TemperaturePicard")==0) return TemperaturePicardEnum; 412 416 else if (strcmp(name,"ThicknessAbsMisfit")==0) return ThicknessAbsMisfitEnum; 413 else if (strcmp(name,"Type")==0) return TypeEnum;414 417 else if (strcmp(name,"Vel")==0) return VelEnum; 415 418 else if (strcmp(name,"Velocity")==0) return VelocityEnum; … … 504 507 else if (strcmp(name,"Gradient3")==0) return Gradient3Enum; 505 508 else if (strcmp(name,"Gradient")==0) return GradientEnum; 506 else if (strcmp(name,"GroundinglineMigration")==0) return GroundinglineMigrationEnum;507 else if (strcmp(name,"Gset")==0) return GsetEnum;508 else if (strcmp(name,"Index")==0) return IndexEnum;509 509 else stage=5; 510 510 } 511 511 if(stage==5){ 512 if (strcmp(name,"Indexed")==0) return IndexedEnum; 512 if (strcmp(name,"GroundinglineMigration")==0) return GroundinglineMigrationEnum; 513 else if (strcmp(name,"Gset")==0) return GsetEnum; 514 else if (strcmp(name,"Index")==0) return IndexEnum; 515 else if (strcmp(name,"Indexed")==0) return IndexedEnum; 513 516 else if (strcmp(name,"Intersect")==0) return IntersectEnum; 514 517 else if (strcmp(name,"Nodal")==0) return NodalEnum; -
issm/trunk-jpl/src/c/shared/Numerics/OptionsFromAnalysis.cpp
r14632 r14688 21 21 22 22 /*intermediary: */ 23 int dummy;24 IssmDouble * analyses=NULL;25 char ** strings=NULL;26 char * string=NULL;27 int numanalyses;28 int found=-1;29 int i;23 int dummy; 24 IssmDouble *analyses = NULL; 25 char **strings = NULL; 26 char *string = NULL; 27 int numanalyses; 28 int found = -1; 29 int i; 30 30 31 31 numanalyses=0; … … 37 37 38 38 /*ok, go through analyses and figure out if it corresponds to our analysis_type: */ 39 found=-1;40 39 for(i=0;i<numanalyses;i++){ 41 if (analyses[i]==analysis_type){ 42 /*found the analysis, get out of here: */ 40 if(analyses[i]==analysis_type){ 43 41 found=i; 44 42 break; … … 48 46 /*still haven't found a list of petsc options, go find the default one, for analysis type NoneAnalysisEnum: */ 49 47 for(i=0;i<numanalyses;i++){ 50 if (analyses[i]==NoneAnalysisEnum){ 51 /*found the default analysis, get out of here: */ 48 if(analyses[i]==DefaultAnalysisEnum){ 52 49 found=i; 53 50 break; … … 56 53 } 57 54 if (found==-1){ 58 /*ok, we did not find anything, this is not good! error out: */ 59 _error_("could find neither a default analysis nor analysis " << EnumToStringx(analysis_type)); 55 _error_("could find neither a default analysis nor analysis " << EnumToStringx(analysis_type)); 60 56 } 61 57 -
issm/trunk-jpl/src/c/toolkits/issm/IssmToolkitUtils.cpp
r14656 r14688 25 25 int IssmMatTypeFromToolkitOptions(void){ /*{{{*/ 26 26 27 char * mat_type=NULL;28 int mat_type_enum =NULL;29 int num_procs =0;30 bool isparallel =false;27 char *mat_type = NULL; 28 int mat_type_enum; 29 int num_procs = 0; 30 bool isparallel = false; 31 31 32 32 /*first, figure out if we are running in parallel: */ … … 53 53 54 54 char* vec_type=NULL; 55 int vec_type_enum =NULL;55 int vec_type_enum; 56 56 int num_procs=0; 57 57 bool isparallel=false;
Note:
See TracChangeset
for help on using the changeset viewer.