Context Navigation

intflapack.h@ 1042

Visit:

Last change on this file since 1042 was 1042, checked in by ansari, 25 years ago
Modif + correction LapackLinSolve, Reza 8/6/2000
File size: 434 bytes

Rev	Line
[775]	1	#ifndef IntfLapack_H_SEEN
	2	#define IntfLapack_H_SEEN
	3
	4	#include "machdefs.h"
	5	#include "tarray.h"
	6
[814]	7	namespace SOPHYA {
[775]	8
[814]	9	template <class T>
	10	class LapackServer {
	11	public:
[1042]	12	int LinSolve(TArray<T>& a, TArray<T> & b);
[814]	13	};
	14
	15	template <class T>
[1042]	16	inline int LapackLinSolve(TArray<T>& a, TArray<T> & b)
[814]	17	{ LapackServer<T> lps; return( lps.LinSolve(a, b) ); }
	18
	19
	20	} // Fin du namespace
	21
[775]	22	void rztest_lapack(TArray<r_4>& a, TArray<r_4>& b);
	23
	24	#endif

Note: See TracBrowser for help on using the repository browser.