| //===================================================== | 
 | // File   :  init_matrix.hh | 
 | // Author :  L. Plagne <laurent.plagne@edf.fr)> | 
 | // Copyright (C) EDF R&D,  lun sep 30 14:23:19 CEST 2002 | 
 | //===================================================== | 
 | // | 
 | // This program is free software; you can redistribute it and/or | 
 | // modify it under the terms of the GNU General Public License | 
 | // as published by the Free Software Foundation; either version 2 | 
 | // of the License, or (at your option) any later version. | 
 | // | 
 | // This program is distributed in the hope that it will be useful, | 
 | // but WITHOUT ANY WARRANTY; without even the implied warranty of | 
 | // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the | 
 | // GNU General Public License for more details. | 
 | // You should have received a copy of the GNU General Public License | 
 | // along with this program; if not, write to the Free Software | 
 | // Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA. | 
 | // | 
 | #ifndef INIT_MATRIX_HH | 
 | #define INIT_MATRIX_HH | 
 |  | 
 | // The Vector class must satisfy the following part of STL vector concept : | 
 | //            resize() method | 
 | //            [] operator for setting element | 
 | //            value_type defined | 
 | template <double init_function(int, int), class Vector> | 
 | BTL_DONT_INLINE void init_row(Vector& X, int size, int row) { | 
 |   X.resize(size); | 
 |  | 
 |   for (unsigned int j = 0; j < X.size(); j++) { | 
 |     X[j] = typename Vector::value_type(init_function(row, j)); | 
 |   } | 
 | } | 
 |  | 
 | // Matrix is a Vector of Vector | 
 | // The Matrix class must satisfy the following part of STL vector concept : | 
 | //            resize() method | 
 | //            [] operator for setting rows | 
 | template <double init_function(int, int), class Vector> | 
 | BTL_DONT_INLINE void init_matrix(Vector& A, int size) { | 
 |   A.resize(size); | 
 |   for (unsigned int row = 0; row < A.size(); row++) { | 
 |     init_row<init_function>(A[row], size, row); | 
 |   } | 
 | } | 
 |  | 
 | template <double init_function(int, int), class Matrix> | 
 | BTL_DONT_INLINE void init_matrix_symm(Matrix& A, int size) { | 
 |   A.resize(size); | 
 |   for (unsigned int row = 0; row < A.size(); row++) A[row].resize(size); | 
 |   for (unsigned int row = 0; row < A.size(); row++) { | 
 |     A[row][row] = init_function(row, row); | 
 |     for (unsigned int col = 0; col < row; col++) { | 
 |       double x = init_function(row, col); | 
 |       A[row][col] = A[col][row] = x; | 
 |     } | 
 |   } | 
 | } | 
 |  | 
 | #endif |