feinterpol.h

Go to the documentation of this file.

/*
 *
 *                 #####    #####   ######  ######  ###   ###
 *               ##   ##  ##   ##  ##      ##      ## ### ##
 *              ##   ##  ##   ##  ####    ####    ##  #  ##
 *             ##   ##  ##   ##  ##      ##      ##     ##
 *            ##   ##  ##   ##  ##      ##      ##     ##
 *            #####    #####   ##      ######  ##     ##
 *
 *
 *             OOFEM : Object Oriented Finite Element Code
 *
 *               Copyright (C) 1993 - 2025   Borek Patzak
 *
 *
 *
 *       Czech Technical University, Faculty of Civil Engineering,
 *   Department of Structural Mechanics, 166 29 Prague, Czech Republic
 *
 *  This library is free software; you can redistribute it and/or
 *  modify it under the terms of the GNU Lesser General Public
 *  License as published by the Free Software Foundation; either
 *  version 2.1 of the License, or (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 *  Lesser General Public License for more details.
 *
 *  You should have received a copy of the GNU Lesser General Public
 *  License along with this library; if not, write to the Free Software
 *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
 */
 
#ifndef feinterpol_h
#define feinterpol_h
 
#include "oofemenv.h"
#include "error.h"
#include "inputrecord.h"
#include "intarray.h"
#include "integrationdomain.h"
#include "elementgeometrytype.h"
#include "materialmode.h"
#include "node.h"
#include "element.h"
 
namespace oofem {
class Element;
class FloatArray;
class FloatMatrix;
class IntArray;
class IntegrationRule;
class DummyFEInterpolation;
 
template <std::size_t N> class FloatArrayF;
template <std::size_t N, std::size_t M> class FloatMatrixF;

class OOFEM_EXPORT FEICellGeometry
{
public:
    FEICellGeometry() {}
    virtual ~FEICellGeometry() { }
    virtual int giveNumberOfVertices() const = 0;
    virtual const FloatArray giveVertexCoordinates(int i) const = 0;
    virtual const Element_Geometry_Type giveGeometryType() const = 0;
    virtual const FEInterpolation* getGeometryInterpolation() const {return nullptr;};
};
 

class OOFEM_EXPORT FEIVoidCellGeometry : public FEICellGeometry
{
    FloatArray tmp;
public:
    FEIVoidCellGeometry() : FEICellGeometry() { }
    virtual ~FEIVoidCellGeometry() { }
    int giveNumberOfVertices() const override
    {
        OOFEM_ERROR("no reference geometry");
    }
    const FloatArray giveVertexCoordinates(int i) const override
    {
        OOFEM_ERROR("no reference geometry");
    }
    const Element_Geometry_Type giveGeometryType() const override
    {
        return EGT_unknown;
    }
    std :: string errorInfo(const char *func) const { return func; } 
};
 

class OOFEM_EXPORT FEIElementGeometryWrapper : public FEICellGeometry
{
protected:
    const Element *elem;
public:
    FEIElementGeometryWrapper(const Element * elem) :
        FEICellGeometry(), elem(elem) { }
    virtual ~FEIElementGeometryWrapper() { }
    int giveNumberOfVertices() const override;
    const FloatArray giveVertexCoordinates(int i) const override
    {
        return elem->giveNode(i)->giveCoordinates();
    }
    const Element_Geometry_Type giveGeometryType() const override {
        return elem->giveGeometryType();
    }
    const FEInterpolation* getGeometryInterpolation() const override {return elem->getGeometryInterpolation();}
};
 

class OOFEM_EXPORT FEIElementDeformedGeometryWrapper : public FEICellGeometry
{
protected:
    const Element *elem;
    TimeStep *tStep;
    double alpha;
 
public:
    FEIElementDeformedGeometryWrapper(const Element *elem);
    FEIElementDeformedGeometryWrapper(const Element *elem, TimeStep *tStep);
    virtual ~FEIElementDeformedGeometryWrapper() { }
    int giveNumberOfVertices() const override;
    const FloatArray giveVertexCoordinates(int i) const override;
    void setTimeStep(TimeStep *ts) { tStep = ts; }
    void setAlpha(double val) { this->alpha = val; }
    const Element_Geometry_Type giveGeometryType() const override {
      return elem->giveGeometryType();}
};
 
 
  

class OOFEM_EXPORT FEIVertexListGeometryWrapper : public FEICellGeometry
{
protected:
    const std::vector< FloatArray > &coords;
    Element_Geometry_Type gtype;
 
public:
    FEIVertexListGeometryWrapper(const std::vector< FloatArray > &coords, const Element_Geometry_Type gt) : 
        FEICellGeometry(), coords(coords), gtype(gt) { }
    virtual ~FEIVertexListGeometryWrapper() { }
    int giveNumberOfVertices() const override { return (int)this->coords.size(); }
    const FloatArray giveVertexCoordinates(int i) const override { return this->coords [ i - 1 ]; }
    const Element_Geometry_Type giveGeometryType() const override {return gtype;}
};

class OOFEM_EXPORT FEInterpolation
{
protected:
    int order = 0;
 
public:
    FEInterpolation(int o) : order(o) { }
    virtual ~FEInterpolation() = default;
    virtual void initializeFrom(InputRecord &ir, ParameterManager&pm, int elnum, int priority) { }
    virtual void postInitialize(ParameterManager&pm, int elnum) {}
 
