62 void multxpun_1d(
int,
double**,
int) ;
104 for (indice =0; indice<
max_points; indice++) {
105 if (nr_done[indice] ==
npoints) {
109 if (nr_done[indice] == -1)
114 cerr <<
"Diff_xdsdx2::get_matrice() : no space left!!" <<
'\n' 115 <<
"The value of Diff.max_points must be increased..." << endl ;
123 double* vect =
new double[
npoints] ;
124 double* cres =
new double[
npoints] ;
125 for (
int i=0; i<
npoints; i++) {
131 mult_xm1_1d_cheb(
npoints, vect, cres) ;
133 resu.
set(j,i) = cres[j] ;
138 resu.
set(j,i) = vect[j] ;
143 resu.
set(j,i) = vect[j] ;
154 ost <<
" x d2 / dx2 " << endl ;
Base (abstract) class for 1D spectral differential operators in one domain.
static const int max_points
Maximal number of matrices stored per base.
virtual ostream & operator>>(ostream &) const
Operator >> (virtual function called by the operator <<).
void initialize()
Initializes arrays.
#define R_JACO02
base de Jacobi(0,2) ordinaire (finjac)
virtual ~Diff_xdsdx2()
Destructor.
Diff_xdsdx2(int base_r, int nr)
Standard constructor.
int npoints
Number of coefficients.
#define TRA_R
Translation en R, used for a bitwise shift (in hex)
virtual const Matrice & get_matrice() const
Returns the matrix associated with the operator.
#define R_CHEBI
base de Cheb. impaire (rare) seulement
#define R_CHEBP
base de Cheb. paire (rare) seulement
int base
Base in radial direction.
void operator=(const Diff_xdsdx2 &)
Assignment to another Diff_xdsdx2.
void operator=(const Diff &)
Assignment to another Diff.
double & set(int j, int i)
Read/write of a particuliar element.
void set_etat_qcq()
Sets the logical state to ETATQCQ (ordinary state).
Class for the elementary differential operator (see the base class Diff ).
#define R_CHEBU
base de Chebychev ordinaire (fin), dev. en 1/r
#define MAX_BASE
Nombre max. de bases differentes.