incompressible_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_POTENTIAL_FLOW_ELEMENT_H)
#define KRATOS_INCOMPRESSIBLE_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 IncompressiblePotentialFlowElement : 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(IncompressiblePotentialFlowElement);
 
 
    // Constructors.
 
 
    explicit IncompressiblePotentialFlowElement(IndexType NewId = 0){}
 
    IncompressiblePotentialFlowElement(IndexType NewId, const NodesArrayType& ThisNodes)
        : Element(NewId, ThisNodes){}
 
    IncompressiblePotentialFlowElement(IndexType NewId, GeometryType::Pointer pGeometry)
        : Element(NewId, pGeometry){}
 
    IncompressiblePotentialFlowElement(IndexType NewId,
                                       GeometryType::Pointer pGeometry,
                                       PropertiesType::Pointer pProperties)
        : Element(NewId, pGeometry, pProperties){}
 
    IncompressiblePotentialFlowElement(IncompressiblePotentialFlowElement const& rOther) = delete;
 
    IncompressiblePotentialFlowElement(IncompressiblePotentialFlowElement&& rOther) = delete;
 
    ~IncompressiblePotentialFlowElement() override{}
 
 
    IncompressiblePotentialFlowElement& operator=(IncompressiblePotentialFlowElement const& rOther) = delete;
 
    IncompressiblePotentialFlowElement& operator=(IncompressiblePotentialFlowElement&& 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 FinalizeSolutionStep(const ProcessInfo& rCurrentProcessInfo) 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 GetWakeDistances(array_1d<double, NumNodes>& distances) const;
 
    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 CalculateLocalSystemNormalElement(MatrixType& rLeftHandSideMatrix,
                                           VectorType& rRightHandSideVector,
                                           const ProcessInfo& rCurrentProcessInfo);
 
    void CalculateLocalSystemWakeElement(MatrixType& rLeftHandSideMatrix,
                                         VectorType& rRightHandSideVector,
                                         const ProcessInfo& rCurrentProcessInfo);
 
    void CalculateLocalSystemSubdividedElement(BoundedMatrix<double, NumNodes, NumNodes>& lhs_positive,
                                               BoundedMatrix<double, NumNodes, NumNodes>& lhs_negative,
                                               const ProcessInfo& rCurrentProcessInfo);
 
    void ComputeLHSGaussPointContribution(const double weight,
                                          BoundedMatrix<double, NumNodes, NumNodes>& lhs,
                                          const ElementalData<NumNodes, Dim>& data) const;
 
    void CalculateBlockLeftHandSideWakeElement(BoundedMatrix<double, NumNodes, NumNodes>& rLhs_total,
                                            BoundedMatrix<double, NumNodes, NumNodes>& rLhs_wake_condition,
                                            const ElementalData<NumNodes, Dim>& rData,
                                            const ProcessInfo& rCurrentProcessInfo);
 
    void AssignLocalSystemSubdividedElement(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 AssignLocalSystemWakeElement(MatrixType& rLeftHandSideMatrix,
                                      BoundedMatrix<double, NumNodes, NumNodes>& lhs_total,
                                      BoundedMatrix<double, NumNodes, NumNodes>& rLhs_wake_condition,
                                      const ElementalData<NumNodes, Dim>& data) const;
 
    void AssignLocalSystemWakeNode(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 ComputeElementInternalEnergy();
 
 
    friend class Serializer;
 
    void save(Serializer& rSerializer) const override;
 
    void load(Serializer& rSerializer) override;
 
 
}; // Class IncompressiblePotentialFlowElement
 
} // namespace Kratos.
 
#endif // KRATOS_INCOMPRESSIBLE_POTENTIAL_FLOW_ELEMENT_H  defined