two_step_updated_lagrangian_V_P_implicit_fluid_element.h

Go to the documentation of this file.

//
//   Project Name:        KratosFluidDynamicsApplication $
//   Last modified by:    $Author:               AFranci $
//   Date:                $Date:           February 2016 $
//   Revision:            $Revision:                 0.0 $
//
//
 
#if !defined(KRATOS_TWO_STEP_UPDATED_LAGRANGIAN_V_P_IMPLICIT_FLUID_ELEMENT_H_INCLUDED)
#define KRATOS_TWO_STEP_UPDATED_LAGRANGIAN_V_P_IMPLICIT_FLUID_ELEMENT_H_INCLUDED
 
// System includes
#include <string>
#include <iostream>
 
// External includes
 
// Project includes
#include "containers/array_1d.h"
#include "includes/define.h"
/* #include "includes/element.h" */
#include "includes/serializer.h"
#include "geometries/geometry.h"
#include "utilities/math_utils.h"
#include "includes/constitutive_law.h"
 
#include "custom_elements/two_step_updated_lagrangian_V_P_implicit_element.h"
 
namespace Kratos
{
 
 
 
 
 
 
 
 
  template <unsigned int TDim>
  class TwoStepUpdatedLagrangianVPImplicitFluidElement : public TwoStepUpdatedLagrangianVPImplicitElement<TDim>
  {
 
  public:
 
    KRATOS_CLASS_INTRUSIVE_POINTER_DEFINITION(TwoStepUpdatedLagrangianVPImplicitFluidElement);
 
    typedef TwoStepUpdatedLagrangianVPImplicitElement<TDim> BaseType;
 
    typedef Node NodeType;
 
    typedef Geometry<NodeType> GeometryType;
 
    typedef Geometry<NodeType>::PointsArrayType NodesArrayType;
 
    typedef Vector VectorType;
 
    typedef Matrix MatrixType;
 
    typedef std::size_t IndexType;
 
    typedef std::size_t SizeType;
 
    typedef std::vector<std::size_t> EquationIdVectorType;
 
    typedef std::vector<Dof<double>::Pointer> DofsVectorType;
 
    typedef PointerVectorSet<Dof<double>, IndexedObject> DofsArrayType;
 
    typedef Kratos::Vector ShapeFunctionsType;
 
    typedef Kratos::Matrix ShapeFunctionDerivativesType;
 
    typedef GeometryType::ShapeFunctionsGradientsType ShapeFunctionDerivativesArrayType;
 
    typedef typename BaseType::PropertiesType PropertiesType;
 
    typedef typename BaseType::PropertiesType::Pointer pPropertiesType;
 
    typedef typename BaseType::ElementalVariables ElementalVariables;
 
    typedef GlobalPointersVector<Node> NodeWeakPtrVectorType;
 
    typedef ConstitutiveLaw ConstitutiveLawType;
 
    typedef ConstitutiveLawType::Pointer ConstitutiveLawPointerType;
 
 
    // Constructors.
 
 
    TwoStepUpdatedLagrangianVPImplicitFluidElement(IndexType NewId = 0) : BaseType(NewId)
    {
    }
 
 
    TwoStepUpdatedLagrangianVPImplicitFluidElement(IndexType NewId, const NodesArrayType &ThisNodes) : BaseType(NewId, ThisNodes)
    {
    }
 
 
    TwoStepUpdatedLagrangianVPImplicitFluidElement(IndexType NewId, GeometryType::Pointer pGeometry) : BaseType(NewId, pGeometry)
    {
    }
 
 
    TwoStepUpdatedLagrangianVPImplicitFluidElement(IndexType NewId, GeometryType::Pointer pGeometry, pPropertiesType pProperties) : BaseType(NewId, pGeometry, pProperties)
    {
    }
 
 
    TwoStepUpdatedLagrangianVPImplicitFluidElement(TwoStepUpdatedLagrangianVPImplicitFluidElement const &rOther) : BaseType(rOther)
    {
    }
 
    virtual ~TwoStepUpdatedLagrangianVPImplicitFluidElement()
    {
    }
 
 
 
 
    Element::Pointer Create(IndexType NewId, NodesArrayType const &ThisNodes,
                            pPropertiesType pProperties) const override
    {
      return Element::Pointer(new TwoStepUpdatedLagrangianVPImplicitFluidElement(NewId, BaseType::GetGeometry().Create(ThisNodes), pProperties));
    }
 
    Element::Pointer Clone(IndexType NewId, NodesArrayType const &ThisNodes) const override;
 
    void Initialize(const ProcessInfo &rCurrentProcessInfo) override;
 
    void InitializeSolutionStep(const ProcessInfo &rCurrentProcessInfo) override{};
 
