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-d01.boot.pamphlet | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

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

diff --git a/src/interp/nag-d01.boot.pamphlet b/src/interp/nag-d01.boot.pamphlet
index a4b2f373..5d2afbe2 100644
--- a/src/interp/nag-d01.boot.pamphlet
+++ b/src/interp/nag-d01.boot.pamphlet
@@ -46,6 +46,8 @@
 <<*>>=
 <<license>>
 
+)package "BOOT"
+
 d01ajf() ==
   htInitPage('"D01AJF - 1-D quadrature, adaptive, finite interval, allowing for badly-behaved integrands", nil)
   htMakePage '(
@@ -782,7 +784,7 @@ d01gafSolve htPage ==
         (isDomain P (Polynomial $EmptyMode))
          (isDomain S (String))
           (isDomain F (Float))
-          (isDomain PI (PositiveInteger))),
+           (isDomain PI (PositiveInteger))),
 	    :labelList]
   page := htInitPage("D01GAF - 1-D quadrature, integration of function defined by data values", htpPropertyList htPage)
   htSay '"\menuitemstyle{}\tab{2} Enter values for {\em x}: \tab{38} "
-- 
cgit v1.2.3