isochoric_neo_hookean_model.hpp

Go to the documentation of this file.

//
//   Project Name:        KratosConstitutiveModelsApplication $
//   Created by:          $Author:                JMCarbonell $
//   Last modified by:    $Co-Author:                         $
//   Date:                $Date:                   April 2017 $
//   Revision:            $Revision:                      0.0 $
//
//
 
#if !defined(KRATOS_ISOCHORIC_NEO_HOOKEAN_MODEL_H_INCLUDED )
#define  KRATOS_ISOCHORIC_NEO_HOOKEAN_MODEL_H_INCLUDED
 
// System includes
 
// External includes
 
// Project includes
#include "custom_models/elasticity_models/isochoric_mooney_rivlin_model.hpp"
 
namespace Kratos
{
 
 
 
 
 
 
 
  class KRATOS_API(CONSTITUTIVE_MODELS_APPLICATION) IsochoricNeoHookeanModel : public IsochoricMooneyRivlinModel
  {
  public:
 
 
    KRATOS_CLASS_POINTER_DEFINITION( IsochoricNeoHookeanModel );
 
 
    IsochoricNeoHookeanModel() : IsochoricMooneyRivlinModel() {}
 
    IsochoricNeoHookeanModel(IsochoricNeoHookeanModel const& rOther) : IsochoricMooneyRivlinModel(rOther) {}
 
    IsochoricNeoHookeanModel& operator=(IsochoricNeoHookeanModel const& rOther)
    {
      IsochoricMooneyRivlinModel::operator=(rOther);
      return *this;
    }
 
    ConstitutiveModel::Pointer Clone() const override
    {
      return Kratos::make_shared<IsochoricNeoHookeanModel>(*this);
    }
 
    ~IsochoricNeoHookeanModel() override {}
 
 
 
 
 
 
    // Simplyfied methods must be implemented for performance purposes
 
    int Check(const Properties& rProperties, const ProcessInfo& rCurrentProcessInfo) override
    {
      KRATOS_TRY
 
      HyperElasticModel::Check(rProperties,rCurrentProcessInfo);
 
      if( C10.Key() == 0 || rProperties[C10] <= 0.00 )
    KRATOS_ERROR << "C10 has an invalid key or value" << std::endl;
 
      if( BULK_MODULUS.Key() == 0 || rProperties[BULK_MODULUS] <= 0.00 )
    KRATOS_ERROR << "BULK_MODULUS has an invalid key or value" << std::endl;
 
 
      return 0;
 
      KRATOS_CATCH(" ")
    }
 
 
 
 
 
 
 
    std::string Info() const override
    {
        std::stringstream buffer;
        buffer << "IsochoricNeoHookeanModel";
        return buffer.str();
    }
 
    void PrintInfo(std::ostream& rOStream) const override
    {
        rOStream << "IsochoricNeoHookeanModel";
    }
 
    void PrintData(std::ostream& rOStream) const override
    {
      rOStream << "IsochoricNeoHookeanModel Data";
    }
 
 
 
 
 
  protected:
 
 
 
 
 
 
    //specialized methods:
 
    virtual void CalculateVolumetricFactor(HyperElasticDataType& rVariables, double& rFactor)
    {
      KRATOS_TRY
 
      rFactor = 0.5 * (rVariables.Strain.Invariants.I3-1.0);
 
      KRATOS_CATCH(" ")
    }
 
    virtual void CalculatePressureFactor(HyperElasticDataType& rVariables, double& rFactor)
    {
      KRATOS_TRY
 
      this->CalculateVolumetricFactor(rVariables,rFactor);
 
      rFactor *= rVariables.GetMaterialParameters().GetBulkModulus();
 
      KRATOS_CATCH(" ")
    }
 
    virtual void CalculateConstitutiveMatrixFactor(HyperElasticDataType& rVariables, double& rFactor)
    {
      KRATOS_TRY
 
      rFactor = rVariables.Strain.Invariants.I3;
 
      KRATOS_CATCH(" ")
    }
 
    virtual void CalculateConstitutiveMatrixPressureFactor(HyperElasticDataType& rVariables, double& rFactor)
    {
      KRATOS_TRY
 
      rFactor = rVariables.GetMaterialParameters().GetBulkModulus();
 
      KRATOS_CATCH(" ")
    }
 
    // SPECIALIZED METHODS:
    // {
 
    // Specialized method instead of the general one (faster) this calculation is not needed
    void CalculateScalingFactors(HyperElasticDataType& rVariables) override
    {
      KRATOS_TRY
 
      // MooneyRivlinModel::CalculateScalingFactors(rVariables);
 
      // rVariables.Factors.Alpha4 = this->GetVolumetricFunction1stJDerivative(rVariables,rVariables.Factors.Alpha4);
      // rVariables.Factors.Beta4  = this->GetVolumetricFunction2ndJDerivative(rVariables,rVariables.Factors.Beta4);
 
      KRATOS_CATCH(" ")
    }
 
