91 void _mult_x_pas_prevu(Tbl *,
int &) ;
92 void _mult_x_r_chebp(Tbl *,
int &) ;
93 void _mult_x_r_chebi(Tbl *,
int &) ;
94 void _mult_x_r_chebpim_p(Tbl *,
int &) ;
95 void _mult_x_r_chebpim_i(Tbl *,
int &) ;
96 void _mult_xm1_cheb(Tbl *,
int&) ;
97 void _mult_x_identite (Tbl *,
int &) ;
98 void _mult_x_r_chebpi_p(Tbl *,
int &) ;
99 void _mult_x_r_chebpi_i(Tbl *,
int &) ;
100 void _mult_x_r_jaco02(Tbl *,
int &) ;
101 void _mult_x_r_legp(Tbl *,
int &) ;
102 void _mult_x_r_legi(Tbl *,
int &) ;
103 void _mult_x_r_cheb(Tbl *,
int &) ;
111 assert(
etat != ETATNONDEF) ;
122 if (
etat == ETATZERO) {
126 assert(
etat == ETATQCQ) ;
161 _mult_x[i] = _mult_x_pas_prevu ;
181 assert(
etat == ETATQCQ) ;
185 for (
int l=0 ; l<
nzone ; l++) {
187 assert(
t[l] != 0x0) ;
188 _mult_x[base_r](
t[l],
base.
b[l]) ;
195 if (
etat==ETATZERO) {
199 assert(
etat==ETATQCQ) ;
222 cerr <<
"Mtbl_cf::mult_xp1_shell() : not called on a shell!" << endl ;
227 if (
etat==ETATZERO) {
231 assert(
etat==ETATQCQ) ;
233 _mult_x_r_cheb(
t[lz],
base.
b[lz]) ;
Mtbl_cf * c_cf
Coefficients of the spectral expansion of the function.
void set_etat_cf_qcq()
Sets the logical state to ETATQCQ (ordinary state) for values in the configuration space (Mtbl_cf c_c...
void coef() const
Computes the coeffcients of *this.
void set_etat_zero()
Sets the logical state to ETATZERO (zero).
#define R_CHEBPI_I
Cheb. pair-impair suivant l impair pour l=0.
void mult_x_shell(int index)
Applies the following operator to *this : \ Id (r sampling = RARE, UNSURR ) \ (r -sampling = FIN ) \...
const Mg3d * mg
Pointer on the multi-grid Mgd3 on which this is defined.
Values and coefficients of a (real-value) function.
#define R_LEGP
base de Legendre paire (rare) seulement
#define R_LEGI
base de Legendre impaire (rare) seulement
#define R_JACO02
base de Jacobi(0,2) ordinaire (finjac)
#define TRA_R
Translation en R, used for a bitwise shift (in hex)
const Valeur & mult_x() const
Returns (r -sampling = RARE ) \ Id (r sampling = FIN ) \ (r -sampling = UNSURR ) ...
const Mg3d * mg
Multi-grid Mgd3 on which this is defined.
void mult_x()
(r -sampling = RARE ) \ Id (r sampling = FIN ) \ (r -sampling = UNSURR )
void mult_x_shell(int i)
Id (r sampling = RARE, UNSURR ) \ (r -sampling = FIN )
#define R_CHEBI
base de Cheb. impaire (rare) seulement
int etat
Logical state (ETATNONDEF , ETATQCQ or ETATZERO ).
#define R_CHEBP
base de Cheb. paire (rare) seulement
Base_val base
Bases on which the spectral expansion is performed.
int * b
Array (size: nzone ) of the spectral basis in each domain.
#define MSQ_R
Extraction de l'info sur R.
Valeur(const Mg3d &mgrid)
Constructor.
#define R_CHEBPIM_I
Cheb. pair-impair suivant m, impair pour m=0.
#define R_CHEBPIM_P
Cheb. pair-impair suivant m, pair pour m=0.
int nzone
Number of domains (zones)
#define R_CHEBPI_P
Cheb. pair-impair suivant l pair pour l=0.
Coefficients storage for the multi-domain spectral method.
Base_val base
Bases of the spectral expansions.
int etat
Logical state (ETATNONDEF , ETATQCQ or ETATZERO ).
#define R_CHEBU
base de Chebychev ordinaire (fin), dev. en 1/r
int get_type_r(int l) const
Returns the type of sampling in the radial direction in domain no.
#define MAX_BASE
Nombre max. de bases differentes.
Valeur * p_mult_x
Pointer on .
Tbl ** t
Array (size nzone ) of pointers on the Tbl 's which contain the spectral coefficients in each domain...
#define R_LEG
base de Legendre ordinaire (fin)
#define R_CHEB
base de Chebychev ordinaire (fin)