From 4e8869ad7f8dfe1de8b53d3696da5dd17824df0e Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Thu, 11 Oct 2007 08:14:53 +0000
Subject: 	* Makefile.pamphlet (<<nag-c02.clisp>>): Remove. 
 (<<nag-c05.clisp>>): Likewise. 	(<<nag-c06.clisp>>): Likewise. 
 (<<nag-d01.clisp>>): Likewise. 	(<<nag-d02.clisp>>): Likewise. 
 (<<nag-d03.clisp>>): Likewise. 	(<<nag-e01.clisp>>): Likewise. 
 (<<nag-e02.clisp>>): Likewise. 	(<<nag-e04.clisp>>): Likewise. 
 (<<nag-f01.clisp>>): Likewise. 	(<<nag-f02.clisp>>): Likewise. 
 (<<nag-f04.clisp>>): Likewise. 	(<<nag-f07.clisp>>): Likewise. 
 (<<nag-s.clisp>>): Likewise. 	* bc-matrix.boot.pamphlet
 (bcInputExplicitMatrix): Fix thinko. 	* showimp.boot.pamphlet
 (getCategoriesOfDomain): Likewise. 	* nag-c02.boot.pamphlet: Push into
 package "BOOT".  	* nag-c05.boot.pamphlet: Likewise.  	*
 nag-c06.boot.pamphlet: Likewise. Fix thinko.  	* nag-d01.boot.pamphlet:
 Likewise.  	* nag-d02.boot.pamphlet: Push into package "BOOT".  	*
 nag-d03.boot.pamphlet: Likewise.  	* nag-e01.boot.pamphlet: Likewise. Fix
 thinko.  	* nag-e02.boot.pamphlet: Push into package "BOOT".  	*
 nag-e02b.boot.pamphlet: Likewise.  	* nag-e04.boot.pamphlet: Likewise.
 Make compilable by bootsys.  	* nag-f01.boot.pamphlet: Push into package
 "BOOT".  	* nag-f02.boot.pamphlet: Likewise.  	*
 nag-f04.boot.pamphlet: Likewise.  	* nag-f07.boot.pamphlet: Likewise. 
 Fix thinko.  	* nag-s.boot.pamphlet: Likewise. 	*
 showimp.boot.pamphlet: Fix thinko.

---
 src/interp/nag-e01.boot.pamphlet | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'src/interp/nag-e01.boot.pamphlet')

diff --git a/src/interp/nag-e01.boot.pamphlet b/src/interp/nag-e01.boot.pamphlet
index 227dabde..0aa2f106 100644
--- a/src/interp/nag-e01.boot.pamphlet
+++ b/src/interp/nag-e01.boot.pamphlet
@@ -46,6 +46,8 @@
 <<*>>=
 <<license>>
 
+)package "BOOT"
+
 e01baf() ==
   htInitPage('"E01BAF - Interpolating functions, cubic spline interpolant, one variable", nil)
   htMakePage '(
@@ -97,7 +99,7 @@ e01bafSolve htPage ==
         (isDomain P (Polynomial $EmptyMode))
          (isDomain S (String))
           (isDomain F (Float))
-          (isDomain PI (PositiveInteger))),
+           (isDomain PI (PositiveInteger))),
 	    :labelList]
   page := htInitPage("E01BAF - Interpolating functions, cubic spline interpolant, one variable",htpPropertyList htPage)
   htSay '"\menuitemstyle{}\tab{2} Values of x: \tab{30} "
@@ -229,7 +231,7 @@ e01befSolve htPage ==
         (isDomain P (Polynomial $EmptyMode))
          (isDomain S (String))
           (isDomain F (Float))
-          (isDomain PI (PositiveInteger))),
+           (isDomain PI (PositiveInteger))),
 	    :labelList]
   page := htInitPage("E01BEF - Interpolating functions, monoticity preserving, piecewise cubic Hermite, one variable",htpPropertyList htPage)
   htSay '"\menuitemstyle{}\tab{2} Values of \space{1} "
-- 
cgit v1.2.3