    // Specialized method instead of the general one (faster)
    virtual void CalculateAndAddIsochoricStressTensor(HyperElasticDataType& rVariables, MatrixType& rStressMatrix) override
    {
      KRATOS_TRY
 
      const ModelDataType&  rModelData        = rVariables.GetModelData();
      const StressMeasureType& rStressMeasure = rModelData.GetStressMeasure();
 
      MatrixType StressMatrix;
      const MaterialDataType& rMaterial = rVariables.GetMaterialParameters();
 
      if( rStressMeasure == ConstitutiveModelData::StressMeasureType::StressMeasure_PK2 ){ //Variables.Strain.Matrix = RightCauchyGreen (C)
 
        StressMatrix  = msIdentityMatrix;
        StressMatrix -= 1.0/3.0 * ( rVariables.Strain.Matrix(0,0) + rVariables.Strain.Matrix(1,1) + rVariables.Strain.Matrix(2,2) ) * rVariables.Strain.InverseMatrix;
 
        StressMatrix *= rMaterial.GetLameMu() * rVariables.Strain.Invariants.J_13 * rVariables.Strain.Invariants.J_13;
 
        rStressMatrix += StressMatrix;
      }
      else if( rStressMeasure == ConstitutiveModelData::StressMeasureType::StressMeasure_Kirchhoff ){ //Variables.Strain.Matrix = LeftCauchyGreen (b)
 
        StressMatrix  = rVariables.Strain.Matrix;
        StressMatrix -= 1.0/3.0 * ( rVariables.Strain.Matrix(0,0) + rVariables.Strain.Matrix(1,1) + rVariables.Strain.Matrix(2,2) ) * msIdentityMatrix;
        StressMatrix *= rMaterial.GetLameMu() * rVariables.Strain.Invariants.J_13 * rVariables.Strain.Invariants.J_13;
 
        rStressMatrix += StressMatrix;
      }
 
 
      KRATOS_CATCH(" ")
    }
 
    // Specialized method instead of the general one (faster) needs compatibility for incompressible law (BulkFactor Method)
    virtual void CalculateAndAddVolumetricStressTensor(HyperElasticDataType& rVariables, MatrixType& rStressMatrix) override
    {
      KRATOS_TRY
 
      const ModelDataType&  rModelData        = rVariables.GetModelData();
      const StressMeasureType& rStressMeasure = rModelData.GetStressMeasure();
 
      MatrixType StressMatrix;
 
      double Factor = 0;
      this->CalculatePressureFactor(rVariables,Factor);
 
 
      if( rStressMeasure == ConstitutiveModelData::StressMeasureType::StressMeasure_PK2 ){ //Variables.Strain.Matrix = RightCauchyGreen (C)
 
        StressMatrix = Factor * rVariables.Strain.InverseMatrix;
 
        rStressMatrix += StressMatrix;
      }
      else if( rStressMeasure == ConstitutiveModelData::StressMeasureType::StressMeasure_Kirchhoff ){ //Variables.Strain.Matrix = LeftCauchyGreen (b)
 
        StressMatrix = Factor * msIdentityMatrix;
 
        rStressMatrix += StressMatrix;
      }
 
      KRATOS_CATCH(" ")
    }
 
