anisodamagemodel.h

Go to the documentation of this file.

/*
 *
 *                 #####    #####   ######  ######  ###   ###
 *               ##   ##  ##   ##  ##      ##      ## ### ##
 *              ##   ##  ##   ##  ####    ####    ##  #  ##
 *             ##   ##  ##   ##  ##      ##      ##     ##
 *            ##   ##  ##   ##  ##      ##      ##     ##
 *            #####    #####   ##      ######  ##     ##
 *
 *
 *             OOFEM : Object Oriented Finite Element Code
 *
 *               Copyright (C) 1993 - 2025   Borek Patzak
 *
 *
 *
 *       Czech Technical University, Faculty of Civil Engineering,
 *   Department of Structural Mechanics, 166 29 Prague, Czech Republic
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 */
 
#ifndef anisodamagemodel_h
#define anisodamagemodel_h
 
// this turns on or off a bunch of internal variables
// that allow tracing the distribution of dissipated energy
// (can be turned off if such information is not needed)
#define keep_track_of_dissipated_energy
 
#include "material.h"
#include "sm/Materials/structuralmaterial.h"
#include "isolinearelasticmaterial.h"
#include "sm/Materials/structuralms.h"
#include "sm/Materials/ConcreteMaterials/idm1.h"


// @todo add input parametres which are read from input file here
#define _IFT_AnisotropicDamageMaterial_Name "adm"
#define _IFT_AnisotropicDamageMaterial_equivStrainType "equivstraintype"
#define _IFT_AnisotropicDamageMaterial_damageLawType "damlaw"
#define _IFT_AnisotropicDamageMaterial_kappa0 "kappa0"
#define _IFT_AnisotropicDamageMaterial_kappaf "kappaf"
#define _IFT_AnisotropicDamageMaterial_aA "aa"
 
namespace oofem {
class GaussPoint;

class AnisotropicDamageMaterialStatus : public StructuralMaterialStatus
{
protected:
    double kappa = 0.;
    double tempKappa = 0.;
    FloatMatrix damage;
    FloatMatrix tempDamage;
    double strainZ = 0.;
    double tempStrainZ = 0.;
    int flag = 0;
    int tempFlag = 0;
    double storedFactor = 1.;
    double tempStoredFactor = 1.;
 
#ifdef keep_track_of_dissipated_energy
    double stressWork = 0.;
    double tempStressWork = 0.;
    double dissWork = 0.;
    double tempDissWork = 0.;
#endif
 
public:
    AnisotropicDamageMaterialStatus(GaussPoint *g);
 
    void printOutputAt(FILE *file, TimeStep *tStep) const override;

    double giveKappa() { return kappa; }
    double giveTempKappa() { return tempKappa; }
    void setTempKappa(double newKappa) { tempKappa = newKappa; }
    const FloatMatrix &giveDamage() { return damage; }
    const FloatMatrix &giveTempDamage() { return tempDamage; }
    void setTempDamage(const FloatMatrix &d) { tempDamage = d; }
    double giveStrainZ() { return strainZ; }
    double giveTempStrainZ() {  return tempStrainZ;     }
    void setTempStrainZ(double newStrainZ) { tempStrainZ = newStrainZ; }
    int giveFlag() { return flag; }
    void setTempFlag(int newflag) { tempFlag = newflag; }
    int giveTempFlag() { return tempFlag; }
    double giveStoredFactor() { return storedFactor; }
    void setStoredFactor(double newStoredFactor) { storedFactor = newStoredFactor; }
    double giveTempStoredFactor() { return tempStoredFactor; }
    void setTempStoredFactor(double newTempStoredFactor) { tempStoredFactor = newTempStoredFactor; }
 
 
 
#ifdef keep_track_of_dissipated_energy
    double giveStressWork() { return stressWork; }
    double giveTempStressWork() { return tempStressWork; }
    void setTempStressWork(double w) { tempStressWork = w; }
    double giveDissWork() { return dissWork; }
    double giveTempDissWork() { return tempDissWork; }
    void setTempDissWork(double w) { tempDissWork = w; }
    void computeWork(GaussPoint *gp);
#endif
 
    // definition
    const char *giveClassName() const override { return "AnisotropicDamageMaterialModelStatus"; }
 
    void initTempStatus() override;
    void updateYourself(TimeStep *tStep) override;
 
    void saveContext(DataStream &stream, ContextMode mode) override;
    void restoreContext(DataStream &stream, ContextMode mode) override;
};
 

class AnisotropicDamageMaterial : public StructuralMaterial
{
protected:
    IsotropicLinearElasticMaterial linearElasticMaterial;
    double E = 0.;
    double nu = 0.;
    double kappa0 = 0.;
    double kappaf = 0.;
    double aA = 0.;
    enum EquivStrainType { EST_Unknown, EST_Mazars, EST_Rankine_Smooth, EST_Rankine_Standard, EST_ElasticEnergy, EST_ElasticEnergyPositiveStress, EST_ElasticEnergyPositiveStrain, EST_Mises, EST_Griffith };
    EquivStrainType equivStrainType = EST_Unknown;
    enum DamLawType { DLT_Unknown, DLT_Desmorat1, DLT_Desmorat2, DLT_Linear, DLT_Exponential };
    DamLawType damageLawType = DLT_Unknown;
 
public:
    AnisotropicDamageMaterial(int n, Domain *d);
 
    bool hasMaterialModeCapability(MaterialMode mode) const override;
 
    const char *giveClassName() const override { return "AnisotropicDamageMaterial"; }
    const char *giveInputRecordName() const override { return _IFT_AnisotropicDamageMaterial_Name; }

    FloatArrayF<3> giveRealStressVector_PlaneStress(const FloatArrayF<3> &reducedE, GaussPoint *gp, TimeStep *tStep) const override;
 
