23char std_base_scal_C[] =
"$Header: /cvsroot/Lorene/C++/Source/Non_class_members/Coef/std_base_scal.C,v 1.8 2014/10/13 08:53:14 j_novak Exp $" ;
80#include "type_parite.h"
89int std_base_scal_1z(
int type_r,
int type_t,
int type_p) {
112 base_l = base_l |
R_CHEB ;
129 "std_base_scal : le cas type_p, type_t, type_r = "
130 << type_p <<
" " << type_t <<
" " << type_r << endl ;
131 cout <<
" n'est pas prevu ! " << endl ;
145 base_l = base_l |
R_CHEB ;
162 "std_base_scal : le cas type_p, type_t, type_r = "
163 << type_p<<
" " << type_t<<
" " <<type_r << endl ;
164 cout <<
" n'est pas prevu ! " << endl ;
171 "std_base_scal : le cas type_p, type_t = "
172 << type_p<<
" " <<type_t << endl ;
173 cout <<
" n'est pas prevu ! " << endl ;
186 base_l = base_l |
T_COS ;
191 base_l = base_l |
R_CHEB ;
206 "std_base_scal : le cas type_p, type_t, type_r = "
207 << type_p<<
" " <<type_t<<
" " <<type_r << endl ;
208 cout <<
" n'est pas prevu ! " << endl ;
219 base_l = base_l |
R_CHEB ;
232 "std_base_scal : le cas type_p, type_t, type_r = "
233 << type_p<<
" " <<type_t<<
" " <<type_r << endl ;
234 cout <<
" n'est pas prevu ! " << endl ;
241 "std_base_scal : le cas type_p, type_t = "
242 << type_p<<
" " <<type_t << endl ;
243 cout <<
" n'est pas prevu ! " << endl ;
250 "std_base_scal : le cas type_p = " << type_p << endl ;
251 cout <<
" n'est pas prevu ! " << endl ;
264int std_base_scal_odd_1z(
int type_r,
int type_t,
int type_p) {
287 base_l = base_l |
R_CHEB ;
304 "std_base_scal : le cas type_p, type_t, type_r = "
305 << type_p <<
" " << type_t <<
" " << type_r << endl ;
306 cout <<
" n'est pas prevu ! " << endl ;
320 base_l = base_l |
R_CHEB ;
337 "std_base_scal : le cas type_p, type_t, type_r = "
338 << type_p<<
" " << type_t<<
" " <<type_r << endl ;
339 cout <<
" n'est pas prevu ! " << endl ;
346 "std_base_scal : le cas type_p, type_t = "
347 << type_p<<
" " <<type_t << endl ;
348 cout <<
" n'est pas prevu ! " << endl ;
361 base_l = base_l |
T_COS ;
366 base_l = base_l |
R_CHEB ;
381 "std_base_scal : le cas type_p, type_t, type_r = "
382 << type_p<<
" " <<type_t<<
" " <<type_r << endl ;
383 cout <<
" n'est pas prevu ! " << endl ;
394 base_l = base_l |
R_CHEB ;
407 "std_base_scal : le cas type_p, type_t, type_r = "
408 << type_p<<
" " <<type_t<<
" " <<type_r << endl ;
409 cout <<
" n'est pas prevu ! " << endl ;
416 "std_base_scal : le cas type_p, type_t = "
417 << type_p<<
" " <<type_t << endl ;
418 cout <<
" n'est pas prevu ! " << endl ;
425 "std_base_scal : le cas type_p = " << type_p << endl ;
426 cout <<
" n'est pas prevu ! " << endl ;
#define P_COSSIN_P
dev. sur Phi = 2*phi, freq. paires
#define R_CHEBU
base de Chebychev ordinaire (fin), dev. en 1/r
#define R_CHEBI
base de Cheb. impaire (rare) seulement
#define R_CHEBPIM_I
Cheb. pair-impair suivant m, impair pour m=0.
#define R_CHEBPI_I
Cheb. pair-impair suivant l impair pour l=0.
#define T_COS_P
dev. cos seulement, harmoniques paires
#define P_COSSIN
dev. standart
#define R_CHEBPIM_P
Cheb. pair-impair suivant m, pair pour m=0.
#define T_COSSIN_CP
cos pair-sin impair alternes, cos pour m=0
#define R_CHEB
base de Chebychev ordinaire (fin)
#define T_COS
dev. cos seulement
#define R_CHEBP
base de Cheb. paire (rare) seulement
#define T_COSSIN_C
dev. cos-sin alternes, cos pour m=0
#define R_CHEBPI_P
Cheb. pair-impair suivant l pair pour l=0.