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/d02raf.input.pamphlet | 53 +++++++++++++++++++++++++++++++++++++++++ 1 file changed, 53 insertions(+) create mode 100644 src/input/d02raf.input.pamphlet (limited to 'src/input/d02raf.input.pamphlet') diff --git a/src/input/d02raf.input.pamphlet b/src/input/d02raf.input.pamphlet new file mode 100644 index 00000000..be82a48c --- /dev/null +++ b/src/input/d02raf.input.pamphlet @@ -0,0 +1,53 @@ +\documentclass{article} +\usepackage{axiom} +\begin{document} +\title{\$SPAD/src/input d02raf.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 + +n:=3 +mnp:=40 +numbeg:=2 +nummix:=0 +tol:=1.0e-4 +init:=0 +iy:=3 +ijac:=1 +lwork:=1925 +liwork:=283 +np:=17 +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 ,10.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 ]] +y:Matrix SF:=new(3,40,0.0) +deleps:=0.1 +ifail:=11 +vef:Vector Expression Float:= + [Y[2] ,Y[3] ,-Y[1]*Y[3] - 2*EPS*(1-Y[2]*Y[2]) ] +fcn:Asp41(FCN,JACOBF,JACEPS):= retract vef +vei:Vector Expression Integer:= + [YA[1] ,YA[2] ,YB[2] -1 ] +g:Asp42(G,JACOBG,JACGEP):=retract vei +result:=d02raf(n,mnp,numbeg,nummix,tol,init,iy,ijac,lwork,liwork,np,x,y,deleps,ifail,fcn,g) +@ +\eject +\begin{thebibliography}{99} +\bibitem{1} nothing +\end{thebibliography} +\end{document} -- cgit v1.2.3