monolithic_dem_coupled_wall_condition.h

Go to the documentation of this file.

//    |  /           |
//    ' /   __| _` | __|  _ \   __|
//    . \  |   (   | |   (   |\__ \.
//   _|\_\_|  \__,_|\__|\___/ ____/
//                   Multi-Physics
//
//  License:         BSD License
//                   Kratos default license: kratos/license.txt
//
//  Main authors:    Guillermo Casas gcasas@gmail.com
//
 
#ifndef KRATOS_MONOLITHIC_DEM_COUPLED_WALL_CONDITION_H
#define KRATOS_MONOLITHIC_DEM_COUPLED_WALL_CONDITION_H
 
// System includes
#include <string>
#include <iostream>
 
 
// External includes
 
 
// Project includes
#include "includes/define.h"
#include "includes/serializer.h"
#include "includes/condition.h"
#include "includes/process_info.h"
 
// Application includes
#include "fluid_dynamics_application_variables.h"
#include "includes/deprecated_variables.h"
#include "includes/cfd_variables.h"
 
//Other Applications includes
#include "fluid_dynamics_application.h"
#include "custom_conditions/monolithic_wall_condition.h"
 
namespace Kratos
{
 
 
 
 
 
 
 
template< unsigned int TDim, unsigned int TNumNodes = TDim >
class KRATOS_API(SWIMMING_DEM_APPLICATION) MonolithicDEMCoupledWallCondition : public MonolithicWallCondition < TDim, TNumNodes >
{
public:
    KRATOS_CLASS_INTRUSIVE_POINTER_DEFINITION(MonolithicDEMCoupledWallCondition);
 
    typedef Node NodeType;
 
    typedef Properties PropertiesType;
 
    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;
 
 
 
 
    MonolithicDEMCoupledWallCondition(IndexType NewId = 0):
        MonolithicWallCondition< TDim, TNumNodes >(NewId)
    {
    }
 
 
    MonolithicDEMCoupledWallCondition(IndexType NewId,
                            const NodesArrayType& ThisNodes):
        MonolithicWallCondition< TDim, TNumNodes >(NewId,ThisNodes)
    {
    }
 
 
    MonolithicDEMCoupledWallCondition(IndexType NewId,
                            GeometryType::Pointer pGeometry):
        MonolithicWallCondition< TDim, TNumNodes >(NewId,pGeometry)
    {
    }
 
 
    MonolithicDEMCoupledWallCondition(IndexType NewId,
                            GeometryType::Pointer pGeometry,
                            PropertiesType::Pointer pProperties):
        MonolithicWallCondition< TDim, TNumNodes >(NewId,pGeometry,pProperties)
    {
    }
 
    MonolithicDEMCoupledWallCondition(MonolithicDEMCoupledWallCondition const& rOther):
        MonolithicWallCondition< TDim, TNumNodes >(rOther)
    {
    }
 
    virtual ~MonolithicDEMCoupledWallCondition() {}
 
 
 
    MonolithicDEMCoupledWallCondition & operator=(MonolithicDEMCoupledWallCondition const& rOther)
    {
        Condition::operator=(rOther);
 
        return *this;
    }
 
 
 
