\documentclass{article}
\usepackage{axiom}
\begin{document}
\title{\$SPAD/src/input e04gcf.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:=15
n:=3
liw:=1
lw:=177
x:Matrix SF:=
 [[0.5 ,1.0 ,1.5 ]]
vef:Vector Expression Float:=vector
 [(XC[3]+15*XC[2])**(-1)+XC[1]-0.14 ,_
   2*(2*XC[3]+14*XC[2])**(-1)+XC[1]-0.18 ,_
   3*(3*XC[3]+13*XC[2])**(-1)+XC[1]-0.22 ,_
   4*(4*XC[3]+12*XC[2])**(-1)+XC[1]-0.25 ,_
   5*(5*XC[3]+11*XC[2])**(-1)+XC[1]-0.29 ,_
   6*(6*XC[3]+10*XC[2])**(-1)+XC[1]-0.32 ,_
   7*(7*XC[3]+9*XC[2])**(-1)+XC[1]-0.35 ,_
   8*(8*XC[3]+8*XC[2])**(-1)+XC[1]-0.39 ,_
   9*(7*XC[3]+7*XC[2])**(-1)+XC[1]-0.37 ,_
   10*(6*XC[3]+6*XC[2])**(-1)+XC[1]-0.58 ,_
   11*(5*XC[3]+5*XC[2])**(-1)+XC[1]-0.73 ,_
   12*(4*XC[3]+4*XC[2])**(-1)+XC[1]-0.96 ,_
   13*(3*XC[3]+3*XC[2])**(-1)+XC[1]-1.34 ,_
   14*(2*XC[3]+2*XC[2])**(-1)+XC[1]-2.1 ,_
   15*(XC[3]+XC[2])**(-1)+XC[1]-4.39 ]
lsfun2:Asp19(LSFUN2):= retract vef
result:=e04gcf(m,n,liw,lw,x,-1,lsfun2)
@
\eject
\begin{thebibliography}{99}
\bibitem{1} nothing
\end{thebibliography}
\end{document}