Initial population.

1 files changed, 44 insertions, 0 deletions

diff --git a/src/input/f04jgf.input.pamphlet b/src/input/f04jgf.input.pamphlet
new file mode 100644
index 00000000..9b10c52e
--- /dev/null
+++ b/src/input/f04jgf.input.pamphlet
@@ -0,0 +1,44 @@
+\documentclass{article}
+\usepackage{axiom}
+\begin{document}
+\title{\$SPAD/src/input f04jgf.input}
+\author{The Axiom Team}
+\maketitle
+\begin{abstract}
+\end{abstract}
+\eject
+\tableofcontents
+\eject
+\section{License}
+<<license>>=
+--Copyright The Numerical Algorithms Group Limited 1994.
+@
+<<*>>=
+<<license>>
+)cl all
+showArrayValues true
+showScalarValues true
+
+m:=6
+n:=4
+nra:=8
+tol:= 5.0e-4
+lwork:=32
+a:Matrix SF:=
+ [[0.05 ,0.05 ,0.25 ,-0.25 ],_
+  [0.25 ,0.25 ,0.05 ,-0.05 ],_
+  [0.35 ,0.35 ,1.75 ,-1.75 ],_
+  [1.75 ,1.75 ,0.35 ,-0.35 ],_
+  [0.30 ,-0.30 ,0.30 ,0.30 ],_
+  [0.40 ,-0.40 ,0.40 ,0.40 ],_
+  [0.0 ,0.0 ,0.0 ,0.0 ],_
+  [0.0 ,0.0 ,0.0 ,0.0 ]]
+b:Matrix SF:=
+  [[1 ,2 ,3 ,4 ,5 ,6 ]]
+result:=f04jgf(m,n,nra,tol,lwork,a,b,-1)
+@
+\eject
+\begin{thebibliography}{99}
+\bibitem{1} nothing
+\end{thebibliography}
+\end{document}