33 char scalar_r_manip_C[] =
"$Header: /cvsroot/Lorene/C++/Source/Tensor/Scalar/scalar_r_manip.C,v 1.23 2014/10/13 08:53:47 j_novak Exp $" ;
149 assert (
etat != ETATNONDEF) ;
153 if (
etat != ETATZERO) {
155 assert((
etat == ETATQCQ) || (
etat == ETATUN)) ;
181 int diff_dzpuis = ced_mult_r -
dzpuis ;
223 assert (
etat != ETATNONDEF) ;
227 if (
etat != ETATZERO) {
229 assert((
etat == ETATQCQ) || (
etat == ETATUN)) ;
254 int diff_dzpuis = ced_mult_r -
dzpuis ;
296 assert (
etat != ETATNONDEF) ;
302 if (
etat != ETATZERO) {
304 assert((
etat == ETATQCQ) || (
etat == ETATUN)) ;
314 int dzpuis_ext =
dzpuis - 1 ;
316 int diff_dzpuis = ced_mult_r - dzpuis_ext ;
317 (diff_dzpuis >= 0) ? uu_ext.
inc_dzpuis(diff_dzpuis)
334 if (ced)
dzpuis = ced_mult_r ;
364 assert (
etat != ETATNONDEF) ;
370 if (
etat != ETATZERO) {
372 assert((
etat == ETATQCQ) || (
etat == ETATUN)) ;
382 int dzpuis_ext =
dzpuis + 1 ;
384 int diff_dzpuis = ced_mult_r - dzpuis_ext ;
385 (diff_dzpuis >= 0) ? uu_ext.
inc_dzpuis(diff_dzpuis)
420 if (decrem == 0) return ;
422 if (
etat == ETATZERO) {
456 cout <<
"Scalar::dec_dzpuis : unexpected value of decrem !"
457 << endl <<
" decrem = " << decrem << endl ;
472 if (inc == 0) return ;
474 if (
etat == ETATZERO) {
508 cout <<
"Scalar::inc_dzpuis : unexpected value of inc !"
509 << endl <<
" inc = " << inc << endl ;
void ssint()
The basis is transformed as with a multiplication.
void mult_r_ced()
Multiplication by r in the compactified external domain (CED), the dzpuis flag is not changed.
Bases of the spectral expansions.
virtual void inc_dzpuis(int inc=1)
Increases by inc units the value of dzpuis and changes accordingly the values of the Scalar in the co...
void set_spectral_base(const Base_val &)
Sets the spectral bases of the Valeur va
Valeur va
The numerical value of the Scalar
void div_rsint_dzpuis(int ced_mult_r)
Division by but with the output flag dzpuis set to ced_mult_r .
void mult_rsint()
Multiplication by everywhere; dzpuis is not changed.
void mult_rsint_dzpuis(int ced_mult_r)
Multiplication by but with the output flag dzpuis set to ced_mult_r .
const Mg3d * get_mg() const
Gives the Mg3d on which the mapping is defined.
virtual void dec2_dzpuis(Scalar &) const =0
Decreases by 2 the value of dzpuis of a Scalar and changes accordingly its values in the compacti...
Base class for pure radial mappings.
void div_rsint()
Division by everywhere; dzpuis is not changed.
int get_type_r(int l) const
Returns the type of sampling in the radial direction in domain no.
void mult_r_dzpuis(int ced_mult_r)
Multiplication by r everywhere but with the output flag dzpuis set to ced_mult_r .
virtual void inc_dzpuis(Scalar &) const =0
Increases by 1 the value of dzpuis of a Scalar and changes accordingly its values in the compacti...
Tensor field of valence 0 (or component of a tensorial field).
virtual void mult_rsint(Scalar &) const =0
Multiplication by of a Scalar.
void div_r_ced()
Division by r in the compactified external domain (CED), the dzpuis flag is not changed.
void div_sint()
Division by .
virtual void dec_dzpuis(int dec=1)
Decreases by dec units the value of dzpuis and changes accordingly the values of the Scalar in the co...
int etat
The logical state ETATNONDEF (undefined), ETATZERO (null), ETATUN (one), or ETATQCQ (ordinary).
void mult_r()
Multiplication by r everywhere; dzpuis is not changed.
const Tbl & domain(int l) const
Read-only of the value in a given domain.
const Map *const mp
Mapping on which the numerical values at the grid points are defined.
void sx()
The basis is transformed as with a multiplication.
virtual void div_rsint(Scalar &) const =0
Division by of a Scalar.
void div_r_dzpuis(int ced_mult_r)
Division by r everywhere but with the output flag dzpuis set to ced_mult_r .
void mult_sint()
The basis is transformed as with a multiplication.
void mult_sint()
Multiplication by .
virtual void allocate_all()
Sets the logical state to ETATQCQ (ordinary state) and performs the memory allocation of all the elem...
int get_nzone() const
Returns the number of domains.
virtual void div_r_zec(Scalar &) const =0
Division by r (in the compactified external domain only) of a Scalar.
virtual void set_etat_qcq()
Sets the logical state to ETATQCQ (ordinary state).
virtual void annule(int l_min, int l_max)
Sets the Scalar to zero in several domains.
void set_dzpuis(int)
Modifies the dzpuis flag.
int dzpuis
Power of r by which the quantity represented by this must be divided in the compactified external d...
virtual void mult_r_zec(Scalar &) const =0
Multiplication by r (in the compactified external domain only) of a Scalar.
Tbl & set_domain(int l)
Read/write of the value in a given domain.
void mult_x()
The basis is transformed as with a multiplication by .
virtual void dec_dzpuis(Scalar &) const =0
Decreases by 1 the value of dzpuis of a Scalar and changes accordingly its values in the compacti...
virtual void div_r(Scalar &) const =0
Division by r of a Scalar.
Base_val base
Bases on which the spectral expansion is performed.
const Base_val & get_base() const
Return the bases for spectral expansions (member base )
void div_r()
Division by r everywhere; dzpuis is not changed.
virtual void mult_r(Scalar &uu) const =0
Multiplication by r of a Scalar , the dzpuis of uu is not changed.
virtual void inc2_dzpuis(Scalar &) const =0
Increases by 2 the value of dzpuis of a Scalar and changes accordingly its values in the compacti...
virtual void del_deriv() const
Logical destructor of the derivatives.