From ab8cc85adde879fb963c94d15675783f2cf4b183 Mon Sep 17 00:00:00 2001 From: dos-reis Date: Tue, 14 Aug 2007 05:14:52 +0000 Subject: Initial population. --- src/input/f02adf.input.pamphlet | 41 +++++++++++++++++++++++++++++++++++++++++ 1 file changed, 41 insertions(+) create mode 100644 src/input/f02adf.input.pamphlet (limited to 'src/input/f02adf.input.pamphlet') diff --git a/src/input/f02adf.input.pamphlet b/src/input/f02adf.input.pamphlet new file mode 100644 index 00000000..ce8c7891 --- /dev/null +++ b/src/input/f02adf.input.pamphlet @@ -0,0 +1,41 @@ +\documentclass{article} +\usepackage{axiom} +\begin{document} +\title{\$SPAD/src/input f02adf.input} +\author{The Axiom Team} +\maketitle +\begin{abstract} +\end{abstract} +\eject +\tableofcontents +\eject +\section{License} +<>= +--Copyright The Numerical Algorithms Group Limited 1994. +@ +<<*>>= +<> +)clear all +showArrayValues true +showScalarValues true + +ia:=4 +ib:=4 +n:=4 +a:Matrix SF:= + [[0.5 , 1.5 , 6.6 , 4.8 ],_ + [1.5 , 6.5 ,16.2 , 8.6 ],_ + [6.6 ,16.2 ,37.6 , 9.8 ],_ + [4.8 , 8.6 , 9.8 ,-17.1 ]] +b:Matrix SF:= + [[1 , 3 , 4 , 1 ],_ + [3 ,13 ,16 ,11 ],_ + [4 ,16 ,24 ,18 ],_ + [1 ,11 ,18 ,27 ]] +result:=f02adf(ia,ib,n,a,b,-1) +@ +\eject +\begin{thebibliography}{99} +\bibitem{1} nothing +\end{thebibliography} +\end{document} -- cgit v1.2.3