A linear algebra library for Common Lisp
Explore the docs »
Report Bug
·
Request Feature
·
Reference Manual
LLA is a high-level Common Lisp library built on on BLAS and LAPACK, but providing a more abstract interface with the purpose of freeing the user from low-level concerns and reducing the number of bugs in numerical code.
- High-level, user friendly interface that hides the details.
(solve a b)
should return DGESV
, especially when CLOS makes it so easy to deal with these things. Also, you don't need to make sure that all arguments are of the same type (eg complex-double): LLA will find the common supertype for elements and convert if necessary.
- Stay in Lisp and expose the innards of the objects as much as possible.
LLA aims to take advantage of CL's high level facilities such as CLOS and memory management. Data is kept in Lisp arrays instead of foreign arrays, so you can access it directly using aref
etc. You also benefit from garbage collection and all the clever stuff that comes with the GC. If you need more memory, just increase the heap size.
- Keeping it simple.
Currently, LLA sources amount to less than 3000 lines of code (not including tests). The small size should make maintenance easier and bugs more rare (hopefully).
- Speed is important, but reliability comes first.
Only optimize when necessary, and do extensive testing afterwards. Most of the speed comes from your LAPACK library anyway. Most linear algebra operations are
Certain features of LLA can be configured before loading using the plist *lla-configuration*
in the CL-USER
package (for example, on SBCL you would do it in your ~/.sbclrc
). The following properties are supported:
-
:libraries
A list of objects, passed directly to
cffi:load-foreign-library
. You can use strings, paths, or even symbols if you have defined these libraries usingcffi:define-foreign-library
. If you don't define this, a reasonable platform-dependent default will be used. See the next section for details. -
:int64
This makes LLA use 64-bit integers for array dimensions, pivot indices and other integer values passed to BLAS/LAPACK functions. Only use this if you are sure that your libraries have been compiled with 64-bit integers. The fact that you have a 64-bit platform does not necessarily mean that this is the case, in fact, it is still quite rare. Unless told otherwise, LLA expects BLAS/LAPACK to use the (L)LP64 model for integers -- that is to say, integer types in FORTRAN are 32 bit.
-
:efficiency-warnings
Enable the possibility of efficiency warnings at compile time. You still have to set the appropriate flags, but without this option, they won't even be checked. There are two properties you can set:
:array-type
and:array-conversion
. The first warns whenever an array has to be walked elementwise to determine its type, the second when some arrays need to be converted to a common type.Example:
(defparameter cl-user:*lla-configuration* '(:efficiency-warnings (:array-type :array-conversion)))
before loading LLA, and
(let ((lla:*lla-efficiency-warning-array-type* t) (lla:*lla-efficiency-warning-array-conversion* t)) (code that you want to check))
LLA needs BLAS and LAPACK shared libraries to work. When it comes to loading libraries, LLA tries to pick a sensible default for each platform, but in case it fails, you need to tell LLA where the libraries are before loading.
You can do this by putting something like this in your startup script (eg ~/.sbclrc
, the symbol needs to be in the package cl-user
):
(defvar *lla-configuration*
'(:libraries ("/usr/lib/atlas-base/atlas/libblas.so.3gf"
"/usr/lib/atlas-base/libatlas.so.3gf")))
MacOS (darwin) has BLAS and LAPACK available by default. For Linux, use your package manager. On MS Windows, OpenBLAS is known to work and the project provides pre-compiled binaries for MS Windows. You can either configure your PATH environment to contain the libopenblas.dll, or set the library as above.
To make the system accessible to ASDF (a build facility, similar to make
in the C world), clone the repository in a directory ASDF knows about. By default the common-lisp
directory in your home directory is known. Create this if it doesn't already exist and then:
- Clone the repository
cd ~/common-lisp && \
git clone https://github.com/Lisp-Stat/lla.git
- Reset the ASDF source-registry to find the new system (from the REPL)
(asdf:clear-source-registry)
- Load the system
(asdf:load-system :lla)
If you have installed the slime ASDF extensions, you can invoke this with a comma (',') from the slime REPL.
To get the third party systems that LLA depends on, you can use a dependency manager, such as Quicklisp or CLPM Once installed, get the dependencies with either of:
(clpm-client:sync :sources "clpi") ;sources may vary
(ql:quickload :lla)
You need do this only once. After obtaining the dependencies, you can load the system with ASDF
as described above without first syncing sources.
LLA was was written by Tamas Papp, inspired by packages written by AJ Rossini, Rif, Mark Hoemmen and others. Gábor Melis made substantial contributions to the library, especially the low-level pinning interface and the destructive BLAS routines.
- write optimized pinning interfaces
- improve documentation
- write more tests (especially randomized ones, develop macros for that)
- write a tutorial
Contributions are what make the open source community such an amazing place to be learn, inspire, and create. Any contributions you make are greatly appreciated. Please see CONTRIBUTING for details on the code of conduct, and the process for submitting pull requests.
Distributed under the MS-PL License. See LICENSE for more information.
Project Link: https://github.com/lisp-stat/lla
If you are using Emacs with slime on MS Windows, there is a bug in slime where trying to load a shared library using CFFI will hang slime. The workaround is to switch to the *inferior-lisp*
emacs buffer and press enter once or twice. After than, slime will unhang and CFFI will continue to load the BLAS libraries.