24char jac02_base_scal_C[] =
"$Header: /cvsroot/Lorene/C++/Source/Non_class_members/Coef/jac02_base_scal.C,v 1.2 2014/10/13 08:53:12 j_novak Exp $" ;
52#include "type_parite.h"
61int jac02_base_scal_1z(
int type_r,
int type_t,
int type_p) {
87 "jac02_base_scal : le cas type_p, type_t, type_r = "
88 << type_p <<
" " << type_t <<
" " << type_r << endl ;
89 cout <<
" n'est pas prevu ! " << endl ;
108 "jac02_base_scal : le cas type_p, type_t, type_r = "
109 << type_p<<
" " << type_t<<
" " <<type_r << endl ;
110 cout <<
" n'est pas prevu ! " << endl ;
117 "jac02_base_scal : le cas type_p, type_t = "
118 << type_p<<
" " <<type_t << endl ;
119 cout <<
" n'est pas prevu ! " << endl ;
132 base_l = base_l |
T_COS ;
142 "jac02_base_scal : le cas type_p, type_t, type_r = "
143 << type_p<<
" " <<type_t<<
" " <<type_r << endl ;
144 cout <<
" n'est pas prevu ! " << endl ;
160 "jac02_base_scal : le cas type_p, type_t, type_r = "
161 << type_p<<
" " <<type_t<<
" " <<type_r << endl ;
162 cout <<
" n'est pas prevu ! " << endl ;
169 "jac02_base_scal : le cas type_p, type_t = "
170 << type_p<<
" " <<type_t << endl ;
171 cout <<
" n'est pas prevu ! " << endl ;
178 "jac02_base_scal : le cas type_p = " << type_p << endl ;
179 cout <<
" n'est pas prevu ! " << endl ;
#define P_COSSIN_P
dev. sur Phi = 2*phi, freq. paires
#define R_JACO02
base de Jacobi(0,2) ordinaire (finjac)
#define T_COS_P
dev. cos seulement, harmoniques paires
#define P_COSSIN
dev. standart
#define T_COSSIN_CP
cos pair-sin impair alternes, cos pour m=0
#define T_COS
dev. cos seulement
#define T_COSSIN_C
dev. cos-sin alternes, cos pour m=0