laslv.h

Go to the documentation of this file.

// -*-C++-*- 

// Copyright (C) 2004 
// Christian Stimming <stimming@tuhh.de>

// This library is free software; you can redistribute it and/or
// modify it under the terms of the GNU Lesser General Public License as
// published by the Free Software Foundation; either version 2, or (at
// your option) any later version.

// This library 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 Lesser General Public License for more details.

// You should have received a copy of the GNU Lesser General Public License along
// with this library; see the file COPYING.  If not, write to the Free
// Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307,
// USA.

//      LAPACK++ (V. 1.1)
//      (C) 1992-1996 All Rights Reserved.

#ifndef _LASLV_H
#define _LASLV_H

#include "lafnames.h"
#include LA_GEN_MAT_DOUBLE_H
#include LA_VECTOR_DOUBLE_H
#ifdef LA_COMPLEX_SUPPORT
# include LA_GEN_MAT_COMPLEX_H
# include LA_VECTOR_COMPLEX_H
#endif
#include LA_VECTOR_LONG_INT_H


DLLIMPORT
void LaLinearSolve( const LaGenMatDouble& A, LaGenMatDouble& X, 
                    const LaGenMatDouble& B );

DLLIMPORT
void LaLinearSolveIP( LaGenMatDouble& A, LaGenMatDouble& X, 
                      const LaGenMatDouble& B );


DLLIMPORT
void LaLULinearSolve( const LaGenMatDouble& A, LaGenMatDouble& X, 
                      const LaGenMatDouble& B );

DLLIMPORT
void LaLULinearSolveIP( LaGenMatDouble& A, LaGenMatDouble& X, 
                        const LaGenMatDouble& B );

DLLIMPORT
void LaQRLinearSolve( const LaGenMatDouble& A, LaGenMatDouble& X, 
                      const LaGenMatDouble& B );

DLLIMPORT
void LaQRLinearSolveIP( LaGenMatDouble& A, LaGenMatDouble& X, 
                        const LaGenMatDouble& B );

DLLIMPORT
void LUFactorizeIP(LaGenMatDouble &GM, LaVectorLongInt &PIV);



#ifdef LA_COMPLEX_SUPPORT

DLLIMPORT
void LaLinearSolve( const LaGenMatComplex& A, LaGenMatComplex& X, 
                    const LaGenMatComplex& B );

DLLIMPORT
void LaLinearSolveIP( LaGenMatComplex& A, LaGenMatComplex& X, 
                      const LaGenMatComplex& B );


DLLIMPORT
void LaLULinearSolve( const LaGenMatComplex& A, LaGenMatComplex& X, 
                      const LaGenMatComplex& B );

DLLIMPORT
void LaLULinearSolveIP( LaGenMatComplex& A, LaGenMatComplex& X, 
                        const LaGenMatComplex& B );

DLLIMPORT
void LaQRLinearSolve( const LaGenMatComplex& A, LaGenMatComplex& X, 
                      const LaGenMatComplex& B );

DLLIMPORT
void LaQRLinearSolveIP( LaGenMatComplex& A, LaGenMatComplex& X, 
                        const LaGenMatComplex& B );

DLLIMPORT
void LUFactorizeIP(LaGenMatComplex &GM, LaVectorLongInt &PIV);

DLLIMPORT
void LaLUInverseIP(LaGenMatComplex &A, LaVectorLongInt &PIV);

DLLIMPORT
void LaLUInverseIP(LaGenMatComplex &A, LaVectorLongInt &PIV, LaVectorComplex &work);

#endif // LA_COMPLEX_SUPPORT


#ifdef _LA_SPD_MAT_DOUBLE_H_

DLLIMPORT
void LaLinearSolve( const LaSpdMatDouble& A, LaGenMatDouble& X, 
    LaGenMatDouble& B );
DLLIMPORT
void LaLinearSolveIP( LaSpdMatDouble& A, LaGenMatDouble& X, LaGenMatDouble& B );

DLLIMPORT
void LaCholLinearSolve( const LaSpdMatDouble& A, LaGenMatDouble& X, 
        LaGenMatDouble& B );
DLLIMPORT
void LaCholLinearSolveIP( LaSpdMatDouble& A, LaGenMatDouble& X, 
        LaGenMatDouble& B );
#endif // _LA_SPD_MAT_DOUBLE_H_

#ifdef _LA_SYMM_MAT_DOUBLE_H_

DLLIMPORT
void LaLinearSolve( const LaSymmMatDouble& A, LaGenMatDouble& X, 
                    const LaGenMatDouble& B );
DLLIMPORT
void LaLinearSolveIP( LaSymmMatDouble& A, LaGenMatDouble& X, 
                      const LaGenMatDouble& B );

DLLIMPORT
void LaCholLinearSolve( const LaSymmMatDouble& A, LaGenMatDouble& X, 
                        const LaGenMatDouble& B );
DLLIMPORT
void LaCholLinearSolveIP( LaSymmMatDouble& A, LaGenMatDouble& X, 
                          const LaGenMatDouble& B );

// Eigenvalue problems 

DLLIMPORT
void LaEigSolve(const LaSymmMatDouble &S, LaVectorDouble &eigvals);
DLLIMPORT
void LaEigSolve(const LaSymmMatDouble &S, LaVectorDouble &eigvals, 
    LaGenMatDouble &eigvec);
DLLIMPORT
void LaEigSolveIP(LaSymmMatDouble &S, LaVectorDouble &eigvals);
#endif // _LA_SYMM_MAT_DOUBLE_H_

#ifdef LA_COMPLEX_SUPPORT

DLLIMPORT
void LaEigSolve(const LaGenMatDouble &A, LaVectorComplex &eigvals, LaGenMatDouble &VR);
#endif

DLLIMPORT
void LaEigSolve(const LaGenMatDouble &A, LaVectorDouble &eigvals_real,
                LaVectorDouble &eigvals_imag, LaGenMatDouble &VR);

DLLIMPORT
void LaEigSolveSymmetricVecIP(LaGenMatDouble &A_symmetric,
                              LaVectorDouble &eigvals);

DLLIMPORT
void LaEigSolveVecIP(LaGenMatDouble &A_symmetric, LaVectorDouble &eigvals);

#ifdef LA_COMPLEX_SUPPORT

DLLIMPORT
void LaEigSolve(const LaGenMatComplex &A, LaVectorComplex &W,
                LaGenMatComplex &VR);
#endif // LA_COMPLEX_SUPPORT

DLLIMPORT
void LaLUInverseIP(LaGenMatDouble &A, LaVectorLongInt &PIV);

DLLIMPORT
void LaLUInverseIP(LaGenMatDouble &A, LaVectorLongInt &PIV, LaVectorDouble &work);

#endif // _LASLV_H

---