incompressible_perturbation_potential_flow_element.h

Go to the documentation of this file.

//    |  /           |
//    ' /   __| _` | __|  _ \   __|
//    . \  |   (   | |   (   |\__ `
//   _|\_\_|  \__,_|\__|\___/ ____/
//                   Multi-Physics
//
//  License:         BSD License
//                   Kratos default license: kratos/license.txt
//
//  Main authors:    Inigo Lopez and Riccardo Rossi
//
 
#if !defined(KRATOS_INCOMPRESSIBLE_PERTURBATION_POTENTIAL_FLOW_ELEMENT_H)
#define KRATOS_INCOMPRESSIBLE_PERTURBATION_POTENTIAL_FLOW_ELEMENT_H
 
// Project includes
#include "includes/element.h"
#include "includes/kratos_flags.h"
 
#include "utilities/geometry_utilities.h"
#include "utilities/enrichment_utilities.h"
 
namespace Kratos
{
 
template <int Dim, int NumNodes>
class IncompressiblePerturbationPotentialFlowElement : public Element
{
public:
    template <unsigned int TNumNodes, unsigned int TDim>
    struct ElementalData
    {
        array_1d<double, TNumNodes> potentials, distances;
        double vol;
 
        BoundedMatrix<double, TNumNodes, TDim> DN_DX;
        array_1d<double, TNumNodes> N;
    };
 
    typedef Element BaseType;
    static constexpr int TNumNodes = NumNodes;
    static constexpr int TDim = Dim;
 
    KRATOS_CLASS_INTRUSIVE_POINTER_DEFINITION(IncompressiblePerturbationPotentialFlowElement);
 
 
    // Constructors.
 
 
    explicit IncompressiblePerturbationPotentialFlowElement(IndexType NewId = 0){}
 
    IncompressiblePerturbationPotentialFlowElement(IndexType NewId, const NodesArrayType& ThisNodes)
        : Element(NewId, ThisNodes){}
 
    IncompressiblePerturbationPotentialFlowElement(IndexType NewId, GeometryType::Pointer pGeometry)
        : Element(NewId, pGeometry){}
 
    IncompressiblePerturbationPotentialFlowElement(IndexType NewId,
                                       GeometryType::Pointer pGeometry,
                                       PropertiesType::Pointer pProperties)
        : Element(NewId, pGeometry, pProperties){}
 
    IncompressiblePerturbationPotentialFlowElement(IncompressiblePerturbationPotentialFlowElement const& rOther) = delete;
 
    IncompressiblePerturbationPotentialFlowElement(IncompressiblePerturbationPotentialFlowElement&& rOther) = delete;
 
    ~IncompressiblePerturbationPotentialFlowElement() override{}
 
 
    IncompressiblePerturbationPotentialFlowElement& operator=(IncompressiblePerturbationPotentialFlowElement const& rOther) = delete;
 
    IncompressiblePerturbationPotentialFlowElement& operator=(IncompressiblePerturbationPotentialFlowElement&& rOther) = delete;
 
 
    Element::Pointer Create(IndexType NewId,
                            NodesArrayType const& ThisNodes,
                            PropertiesType::Pointer pProperties) const override;
 
    Element::Pointer Create(IndexType NewId,
                            GeometryType::Pointer pGeom,
                            PropertiesType::Pointer pProperties) const override;
 
    Element::Pointer Clone(IndexType NewId, NodesArrayType const& ThisNodes) const override;
 
    void CalculateLocalSystem(MatrixType& rLeftHandSideMatrix,
                              VectorType& rRightHandSideVector,
                              const ProcessInfo& rCurrentProcessInfo) override;
 
    void CalculateRightHandSide(VectorType& rRightHandSideVector,
                                const ProcessInfo& rCurrentProcessInfo) override;
 
    void CalculateLeftHandSide(MatrixType& rLeftHandSideMatrix,
                                const ProcessInfo& rCurrentProcessInfo) override;
 
    void EquationIdVector(EquationIdVectorType& rResult, const ProcessInfo& CurrentProcessInfo) const override;
 
    void GetDofList(DofsVectorType& rElementalDofList, const ProcessInfo& rCurrentProcessInfo) const override;
 
 
    void CalculateOnIntegrationPoints(const Variable<double>& rVariable,
                                     std::vector<double>& rValues,
                                     const ProcessInfo& rCurrentProcessInfo) override;
 
    void CalculateOnIntegrationPoints(const Variable<int>& rVariable,
                                     std::vector<int>& rValues,
                                     const ProcessInfo& rCurrentProcessInfo) override;
 
    void CalculateOnIntegrationPoints(const Variable<array_1d<double, 3>>& rVariable,
                                     std::vector<array_1d<double, 3>>& rValues,
                                     const ProcessInfo& rCurrentProcessInfo) override;
 
 
    int Check(const ProcessInfo& rCurrentProcessInfo) const override;
 
 
    std::string Info() const override;
 