    // Specialized method instead of the general one (faster)
    virtual double& AddIsochoricConstitutiveComponent(HyperElasticDataType& rVariables, double &rCabcd,
                                  const unsigned int& a, const unsigned int& b,
                                  const unsigned int& c, const unsigned int& d) override
    {
      KRATOS_TRY
 
 
      double Cabcd = 0;
 
      const MaterialDataType& rMaterial = rVariables.GetMaterialParameters();
 
      const ModelDataType&  rModelData         = rVariables.GetModelData();
      const StressMeasureType& rStressMeasure  = rModelData.GetStressMeasure();
      const MatrixType& rIsochoricStressMatrix = rModelData.GetStressMatrix();
 
 
      if( rStressMeasure == ConstitutiveModelData::StressMeasureType::StressMeasure_PK2 ){ //mStrainMatrix = RightCauchyGreen (C)
 
        Cabcd  = (1.0/3.0) * (rVariables.Strain.InverseMatrix(a,b)*rVariables.Strain.InverseMatrix(d,c));
 
        Cabcd -= 0.5 * (rVariables.Strain.InverseMatrix(a,c)*rVariables.Strain.InverseMatrix(b,d)+rVariables.Strain.InverseMatrix(a,d)*rVariables.Strain.InverseMatrix(b,c));
 
        Cabcd *= rMaterial.GetLameMu() * ( rVariables.Strain.Matrix(0,0) + rVariables.Strain.Matrix(1,1) + rVariables.Strain.Matrix(2,2) ) * rVariables.Strain.Invariants.J_13 * rVariables.Strain.Invariants.J_13;
 
        Cabcd += (rVariables.Strain.InverseMatrix(c,d)*rIsochoricStressMatrix(a,b)+rIsochoricStressMatrix(c,d)*rVariables.Strain.InverseMatrix(a,b));
 
        Cabcd *= (-2.0/3.0);
 
      }
      else if( rStressMeasure == ConstitutiveModelData::StressMeasureType::StressMeasure_Kirchhoff ){ //mStrainMatrix = LeftCauchyGreen (b)
 
        Cabcd  = (1.0/3.0) * (msIdentityMatrix(a,b)*msIdentityMatrix(c,d));
 
 
        Cabcd -= 0.5 * (msIdentityMatrix(a,c)*msIdentityMatrix(b,d)+msIdentityMatrix(a,d)*msIdentityMatrix(b,c));
 
 
        Cabcd *= rMaterial.GetLameMu() * ( rVariables.Strain.Matrix(0,0) + rVariables.Strain.Matrix(1,1) + rVariables.Strain.Matrix(2,2) ) * rVariables.Strain.Invariants.J_13 * rVariables.Strain.Invariants.J_13;
 
 
        Cabcd +=  (msIdentityMatrix(c,d)*rIsochoricStressMatrix(a,b)+rIsochoricStressMatrix(c,d)*msIdentityMatrix(a,b));
 
        Cabcd *= (-2.0/3.0);
 
      }
 
      rCabcd += Cabcd;
 
      rVariables.State().Set(ConstitutiveModelData::CONSTITUTIVE_MATRIX_COMPUTED);
 
      return rCabcd;
 
      KRATOS_CATCH(" ")
    }
 
    // Specialized method instead of the general one (faster) needs compatibility for incompressible law (BulkFactor Method)
    virtual double& AddVolumetricConstitutiveComponent(HyperElasticDataType& rVariables, double &rCabcd,
                                   const unsigned int& a, const unsigned int& b,
                                   const unsigned int& c, const unsigned int& d) override
    {
      KRATOS_TRY
 
 
      double Cabcd = 0;
 
      const ModelDataType&  rModelData        = rVariables.GetModelData();
      const StressMeasureType& rStressMeasure = rModelData.GetStressMeasure();
 
      double FactorA = 0;
      this->CalculateConstitutiveMatrixFactor(rVariables,FactorA);
 
      double FactorB = 0;
      this->CalculateVolumetricFactor(rVariables,FactorB);
 
      double FactorC = 0;
      this->CalculateConstitutiveMatrixPressureFactor(rVariables,FactorC);
 
      if( rStressMeasure == ConstitutiveModelData::StressMeasureType::StressMeasure_PK2 ){ //mStrainMatrix = RightCauchyGreen (C)
 
        Cabcd  = FactorA * (rVariables.Strain.InverseMatrix(a,b)*rVariables.Strain.InverseMatrix(c,d));
 
        Cabcd -= FactorB * (rVariables.Strain.InverseMatrix(a,c)*rVariables.Strain.InverseMatrix(b,d)+rVariables.Strain.InverseMatrix(a,d)*rVariables.Strain.InverseMatrix(b,c));
 
        Cabcd *= FactorC;
 
      }
      else if( rStressMeasure == ConstitutiveModelData::StressMeasureType::StressMeasure_Kirchhoff ){ //mStrainMatrix = LeftCauchyGreen (b)
 
        Cabcd  = FactorA * (msIdentityMatrix(a,b)*msIdentityMatrix(c,d));
 
        Cabcd -= FactorB * (msIdentityMatrix(a,c)*msIdentityMatrix(b,d)+msIdentityMatrix(a,d)*msIdentityMatrix(b,c));
 
        Cabcd *= FactorC;
 
      }
 
      rCabcd += Cabcd;
 
      rVariables.State().Set(ConstitutiveModelData::CONSTITUTIVE_MATRIX_COMPUTED);
 
      return rCabcd;
 
      KRATOS_CATCH(" ")
    }
 
    // } SPECIALIED METHODS END
 
    //************// W
 
    void CalculateAndAddIsochoricStrainEnergy(HyperElasticDataType& rVariables, double& rIsochoricDensityFunction) override
    {
      KRATOS_TRY
 
      const MaterialDataType& rMaterial = rVariables.GetMaterialParameters();
 
      rIsochoricDensityFunction += rMaterial.GetModelParameters()[0] * ( rVariables.Strain.Invariants.J_13 * rVariables.Strain.Invariants.I1 - 3.0);
 
      KRATOS_CATCH(" ")
    }
 
 
    void CalculateAndAddVolumetricStrainEnergy(HyperElasticDataType& rVariables, double& rVolumetricDensityFunction) override
    {
      KRATOS_TRY
 
      const MaterialDataType& rMaterial = rVariables.GetMaterialParameters();
 
      //energy function "U(J) = (K/4)*(J²-1) - (K/2)*lnJ"
      rVolumetricDensityFunction += rMaterial.GetBulkModulus() * 0.25 * ( rVariables.Strain.Invariants.J * rVariables.Strain.Invariants.J - 1.0);
      rVolumetricDensityFunction -= rMaterial.GetBulkModulus() * 0.5 * std::log( rVariables.Strain.Invariants.J );
 
      KRATOS_CATCH(" ")
    }
 
