--- /dev/null 1994-07-17 19:46:18.000000000 -0400 +++ iprntpk.input.pamphlet 2007-07-09 21:45:13.000000000 -0400 @@ -0,0 +1,54 @@ +\documentclass{article} +\usepackage{axiom} +\begin{document} +\title{\$SPAD/src/input iprntpk.input} +\author{The Axiom Team} +\maketitle +\begin{abstract} +\end{abstract} +\eject +\tableofcontents +\eject +\section{License} +<>= +--Copyright The Numerical Algorithms Group Limited 1991. +@ +<<*>>= +)spool iprntpk.output +)set message test on +)set message auto off +)clear all + +@ +This package exports but one function. Nonetheless, we had a bug in +this code, so a few tests are warranted. The function is iprint, which +simply prints a string standard-output without a new line, and flushes +the stream. + +<<*>>= +--S 1 of 3 +)set expose add constructor IPRNTPK +--R InternalPrintPackage is now explicitly exposed in frame initial +--E 1 + +--S 2 of 3 +iprint("Release the hounds!") +--RRelease the hounds! Type: Void +--E 2 + +--S 3 of 3 +for i in 1..10 repeat iprint(i::String) +--R12345678910 Type: Void +--E 3 + +)spool +)lisp (bye) + +@ +\eject +\begin{thebibliography}{99} +\bibitem{1} nothing +\end{thebibliography} +\end{document} + +