    void PrintInfo(std::ostream& rOStream) const override;
 
    void PrintData(std::ostream& rOStream) const override;
 
 
private:
 
    void GetEquationIdVectorNormalElement(EquationIdVectorType& rResult) const;
 
    void GetEquationIdVectorKuttaElement(EquationIdVectorType& rResult) const;
 
    void GetEquationIdVectorWakeElement(EquationIdVectorType& rResult) const;
 
    void GetDofListNormalElement(DofsVectorType& rElementalDofList) const;
 
    void GetDofListKuttaElement(DofsVectorType& rElementalDofList) const;
 
    void GetDofListWakeElement(DofsVectorType& rElementalDofList) const;
 
    void CalculateLeftHandSideNormalElement(MatrixType& rLeftHandSideMatrix,
                                           const ProcessInfo& rCurrentProcessInfo);
 
    void CalculateRightHandSideNormalElement(VectorType& rRightHandSideVector,
                                           const ProcessInfo& rCurrentProcessInfo);
 
    void CalculateLeftHandSideWakeElement(MatrixType& rLeftHandSideMatrix,
                                         const ProcessInfo& rCurrentProcessInfo);
 
    void CalculateBlockLeftHandSideWakeElement(BoundedMatrix<double, NumNodes, NumNodes>& rLhs_total,
                                             BoundedMatrix<double, NumNodes, NumNodes>& rLhs_wake_condition,
                                             const ElementalData<NumNodes, Dim>& rData,
                                             const ProcessInfo& rCurrentProcessInfo);
 
    void CalculateRightHandSideWakeElement(VectorType& rRightHandSideVector,
                                         const ProcessInfo& rCurrentProcessInfo);
 
    BoundedVector<double, NumNodes> CalculateRightHandSideWakeCondition(const ElementalData<NumNodes, Dim>& rData,
                                             const ProcessInfo& rCurrentProcessInfo,
                                             const array_1d<double, Dim>& rDiff_velocity);
 
    void CalculateLeftHandSideSubdividedElement(BoundedMatrix<double, NumNodes, NumNodes>& lhs_positive,
                                               BoundedMatrix<double, NumNodes, NumNodes>& lhs_negative,
                                               const ProcessInfo& rCurrentProcessInfo);
 
    void CalculateVolumesSubdividedElement(double& rUpper_vol,
                                           double& rLower_vol,
                                           const ProcessInfo& rCurrentProcessInfo);
 
    void ComputeLHSGaussPointContribution(const double weight,
                                          BoundedMatrix<double, NumNodes, NumNodes>& lhs,
                                          const ElementalData<NumNodes, Dim>& data) const;
 
    void AssignLeftHandSideSubdividedElement(MatrixType& rLeftHandSideMatrix,
                                            BoundedMatrix<double, NumNodes, NumNodes>& lhs_positive,
                                            BoundedMatrix<double, NumNodes, NumNodes>& lhs_negative,
                                            BoundedMatrix<double, NumNodes, NumNodes>& lhs_total,
                                            BoundedMatrix<double, NumNodes, NumNodes>& rLhs_wake_condition,
                                            const ElementalData<NumNodes, Dim>& data) const;
 
    void AssignLeftHandSideWakeElement(MatrixType& rLeftHandSideMatrix,
                                      BoundedMatrix<double, NumNodes, NumNodes>& lhs_total,
                                      BoundedMatrix<double, NumNodes, NumNodes>& rLhs_wake_condition,
                                      const ElementalData<NumNodes, Dim>& data) const;
 
    void AssignLeftHandSideWakeNode(MatrixType& rLeftHandSideMatrix,
                                   BoundedMatrix<double, NumNodes, NumNodes>& lhs_total,
                                   BoundedMatrix<double, NumNodes, NumNodes>& rLhs_wake_condition,
                                   const ElementalData<NumNodes, Dim>& data,
                                   unsigned int& row) const;
 
    void AssignRightHandSideWakeNode(VectorType& rRightHandSideVector,
                                   const BoundedVector<double, NumNodes>& rUpper_rhs,
                                   const BoundedVector<double, NumNodes>& rLower_rhs,
                                   const BoundedVector<double, NumNodes>& rWake_rhs,
                                   const ElementalData<NumNodes, Dim>& rData,
                                   unsigned int& rRow) const;
 
 
    friend class Serializer;
 
    void save(Serializer& rSerializer) const override;
 
    void load(Serializer& rSerializer) override;
 
 
}; // Class IncompressiblePerturbationPotentialFlowElement
 
} // namespace Kratos.
 
#endif // KRATOS_INCOMPRESSIBLE_PERTURBATION_POTENTIAL_FLOW_ELEMENT_H  defined