diff options
author | dos-reis <gdr@axiomatics.org> | 2007-08-14 05:14:52 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2007-08-14 05:14:52 +0000 |
commit | ab8cc85adde879fb963c94d15675783f2cf4b183 (patch) | |
tree | c202482327f474583b750b2c45dedfc4e4312b1d /src/input/e02ddf.input.pamphlet | |
download | open-axiom-ab8cc85adde879fb963c94d15675783f2cf4b183.tar.gz |
Initial population.
Diffstat (limited to 'src/input/e02ddf.input.pamphlet')
-rw-r--r-- | src/input/e02ddf.input.pamphlet | 55 |
1 files changed, 55 insertions, 0 deletions
diff --git a/src/input/e02ddf.input.pamphlet b/src/input/e02ddf.input.pamphlet new file mode 100644 index 00000000..4c95a93d --- /dev/null +++ b/src/input/e02ddf.input.pamphlet @@ -0,0 +1,55 @@ +\documentclass{article} +\usepackage{axiom} +\begin{document} +\title{\$SPAD/src/input e02ddf.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 + +start:="c" +m:=30 +x:Matrix SF:= + [[11.16 ,12.85 ,19.85 ,19.72 ,15.91 ,0 ,20.87 ,3.45 ,_ + 14.26 ,17.43 ,22.8 ,7.58 ,25 ,0 ,9.66 ,5.22 ,17.25 ,25 ,12.13 ,22.23 ,_ + 11.52 ,15.2 ,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 ,20 ,12.78 ,17.87 ,3.46 ,12.39 ,_ + 1.98 ,11.87 ,0 ,20 ,14.66 ,19.57 ,3.87 ,10.79 ,6.21 ,8.53 ,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.6 ,5.74 ,41.24 ,10.74 ,18.60 ,_ + 5.47 ,29.87 ,4.4 ,58.2 ,4.73 ,40.36 ,6.43 ,8.74 ,13.71 ,10.25 ,_ + 15.74 ,21.6 ,19.31 ,12.11 ,53.1 ,49.43 ,3.25 ,28.63 ,5.52 ,44.08 ]] +w:Matrix SF:= + [[1 ,1 ,1 ,1 ,1 ,1 ,1 ,1 ,1 ,1 ,1 ,1 ,1 ,1 ,1 ,1 ,1 ,1 ,1 ,1 ,_ + 1 ,1 ,1 ,1 ,1 ,1 ,1 ,1 ,1 ,1 ]] +s:=10 +nxest:=14 +nyest:=14 +lwrk:=11016 +liwrk:=128 +nx:=0 +lamda:=new(1,14,0.0)$Matrix SF +ny:=0 +mu:=new(1,14,0.0)$Matrix SF +wrk:=new(1,11016,0.0)$Matrix SF; +result:=e02ddf(start,m,x,y,f,w,s,nxest,nyest,lwrk,liwrk,nx,lamda,ny,mu,wrk,-1) +@ +\eject +\begin{thebibliography}{99} +\bibitem{1} nothing +\end{thebibliography} +\end{document} |