From 52804cfaa993d73a069dda220f9b8f897e3a13df Mon Sep 17 00:00:00 2001 From: Christophe Geuzaine <cgeuzaine@ulg.ac.be> Date: Wed, 15 Dec 2004 01:02:39 +0000 Subject: [PATCH] *** empty log message *** --- Numeric/EigSolve.h | 34 ++++++++++++++++++++++++++++++++++ 1 file changed, 34 insertions(+) create mode 100644 Numeric/EigSolve.h diff --git a/Numeric/EigSolve.h b/Numeric/EigSolve.h new file mode 100644 index 0000000000..baa59457c8 --- /dev/null +++ b/Numeric/EigSolve.h @@ -0,0 +1,34 @@ +#ifndef _EIGSOLVE_H_ +#define _EIGSOLVE_H_ + +// Copyright (C) 1997-2004 C. Geuzaine, J.-F. Remacle +// +// 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. +// +// Please report all bugs and problems to <gmsh@geuz.org>. +// +// Contributor(s): +// Laurent Stainier + +int EigSolve(int nm,int n,double *A,double *wr,double *wi, + double *v,int *work1,double *work2); +int EigSolveSym(int n,int nm,double *A,double *d,double *V, + double *b,double *z); +void EigSort(int n, double *wr, double *wi, double *B); + +int EigSolve3x3(const double A[9], double wr[3], double wi[3], double v[9]); + +#endif -- GitLab