    /* @name basic interpolation services */

    virtual integrationDomain giveIntegrationDomain(const Element_Geometry_Type) const = 0;
    virtual const Element_Geometry_Type giveGeometryType() const = 0;
    int giveInterpolationOrder() const { return order; }
    virtual void giveCellDofMans(IntArray& nodes, IntArray& internalDofMans, Element* elem) const {}
    virtual void evalN(FloatArray &answer, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const = 0;
    virtual double evaldNdx(FloatMatrix &answer, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const  = 0;
    virtual void evald2Ndx2(FloatMatrix &answer, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const
    {
        OOFEM_ERROR("not implemented");
    }

    virtual void evaldNdxi(FloatMatrix &answer, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const
    {
        OOFEM_ERROR("not implemented");
    }

    virtual void giveLocalNodeCoords(FloatMatrix &answer, const Element_Geometry_Type) const
    {
        OOFEM_ERROR("FEInterpolation::giveLocalNodeCoords: not implemented");
    }

    virtual void local2global(FloatArray &answer, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const = 0;
    virtual int global2local(FloatArray &answer, const FloatArray &gcoords, const FEICellGeometry &cellgeo) const = 0;
    virtual double giveTransformationJacobian(const FloatArray &lcoords, const FEICellGeometry &cellgeo) const;
    virtual void giveJacobianMatrixAt(FloatMatrix &jacobianMatrix, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const
    { OOFEM_ERROR("Not overloaded."); }

    virtual std::unique_ptr<IntegrationRule> giveIntegrationRule(int order, const Element_Geometry_Type) const;


    virtual void boundaryEdgeEvalN(FloatArray &answer, int boundary, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const = 0;
    virtual double boundaryEdgeEvalNormal(FloatArray &answer, int boundary, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const = 0;
    virtual double boundaryEdgeGiveTransformationJacobian(int boundary, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const = 0;
    virtual void boundaryEdgeLocal2Global(FloatArray &answer, int boundary, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const = 0;
    virtual integrationDomain giveBoundaryEdgeIntegrationDomain(int boundary, const Element_Geometry_Type) const = 0;
    virtual std::unique_ptr<IntegrationRule> giveBoundaryEdgeIntegrationRule(int order, int boundary, const Element_Geometry_Type) const ;
    virtual IntArray boundaryEdgeGiveNodes(int boundary, const Element_Geometry_Type, bool includeHierarchical=false) const = 0;


    virtual void boundarySurfaceEvalN(FloatArray &answer, int isurf, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const = 0;
    virtual void boundarySurfaceEvaldNdx(FloatMatrix &answer, int isurf, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const = 0;
    virtual double boundarySurfaceEvalNormal(FloatArray &answer, int isurf, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const = 0;

    virtual void boundarySurfaceLocal2global(FloatArray &answer, int isurf, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const =0;
    virtual double boundarySurfaceGiveTransformationJacobian(int isurf, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const = 0;
    virtual integrationDomain giveBoundarySurfaceIntegrationDomain(int boundary, const Element_Geometry_Type) const = 0;
    virtual std::unique_ptr<IntegrationRule> giveBoundarySurfaceIntegrationRule(int order, int boundary, const Element_Geometry_Type) const ;
    virtual IntArray boundarySurfaceGiveNodes(int boundary, const Element_Geometry_Type, bool includeHierarchical=false) const = 0;


    virtual IntArray boundaryGiveNodes(int boundary, const Element_Geometry_Type) const = 0;
    virtual void boundaryEvalN(FloatArray &answer, int boundary, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const = 0;
    virtual double boundaryEvalNormal(FloatArray &answer, int boundary, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const = 0;
    virtual double boundaryGiveTransformationJacobian(int boundary, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const = 0;
    virtual void boundaryLocal2Global(FloatArray &answer, int boundary, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const = 0;
    virtual double evalNXIntegral(int boundary, const FEICellGeometry &cellgeo) const 
    {
        OOFEM_ERROR("Not implemented");
    }

    virtual integrationDomain giveBoundaryIntegrationDomain(int boundary, const Element_Geometry_Type) const = 0;
    virtual std::unique_ptr<IntegrationRule> giveBoundaryIntegrationRule(int order, int boundary, const Element_Geometry_Type) const;
    virtual const Element_Geometry_Type giveBoundaryGeometryType(int boundary) const = 0;

    virtual void surfaceEvaldNdxi(FloatMatrix &answer, const FloatArray &lcoords) const {;}
    virtual void surfaceEvald2Ndxi2(FloatMatrix &answer, const FloatArray &lcoords) const {;}


    virtual int giveKnotSpanBasisFuncMask(const IntArray &knotSpan, IntArray &mask) const { return 0; }
    virtual int giveNumberOfKnotSpanBasisFunctions(const IntArray &knotSpan) const { return 0; }
    virtual bool hasSubPatchFormulation() const  { return false; }
    virtual const FloatArray *giveKnotVector() const { return nullptr; }
    virtual int giveNumberOfKnotSpans(int dim) const { return 0; }
    virtual const FloatArray *giveKnotValues(int dim) const { return nullptr; }
    virtual const IntArray *giveKnotMultiplicity(int dim) const { return nullptr; }
    virtual int giveNsd(const Element_Geometry_Type) const = 0;
    virtual int giveNumberOfEdges(const Element_Geometry_Type) const 
    { OOFEM_ERROR("FEInterpolation :: giveNumberOfEdges : Not overloaded."); }


    virtual int giveNumberOfNodes(const Element_Geometry_Type) const
    { OOFEM_ERROR("giveNumberOfNodes: Not overloaded."); }


    virtual void initializeCell(Element* e) const {}
    
    std :: string errorInfo(const char *func) const { return func; } 
};
 
 
class DummyFEInterpolation : public FEInterpolation
{
public:
    DummyFEInterpolation() : FEInterpolation(0) { }
    integrationDomain giveIntegrationDomain(const Element_Geometry_Type) const override {return integrationDomain::_UnknownIntegrationDomain;}
    const Element_Geometry_Type giveGeometryType() const override {return EGT_unknown;}
    void evalN(FloatArray &answer, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const override {
        answer.clear();
    }
 
    double evaldNdx(FloatMatrix &answer, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const override {
        answer.clear();
        return 0.;
    }
 
    void local2global(FloatArray &answer, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const override {
        answer.clear();
    }
 
    int global2local(FloatArray &answer, const FloatArray &gcoords, const FEICellGeometry &cellgeo) const override {
        answer.clear();
        return 0;
    }
 
    double giveTransformationJacobian(const FloatArray &lcoords, const FEICellGeometry &cellgeo) const override {
        return 0.;
    }
 
    void boundaryEdgeEvalN(FloatArray &answer, int boundary, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const override {
        answer.clear();
    }
 
    double boundaryEdgeEvalNormal(FloatArray &answer, int boundary, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const override {
        answer.clear();
        return 0.;
    }
 
    double boundaryEdgeGiveTransformationJacobian(int boundary, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const override {
        return 0.;
    }
 
    void boundaryEdgeLocal2Global(FloatArray &answer, int boundary, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const override {
        answer.clear();
    }
 
    integrationDomain giveBoundaryEdgeIntegrationDomain(int boundary, const Element_Geometry_Type) const override {return integrationDomain::_UnknownIntegrationDomain;}
 
    IntArray boundaryEdgeGiveNodes(int boundary, const Element_Geometry_Type, bool includeHierarchical=false) const override {
        return IntArray();
    }
 
 
    void boundarySurfaceEvalN(FloatArray &answer, int isurf, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const override {
        answer.clear();
    }
 
    void boundarySurfaceEvaldNdx(FloatMatrix &answer, int isurf, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const override {
        answer.clear();
    }
 
    double boundarySurfaceEvalNormal(FloatArray &answer, int isurf, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const override {
        answer.clear();
        return 0.;
    }
 
    double boundarySurfaceGiveTransformationJacobian(int isurf, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const override {
        return 0.;
    }
 
    void boundarySurfaceLocal2global(FloatArray &answer, int isurf, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const override {
        answer.clear();
    }
 
    integrationDomain giveBoundarySurfaceIntegrationDomain(int boundary, const Element_Geometry_Type) const override {return integrationDomain::_UnknownIntegrationDomain;}
 
    IntArray boundarySurfaceGiveNodes(int boundary, const Element_Geometry_Type, bool includeHierarchical=false) const override {
        return IntArray();
    }
 
    void boundaryLocal2Global(FloatArray &answer, int boundary, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const override {
        answer.clear();
    }
 
    void boundaryEvalN(FloatArray &answer, int boundary, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const override {
        answer.clear();
    }
    double boundaryEvalNormal(FloatArray &answer, int boundary, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const override {
        answer.clear();
        return 0.;
    }
    double boundaryGiveTransformationJacobian(int boundary, const FloatArray &lcoords, const FEICellGeometry &cellgeo) const override {
        return 0.;
    }
 
    IntArray boundaryGiveNodes(int boundary, const Element_Geometry_Type) const override {
        return IntArray();
    }
    integrationDomain giveBoundaryIntegrationDomain(int boundary, const Element_Geometry_Type) const override {return integrationDomain::_UnknownIntegrationDomain;}
 
    double evalNXIntegral(int boundary, const FEICellGeometry &cellgeo) const override {
        return 0.;
    }
 
    int giveNsd(const Element_Geometry_Type) const override {
        return 0;
    }
 
    int giveNumberOfEdges(const Element_Geometry_Type) const override {
        return 0;
    }
 
    int giveNumberOfNodes(const Element_Geometry_Type) const override {
        return 0;
    }
    const Element_Geometry_Type giveBoundaryGeometryType(int boundary) const override {return EGT_unknown;}
};
 
 
} // end namespace oofem
#endif // feinterpol_h