Ignore:
Timestamp:
05/25/16 10:52:44 (9 years ago)
Author:
Mathieu Morlighem
Message:

CHG: some renaming to prepare for change in IoModel structure

File:
1 edited

Legend:

Unmodified
Added
Removed

  • TabularUnified issm/trunk-jpl/src/c/analyses/StressbalanceAnalysis.cpp

    r20644 r20645  
    4141
    4242        /*Fetch parameters: */
    43         iomodel->Constant(&g,ConstantsGEnum);
    44         iomodel->Constant(&rho_ice,MaterialsRhoIceEnum);
    45         iomodel->Constant(&FSreconditioning,StressbalanceFSreconditioningEnum);
    46         iomodel->Constant(&isSIA,FlowequationIsSIAEnum);
    47         iomodel->Constant(&isSSA,FlowequationIsSSAEnum);
    48         iomodel->Constant(&isL1L2,FlowequationIsL1L2Enum);
    49         iomodel->Constant(&isHO,FlowequationIsHOEnum);
    50         iomodel->Constant(&isFS,FlowequationIsFSEnum);
     43        iomodel->FindConstant(&g,ConstantsGEnum);
     44        iomodel->FindConstant(&rho_ice,MaterialsRhoIceEnum);
     45        iomodel->FindConstant(&FSreconditioning,StressbalanceFSreconditioningEnum);
     46        iomodel->FindConstant(&isSIA,FlowequationIsSIAEnum);
     47        iomodel->FindConstant(&isSSA,FlowequationIsSSAEnum);
     48        iomodel->FindConstant(&isL1L2,FlowequationIsL1L2Enum);
     49        iomodel->FindConstant(&isHO,FlowequationIsHOEnum);
     50        iomodel->FindConstant(&isFS,FlowequationIsFSEnum);
    5151
    5252        /*Now, is the flag macayaealHO on? otherwise, do nothing: */
    … …  
    6363
    6464                /*Get finite element type*/
    65                 if(isSSA)       iomodel->Constant(&finiteelement,FlowequationFeSSAEnum);
     65                if(isSSA)       iomodel->FindConstant(&finiteelement,FlowequationFeSSAEnum);
    6666                else if(isL1L2) finiteelement = P1Enum;
    67                 else if(isHO)   iomodel->Constant(&finiteelement,FlowequationFeHOEnum);
    68                 else if(isFS){  iomodel->Constant(&finiteelement,FlowequationFeFSEnum);
     67                else if(isHO)   iomodel->FindConstant(&finiteelement,FlowequationFeHOEnum);
     68                else if(isFS){  iomodel->FindConstant(&finiteelement,FlowequationFeFSEnum);
    6969                        /*Deduce velocity interpolation from finite element*/
    7070                        switch(finiteelement){
    … …  
    451451
    452452        /*Fetch parameters: */
    453         iomodel->Constant(&isL1L2,FlowequationIsL1L2Enum);
    454         iomodel->Constant(&isFS,FlowequationIsFSEnum);
    455         iomodel->Constant(&isSSA,FlowequationIsSSAEnum);
    456         iomodel->Constant(&isHO,FlowequationIsHOEnum);
    457         iomodel->Constant(&numrifts,RiftsNumriftsEnum);
     453        iomodel->FindConstant(&isL1L2,FlowequationIsL1L2Enum);
     454        iomodel->FindConstant(&isFS,FlowequationIsFSEnum);
     455        iomodel->FindConstant(&isSSA,FlowequationIsSSAEnum);
     456        iomodel->FindConstant(&isHO,FlowequationIsHOEnum);
     457        iomodel->FindConstant(&numrifts,RiftsNumriftsEnum);
    458458
    459459        /*Now, is the flag macayaealHO on? otherwise, do nothing: */
    … …  
    507507
    508508        /*Fetch parameters: */
    509         iomodel->Constant(&isSSA,FlowequationIsSSAEnum);
    510         iomodel->Constant(&isL1L2,FlowequationIsL1L2Enum);
    511         iomodel->Constant(&isHO,FlowequationIsHOEnum);
    512         iomodel->Constant(&isFS,FlowequationIsFSEnum);
     509        iomodel->FindConstant(&isSSA,FlowequationIsSSAEnum);
     510        iomodel->FindConstant(&isL1L2,FlowequationIsL1L2Enum);
     511        iomodel->FindConstant(&isHO,FlowequationIsHOEnum);
     512        iomodel->FindConstant(&isFS,FlowequationIsFSEnum);
    513513
    514514        /*Now, check that we have non SIA elements */
    … …  
    527527                if(isSSA){
    528528                        approximation=SSAApproximationEnum;
    529                         iomodel->Constant(&finiteelement,FlowequationFeSSAEnum);
     529                        iomodel->FindConstant(&finiteelement,FlowequationFeSSAEnum);
    530530                }
    531531                else if(isL1L2){
    … …  
    535535                else if(isHO){
    536536                        approximation = HOApproximationEnum;
    537                         iomodel->Constant(&finiteelement,FlowequationFeHOEnum);
     537                        iomodel->FindConstant(&finiteelement,FlowequationFeHOEnum);
    538538                }
    539539                else if(isFS){
    540540                        approximation = FSApproximationEnum;
    541                         iomodel->Constant(&finiteelement,FlowequationFeFSEnum);
     541                        iomodel->FindConstant(&finiteelement,FlowequationFeFSEnum);
    542542                }
    543543                iomodel->FetchData(3,FlowequationBorderSSAEnum,FlowequationVertexEquationEnum,StressbalanceReferentialEnum);
    … …  
    681681
    682682        /*Fetch constants needed: */
    683         iomodel->Constant(&isSSA,FlowequationIsSSAEnum);
    684         iomodel->Constant(&isL1L2,FlowequationIsL1L2Enum);
    685         iomodel->Constant(&isHO,FlowequationIsHOEnum);
    686         iomodel->Constant(&isFS,FlowequationIsFSEnum);
    687         iomodel->Constant(&control_analysis,InversionIscontrolEnum);
    688         iomodel->Constant(&dakota_analysis,QmuIsdakotaEnum);
    689         iomodel->Constant(&materials_type,MaterialsEnum);
    690         iomodel->Constant(&ismovingfront,TransientIsmovingfrontEnum);
    691         iomodel->Constant(&frictionlaw,FrictionLawEnum);
     683        iomodel->FindConstant(&isSSA,FlowequationIsSSAEnum);
     684        iomodel->FindConstant(&isL1L2,FlowequationIsL1L2Enum);
     685        iomodel->FindConstant(&isHO,FlowequationIsHOEnum);
     686        iomodel->FindConstant(&isFS,FlowequationIsFSEnum);
     687        iomodel->FindConstant(&control_analysis,InversionIscontrolEnum);
     688        iomodel->FindConstant(&dakota_analysis,QmuIsdakotaEnum);
     689        iomodel->FindConstant(&materials_type,MaterialsEnum);
     690        iomodel->FindConstant(&ismovingfront,TransientIsmovingfrontEnum);
     691        iomodel->FindConstant(&frictionlaw,FrictionLawEnum);
    692692
    693693        /*return if no processing required*/
    … …  
    706706        /*Get finite element type*/
    707707        if(!iscoupling){
    708                 if(isSSA)       iomodel->Constant(&finiteelement,FlowequationFeSSAEnum);
     708                if(isSSA)       iomodel->FindConstant(&finiteelement,FlowequationFeSSAEnum);
    709709                else if(isL1L2) finiteelement = P1Enum;
    710                 else if(isHO)   iomodel->Constant(&finiteelement,FlowequationFeHOEnum);
    711                 else if(isFS)   iomodel->Constant(&finiteelement,FlowequationFeFSEnum);
     710                else if(isHO)   iomodel->FindConstant(&finiteelement,FlowequationFeHOEnum);
     711                else if(isFS)   iomodel->FindConstant(&finiteelement,FlowequationFeFSEnum);
    712712                for(int i=0;i<iomodel->numberofelements;i++){
    713713                        finiteelement_list[i]=finiteelement;
    … …  
    773773        }
    774774        /*LATH parameters*/
    775         iomodel->Constant(&fe_FS,FlowequationFeFSEnum);
     775        iomodel->FindConstant(&fe_FS,FlowequationFeFSEnum);
    776776        if(fe_FS==LATaylorHoodEnum || fe_FS==LACrouzeixRaviartEnum){
    777777                InputUpdateFromConstantx(elements,0.,SigmaNNEnum);
    … …  
    790790                        break;
    791791                case 3:
    792                         iomodel->Constant(&FrictionCoupling,FrictionCouplingEnum);
     792                        iomodel->FindConstant(&FrictionCoupling,FrictionCouplingEnum);
    793793                        iomodel->FetchDataToInput(elements,FrictionCEnum);
    794794                        iomodel->FetchDataToInput(elements,FrictionAsEnum);
    … …  
    862862
    863863        /*XTH LATH parameters*/
    864         iomodel->Constant(&fe_FS,FlowequationFeFSEnum);
     864        iomodel->FindConstant(&fe_FS,FlowequationFeFSEnum);
    865865        if(fe_FS==XTaylorHoodEnum || fe_FS==LATaylorHoodEnum || fe_FS==LACrouzeixRaviartEnum){
    866866                parameters->AddObject(iomodel->CopyConstantObject(AugmentedLagrangianREnum));
    … …  
    869869        }
    870870
    871         iomodel->Constant(&materials_type,MaterialsEnum);
     871        iomodel->FindConstant(&materials_type,MaterialsEnum);
    872872        if(materials_type==MatdamageiceEnum){
    873873                parameters->AddObject(iomodel->CopyConstantObject(DamageLawEnum));
    … …  
    884884        /*Deal with friction parameters*/
    885885        int frictionlaw;
    886         iomodel->Constant(&frictionlaw,FrictionLawEnum);
     886        iomodel->FindConstant(&frictionlaw,FrictionLawEnum);
    887887        if(frictionlaw==4 || frictionlaw==6) parameters->AddObject(iomodel->CopyConstantObject(FrictionGammaEnum));
    888888        if(frictionlaw==3) parameters->AddObject(iomodel->CopyConstantObject(FrictionCouplingEnum));
Note: See TracChangeset for help on using the changeset viewer.