21 char ope_sec_order_r2_non_dege_C[] =
"$Header: /cvsroot/Lorene/C++/Source/Ope_elementary/Ope_sec_order_r2/ope_sec_order_r2_non_dege.C,v 1.3 2014/10/13 08:53:36 j_novak Exp $" ;
32 #include "ope_elementary.h"
39 Matrice _sec_order_r2_non_dege_pas_prevu (
const Matrice& so) {
40 cout <<
"Sec_order_r2 non dege : not implemented" << endl ;
50 Matrice _sec_order_r2_non_dege_r_cheb (
const Matrice& source) {
55 Matrice res(n-non_dege, n-non_dege) ;
57 for (
int i=0 ; i<n-non_dege ; i++)
58 for (
int j=0 ; j<n-non_dege ; j++)
59 res.set(i, j) = source(i, j+non_dege) ;
82 sec_order_r2_non_dege[i] = _sec_order_r2_non_dege_pas_prevu ;
85 sec_order_r2_non_dege[
R_CHEB >>
TRA_R] = _sec_order_r2_non_dege_r_cheb ;