|
STK++ 1.0
|
00001 /*--------------------------------------------------------------------*/ 00002 /* Copyright (C) 2004-2010 Serge Iovleff 00003 00004 This program is free software; you can redistribute it and/or modify 00005 it under the terms of the GNU Lesser General Public License as 00006 published by the Free Software Foundation; either version 2 of the 00007 License, or (at your option) any later version. 00008 00009 This program is distributed in the hope that it will be useful, 00010 but WITHOUT ANY WARRANTY; without even the implied warranty of 00011 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 00012 GNU Lesser General Public License for more details. 00013 00014 You should have received a copy of the GNU Lesser General Public 00015 License along with this program; if not, write to the 00016 Free Software Foundation, Inc., 00017 59 Temple Place, 00018 Suite 330, 00019 Boston, MA 02111-1307 00020 USA 00021 00022 Contact : Serge.Iovleff@stkpp.org 00023 */ 00024 00025 /* 00026 * Project: stkpp::Algebra 00027 * created on: 2 nov. 2010 00028 * Purpose: . 00029 * Author: iovleff, serge.iovleff@stkpp.org 00030 * 00031 **/ 00032 00037 #ifndef STK_GINVSYMMETRIC_H 00038 #define STK_GINVSYMMETRIC_H 00039 00040 #include "STK_EigenvaluesSymmetric.h" 00041 00042 namespace STK 00043 { 00044 00048 class GinvSymmetric 00049 { 00050 public: 00052 inline GinvSymmetric() { ;} 00054 inline virtual ~GinvSymmetric() { ;} 00059 inline void operator()(MatrixSquare*& x) 00060 { 00061 EigenvaluesSymmetric* decomp = new EigenvaluesSymmetric(x); 00062 decomp->run(); 00063 delete x; 00064 x = decomp->ginv(); 00065 delete decomp; 00066 } 00071 inline void operator()(MatrixSquare& x) 00072 { 00073 EigenvaluesSymmetric* decomp = new EigenvaluesSymmetric(&x); 00074 decomp->run(); 00075 decomp->ginv(x); 00076 delete decomp; 00077 } 00078 }; 00079 00080 } 00081 00082 #endif /* STK_GINVSYMMETRIC_H */