aboutsummaryrefslogtreecommitdiff
path: root/src/input/c06fpf.input.pamphlet
blob: e4633c86fb772be5ac5ee8a90047594fd1a31373 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
\documentclass{article}
\usepackage{axiom}
\begin{document}
\title{\$SPAD/src/input c06fpf.input}
\author{The Axiom Team}
\maketitle
\begin{abstract}
\end{abstract}
\eject
\tableofcontents
\eject
\section{License}
<<license>>=
--Copyright The Numerical Algorithms Group Limited 1994.
@
<<*>>=
<<license>>
)clear all
showArrayValues true
showScalarValues true

x:Matrix SF:=
 [[0.3854 ,0.6772 ,0.1138 ,0.6751 ,0.6362 ,0.1424] ,_
 [0.5417 ,0.2983 ,0.1181 ,0.7255 ,0.8638 ,0.8723] ,_
 [0.9172 ,0.0644 ,0.6037 ,0.6430 ,0.0428 ,0.4815 ]]
m:=nrows x
n:=ncols x
trig:Matrix SF:=new(1,2*n,0.0@SF)
init:="i"
result:=c06fpf(m,n,init,x,trig,-1)
@
\eject
\begin{thebibliography}{99}
\bibitem{1} nothing
\end{thebibliography}
\end{document}