multipoleX.hh

Go to the documentation of this file.

 
#ifndef multipoleX_hh
#define multipoleX_hh
 
#include "basics/exceptions.hh"
#include "bem/element.hh"
#include "cluster/expansion.hh"
 
namespace cluster {
 
  // ************************************************************ MultipoleX **
 
  template <class F = concepts::Real>
  class MultipoleX : public ExpansionXY<F> {
 
    uint m_;
    uint blksz_;
    uint gauss_;
 
    concepts::Real* foo_;
 
  public:
    MultipoleX(uint m, uint gauss);
 
    ~MultipoleX() {delete[] foo_;}
 
    uint blksz() const {return blksz_;}
    uint m() const {return m_;}
    inline XYColReal* getCol(uint blksz, uint n) const;
    void evaluate(const concepts::Real3d& z, concepts::Real X[]) const;
    inline void shift(const concepts::Real3d& z, const concepts::Real src[],
          concepts::Real dst[]) const;
    void shift(const concepts::Real3d& z, const concepts::Cmplx src[],
         concepts::Cmplx dst[]) const;
    template<class FF>
    void shift(const concepts::Real3d& z, const FF src[], FF dst[],
         uint foo) const;
    void apply(const concepts::Real X[], const F src[], F dst[]) const;
    inline void apply(const XYColExpPtr* Xexp, const F src[], F dst[]) const;
 
    void evaluate(const concepts::Element<F>& elm,
      const concepts::Real3d& c, XYColExpPtr* X[]) const;
    void evaluate(const bem::Dirac3d000<F>& elm,
      const concepts::Real3d& c, XYColExpPtr* X[]) const;
    void evaluate(const bem::Constant3d000<F>& elm,
      const concepts::Real3d& c, XYColExpPtr* X[]) const;
    void evaluate(const bem::Constant3d001<F>& elm,
      const concepts::Real3d& c, XYColExpPtr* X[]) const;
    void evaluate(const bem::Constant3d002<F>& elm,
      const concepts::Real3d& c, XYColExpPtr* X[]) const;
    void evaluate(const bem::Linear3d000<F>& elm,
      const concepts::Real3d& c, XYColExpPtr* X[]) const;
  };
 
  template <class F>
  inline XYColReal* MultipoleX<F>::getCol(uint blksz, uint n) const {
    return new XYColReal(blksz, n);
  }
 
  template <class F>
  inline void MultipoleX<F>::shift(const concepts::Real3d& z,
           const concepts::Real src[],
           concepts::Real dst[]) const {
    shift<concepts::Real>(z, src, dst, 0);
  }
 
  template <class F>
  inline void MultipoleX<F>::apply(const XYColExpPtr* Xexp, const F src[],
           F dst[]) const {
    const XYColRealPtr* X = dynamic_cast<const XYColRealPtr*>(Xexp);
    if (X) {apply(X->value(), src, dst);  return;}
 
    throw
      conceptsException(concepts::MissingFeature("XYColExp not supported"));
  }
 
} // namespace cluster
 
#endif // multipoleX_hh