    void InitializeNonLinearIteration(const ProcessInfo &rCurrentProcessInfo) override{};
 
    void CalculateLeftHandSide(MatrixType &rLeftHandSideMatrix,
                               const ProcessInfo &rCurrentProcessInfo) override
    {
      KRATOS_TRY;
      KRATOS_THROW_ERROR(std::logic_error, "TwoStepUpdatedLagrangianVPImplicitFluidElement::CalculateLeftHandSide not implemented", "");
      KRATOS_CATCH("");
    }
 
    void CalculateRightHandSide(VectorType &rRightHandSideVector,
                                const ProcessInfo &rCurrentProcessInfo) override
    {
      KRATOS_TRY;
      KRATOS_THROW_ERROR(std::logic_error, "TwoStepUpdatedLagrangianVPImplicitFluidElement::CalculateRightHandSide not implemented", "");
      KRATOS_CATCH("");
    }
 
    // The following methods have different implementations depending on TDim
 
 
    void InitializeElementalVariables(ElementalVariables &rElementalVariables) override;
 
 
 
 
    int Check(const ProcessInfo &rCurrentProcessInfo) const override;
 
 
 
    std::string Info() const override
    {
      std::stringstream buffer;
      buffer << "TwoStepUpdatedLagrangianVPImplicitFluidElement #" << BaseType::Id();
      return buffer.str();
    }
 
    void PrintInfo(std::ostream &rOStream) const override
    {
      rOStream << "TwoStepUpdatedLagrangianVPImplicitFluidElement" << TDim << "D";
    }
 
    //        /// Print object's data.
    //        virtual void PrintData(std::ostream& rOStream) const;
 
 
 
  protected:
 
 
    ConstitutiveLaw::Pointer mpConstitutiveLaw = nullptr;
 
 
 
    void ComputeMeanValueMaterialTangentMatrix(ElementalVariables &rElementalVariables,
                                               double &MeanValue,
                                               const ShapeFunctionDerivativesType &rShapeDeriv,
                                               const double secondLame,
                                               double &bulkModulus,
                                               const double Weight,
                                               double &MeanValueMass,
                                               const double TimeStep);
 
    void ComputeBulkReductionCoefficient(MatrixType MassMatrix,
                                         MatrixType StiffnessMatrix,
                                         double &meanValueStiff,
                                         double &bulkCoefficient,
                                         double timeStep) override;
 
    void ComputeBulkMatrixLump(MatrixType &BulkMatrix,
                               const double Weight) override;
 
    void CalcElasticPlasticCauchySplitted(
        ElementalVariables &rElementalVariables,
        const unsigned int g,
        const Vector& rN,
        const ProcessInfo &rCurrentProcessInfo,
        double &Density,
        double &DeviatoricCoeff,
        double &VolumetricCoeff) override;
 
    double GetThetaMomentum() override { return 0.5; };
 
    double GetThetaContinuity() override { return 1.0; };
 
    void UpdateStressTensor(ElementalVariables &rElementalVariables);
 
    void SetYieldedElements(ElementalVariables &rElementalVariables);
 
 
 
 
 
  private:
 
 
 
    friend class Serializer;
 
    void save(Serializer &rSerializer) const override
    {
      KRATOS_SERIALIZE_SAVE_BASE_CLASS(rSerializer, Element);
    }
 
    void load(Serializer &rSerializer) override
    {
      KRATOS_SERIALIZE_LOAD_BASE_CLASS(rSerializer, Element);
    }
 
 
 
 
 
 
    TwoStepUpdatedLagrangianVPImplicitFluidElement &operator=(TwoStepUpdatedLagrangianVPImplicitFluidElement const &rOther);
 
    /* /// Copy constructor. */
    /* TwoStepUpdatedLagrangianVPImplicitFluidElement(TwoStepUpdatedLagrangianVPImplicitFluidElement const& rOther); */
 
 
  }; // Class TwoStepUpdatedLagrangianVPImplicitFluidElement
 
 
 
 
  template <unsigned int TDim>
  inline std::istream &operator>>(std::istream &rIStream,
                                  TwoStepUpdatedLagrangianVPImplicitFluidElement<TDim> &rThis)
  {
    return rIStream;
  }
 
  template <unsigned int TDim>
  inline std::ostream &operator<<(std::ostream &rOStream,
                                  const TwoStepUpdatedLagrangianVPImplicitFluidElement<TDim> &rThis)
  {
    rThis.PrintInfo(rOStream);
    rOStream << std::endl;
    rThis.PrintData(rOStream);
 
    return rOStream;
  }
 
} // namespace Kratos.
 
#endif // KRATOS_TWO_STEP_UPDATED_LAGRANGIAN_V_P_FLUID_ELEMENT  defined