    void computePrincValDir2D(double &D1, double &D2, double &c, double &s, double Dx, double Dy, double Dxy) const;
    bool checkPrincVal2D(double Dx, double Dy, double Dxy) const;
    void computeDamage(FloatMatrix &tempDamage, const FloatMatrix &damage, double kappa, double eps1, double eps2, double ceps, double seps, double epsZ) const;
    double computeTraceD(double equivStrain) const;
    double computeOutOfPlaneStrain(const FloatArray &inplaneStrain, const FloatMatrix &dam, bool tens_flag) const;
    double computeDimensionlessOutOfPlaneStress(const FloatArray &inplaneStrain, double epsZ, const FloatMatrix &dam) const;
    void computeInplaneStress(FloatArray &inplaneStress, const FloatArray &inplaneStrain, double epsZ, const FloatMatrix &dam) const;

    double obtainAlpha1(FloatMatrix tempDamageTensor, double deltaLambda, FloatMatrix positiveStrainTensor, double damageThreshold) const;
    double obtainAlpha2(FloatMatrix tempDamageTensor, double deltaLambda, FloatMatrix positiveStrainTensor, FloatMatrix ProjMatrix, double damageThreshold) const;
    double obtainAlpha3(FloatMatrix tempDamageTensor, double deltaLambda, FloatMatrix positiveStrainTensor, FloatArray vec3, double damageThreshold) const;
 
    double checkSymmetry(FloatMatrix matrix) const;
 
    void correctBigValues(FloatMatrix &matrix) const;
 
    double computeTraceD(FloatMatrix tempDamageTensor, FloatMatrix strainTensor, GaussPoint *gp) const;
 
    double computeCorrectionFactor(FloatMatrix tempDamageTensor, FloatMatrix strainTensor, GaussPoint *gp) const;
 
    FloatMatrixF<6,6> give3dMaterialStiffnessMatrix(MatResponseMode mode, GaussPoint *gp, TimeStep *tStep) const override;
 
    void giveRealStressVector(FloatArray &answer,  GaussPoint *gp,
                              const FloatArray &reducedStrain, TimeStep *tStep) const override;
 
    FloatArrayF<6> giveRealStressVector_3d(const FloatArrayF<6> &strain, GaussPoint *gp, TimeStep *tStep) const override
    {
        FloatArray answer;
        const_cast<AnisotropicDamageMaterial*>(this)->giveRealStressVector(answer, gp, strain, tStep);
        return answer;
    }
    FloatArrayF<4> giveRealStressVector_PlaneStrain(const FloatArrayF<4> &strain, GaussPoint *gp, TimeStep *tStep) const override
    {
        FloatArray answer;
        const_cast<AnisotropicDamageMaterial*>(this)->giveRealStressVector(answer, gp, strain, tStep);
        return answer;
    }
    FloatArray giveRealStressVector_StressControl(const FloatArray &strain, const IntArray &strainControl, GaussPoint *gp, TimeStep *tStep) const override
    {
        FloatArray answer;
        const_cast<AnisotropicDamageMaterial*>(this)->giveRealStressVector(answer, gp, strain, tStep);
        return answer;
    }
    FloatArrayF<1> giveRealStressVector_1d(const FloatArrayF<1> &strain, GaussPoint *gp, TimeStep *tStep) const override
    {
        FloatArray answer;
        const_cast<AnisotropicDamageMaterial*>(this)->giveRealStressVector(answer, gp, strain, tStep);
        return answer;
    }
 
    int giveIPValue(FloatArray &answer, GaussPoint *gp, InternalStateType type, TimeStep *atTime) override;
 
    //InternalStateValueType giveIPValueType(InternalStateType type) override;
    //FloatArrayF<6> giveThermalDilatationVector(GaussPoint *, TimeStep *) const override;

    void computeEquivalentStrain(double &kappa, const FloatArray &strain, GaussPoint *gp, TimeStep *tStep) const;
 
    void initializeFrom(InputRecord &ir) override;
    void giveInputRecord(DynamicInputRecord &input) override;
    void computeDamageTensor(FloatMatrix &answer, GaussPoint *gp, const FloatArray &totalStrain, double equivStrain, TimeStep *atTime) const;
 
    std::unique_ptr<MaterialStatus> CreateStatus(GaussPoint *gp) const override { return std::make_unique<AnisotropicDamageMaterialStatus>(gp); }
 
protected:
 
    FloatMatrixF<3,3> givePlaneStressStiffMtrx(MatResponseMode mmode, GaussPoint *gp, TimeStep *tStep) const override;
 
    FloatMatrixF<1,1> give1dStressStiffMtrx(MatResponseMode mmode, GaussPoint *gp, TimeStep *tStep) const override;
    void computePlaneStressStrain(FloatMatrix &answer, FloatMatrix damageTensor, FloatArray totalStrain, GaussPoint *gp,
                                  TimeStep *atTime) const;
    void computePlaneStressSigmaZ(double &answer, FloatMatrix damageTensor, FloatArray reducedTotalStrainVector,
                                  double epsZ, GaussPoint *gp, TimeStep *atTime) const;
 
#if 0
    void computeDamageTensor(FloatMatrix &answer, GaussPoint *gp,
                             const FloatArray &totalStrain, double equivStrain,
                             TimeStep *atTime) override;
#endif
 
    virtual void computeSecantOperator(FloatMatrix &answer, FloatMatrix strainTensor,
                                       FloatMatrix damageTensor, GaussPoint *gp) const;
 
    double computeK(GaussPoint *gp);
 
    double computeKappa(FloatMatrix damageTensor) const;
};
} // end namespace oofem
#endif // anisodamagemodel_h