    //************// dW
 
    double& GetFunction1stI1Derivative(HyperElasticDataType& rVariables, double& rDerivative) override //dW/dI1
    {
      KRATOS_TRY
 
      const MaterialDataType& rMaterial = rVariables.GetMaterialParameters();
 
      rDerivative = rMaterial.GetModelParameters()[0];
 
      return rDerivative;
 
      KRATOS_CATCH(" ")
    }
 
    double& GetFunction1stI2Derivative(HyperElasticDataType& rVariables, double& rDerivative) override //dW/dI2
    {
      KRATOS_TRY
 
      rDerivative = 0.0;
 
      return rDerivative;
 
      KRATOS_CATCH(" ")
    }
 
    double& GetFunction1stI3Derivative(HyperElasticDataType& rVariables, double& rDerivative) override //dW/dI3
    {
      KRATOS_TRY
 
      rDerivative = 0.0;
 
      return rDerivative;
 
      KRATOS_CATCH(" ")
    }
 
 
    double& GetVolumetricFunction1stJDerivative(HyperElasticDataType& rVariables, double& rDerivative) override //dU/dJ
    {
      KRATOS_TRY
 
      const MaterialDataType& rMaterial = rVariables.GetMaterialParameters();
 
      //derivative of "U(J) = (K/4)*(J²-1) - (K/2)*lnJ"
      //dU(J)/dJ = (K/2)*(J-1/J)
      rDerivative = 0.5 * rMaterial.GetBulkModulus() * ( rVariables.Strain.Invariants.J * rVariables.Strain.Invariants.J - 1.0 );
 
      rDerivative /= rVariables.Strain.Invariants.J;
 
      return rDerivative;
 
      KRATOS_CATCH(" ")
    }
 
 
    double& GetFunction2ndI1Derivative(HyperElasticDataType& rVariables, double& rDerivative) override //ddW/dI1dI1
    {
      KRATOS_TRY
 
      rDerivative = 0.0;
 
      return rDerivative;
 
      KRATOS_CATCH(" ")
    }
 
    double& GetFunction2ndI2Derivative(HyperElasticDataType& rVariables, double& rDerivative) override //ddW/dI2dI2
    {
      KRATOS_TRY
 
      rDerivative = 0.0;
 
      return rDerivative;
 
      KRATOS_CATCH(" ")
    }
 
    double& GetFunction2ndI3Derivative(HyperElasticDataType& rVariables, double& rDerivative) override //ddW/dI3dI3
    {
      KRATOS_TRY
 
      rDerivative = 0.0;
 
      return rDerivative;
 
      KRATOS_CATCH(" ")
    }
 
 
    double& GetVolumetricFunction2ndJDerivative(HyperElasticDataType& rVariables, double& rDerivative) override //ddU/dJdJ
    {
      KRATOS_TRY
 
      const MaterialDataType& rMaterial = rVariables.GetMaterialParameters();
 
      //derivative of "dU(J)/dJ = (K/2)*(J-1/J)"
      //ddU(J)/dJdJ = (K/2)*(1-1/J²)
      rDerivative = 0.5 * rMaterial.GetBulkModulus() * (rVariables.Strain.Invariants.J * rVariables.Strain.Invariants.J + 1.0 );
 
      rDerivative /= rVariables.Strain.Invariants.J * rVariables.Strain.Invariants.J ;
 
      return rDerivative;
 
      KRATOS_CATCH(" ")
    }
 
 
 
 
 
 
 
 
 
  private:
 
 
 
 
 
 
 
 
 
 
 
    friend class Serializer;
 
 
    void save(Serializer& rSerializer) const  override
    {
      KRATOS_SERIALIZE_SAVE_BASE_CLASS( rSerializer, IsochoricMooneyRivlinModel )
    }
 
    void load(Serializer& rSerializer) override
    {
      KRATOS_SERIALIZE_LOAD_BASE_CLASS( rSerializer, IsochoricMooneyRivlinModel )
    }
 
 
 
 
 
  }; // Class IsochoricNeoHookeanModel
 
 
 
 
 
 
 
 
}  // namespace Kratos.
 
#endif // KRATOS_ISOCHORIC_NEO_HOOKEAN_MODEL_H_INCLUDED  defined