aboutsummaryrefslogtreecommitdiff
path: root/src/interp/nag-c06.boot.pamphlet
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/nag-c06.boot.pamphlet')
-rw-r--r--src/interp/nag-c06.boot.pamphlet10
1 files changed, 6 insertions, 4 deletions
diff --git a/src/interp/nag-c06.boot.pamphlet b/src/interp/nag-c06.boot.pamphlet
index 6bf1b75b..6ea240c3 100644
--- a/src/interp/nag-c06.boot.pamphlet
+++ b/src/interp/nag-c06.boot.pamphlet
@@ -46,6 +46,8 @@
<<*>>=
<<license>>
+)package "BOOT"
+
c06eaf() ==
htInitPage('"C06EAF - Single 1-D real discrete Fourier transform ",nil)
htMakePage '(
@@ -304,7 +306,7 @@ c06ecfSolve htPage ==
(isDomain P (Polynomial $EmptyMode))
(isDomain S (String))
(isDomain F (Float))
- (isDomain PI (PositiveInteger))),
+ (isDomain PI (PositiveInteger))),
:labelList]
page := htInitPage("C06ECF - Single 1-D complex discrete Fourier transform ",htpPropertyList htPage)
htSay '"\menuitemstyle{}\tab{2} Real parts of sequence: \tab{30} "
@@ -438,7 +440,7 @@ c06ekfSolve htPage ==
(isDomain P (Polynomial $EmptyMode))
(isDomain S (String))
(isDomain F (Float))
- (isDomain PI (PositiveInteger))),
+ (isDomain PI (PositiveInteger))),
:labelList]
page := htInitPage("C06EKF - Single 1-D complex discrete Fourier transform ",htpPropertyList htPage)
htSay '"\menuitemstyle{}\tab{2} Elements of period of vector {\em x}: "
@@ -1638,7 +1640,7 @@ c06gqfSolve htPage ==
(isDomain P (Polynomial $EmptyMode))
(isDomain S (String))
(isDomain F (Float))
- (isDomain PI (PositiveInteger))),
+ (isDomain PI (PositiveInteger))),
:newList]
page := htInitPage("C06GQF - Complex conjugate of multiple Hermitian sequences ",htpPropertyList htPage)
htSay '"\newline "
@@ -1772,7 +1774,7 @@ c06gsfSolve htPage ==
(isDomain P (Polynomial $EmptyMode))
(isDomain S (String))
(isDomain F (Float))
- (isDomain PI (PositiveInteger))),
+ (isDomain PI (PositiveInteger))),
:newList]
page := htInitPage("C06GSF - Convert Hermitian sequences to general complex sequences ",htpPropertyList htPage)
htSay '"\newline "