/Users/jack/Code/basso_dev/inc/Quad8Basis.h

Go to the documentation of this file.

#ifndef _QUAD8_BASIS_BASSO_H_
#define _QUAD8_BASIS_BASSO_H_

#include "basso.h"
#include "Basis.h"

namespace basso {

class Quad8Basis : public Basis {

public:
        
        // constructors
        Quad8Basis() { }
        
        // destructors
        virtual ~Quad8Basis() { }
        
        // member functions
        virtual BasisType       Type() const { return kQUAD8; }
        virtual BasisShape Shape() const { return kQUADRILATERAL; }
        virtual int                             NumNodes() const { return 8; }     
        virtual int                             NumEdges() const { return 4; }      
        virtual int                             NumFaces() const { return 0; }      
        virtual int                             Dimension() const { return 2; }
        virtual int                             Order() const { return 3; }
        
        virtual void            ParentCoord( Array< Point > &xi )       const;
        virtual Point           Centroid() const { return Point( 0.0, 0.0 ); }
        virtual void            NumNodesOnFaces( iArray &nn_face )      const;
        virtual void            NumNodesOnEdges( iArray &nn_edge )      const;
        virtual void            NodesOnFace ( int f, iArray &face_nodeids )             const;
        virtual void            NodesOnEdge ( int e, iArray &edge_nodeids )                     const;
        virtual void            FaceBasisType( Array<BasisType> &face_basis )   const;
        virtual void            EdgeBasisType( Array< BasisType > &edge_basis ) const;
        
        virtual void            Quadrature( int order, QuadratureRule &qrule ) const;
        
        virtual void            Na( const Point &p, nArray &shapefunct ) const { shape_quad8(shapefunct,p.x(),p.y()); }
        virtual void            DNa( const Point &p, nMatrix &grad_shape )      const { dshape_quad8(grad_shape,p.x(),p.y()); }
        virtual void            Na( nArray &shapefunct )    const { Na( Centroid(), shapefunct ); }
        virtual void            DNa( nMatrix &grad_shape ) const { DNa( Centroid(), grad_shape ); }

private:
        
};

void Quad8Basis::ParentCoord( Array< Point > &xi ) const
{
#ifdef ALLOW_DYNAMIC_RESIZE 
        if ( xi.size()!=NumNodes() )
                xi.resize(NumNodes());
#endif
        xi[0]=Point(-1.0,-1.0);
        xi[1]=Point( 1.0,-1.0);
        xi[2]=Point( 1.0, 1.0);
        xi[3]=Point(-1.0, 1.0);
        xi[4]=Point( 0.0,-1.0);
        xi[5]=Point( 1.0, 0.0);
        xi[6]=Point( 0.0, 1.0);
        xi[7]=Point(-1.0, 0.0);
}

void    Quad8Basis::NumNodesOnFaces( iArray &nn_face )  const
{
#ifdef ALLOW_DYNAMIC_RESIZE 
        if ( nn_face.size()!=NumEdges() )
                nn_face.resize( NumEdges() );
#endif
}

void    Quad8Basis::NumNodesOnEdges( iArray &nn_edge )  const
{
#ifdef ALLOW_DYNAMIC_RESIZE 
        if ( nn_edge.size()!=NumEdges() )
                nn_edge.resize( NumEdges() );
#endif
        for ( int i=0; i<NumEdges(); ++i )
                nn_edge[i]=3; 
}

void Quad8Basis::NodesOnFace ( int e, iArray &face_nodeids ) const
{
#ifdef ALLOW_DYNAMIC_RESIZE 
        if ( face_nodeids.size()!=0 )
                face_nodeids.resize(0);
#endif
}

void Quad8Basis::NodesOnEdge ( int e, iArray &edge_nodeids ) const
{
#ifdef ALLOW_DYNAMIC_RESIZE 
        if ( edge_nodeids.size()!=3 )
                edge_nodeids.resize(3);
#endif
        
        switch (e) {
        
                case 0:
                edge_nodeids[0]=0; edge_nodeids[1]=1; edge_nodeids[2]=4;
                break;
                
                case 1:
                edge_nodeids[0]=1; edge_nodeids[1]=2; edge_nodeids[2]=5;
                break;
                
                case 2:
                edge_nodeids[0]=2; edge_nodeids[1]=3; edge_nodeids[2]=6;
                break;
                
                case 3:
                edge_nodeids[0]=3; edge_nodeids[1]=4; edge_nodeids[2]=7;
                break;
                
                default:
                WarningMessage("Quad8Basis::NodesOnFace","face id out of range");
                break;
                
        }
}

void Quad8Basis::FaceBasisType( Array< BasisType > &face_basis ) const
{
#ifdef ALLOW_DYNAMIC_RESIZE 
        if ( face_basis.size()!=NumFaces() )
                face_basis.resize(NumFaces());
#endif
}

void Quad8Basis::EdgeBasisType( Array< BasisType > &edge_basis ) const
{
#ifdef ALLOW_DYNAMIC_RESIZE 
        if ( edge_basis.size()!=NumEdges() )
                edge_basis.resize(NumEdges());
#endif
        for ( int i=0; i<NumEdges(); ++i )
                edge_basis[i]=kLINE3; 
}

void Quad8Basis::Quadrature( int order, QuadratureRule &qrule ) const
{
        
        int npts;
        npts=(order+1)/2;

        if ( vect_size(qrule)!=npts )
                resize(qrule,npts);

        quadrature_gauss2d( qrule );
        
}

} // end namespace

#endif

---