From 1b27b1856325d3054e34e4a8a0fb51c97f26d3e7 Mon Sep 17 00:00:00 2001
From: AJ Rossini <blindglobe@gmail.com>
Date: Mon, 18 Aug 2008 18:36:45 +0200
Subject: [PATCH] modularized internal numerics using C for probbility and
 linalg.

---
 lispstat.asd                              | 67 ++++++++++++++++---------------
 cffiglue.lsp => src/numerics/cffiglue.lsp |  0
 dists.lsp => src/numerics/dists.lsp       |  0
 ladata.lsp => src/numerics/ladata.lsp     |  0
 linalg.lsp => src/numerics/linalg.lsp     |  0
 matrices.lsp => src/numerics/matrices.lsp |  0
 6 files changed, 34 insertions(+), 33 deletions(-)
 rename cffiglue.lsp => src/numerics/cffiglue.lsp (100%)
 rename dists.lsp => src/numerics/dists.lsp (100%)
 rename ladata.lsp => src/numerics/ladata.lsp (100%)
 rename linalg.lsp => src/numerics/linalg.lsp (100%)
 rename matrices.lsp => src/numerics/matrices.lsp (100%)

diff --git a/lispstat.asd b/lispstat.asd
index 55b3386..b814f6e 100644
--- a/lispstat.asd
+++ b/lispstat.asd
@@ -2,7 +2,7 @@
 ;;; Copyright (c) 2005--2008, by AJ Rossini <blindglobe@gmail.com>
 ;;; ASDF packaging for CommonLisp Stat
 ;;; License: BSD, see the top level directory file LICENSE for details.
-;;; Time-stamp: <2008-07-31 09:10:05 tony>
+;;; Time-stamp: <2008-08-18 18:33:01 tony>
 ;;; Created:    <2005-05-30 17:09:47 blindglobe>
 
 ;; What package should we be in?  Contaminating cl-user is probably EVIL.
@@ -94,11 +94,13 @@ Last touched 1991, then in 2005--2008."
   :serial t
   :depends-on (:cffi :lift) ;; need a matrix library
   :components ((:static-file "version" :pathname #p"version.lisp-expr")
+	       (:static-file "LICENSE")
+	       (:static-file "README")
+
 	       (:module "proto-objects"
 			:pathname "src/objsys/"
 			:components ((:lispstat-lsp-source-file "lsobjects")))
 
-	       (:lispstat-lsp-source-file "cffiglue")
 	       (:lispstat-lsp-source-file "defsys")
 	       (:lispstat-lsp-source-file "lstypes")
 	       (:lispstat-lsp-source-file "lsfloat")
@@ -108,41 +110,41 @@ Last touched 1991, then in 2005--2008."
 	       (:lispstat-lsp-source-file "lsmacros" 
 					  :depends-on ("compound"))
 
-	       (:lispstat-lsp-source-file "dists"
-					  :depends-on ("cffiglue"
-						       "lsmacros"))
-
 	       (:lispstat-lsp-source-file "lsmath"
 					  :depends-on ("proto-objects"
 						       "compound"
 						       "lsmacros"
 						       "lsfloat"))
 
-
-	       (:lispstat-lsp-source-file "matrices"
-					  :depends-on ("cffiglue"
-						       "compound"))
-
-	       (:lispstat-lsp-source-file "ladata"
-					  :depends-on ("cffiglue"
-						       "defsys"
-						       "lstypes"
-						       "compound"
-						       "matrices"))
-
-	       (:lispstat-lsp-source-file "linalg"
-					  :depends-on ("cffiglue"
-						       "lsmath"
-						       "matrices"
-						       "ladata"
-						       "lsfloat"
-						       "lstypes"
-						       "compound"))
+	       (:module "numerics-internal"
+			:pathname "src/numerics"
+			:components
+			((:lispstat-lsp-source-file "cffiglue")
+			 (:lispstat-lsp-source-file "dists"
+						    :depends-on ("cffiglue"
+								 "lsmacros"))
+			 (:lispstat-lsp-source-file "matrices"
+						    :depends-on ("cffiglue"
+								 "compound"))
+			 (:lispstat-lsp-source-file "ladata"
+						    :depends-on ("cffiglue"
+								 "defsys"
+								 "lstypes"
+								 "compound"
+								 "matrices"))
+			 (:lispstat-lsp-source-file "linalg"
+						    :depends-on ("cffiglue"
+								 "lsmath"
+								 "matrices"
+								 "ladata"
+								 "lsfloat"
+								 "lstypes"
+								 "compound"))))
 
 	       (:file "data" :depends-on ("proto-objects"
 					  "compound"
-					  "matrices"
-					  "linalg"))
+					  "numerics-internal" ;; "matrices" "linalg"
+					  ))
 
 	       ;; there is a circ reference which we need to solve.
 	       (:lispstat-lsp-source-file "lsbasics"
@@ -150,9 +152,9 @@ Last touched 1991, then in 2005--2008."
 						       "lstypes"
 						       "lsmacros"
 						       "lsfloat"
-						       "matrices"
-						       "linalg"
-						       "dists"))
+						       "numerics-internal"
+						       ;; "matrices" "linalg" "dists"
+						       ))
 
 	       (:lispstat-lsp-source-file "statistics"
 					  :depends-on ("proto-objects"
@@ -218,7 +220,6 @@ Last touched 1991, then in 2005--2008."
 			      ;;  "unittests-proto.lisp"
 			      ;;  "unittests-regression.lisp"
 			      ))
-	       (:static-file "LICENSE")
-	       (:static-file "README")
+
 	       ))
 
diff --git a/cffiglue.lsp b/src/numerics/cffiglue.lsp
similarity index 100%
rename from cffiglue.lsp
rename to src/numerics/cffiglue.lsp
diff --git a/dists.lsp b/src/numerics/dists.lsp
similarity index 100%
rename from dists.lsp
rename to src/numerics/dists.lsp
diff --git a/ladata.lsp b/src/numerics/ladata.lsp
similarity index 100%
rename from ladata.lsp
rename to src/numerics/ladata.lsp
diff --git a/linalg.lsp b/src/numerics/linalg.lsp
similarity index 100%
rename from linalg.lsp
rename to src/numerics/linalg.lsp
diff --git a/matrices.lsp b/src/numerics/matrices.lsp
similarity index 100%
rename from matrices.lsp
rename to src/numerics/matrices.lsp
-- 
2.11.4.GIT