Changeset 3567 for issm/trunk/src/c/objects/Penta.cpp
- Timestamp:
- 04/19/10 09:49:52 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/c/objects/Penta.cpp
r3529 r3567 81 81 //elements of type 3 are macayeal type penta. we collapse the formulation on their base. 82 82 if(iomodel->elements_type){ 83 if (*(iomodel->elements_type+2*i+0)==MacAyealFormulationEnum ()){83 if (*(iomodel->elements_type+2*i+0)==MacAyealFormulationEnum){ 84 84 this->properties.collapse=1; 85 85 } … … 196 196 197 197 /*get enum type of Penta: */ 198 enum_type=PentaEnum ();198 enum_type=PentaEnum; 199 199 200 200 /*marshall enum: */ … … 387 387 388 388 /*Check analysis_types*/ 389 if (analysis_type!=DiagnosticAnalysisEnum () || sub_analysis_type!=StokesAnalysisEnum()) ISSMERROR("Not supported yet!");389 if (analysis_type!=DiagnosticAnalysisEnum || sub_analysis_type!=StokesAnalysisEnum) ISSMERROR("Not supported yet!"); 390 390 391 391 /*recover pointers: */ … … 555 555 556 556 /*Just branch to the correct element stiffness matrix generator, according to the type of analysis we are carrying out: */ 557 if (analysis_type==ControlAnalysisEnum ()){557 if (analysis_type==ControlAnalysisEnum){ 558 558 559 559 CreateKMatrixDiagnosticHoriz( Kgg,inputs,analysis_type,sub_analysis_type); 560 560 561 561 } 562 else if (analysis_type==DiagnosticAnalysisEnum ()){563 564 if (sub_analysis_type==HorizAnalysisEnum ()){562 else if (analysis_type==DiagnosticAnalysisEnum){ 563 564 if (sub_analysis_type==HorizAnalysisEnum){ 565 565 566 566 CreateKMatrixDiagnosticHoriz( Kgg,inputs,analysis_type,sub_analysis_type); 567 567 } 568 else if (sub_analysis_type==VertAnalysisEnum ()){568 else if (sub_analysis_type==VertAnalysisEnum){ 569 569 570 570 CreateKMatrixDiagnosticVert( Kgg,inputs,analysis_type,sub_analysis_type); 571 571 } 572 else if (sub_analysis_type==StokesAnalysisEnum ()){572 else if (sub_analysis_type==StokesAnalysisEnum){ 573 573 574 574 CreateKMatrixDiagnosticStokes( Kgg,inputs,analysis_type,sub_analysis_type); … … 577 577 else ISSMERROR(exprintf("%s%i%s\n","sub_analysis: ",sub_analysis_type," not supported yet")); 578 578 } 579 else if (analysis_type==SlopecomputeAnalysisEnum ()){579 else if (analysis_type==SlopecomputeAnalysisEnum){ 580 580 581 581 CreateKMatrixSlopeCompute( Kgg,inputs,analysis_type,sub_analysis_type); 582 582 } 583 else if (analysis_type==PrognosticAnalysisEnum ()){583 else if (analysis_type==PrognosticAnalysisEnum){ 584 584 585 585 CreateKMatrixPrognostic( Kgg,inputs,analysis_type,sub_analysis_type); 586 586 } 587 else if (analysis_type==BalancedthicknessAnalysisEnum ()){587 else if (analysis_type==BalancedthicknessAnalysisEnum){ 588 588 589 589 CreateKMatrixBalancedthickness( Kgg,inputs,analysis_type,sub_analysis_type); 590 590 } 591 else if (analysis_type==BalancedvelocitiesAnalysisEnum ()){591 else if (analysis_type==BalancedvelocitiesAnalysisEnum){ 592 592 593 593 CreateKMatrixBalancedvelocities( Kgg,inputs,analysis_type,sub_analysis_type); 594 594 } 595 else if (analysis_type==ThermalAnalysisEnum ()){595 else if (analysis_type==ThermalAnalysisEnum){ 596 596 597 597 CreateKMatrixThermal( Kgg,inputs,analysis_type,sub_analysis_type); 598 598 } 599 else if (analysis_type==MeltingAnalysisEnum ()){599 else if (analysis_type==MeltingAnalysisEnum){ 600 600 601 601 CreateKMatrixMelting( Kgg,inputs,analysis_type,sub_analysis_type); … … 1683 1683 1684 1684 /*Just branch to the correct element stiffness matrix generator, according to the type of analysis we are carrying out: */ 1685 if (analysis_type==ControlAnalysisEnum ()){1685 if (analysis_type==ControlAnalysisEnum){ 1686 1686 1687 1687 CreatePVectorDiagnosticHoriz( pg,inputs,analysis_type,sub_analysis_type); 1688 1688 } 1689 else if (analysis_type==DiagnosticAnalysisEnum ()){1690 1691 if (sub_analysis_type==HorizAnalysisEnum ()){1689 else if (analysis_type==DiagnosticAnalysisEnum){ 1690 1691 if (sub_analysis_type==HorizAnalysisEnum){ 1692 1692 1693 1693 CreatePVectorDiagnosticHoriz( pg,inputs,analysis_type,sub_analysis_type); 1694 1694 } 1695 else if (sub_analysis_type==VertAnalysisEnum ()){1695 else if (sub_analysis_type==VertAnalysisEnum){ 1696 1696 1697 1697 CreatePVectorDiagnosticVert( pg,inputs,analysis_type,sub_analysis_type); 1698 1698 } 1699 else if (sub_analysis_type==StokesAnalysisEnum ()){1699 else if (sub_analysis_type==StokesAnalysisEnum){ 1700 1700 1701 1701 CreatePVectorDiagnosticStokes( pg,inputs,analysis_type,sub_analysis_type); … … 1703 1703 else ISSMERROR(exprintf("%s%i%s\n","sub_analysis: ",sub_analysis_type," not supported yet")); 1704 1704 } 1705 else if (analysis_type==SlopecomputeAnalysisEnum ()){1705 else if (analysis_type==SlopecomputeAnalysisEnum){ 1706 1706 1707 1707 CreatePVectorSlopeCompute( pg,inputs,analysis_type,sub_analysis_type); 1708 1708 } 1709 else if (analysis_type==PrognosticAnalysisEnum ()){1709 else if (analysis_type==PrognosticAnalysisEnum){ 1710 1710 1711 1711 CreatePVectorPrognostic( pg,inputs,analysis_type,sub_analysis_type); 1712 1712 } 1713 else if (analysis_type==BalancedthicknessAnalysisEnum ()){1713 else if (analysis_type==BalancedthicknessAnalysisEnum){ 1714 1714 1715 1715 CreatePVectorBalancedthickness( pg,inputs,analysis_type,sub_analysis_type); 1716 1716 } 1717 else if (analysis_type==BalancedvelocitiesAnalysisEnum ()){1717 else if (analysis_type==BalancedvelocitiesAnalysisEnum){ 1718 1718 1719 1719 CreatePVectorBalancedvelocities( pg,inputs,analysis_type,sub_analysis_type); 1720 1720 } 1721 else if (analysis_type==ThermalAnalysisEnum ()){1721 else if (analysis_type==ThermalAnalysisEnum){ 1722 1722 1723 1723 CreatePVectorThermal( pg,inputs,analysis_type,sub_analysis_type); 1724 1724 } 1725 else if (analysis_type==MeltingAnalysisEnum ()){1725 else if (analysis_type==MeltingAnalysisEnum){ 1726 1726 1727 1727 CreatePVectorMelting( pg,inputs,analysis_type,sub_analysis_type); … … 2620 2620 int Penta::Enum(void){ 2621 2621 2622 return PentaEnum ();2622 return PentaEnum; 2623 2623 2624 2624 } … … 4059 4059 if (!this->properties.onbed) return; 4060 4060 4061 if (sub_analysis_type==HorizAnalysisEnum ()){4061 if (sub_analysis_type==HorizAnalysisEnum){ 4062 4062 4063 4063 /*MacAyeal or Pattyn*/ … … 4067 4067 return; 4068 4068 } 4069 else if (sub_analysis_type==StokesAnalysisEnum ()){4069 else if (sub_analysis_type==StokesAnalysisEnum){ 4070 4070 4071 4071 /*Stokes*/
Note:
See TracChangeset
for help on using the changeset viewer.