;; Script that loads Lisplab.

(in-package :cl-user)

;; Uncomment or move to .sbclrc
;; (defvar *lisplab-libblas-path* #P"/usr/lib/atlas/libblas.so.3.0")
;; (defvar *lisplab-liblapack-path* #P"/usr/lib/atlas/liblapack.so.3.0")
;; (defvar  *lisplab-libfftw-path* #P"/usr/lib/libfftw3.so.3")

;; Slatec needs double-floats for compiling
(let ((*read-default-float-format* 'double-float))
  (require :lisplab))

(format t "~&Lisplab is loaded.~%")