Changeset 16541


Ignore:
Timestamp:
10/24/13 10:31:20 (11 years ago)
Author:
Mathieu Morlighem
Message:

CHG: missing damage parameters

File:
1 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk-jpl/src/c/analyses/DamageEvolutionAnalysis.cpp

    r16539 r16541  
    1010}/*}}}*/
    1111void DamageEvolutionAnalysis::UpdateParameters(Parameters** pparameters,IoModel* iomodel,int solution_enum,int analysis_enum){/*{{{*/
     12        Parameters *parameters = NULL;
     13        char*       law        = NULL;
     14
     15        /*Get parameters: */
     16        parameters=*pparameters;
     17
     18        /*retrieve some parameters: */
     19        parameters->AddObject(iomodel->CopyConstantObject(DamageLawEnum));
     20        parameters->AddObject(iomodel->CopyConstantObject(DamageStabilizationEnum));
     21
     22        parameters->AddObject(iomodel->CopyConstantObject(DamagePenaltyThresholdEnum));
     23        parameters->AddObject(iomodel->CopyConstantObject(DamagePenaltyLockEnum));
     24        parameters->AddObject(iomodel->CopyConstantObject(DamagePenaltyFactorEnum));
     25        parameters->AddObject(iomodel->CopyConstantObject(DamageMaxiterEnum));
     26        parameters->AddObject(iomodel->CopyConstantObject(DamageMaxDamageEnum));
     27
     28        /*Retrieve law dependent parameters: */
     29        iomodel->Constant(&law,DamageLawEnum);
     30        if (strcmp(law,"pralong")==0){
     31                parameters->AddObject(iomodel->CopyConstantObject(DamageC1Enum));
     32                parameters->AddObject(iomodel->CopyConstantObject(DamageC2Enum));
     33                parameters->AddObject(iomodel->CopyConstantObject(DamageC3Enum));
     34                parameters->AddObject(iomodel->CopyConstantObject(DamageC4Enum));
     35                parameters->AddObject(iomodel->CopyConstantObject(DamageStressThresholdEnum));
     36                parameters->AddObject(iomodel->CopyConstantObject(DamageHealingEnum));
     37        }
     38
     39        /*Assign output pointer: */
     40        xDelete<char>(law);
     41        *pparameters=parameters;
    1242}/*}}}*/
    1343void DamageEvolutionAnalysis::UpdateElements(Elements* elements,IoModel* iomodel,int analysis_counter,int analysis_type){/*{{{*/
Note: See TracChangeset for help on using the changeset viewer.