Initial population.

1 files changed, 48 insertions, 0 deletions

diff --git a/src/input/e01saf.input.pamphlet b/src/input/e01saf.input.pamphlet
new file mode 100644
index 00000000..d4d6fcad
--- /dev/null
+++ b/src/input/e01saf.input.pamphlet
@@ -0,0 +1,48 @@
+\documentclass{article}
+\usepackage{axiom}
+\begin{document}
+\title{\$SPAD/src/input e01saf.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
+
+m:=30
+x:Matrix SF:=
+ [[11.16 ,12.85 ,19.85 ,19.72 ,15.91 , 0.00 ,20.87 ,_
+    3.45 ,14.26 ,17.43 ,22.80  ,7.58 ,25.00 , 0.00 ,_
+    9.66 , 5.22 ,17.25 ,25.00 ,12.13 ,22.23 ,11.52 ,_
+   15.20 , 7.54 ,17.32 , 2.14 , 0.51 ,22.69 , 5.47 ,21.67 ,3.31 ]]
+y:Matrix SF:=
+ [[1.24 ,3.06 ,10.72 ,1.39 ,7.74 ,20.00 ,20.00 ,12.78 ,_
+   17.87 ,3.46 ,12.39 ,1.98 ,11.87 ,0.00 ,20.00 ,14.66 ,_
+   19.57 ,3.87 ,10.79 ,6.21 ,8.53 ,0.0 ,10.69 ,13.78 ,_
+   15.03 ,8.37 ,19.63 ,17.13 ,14.36 ,0.33 ]]
+f:Matrix SF:=
+ [[22.15 ,22.11 ,7.97 ,16.83 ,15.30 ,34.60 ,5.74 ,41.24 ,_
+   10.74 ,18.60 ,5.47 ,29.87 ,4.40 ,58.20 ,4.73 ,40.36 ,_
+    6.43 ,8.74 ,13.71 ,10.25 ,15.74 ,21.60 ,19.31 ,12.11 ,_
+    53.10 ,49.43 ,3.25 ,28.63 ,5.52 ,44.08 ]]
+result:=resa:=e01saf(m,x,y,f,-1)
+px:=7.71
+py:=3.45
+resb:=e01sbf(m,x,y,f,resa."triang",resa."grads",px,py,-1)
+resb."pf"
+@
+\eject
+\begin{thebibliography}{99}
+\bibitem{1} nothing
+\end{thebibliography}
+\end{document}