[lisplab-cvs] r14 - src src/core src/fft src/linalg src/matrix src/util system

Jørn Inge Vestgården jivestgarden at common-lisp.net
Tue May 5 19:36:47 UTC 2009


Author: jivestgarden
Date: Tue May  5 15:36:47 2009
New Revision: 14

Log:
refactored directories

Added:
   src/core/
   src/core/level0-basic.lisp   (props changed)
      - copied unchanged from r1, /src/level0-basic.lisp
   src/core/level0-const.lisp   (props changed)
      - copied unchanged from r1, /src/level0-const.lisp
   src/core/level0-expression.lisp   (props changed)
      - copied unchanged from r1, /src/level0-expression.lisp
   src/core/level0-generic.lisp   (props changed)
      - copied unchanged from r1, /src/level0-generic.lisp
   src/core/level0-infpre.lisp   (props changed)
      - copied unchanged from r1, /src/level0-infpre.lisp
   src/core/level0-interface.lisp   (props changed)
      - copied unchanged from r1, /src/level0-interface.lisp
   src/core/level0-permutation.lisp   (props changed)
      - copied unchanged from r1, /src/level0-permutation.lisp
   src/fft/
   src/fft/level3-fft-blas.lisp   (props changed)
      - copied unchanged from r1, /src/level3-fft-blas.lisp
   src/fft/level3-fft-generic.lisp   (props changed)
      - copied unchanged from r1, /src/level3-fft-generic.lisp
   src/fft/level3-fft-interface.lisp   (props changed)
      - copied unchanged from r1, /src/level3-fft-interface.lisp
   src/linalg/
   src/linalg/level3-linalg-blas-real.lisp   (props changed)
      - copied unchanged from r1, /src/level3-linalg-blas-real.lisp
   src/linalg/level3-linalg-generic.lisp   (props changed)
      - copied unchanged from r1, /src/level3-linalg-generic.lisp
   src/linalg/level3-linalg-interface.lisp   (props changed)
      - copied unchanged from r2, /src/level3-linalg-interface.lisp
   src/matrix/
   src/matrix/level1-array.lisp   (props changed)
      - copied unchanged from r1, /src/level1-array.lisp
   src/matrix/level1-blas-complex.lisp   (props changed)
      - copied unchanged from r8, /src/level1-blas-complex.lisp
   src/matrix/level1-blas-real.lisp   (props changed)
      - copied unchanged from r11, /src/level1-blas-real.lisp
   src/matrix/level1-blas.lisp   (props changed)
      - copied unchanged from r1, /src/level1-blas.lisp
   src/matrix/level1-funmat.lisp   (props changed)
      - copied unchanged from r1, /src/level1-funmat.lisp
   src/matrix/level1-generic.lisp   (props changed)
      - copied unchanged from r1, /src/level1-generic.lisp
   src/matrix/level1-interface.lisp   (props changed)
      - copied unchanged from r1, /src/level1-interface.lisp
   src/matrix/level1-list.lisp   (props changed)
      - copied unchanged from r1, /src/level1-list.lisp
   src/matrix/level2-blas-complex.lisp   (props changed)
      - copied unchanged from r1, /src/level2-blas-complex.lisp
   src/matrix/level2-blas-real.lisp   (props changed)
      - copied unchanged from r1, /src/level2-blas-real.lisp
   src/matrix/level2-blas.lisp   (props changed)
      - copied unchanged from r1, /src/level2-blas.lisp
   src/matrix/level2-funmat.lisp   (props changed)
      - copied unchanged from r1, /src/level2-funmat.lisp
   src/matrix/level2-generic.lisp   (props changed)
      - copied unchanged from r1, /src/level2-generic.lisp
   src/matrix/level2-interface.lisp   (props changed)
      - copied unchanged from r1, /src/level2-interface.lisp
   src/util/
   src/util/level3-euler.lisp   (props changed)
      - copied unchanged from r1, /src/level3-euler.lisp
   src/util/level3-rk4.lisp   (props changed)
      - copied unchanged from r1, /src/level3-rk4.lisp
Removed:
   src/level0-basic.lisp
   src/level0-const.lisp
   src/level0-expression.lisp
   src/level0-generic.lisp
   src/level0-infpre.lisp
   src/level0-interface.lisp
   src/level0-permutation.lisp
   src/level1-array.lisp
   src/level1-blas-complex.lisp
   src/level1-blas-real.lisp
   src/level1-blas.lisp
   src/level1-funmat.lisp
   src/level1-generic.lisp
   src/level1-interface.lisp
   src/level1-list.lisp
   src/level2-blas-complex.lisp
   src/level2-blas-real.lisp
   src/level2-blas.lisp
   src/level2-funmat.lisp
   src/level2-generic.lisp
   src/level2-interface.lisp
   src/level3-euler.lisp
   src/level3-fft-blas.lisp
   src/level3-fft-generic.lisp
   src/level3-fft-interface.lisp
   src/level3-linalg-blas-real.lisp
   src/level3-linalg-generic.lisp
   src/level3-linalg-interface.lisp
   src/level3-rk4.lisp
