From 00374ce22e430a4d8c80753c640f214d24159914 Mon Sep 17 00:00:00 2001
From: AJ Rossini <anthony.rossini@novartis.com>
Date: Mon, 25 Jun 2007 08:53:15 +0200
Subject: [PATCH] ls-user has all the exported LispStat functionality.  Make
 sure to put it in here when usable features are created.

---
 lspackages.lsp => ls-user.lisp | 55 +++++++++++-------------------------------
 1 file changed, 14 insertions(+), 41 deletions(-)
 rename lspackages.lsp => ls-user.lisp (61%)

diff --git a/lspackages.lsp b/ls-user.lisp
similarity index 61%
rename from lspackages.lsp
rename to ls-user.lisp
index b9571bc..f50029d 100644
--- a/lspackages.lsp
+++ b/ls-user.lisp
@@ -3,55 +3,24 @@
 ;;; See COPYRIGHT file for any additional restrictions (BSD license).
 ;;; Since 1991, ANSI was finally finished.  Edited for ANSI Common Lisp. 
 
-;;;; lspackages -- Lisp-Stat package specifications
-;;;; 
-;;;; Copyright (c) 1991, by Luke Tierney. Permission is granted for
-;;;; unrestricted use.
 
-;;;
-;;;                 LISP-STAT-OBJECT-SYSTEM Package
-;;; (moved to lsobjects)
+(in-package :cl-user)
 
-;;;                       LISP-STAT-BASICS Package
-;;; (moved to lsbasics)
-
-;;;
-;;;                         LISP-STAT Package
-;;;
 
 (defpackage :lisp-stat
-  (:nicknames :ls :stats)
+  (:documentation "Experimentation package for LispStat.  Serious work
+should be packaged up elsewhere for reproducibility.")
+  (:nicknames :ls-user)
   (:use :common-lisp
 	:lisp-stat-object-system
         :lisp-stat-float
         :lisp-stat-math
 	:lisp-stat-basics
 	:lisp-stat-regression-linear)
-  (:shadowing-import-from :lisp-stat-object-system slot-value call-next-method)
-
-;;    ;; statistics.lsp
-
-;;    |base-lowess|
-
-;;    ;; maximize.lsp
-;;    new-minfo-internals minfo-maximize
-
-;;    )
-
-;;   (:shadow
-
-;;    ;; lsmath.lsp
-
-;;    expt + - * / ** mod rem abs 1+ 1- log exp sqrt sin cos tan
-;;    asin acos atan sinh cosh tanh asinh acosh atanh float random
-;;    truncate floor ceiling round minusp zerop plusp evenp oddp 
-;;    < <= = /= >= > complex conjugate realpart imagpart phase
-;;    min max logand logior logxor lognot ffloor fceiling
-;;    ftruncate fround signum cis
-
-;;    )
-
+  (:shadowing-import-from :lisp-stat-object-system
+			  slot-value call-method call-next-method)
   (:export
+   ;; lsobjects.lsp
 
    ;; lsmath.lsp
    ^ ** expt + - * / mod rem pmin pmax abs 1+ 1- log exp sqrt sin cos 
@@ -87,11 +56,15 @@
    ))
 
 
-;;; Lisp-stat-user package
-
 (defpackage :lisp-stat-user
+  (:documentation "Experimentation package for LispStat.  Serious work
+should be packaged up elsewhere for reproducibility.")
+  (:nicknames :ls-user)
   (:use :common-lisp
-	:lisp-stat))
+	:lisp-stat)
+  (:shadowing-import-from :lisp-stat-object-system
+			  slot-value call-method call-next-method))
 
 (in-package :lisp-stat-user)
 
+;;; 
\ No newline at end of file
-- 
2.11.4.GIT