Initial population.

1 files changed, 58 insertions, 0 deletions

diff --git a/src/input/d02gbf.input.pamphlet b/src/input/d02gbf.input.pamphlet
new file mode 100644
index 00000000..a2ef4c23
--- /dev/null
+++ b/src/input/d02gbf.input.pamphlet
@@ -0,0 +1,58 @@
+\documentclass{article}
+\usepackage{axiom}
+\begin{document}
+\title{\$SPAD/src/input d02gbf.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
+
+a:SF:=0.0
+b:SF:=1.0
+n:=2
+tol:SF:=1.0e-3
+mnp:= 70
+lw:=1702
+liw:=352
+c:Matrix SF:=
+ [[1 ,0 ],[0 ,0 ]]
+d:Matrix SF:=
+ [[0 ,0 ],[1 ,0 ]]
+gam:Matrix SF:=
+ [[0 ,1 ]]
+x:Matrix SF:=
+ [[0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,_
+   0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,_
+   0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,_
+   0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,_
+   0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,_
+   0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,_
+   0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,_
+   0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ,0.0 ]]
+np:=0
+ifail:= 11
+mef:Matrix Expression Float:=
+ [[0 ,1 ],[0 ,-10 ]]
+fcnf:Asp77(FCNF):=retract mef
+vef:Vector Expression Float :=
+ [0 ,0 ]
+fcng:Asp78(FCNG):=retract vef
+result:=d02gbf(a,b,n,tol,mnp,lw,liw,c,d,gam,x,np,ifail,fcnf,fcng)
+@
+\eject
+\begin{thebibliography}{99}
+\bibitem{1} nothing
+\end{thebibliography}
+\end{document}