This is a port of a subset of Lapack-3.4.1 to Ada2012.
The codes provided here are a direct translation (using f2a.pl from Oliver Kellogg) of the Fortran source to Ada. The Ada source is written in the form of a generic package and covers the Lapack routines for
- Matrix determinants and inverses for general matrices,
- Eigenvalues and eigenvectors of general, real and hermitian symmetric matrices,
- Solutions of systems of equations for general, real and hermitian symmetric coefficient matrices,
- Singular value decomposition for general matrices
Also included is a set of functions and procedures that provide a more familiar Ada style interface to the Lapack routines.
This GitHub site is copy of the original Ada Lapack site on Sourceforge.
See also AdaLAPACK, a binding to the Fortran LAPACK.
Note that the codes provided here requires an Ada 2012 compiler. They will not
compile under Ada95 or earlier (see RATIONALE.txt for an explanation).
The package and tests can be run using the supplied Makefile. To compile the package and run the tests simply type
make
The compilation and testing can be done separately using
make lib
make tests
The compiler will report warnings of the form
ada_lapack.adb:14444:10: info: code between label and backwards goto rewritten as loop
ada_lapack.adb:14470:10: info: code between label and backwards goto rewritten as loop
These can be safely ignored.
Each test, one for each of the Lapack routines, compares the output for that test (in
tests/output) against the expected output (in tests/expected). If the codes are
working correctly (as they should) then you should see no output from the tests. To be
doubly sure you can run make diff from the tests directory. The .diff files will be
non-empty only when there was a problem with that particular test.
Simon Wright has kindly provided a set of GNAT project files that can be used to compile the package and any project that uses the package.
To compile the package type
gprbuild -p -P ada_lapack.gpr
To compile one of the test codes (say tdgeev) type
cd test
gprbuild -p -P tests.gpr -o tdgeev tdgeev.adb
It should be a simple matter to adapt these project files to your own needs.
The main Ada Lapack files source/ada_lapack.adb and source/ada_lapack.ads carry the
standard Lapack copyright notice. All other files in this collection are
distributed under the MIT license. See the file LICENSE.txt for the full details.