two_step_updated_lagrangian_V_P_implicit_element.h

Go to the documentation of this file.

//
//   Project Name:        KratosFluidDynamicsApplication $
//   Last modified by:    $Author:               AFranci $
//   Date:                $Date:            January 2016 $
//   Revision:            $Revision:                 0.0 $
//
//
 
#if !defined(KRATOS_TWO_STEP_UPDATED_LAGRANGIAN_V_P_IMPLICIT_ELEMENT_H_INCLUDED)
#define KRATOS_TWO_STEP_UPDATED_LAGRANGIAN_V_P_IMPLICIT_ELEMENT_H_INCLUDED
 
// System includes
#include <string>
#include <iostream>
 
// External includes
 
// Project includes
#include "containers/array_1d.h"
#include "includes/define.h"
#include "includes/serializer.h"
#include "geometries/geometry.h"
#include "utilities/math_utils.h"
#include "utilities/geometry_utilities.h"
 
#include "pfem_fluid_dynamics_application_variables.h"
 
#include "custom_elements/two_step_updated_lagrangian_element.h"
 
#include "includes/model_part.h"
 
namespace Kratos
{
 
 
 
 
 
 
 
 
  template <unsigned int TDim>
  class TwoStepUpdatedLagrangianVPImplicitElement : public TwoStepUpdatedLagrangianElement<TDim>
  {
 
  public:
 
    KRATOS_CLASS_INTRUSIVE_POINTER_DEFINITION(TwoStepUpdatedLagrangianVPImplicitElement);
 
    typedef TwoStepUpdatedLagrangianElement<TDim> BaseType;
 
    typedef Node NodeType;
 
    typedef Geometry<NodeType> GeometryType;
 
    typedef Geometry<NodeType>::PointsArrayType NodesArrayType;
 
    typedef Kratos::Vector VectorType;
 
    typedef Kratos::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 Element::PropertiesType::Pointer PropertiesType::Pointer; */
 
    typedef typename BaseType::PropertiesType PropertiesType;
 
    typedef typename BaseType::PropertiesType::Pointer pPropertiesType;
 
    typedef typename BaseType::ElementalVariables ElementalVariables;
 
    typedef ConstitutiveLaw ConstitutiveLawType;
 
    typedef ConstitutiveLawType::Pointer ConstitutiveLawPointerType;
 
 
    // Constructors.
 
 
    TwoStepUpdatedLagrangianVPImplicitElement(IndexType NewId = 0) : BaseType(NewId)
    {
    }
 
 
    TwoStepUpdatedLagrangianVPImplicitElement(IndexType NewId, const NodesArrayType &ThisNodes) : BaseType(NewId, ThisNodes)
    {
    }
 
 
    TwoStepUpdatedLagrangianVPImplicitElement(IndexType NewId, GeometryType::Pointer pGeometry) : BaseType(NewId, pGeometry)
    {
    }
 
 
    TwoStepUpdatedLagrangianVPImplicitElement(IndexType NewId, GeometryType::Pointer pGeometry, pPropertiesType pProperties) : BaseType(NewId, pGeometry, pProperties)
    {
    }
 
 
    TwoStepUpdatedLagrangianVPImplicitElement(TwoStepUpdatedLagrangianVPImplicitElement const &rOther) : BaseType(rOther)
    {
    }
 