Modified:
   system/lisplab.asd

Modified: system/lisplab.asd
==============================================================================
--- system/lisplab.asd	(original)
+++ system/lisplab.asd	Tue May  5 15:36:47 2009
@@ -2,14 +2,15 @@
 (defsystem :lisplab
   :depends-on ()
   :components 
-  ((:file "package")
+  (
+   (:file "package")
 
    ;;
-   ;; All core matrix and none-matrix stuff (level0 level1, level2)
+   ;; All core none-matrix stuff (level 0)
    ;;
-   (:module :lisplab-core
+   (:module :core
     :depends-on ("package")
-    :pathname "../src/"
+    :pathname "../src/core/"
     :serial t
     :components 
     (
@@ -18,8 +19,17 @@
      (:file "level0-interface")
      (:file "level0-generic")
      (:file "level0-permutation")
-     (:file "level0-infpre")
+     (:file "level0-infpre")))
 
+   ;;
+   ;; All core matrix stuff (level 1 and 2)
+   ;;
+   (:module :matrix
+    :depends-on (:core)
+    :pathname "../src/matrix/"
+    :serial t
+    :components 
+    (
      (:file "level1-interface")
      (:file "level1-generic")
      (:file "level1-array")
@@ -34,71 +44,61 @@
      (:file "level2-funmat")
      (:file "level2-blas")
      (:file "level2-blas-real")
-     (:file "level2-blas-complex")
-    )
-   )
+     (:file "level2-blas-complex")))
 
    ;;
    ;; Linear algebra interface(Level 3)
    ;;
-   (:module :lisplab-linalg-interface
-    :depends-on (:lisplab-core)
-    :pathname "../src/"
+   (:module :linalg-interface
+    :depends-on (:matrix)
+    :pathname "../src/linalg/"
     :serial t
     :components 
     (
-     (:file "level3-linalg-interface")
-    )
-   )
+     (:file "level3-linalg-interface")))
 
    ;;
    ;; Linear algebra lisp implementation (Level 3)
    ;;
-   (:module :lisplab-linalg-native
-    :depends-on (:lisplab-core :lisplab-linalg-interface)
-    :pathname "../src/"
+   (:module :linalg-native
+    :depends-on (:matrix :linalg-interface)
+    :pathname "../src/linalg/"
     :serial t
     :components 
     (
      (:file "level3-linalg-generic")
-     (:file "level3-linalg-blas-real")
-    )
-   )
+     (:file "level3-linalg-blas-real")))
 
    ;;
    ;; Fast Fourier transform (Level 3)
    ;;
-   (:module :lisplab-fft
-    :depends-on (:lisplab-core)
-    :pathname "../src/"
+   (:module :fft
+    :depends-on (:matrix)
+    :pathname "../src/fft/"
     :serial t
     :components 
     (
      (:file "level3-fft-interface")
      (:file "level3-fft-generic")
-     (:file "level3-fft-blas")
-    )
-   )
+     (:file "level3-fft-blas")))
 
    ;;
    ;; Euler and Runge-Kutt solvers (Level 3)
    ;;
-   (:module :lisplab-diffsolve
-    :depends-on (:lisplab-core)
-    :pathname "../src/"
+   (:module :diffsolve
+    :depends-on (:matrix)
+    :pathname "../src/util/"
     :serial t
     :components 
     (
      (:file "level3-rk4")
-     (:file "level3-euler")     
-    )
-   )
+     (:file "level3-euler")))
 
    ;;
    ;; Blas and Lapack implmentations (Level 3)
    ;;
    (:module :matlisp
-    :depends-on (:lisplab-core :lisplab-linalg-interface)
+    :depends-on (:matrix :linalg-interface)
     :pathname "../src/matlisp/"
     :serial t
     :components 
@@ -109,16 +109,15 @@
      (:file "lapack") 
      (:file "mul")
      (:file "inv")
-     (:file "geev")
-    )
+     (:file "geev"))
+
     :perform (asdf:load-op :after (op c)
-       (dolist (lib asdf::*lisplab-external-libraries*)
-          (sb-alien:load-shared-object lib)))
-     :explain (asdf:load-op :after (op c)
-       (dolist (lib asdf::*lisplab-external-libraries*)
-          (format t "Loads alien object <~A>" lib)))
+			   (dolist (lib asdf::*lisplab-external-libraries*)
+			     (sb-alien:load-shared-object lib)))
 
-   )
+    :explain (asdf:load-op :after (op c)
+			   (dolist (lib asdf::*lisplab-external-libraries*)
+			     (format t "Loads alien object <~A>" lib))))
 
 
    ;;




More information about the lisplab-cvs mailing list