bilinear_2d.h

//
// Copyright (c) 2014 Limit Point Systems, Inc. 
//
// Licensed under the Apache License, Version 2.0 (the "License");
// you may not use this file except in compliance with the License.
// You may obtain a copy of the License at
//
//   http://www.apache.org/licenses/LICENSE-2.0
//
// Unless required by applicable law or agreed to in writing, software
// distributed under the License is distributed on an "AS IS" BASIS,
// WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
// See the License for the specific language governing permissions and
// limitations under the License.
//

// Interface for class bilinear_2d

#ifndef BILINEAR_2D_H
#define BILINEAR_2D_H

#ifndef SHEAF_DLL_SPEC_H
#include "SheafSystem/sheaf_dll_spec.h"
#endif

#ifndef LINEAR_FCN_SPACE_H
#include "SheafSystem/linear_fcn_space.h"
#endif

#ifndef BLOCK_H
#include "SheafSystem/block.h"
#endif

namespace fiber_bundle
{

class SHEAF_DLL_SPEC bilinear_2d : public linear_fcn_space
{

  // ===========================================================
  // ===========================================================

public:

  bilinear_2d();

  bilinear_2d(const bilinear_2d& xother);

  virtual ~bilinear_2d();

  double inverse_jacobian(const double xjacobian[2][2],
                          double xinverse_jacobian[2][2]);

protected:

private:

  enum static_const_int {DL = 4};  

  value_type _basis_value_buffer[DL];

  value_type _basis_deriv_value_buffer[2*DL];

  //value_type _jacobian_value_buffer[4];
  value_type _jacobian_value_buffer[128]; 

  //block<int[2]> _jacobian_value_block;
  //vector<int[2]> _jacobian_value_vector;

  double solve_quadratic(double xcoefficients[]);

  int solve_quadratic(double xcoefficients[], double xresult[]);


  // ===========================================================
  // ===========================================================

public:

  virtual int dl() const;

  virtual void basis_at_coord(const dof_type xlocal_coord[],
                              size_type xlocal_coord_ub);

  virtual void basis_derivs_at_coord(const dof_type xlocal_coords[],
                                     size_type xlocal_coords_ub);

protected:

private:


  // ===========================================================
  // ===========================================================

public:

  virtual value_type jacobian_determinant(const dof_type xcoord_dofs[],
                                          size_type xcoord_dofs_ub,
                                          size_type xdf,
                                          const coord_type xlocal_coords[],
                                          size_type xlocal_coords_ub);

  virtual value_type volume(const dof_type xcoord_dofs[],
                            size_type xcoord_dofs_ub,
                            size_type xdf);

  virtual void integrate(const dof_type xcoord_dofs[],
                         size_type xcoord_dofs_ub,
                         size_type xdf,
                         const dof_type xintegrands[],
                         size_type xintegrands_ub,
                         value_type xresult_integrals[],
                         size_type xresult_integrals_ub);

  virtual void integrate(const dof_type xcoord_dofs[],
                         size_type xcoord_dofs_ub,
                         size_type xdf,
                         const dof_type xintegrand,
                         value_type xresult_integrals[],
                         size_type xresult_integrals_ub);

  virtual void gauss_point(pod_index_type xindex,
                           coord_type xresult[],
                           size_type xresult_ub);

protected:

private:


  // ===========================================================
  // ===========================================================

public:

  void dxi_local(size_type xlocal_coord_index,
         const dof_type xsource_dofs[],
         size_type xsource_dofs_ub,
         dof_type xresult_dofs[],
         size_type xresult_dofs_ub) const;
  
  virtual void jacobian(const dof_type xcoord_dofs[],
                        size_type xcoord_dofs_ub,
                        size_type xdf,
                        const dof_type xlocal_coords[],
                        size_type xlocal_coords_ub);

protected:

private:


  // ===========================================================
  // ===========================================================

public:

  virtual int db() const;

  virtual void local_coordinates(pod_index_type xindex,
                                 coord_type xresult[],
                                 size_type xresult_ub) const;

  void edge_center(pod_index_type xi, coord_type xresult[], size_type xresult_ub) const;

  void edge_center(pod_index_type xi, block<coord_type>& xresult) const;

  virtual bool in_standard_domain(const dof_type xlocal_coords[],
                                  size_type xlocal_coords_ub) const;

protected:

private:


  // ===========================================================
  // ===========================================================

public:

  virtual void coord_at_value(const dof_type xdofs[],
                              size_type xdofs_ub,
                              const dof_type xglobal_coords[],
                              size_type xglobal_coord_ub,
                              dof_type xlocal_coords[],
                              size_type xlocal_coords_ub) const;

protected:

private:


  // ===========================================================
  // ===========================================================

public:

  virtual bilinear_2d* clone() const;

  virtual bilinear_2d& operator=(const section_evaluator& xother);

  bilinear_2d& operator=(const bilinear_2d& xother);

  virtual bool invariant() const;

  virtual bool is_ancestor_of(const any* xother) const;

protected:

private:


};

} // namespace fiber_bundle

#endif // ifndef BILINEAR_2D_H