Ada矩阵包

正如约翰·巴恩斯所说 Rationale for Ada 2005 Annex G: Numerics G.3.1 Real Vectors and Matrices G.3.2 Complex Vectors and Matrices

$ export ADA_INC = /your/path/to/adinclude
$ view $ADA_INC/$(gnatkr Ada.Numerics.Generic_Real_Arrays.adb)
$ view $ADA_INC/$(gnatkr Ada.Numerics.Generic_Complex_Arrays.adb)

我想你说的Ada95软件包是 here

不知道这是怎么回事 Ada95 binding to BLAS 出现在我的浏览器缓存中!我知道对于一般的矩阵求解,你也需要LAPACK,我想知道GNAT中已有的绑定是否会有帮助?包裹 System.Generic_Real_LAPACK

--  LAPACK Computational Routines

--  gerfs  Refines the solution of a system of linear equations with
--         a general matrix and estimates its error
--  getrf  Computes LU factorization of a general m-by-n matrix
--  getri  Computes inverse of an LU-factored general matrix
--         square matrix, with multiple right-hand sides
--  getrs  Solves a system of linear equations with an LU-factored
--         square matrix, with multiple right-hand sides
--  orgtr  Generates the Float orthogonal matrix Q determined by sytrd
--  steqr  Computes all eigenvalues and eigenvectors of a symmetric or
--         Hermitian matrix reduced to tridiagonal form (QR algorithm)
--  sterf  Computes all eigenvalues of a Float symmetric
--         tridiagonal matrix using QR algorithm
--  sytrd  Reduces a Float symmetric matrix to tridiagonal form

我怀疑这是完整库的一小部分。不过,它仍然可以作为更广泛绑定的跳板。

此包以前可用的站点已迁移,旧内容现在可在以下位置使用:

http://dfl.ece.drexel.edu/content/ada95-matrix-package