    virtual ~TwoStepUpdatedLagrangianVPImplicitElement()
    {
    }
 
 
 
 
    Element::Pointer Create(IndexType NewId, NodesArrayType const &ThisNodes,
                            pPropertiesType pProperties) const override
    {
      return Element::Pointer(new TwoStepUpdatedLagrangianVPImplicitElement(NewId, this->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 CalculateLocalSystem(MatrixType &rLeftHandSideMatrix,
                              VectorType &rRightHandSideVector,
                              const ProcessInfo &rCurrentProcessInfo) override;
 
    void CalculateLeftHandSide(MatrixType &rLeftHandSideMatrix,
                               const ProcessInfo &rCurrentProcessInfo) override
    {
      KRATOS_TRY;
      KRATOS_THROW_ERROR(std::logic_error, "TwoStepUpdatedLagrangianVPImplicitElement::CalculateLeftHandSide not implemented", "");
      KRATOS_CATCH("");
    }
 
    void CalculateRightHandSide(VectorType &rRightHandSideVector,
                                const ProcessInfo &rCurrentProcessInfo) override
    {
      KRATOS_TRY;
      KRATOS_THROW_ERROR(std::logic_error, "TwoStepUpdatedLagrangianVPImplicitElement::CalculateRightHandSide not implemented", "");
      KRATOS_CATCH("");
    }
 
    void CalculateOnIntegrationPoints(const Variable<bool> &rVariable,
                                      std::vector<bool> &rOutput,
                                      const ProcessInfo &rCurrentProcessInfo) override;
 
    void CalculateOnIntegrationPoints(const Variable<double> &rVariable,
                                      std::vector<double> &rOutput,
                                      const ProcessInfo &rCurrentProcessInfo) override;
 
    void CalculateOnIntegrationPoints(const Variable<Vector> &rVariable,
                                      std::vector<Vector> &rOutput,
                                      const ProcessInfo &rCurrentProcessInfo) override;
 
    /* // The following methods have different implementations depending on TDim */
    /* /// Provides the global indices for each one of this element's local rows */
    /* /\** */
    /*  * this determines the elemental equation ID vector for all elemental */
    /*  * DOFs */
    /*  * @param rResult A vector containing the global Id of each row */
    /*  * @param rCurrentProcessInfo the current process info object (unused) */
    /*  *\/ */
 
    /* virtual GeometryData::IntegrationMethod GetIntegrationMethod() const; */
 
    void UpdateCauchyStress(unsigned int g, const ProcessInfo &rCurrentProcessInfo) override{};
 
    void InitializeElementalVariables(ElementalVariables &rElementalVariables) override
    {
      KRATOS_TRY;
      KRATOS_THROW_ERROR(std::logic_error, "InitializeElementalVariables", "");
      KRATOS_CATCH("");
    };
 
    /* void CalculateDeltaPosition (Matrix & rDeltaPosition); */
 
 
 
 
    int Check(const ProcessInfo &rCurrentProcessInfo) const override;
 
 
 
    std::string Info() const override
    {
      std::stringstream buffer;
      buffer << "TwoStepUpdatedLagrangianVPImplicitElement #" << BaseType::Id();
      return buffer.str();
    }
 
    void PrintInfo(std::ostream &rOStream) const override
    {
      rOStream << "TwoStepUpdatedLagrangianVPImplicitElement" << TDim << "D";
    }
 
    //        /// Print object's data.
    //        virtual void PrintData(std::ostream& rOStream) const;
 
 
  protected:
 
 
    ConstitutiveLaw::Pointer mpConstitutiveLaw = nullptr;
 
 
 
    void CalculateLocalMomentumEquations(MatrixType &rLeftHandSideMatrix,
                                         VectorType &rRightHandSideVector,
                                         const ProcessInfo &rCurrentProcessInfo) override;
 
    void CalculateLocalContinuityEqForPressure(MatrixType &rLeftHandSideMatrix,
                                               VectorType &rRightHandSideVector,
                                               const ProcessInfo &rCurrentProcessInfo) override{};
 
    double GetThetaMomentum() override
    {
      std::cout << "I SHOULD NOT ENTER HERE!" << std::endl;
      return 1.0;
    };
 
    double GetThetaContinuity() override
    {
      std::cout << "I SHOULD NOT ENTER HERE!" << std::endl;
      return 1.0;
    };
 
    void ComputeMeanValueMaterialTangentMatrix(ElementalVariables &rElementalVariables,
                                               double &MeanValue,
                                               const ShapeFunctionDerivativesType &rShapeDeriv,
                                               const double secondLame,
                                               double &bulkModulus,
                                               const double Weight,
                                               double &MeanValueMass,
                                               const double TimeStep){};
 
    virtual void ComputeBulkReductionCoefficient(MatrixType MassMatrix,
                                                 MatrixType StiffnessMatrix,
                                                 double &meanValueStiff,
                                                 double &bulkCoefficient,
                                                 double timeStep){};
 
    void ComputeCompleteTangentTerm(ElementalVariables &rElementalVariables,
                                    MatrixType &rDampingMatrix,
                                    const ShapeFunctionDerivativesType &rShapeDeriv,
                                    const double secondLame,
                                    const double bulkModulus,
                                    const double theta,
                                    const double Weight);
 
    virtual void ComputeBulkMatrixLump(MatrixType &BulkMatrix,
                                       const double Weight) override{};
 
    virtual void ComputeBoundLHSMatrix(MatrixType &BoundLHSMatrix,
                                       const ShapeFunctionsType &rN,
                                       const double Weight){};
 
    virtual void ComputeBoundRHSVector(VectorType &BoundRHSVector,
                                       const ShapeFunctionsType &rN,
                                       const double TimeStep,
                                       const double BoundRHSCoeffAcc,
                                       const double BoundRHSCoeffDev){};
 
    virtual void ComputeStabLaplacianMatrix(MatrixType &StabLaplacianMatrix,
                                            const ShapeFunctionDerivativesType &rShapeDeriv,
                                            const double Weight){};
 
    void CalcElasticPlasticCauchySplitted(
        ElementalVariables &rElementalVariables,
        const unsigned int g,
        const Vector& rN,
        const ProcessInfo &rCurrentProcessInfo,
        double &Density,
        double &DeviatoricCoeff,
        double &VolumetricCoeff) override
    {};
 
    virtual void CalculateTauFIC(double &TauOne,
                                 double ElemSize,
                                 const double Density,
                                 const double Viscosity,
                                 const ProcessInfo &rCurrentProcessInfo){};
 
    virtual void AddStabilizationMatrixLHS(MatrixType &rLeftHandSideMatrix,
                                           Matrix &BulkAccMatrix,
                                           const ShapeFunctionsType &rN,
                                           const double Weight){};
 
    virtual void AddStabilizationNodalTermsLHS(MatrixType &rLeftHandSideMatrix,
                                               const double Tau,
                                               const double Weight,
                                               const ShapeFunctionDerivativesType &rDN_DX,
                                               const SizeType i){};
 
    virtual void AddStabilizationNodalTermsRHS(VectorType &rRightHandSideVector,
                                               const double Tau,
                                               const double Density,
                                               const double Weight,
                                               const ShapeFunctionDerivativesType &rDN_DX,
                                               const SizeType i){};
 
 
 
 
 
  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);
    }
 
 
 
 
 
 
    TwoStepUpdatedLagrangianVPImplicitElement &operator=(TwoStepUpdatedLagrangianVPImplicitElement const &rOther);
 
    /* /// Copy constructor. */
    /* TwoStepUpdatedLagrangianVPImplicitElement(TwoStepUpdatedLagrangianVPImplicitElement const& rOther); */
 
 
  }; // Class TwoStepUpdatedLagrangianVPImplicitElement
 
 
 
 
  template <unsigned int TDim>
  inline std::istream &operator>>(std::istream &rIStream,
                                  TwoStepUpdatedLagrangianVPImplicitElement<TDim> &rThis)
  {
    return rIStream;
  }
 
  template <unsigned int TDim>
  inline std::ostream &operator<<(std::ostream &rOStream,
                                  const TwoStepUpdatedLagrangianVPImplicitElement<TDim> &rThis)
  {
    rThis.PrintInfo(rOStream);
    rOStream << std::endl;
    rThis.PrintData(rOStream);
 
    return rOStream;
  }
 
} // namespace Kratos.
 
#endif // KRATOS_TWO_STEP_UPDATED_LAGRANGIAN_V_P_ELEMENT  defined