Peter,
LAPACK (see http://www.netlib.org/lapack ) has just the routine
you need: ZGETRI.F computes the inverse of a double precision complex
general matrix. It is written in standard Fortran77 and so by
definition is also in Fortran90.
This library which supercedes LINPACK and EISPACK provides, in my
experience, all the dense linear algebra routines you will ever need,
and some.
You can download the specific routine and its dependencies
(except the BLAS) from:
http://www.netlib.org/lapack/complex16/index.html
I understand a Fortran90 version of LAPACK is also
available (see http://www.netlib.org/lapack90 ). This page gives
access to a Fortran90 interface module for the LAPACK 77 routines.
I have not used LAPACK90 or the interface module.
Hope this helps.
> Date: Thu, 5 Feb 1998 12:31:21 -0500 (EST)
> Subject: complex matrix inversion routine anyone?
> From: Peter Bismuti <[log in to unmask]>
> To: [log in to unmask]
> Reply-to: Peter Bismuti <[log in to unmask]>
> If anyone has a complex matrix inversion routine written in F90,
> could you pleasee-mail it to me??
>
> thanks!
>
> _______________________________________________________________________
> | Pete Bismuti |
> | Supercomputer Computations Research Institute |
> | Florida State University - Department of Mathematics |
> | [log in to unmask] (904)644-6263 |
> |_____________________________________________________________________|
>
Regards,
David.
----------------------------------------------------------
David Vowles
Research Officer
Department of Electrical and Electronic Engineering
The University of Adelaide
Australia 5005
Voice: +61 8 8303 5416
Fax: +61 8 8303 4360
Email: [log in to unmask]
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|