    Condition::Pointer Create(IndexType NewId, NodesArrayType const& ThisNodes, PropertiesType::Pointer pProperties) const override
    {
        return Condition::Pointer(new MonolithicDEMCoupledWallCondition(NewId, this->GetGeometry().Create(ThisNodes), pProperties));
    }
    Condition::Pointer Create(IndexType NewId,
                           GeometryType::Pointer pGeom,
                           PropertiesType::Pointer pProperties) const override
    {
        return Kratos::make_intrusive< MonolithicDEMCoupledWallCondition >(NewId, pGeom, pProperties);
    }
 
 
    void CalculateLocalSystem(MatrixType& rLeftHandSideMatrix,
                                      VectorType& rRightHandSideVector,
                                      const ProcessInfo& rCurrentProcessInfo) override
    {
        const SizeType BlockSize = (rCurrentProcessInfo[FRACTIONAL_STEP] == 1) ? TDim + 1 : TDim;
        const SizeType LocalSize = BlockSize * TNumNodes;
 
        if (rLeftHandSideMatrix.size1() != LocalSize)
            rLeftHandSideMatrix.resize(LocalSize,LocalSize);
 
        if (rRightHandSideVector.size() != LocalSize)
            rRightHandSideVector.resize(LocalSize);
 
        noalias(rLeftHandSideMatrix) = ZeroMatrix(LocalSize,LocalSize);
        noalias(rRightHandSideVector) = ZeroVector(LocalSize);
 
    }
 
 
    void CalculateLeftHandSide(MatrixType& rLeftHandSideMatrix, const ProcessInfo& rCurrentProcessInfo) override
    {
        const SizeType BlockSize = (rCurrentProcessInfo[FRACTIONAL_STEP] == 1) ? TDim + 1 : TDim;
        const SizeType LocalSize = BlockSize * TNumNodes;
 
        if (rLeftHandSideMatrix.size1() != LocalSize)
            rLeftHandSideMatrix.resize(LocalSize,LocalSize);
 
        noalias(rLeftHandSideMatrix) = ZeroMatrix(LocalSize,LocalSize);
    }
 
 
    void CalculateRightHandSide(VectorType& rRightHandSideVector, const  ProcessInfo& rCurrentProcessInfo) override
    {
        if (rCurrentProcessInfo[FRACTIONAL_STEP] == 1){
            const SizeType BlockSize = TDim + 1;
            const SizeType LocalSize = BlockSize * TNumNodes;
 
            if (rRightHandSideVector.size() != LocalSize)
                rRightHandSideVector.resize(LocalSize);
 
            noalias(rRightHandSideVector) = ZeroVector(LocalSize);
        }
 
        else {
            const unsigned int BlockSize = TDim;
            const SizeType LocalSize = BlockSize * TNumNodes;
 
            if (rRightHandSideVector.size() != LocalSize)
                rRightHandSideVector.resize(LocalSize);
 
            noalias(rRightHandSideVector) = ZeroVector(LocalSize);
 
//            const unsigned int LocalSize = TDim;
 
//            const GeometryType& rGeom = this->GetGeometry();
//            const GeometryType::IntegrationPointsArrayType& IntegrationPoints = rGeom.IntegrationPoints(GeometryData::IntegrationMethod::GI_GAUSS_2);
//            const unsigned int NumGauss = IntegrationPoints.size();
 
//            MatrixType NContainer = rGeom.ShapeFunctionsValues(GeometryData::IntegrationMethod::GI_GAUSS_2);
 
//            array_1d<double,3> Normal;
//            this->CalculateNormal(Normal); //this already contains the area
//            double A = std::sqrt(Normal[0]*Normal[0]+Normal[1]*Normal[1]+Normal[2]*Normal[2]);
//            Normal /= A;
 
//            // CAUTION: "Jacobian" is 2.0*A for triangles but 0.5*A for lines
//            double J = (TDim == 2) ? 0.5*A : 2.0*A;
 
//            for (unsigned int g = 0; g < NumGauss; g++)
//            {
//                Vector N = row(NContainer,g);
//                double Weight = J * IntegrationPoints[g].Weight();
 
//                // Neumann boundary condition
//                for (unsigned int i = 0; i < TNumNodes; i++)
//                {
//                    //unsigned int row = i*LocalSize;
//                    const NodeType& rConstNode = this->GetGeometry()[i];
//                    const array_1d<double,3>& rVel = this->GetGeometry()[j].FastGetSolutionStepValue(VELOCITY);
 
//                    for (unsigned int j = 0; j < TNumNodes; j++)
//                    {
//                        unsigned int row = j*LocalSize;
//                        for (unsigned int d = 0; d < TDim;d++)
//                            rLocalVector[row+d] -= Weight*DN[j]*N[i]*rVel[d]*Normal[d];
//                    }
//                }
//            }
        }
    }
 
 
 
    void EquationIdVector(EquationIdVectorType& rResult, const ProcessInfo& rCurrentProcessInfo) const  override;
 
 
 
    void GetDofList(DofsVectorType& ConditionDofList, const ProcessInfo& CurrentProcessInfo) const override;
 
 
 
 
 
 
    virtual std::string Info() const override
    {
        std::stringstream buffer;
        buffer << "MonolithicDEMCoupledWallCondition" << TDim << "D";
        return buffer.str();
    }
 
    virtual void PrintInfo(std::ostream& rOStream) const override
    {
        rOStream << "MonolithicDEMCoupledWallCondition";
    }
 
    virtual void PrintData(std::ostream& rOStream) const  override{}
 
 
 
 
 
protected:
 
 
 
 
 
 
 
 
 
 
 
 
 
 
private:
 
 
 
 
 
    friend class Serializer;
 
    virtual void save(Serializer& rSerializer) const override
    {
        KRATOS_SERIALIZE_SAVE_BASE_CLASS(rSerializer, Condition );
    }
 
    virtual void load(Serializer& rSerializer) override
    {
        KRATOS_SERIALIZE_LOAD_BASE_CLASS(rSerializer, Condition );
    }
 
 
 
 
 
 
 
 
 
 
 
 
}; // Class MonolithicDEMCoupledWallCondition
 
 
 
 
 
 
 
template< unsigned int TDim, unsigned int TNumNodes >
inline std::istream& operator >> (std::istream& rIStream,
                                  MonolithicDEMCoupledWallCondition<TDim,TNumNodes>& rThis)
{
    return rIStream;
}
 
template< unsigned int TDim, unsigned int TNumNodes >
inline std::ostream& operator << (std::ostream& rOStream,
                                  const MonolithicDEMCoupledWallCondition<TDim,TNumNodes>& rThis)
{
    rThis.PrintInfo(rOStream);
    rOStream << std::endl;
    rThis.PrintData(rOStream);
 
    return rOStream;
}
 
 
 
 
}  // namespace Kratos.
 
#endif // KRATOS_MONOLITHIC_DEM_COUPLED_WALL_CONDITION_H