23char mult2_xp1_1d_C[] =
"$Header: /cvsroot/Lorene/C++/Source/Non_class_members/Operators/mult2_xp1_1d.C,v 1.3 2014/10/13 08:53:24 j_novak Exp $" ;
57#include "type_parite.h"
61void multxpun_1d(
int,
double **,
int) ;
67void _mult2_xp1_1d_pas_prevu(
int nr,
double* tb,
double *res) {
68 cout <<
"mult2_xp1 pas prevu..." << tb <<
" " << res << endl ;
69 cout <<
"nr : " << nr << endl ;
78void _mult2_xp1_1d_r_jaco02(
int nr,
double* tb,
double *xo) {
83 for (
int i = 0 ; i<nr ; i++) {
93void mult2_xp1_1d(
int nr,
double **tb,
int base_r)
97static void (*mult2_xp1_1d[
MAX_BASE])(int,
double *,
double*) ;
104 mult2_xp1_1d[i] = _mult2_xp1_1d_pas_prevu ;
110 double *result =
new double[nr] ;
111 mult2_xp1_1d[base_r](nr, *tb, result) ;
#define MAX_BASE
Nombre max. de bases differentes.
#define R_JACO02
base de Jacobi(0,2) ordinaire (finjac)
#define TRA_R
Translation en R, used for a bitwise shift (in hex)