anisodamagemodel.h

Go to the documentation of this file.

/*
 *
 *                 #####    #####   ######  ######  ###   ###
 *               ##   ##  ##   ##  ##      ##      ## ### ##
 *              ##   ##  ##   ##  ####    ####    ##  #  ##
 *             ##   ##  ##   ##  ##      ##      ##     ##
 *            ##   ##  ##   ##  ##      ##      ##     ##
 *            #####    #####   ##      ######  ##     ##
 *
 *
 *             OOFEM : Object Oriented Finite Element Code
 *
 *               Copyright (C) 1993 - 2013   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 "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;
    double tempKappa;
    FloatMatrix damage;
    FloatMatrix tempDamage;
    double tempStrainZ;
    double strainZ;
    int flag;
    int tempFlag;
    double storedFactor;
    double tempStoredFactor;

#ifdef keep_track_of_dissipated_energy
    double stressWork;
    double tempStressWork;
    double dissWork;
    double tempDissWork;
#endif

public:
    AnisotropicDamageMaterialStatus(int n, Domain *d, GaussPoint *g);
    virtual ~AnisotropicDamageMaterialStatus();

    virtual void printOutputAt(FILE *file, TimeStep *tStep);

    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
    virtual const char *giveClassName() const { return "AnisotropicDamageMaterialModelStatus"; }

    virtual void initTempStatus();
    virtual void updateYourself(TimeStep *tStep);

    virtual contextIOResultType saveContext(DataStream &stream, ContextMode mode, void *obj = NULL);
    virtual contextIOResultType restoreContext(DataStream &stream, ContextMode mode, void *obj = NULL);
};


class AnisotropicDamageMaterial : public StructuralMaterial
{
protected:

    IsotropicLinearElasticMaterial *linearElasticMaterial;
    double E;
    double nu;
    double kappa0;
    double kappaf;
    double aA;
    enum EquivStrainType { EST_Unknown, EST_Mazars, EST_Rankine_Smooth, EST_Rankine_Standard, EST_ElasticEnergy, EST_ElasticEnergyPositiveStress, EST_ElasticEnergyPositiveStrain, EST_Mises, EST_Griffith };
    EquivStrainType equivStrainType;
    enum DamLawType { DLT_Unknown, DLT_Desmorat1, DLT_Desmorat2, DLT_Linear, DLT_Exponential };
    DamLawType damageLawType;

public:
    AnisotropicDamageMaterial(int n, Domain *d);
    virtual ~AnisotropicDamageMaterial();

    virtual int hasNonLinearBehaviour() { return 1; }
    virtual int hasMaterialModeCapability(MaterialMode mode);

    // identification and auxiliary functions
    virtual const char *giveClassName() const { return "AnisotropicDamageMaterial"; }
    virtual const char *giveInputRecordName() const { return _IFT_AnisotropicDamageMaterial_Name; }

    IsotropicLinearElasticMaterial *giveLinearElasticMaterial() { return linearElasticMaterial; }

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


    double obtainAlpha1(FloatMatrix tempDamageTensor, double deltaLambda, FloatMatrix positiveStrainTensor, double damageThreshold);
    double obtainAlpha2(FloatMatrix tempDamageTensor, double deltaLambda, FloatMatrix positiveStrainTensor, FloatMatrix ProjMatrix, double damageThreshold);
    double obtainAlpha3(FloatMatrix tempDamageTensor, double deltaLambda, FloatMatrix positiveStrainTensor, FloatArray vec3, double damageThreshold);

    double checkSymmetry(FloatMatrix matrix);

    void correctBigValues(FloatMatrix &matrix);

    double computeTraceD(FloatMatrix tempDamageTensor, FloatMatrix strainTensor, GaussPoint *gp);

    double computeCorrectionFactor(FloatMatrix tempDamageTensor, FloatMatrix strainTensor, GaussPoint *gp);

    virtual void give3dMaterialStiffnessMatrix(FloatMatrix &answer,
                                               MatResponseMode mode,
                                               GaussPoint *gp,
                                               TimeStep *tStep);

    virtual void giveRealStressVector(FloatArray &answer,  GaussPoint *gp,
                                      const FloatArray &reducedStrain, TimeStep *tStep);

    virtual void giveRealStressVector_3d(FloatArray &answer, GaussPoint *gp, const FloatArray &reducedE, TimeStep *tStep)
    { this->giveRealStressVector(answer, gp, reducedE, tStep); }
    virtual void giveRealStressVector_PlaneStrain(FloatArray &answer, GaussPoint *gp, const FloatArray &reducedE, TimeStep *tStep)
    { this->giveRealStressVector(answer, gp, reducedE, tStep); }
    virtual void giveRealStressVector_StressControl(FloatArray &answer, GaussPoint *gp, const FloatArray &reducedE, const IntArray &strainControl, TimeStep *tStep)
    { this->giveRealStressVector(answer, gp, reducedE, tStep); }
    virtual void giveRealStressVector_1d(FloatArray &answer, GaussPoint *gp, const FloatArray &reducedE, TimeStep *tStep)
    { this->giveRealStressVector(answer, gp, reducedE, tStep); }

    virtual int giveIPValue(FloatArray &answer, GaussPoint *gp, InternalStateType type, TimeStep *atTime);

    //    virtual InternalStateValueType giveIPValueType(InternalStateType type);
    //virtual void giveThermalDilatationVector(FloatArray &answer, GaussPoint *, TimeStep *);

    virtual void computeEquivalentStrain(double &kappa, const FloatArray &strain, GaussPoint *gp, TimeStep *tStep);

    virtual IRResultType initializeFrom(InputRecord *ir);
    virtual void giveInputRecord(DynamicInputRecord &input);
    virtual void computeDamageTensor(FloatMatrix &answer, GaussPoint *gp,
                                     const FloatArray &totalStrain, double equivStrain,
                                     TimeStep *atTime);

    MaterialStatus *CreateStatus(GaussPoint *gp) const { return new AnisotropicDamageMaterialStatus(1, domain, gp); }

protected:


    virtual void givePlaneStressStiffMtrx(FloatMatrix &answer, MatResponseMode mmode,
                                          GaussPoint *gp,
                                          TimeStep *tStep);

    virtual void givePlaneStrainStiffMtrx(FloatMatrix &answer, MatResponseMode mmode,
                                          GaussPoint *gp,
                                          TimeStep *tStep);

    virtual void give1dStressStiffMtrx(FloatMatrix &answer, MatResponseMode mmode,
                                       GaussPoint *gp,
                                       TimeStep *tStep);
    virtual void computePlaneStressStrain(FloatMatrix &answer, FloatMatrix damageTensor, FloatArray totalStrain, GaussPoint *gp,
                                          TimeStep *atTime);
    virtual void computePlaneStressSigmaZ(double &answer, FloatMatrix damageTensor, FloatArray reducedTotalStrainVector,
                                          double epsZ, GaussPoint *gp, TimeStep *atTime);

    /*    virtual void computeDamageTensor(FloatMatrix &answer, GaussPoint *gp,
     *                                   const FloatArray &totalStrain, double equivStrain,
     *                                   TimeStep *atTime);
     */

    virtual void computeSecantOperator(FloatMatrix &answer, FloatMatrix strainTensor,
                                       FloatMatrix damageTensor, GaussPoint *gp);

    double computeK(GaussPoint *gp);

    double computeKappa(FloatMatrix damageTensor);
};
} // end namespace oofem
#endif // anisodamagemodel_h