LAPACK Working Note 117: A FORTRAN 90 Interface for LAPACK:LAPACK90, version 1.0

L. Blackford,J. Dongarra,J. Ducroz,S. Hammarling,J. Wasniewski
1996-11-01
Abstract:The purpose of this report is to discuss the design of a Fortran 90 interface to LAPACK. Our emphasis at this stage is on the design of an improved user-interface to the package, taking advantage of the considerable simpli cations which Fortran 90 allows. The proposed design makes use of assumed-shape arrays, optional arguments, and generic interfaces. The Fortran 90 interface can be implemented initially by writing Fortran 90 jackets to call the existing Fortran 77 code, and can persist unchanged even if the underlying Fortran 77 LAPACK code is rewritten to take advantage of the new features of Fortran 90. We aim to maintain a comparable level of performance as with the Fortran 77 code. In this paper we implement interfaces to the subset of LAPACK routines for solving systems of linear equations AX = B with a general matrix A, and for symmetric and Hermitian eigenproblems. (formerly L. S. Ostrouchov) Department of Computer Science, University of Tennessee, 107 Ayres Hall, Knoxville, TN 37996-1301, USA; email: susan@cs.utk.edu y Department of Computer Science, University of Tennessee, 107 Ayres Hall, Knoxville, TN 37996-1301, USA and Mathematical Sciences Section, Oak Ridge National Laboratory, P.O.Box 2008, Bldg. 6012, Oak Ridge, TN 37831-6367, USA; email: dongarra@cs.utk.edu zNumerical Algorithms Group Ltd, Wilkinson House, Jordan Hill Road, Oxford OX2 8DR, UK; email: jeremy@nag.co.uk x Numerical Algorithms Group Ltd, Wilkinson House, Jordan Hill Road, Oxford OX2 8DR, UK; email: sven@nag.co.uk {UNI C, The Danish Computing Centre for Research and Education, DTU, Bldg. 304, DK-2800 Lyngby, Denmark; Email: jerzy.wasniewski@uni-c.dk
What problem does this paper attempt to address?