00001 //============================================================================ 00002 // 00003 // Program/Module 00004 // from 00005 // Selfverifying Solvers for Dense Systems of 00006 // Linear Equations Realized in C-XSC 00007 // 00008 // Carlos Holbig and Walter Kraemer, 2003. 00009 // 00010 // Program developed in C-XSC by Bernardo Frederes Kramer Alcalde, 00011 // Paulo Sergio Morandi Junior and Carlos Amaral Holbig 00012 // 00013 //============================================================================ 00014 //--------------------------------------------------------------------------- 00015 // File: lss_aprx (header) 00016 // Purpose: Compute an approximate inverse of the square matrix A 00017 // Global functions: 00018 // MINV(): Computes the approximate inverse of a square matrix A using the 00019 // Gauss-Jordan algorithm. 00020 //--------------------------------------------------------------------------- 00021 00022 #ifndef __LSS_APRX_HPP 00023 #define __LSS_APRX_HPP 00024 00025 #include <l_rmatrix.hpp> // Long Real matrix/vector arithmetic 00026 #include <intvector.hpp> // Integer vector type 00027 00028 using namespace cxsc; 00029 using namespace std; 00030 00031 extern void MINV ( rmatrix&, int& ); 00032 00033 #endif