%macropackage=lplain
% testpage.tex - created 20 July 1987
% Copyright (C) 1987 by Leslie Lamport
%
% Test of how accurately printer reproduces dimensions specified
% by LaTeX output.
%
% Revised by Stephen Gildea to:
% make 10 tic marks instead of 9
% add a long rule through the tics to show the exact edge of the paper
% short tics on right-hand ruler positioned correctly
% some comments added

\documentstyle{article}
\pagestyle{empty}

\oddsidemargin  0pt     
\evensidemargin 0pt
\marginparwidth 1in
\marginparsep 0pt

\topmargin 0pt
\headheight 0pt
\headsep 0pt
\topskip 0pt        

\footheight 0pt
\footskip 0pt
\textheight 6.25in
\textwidth  3.8125in
\setlength{\unitlength}{1in}
\newcounter{foo}
\begin{document}
\parindent 0pt
\begin{picture}(0,0)
\scriptsize
\put(0,-6.25){\framebox(3.8125,6.25){}}
% left ruler
\put(0,-3.125){\line(-1,0){2.5}}
\multiput(-.1,-3.225)(-.1,0){10}{\line(0,1){.2}}
\multiput(-.05,-3.175)(-.1,0){10}{\line(0,1){.1}}
\setcounter{foo}{1}\multiput(-.1,-2.975)(-.1,0){9}{\makebox
                                 (0,0){\arabic{foo}}\addtocounter{foo}{1}}
% right ruler
     \put(3.8125,-3.125){\line(1,0){2.5}}
\multiput(3.9125,-3.225)(.1,0){10}{\line(0,1){.2}}
\multiput(3.8625,-3.175)(.1,0){10}{\line(0,1){.1}} %fixed mit-erl!gildea 13Feb86
\setcounter{foo}{1}\multiput(3.9125,-2.975)(.1,0){9}{\makebox
                                 (0,0){\arabic{foo}}\addtocounter{foo}{1}}
% top ruler
     \put(1.90,0){\line(0,1){2.5}}
\multiput(1.80,.1)(0,.1){10}{\line(1,0){.2}}
\multiput(1.85,.05)(0,.1){10}{\line(1,0){.1}}
\setcounter{foo}{1}\multiput(2.05,.1)(0,.1){9}{\makebox
                                 (0,0){\arabic{foo}}\addtocounter{foo}{1}}
% bottom ruler
     \put(1.90,-6.25){\line(0,-1){2.5}}
\multiput(1.80,-6.35)(0,-.1){10}{\line(1,0){.2}}
\multiput(1.85,-6.30)(0,-.1){10}{\line(1,0){.1}}
\setcounter{foo}{1}\multiput(2.05,-6.35)(0,-.1){9}{\makebox
                                 (0,0){\arabic{foo}}\addtocounter{foo}{1}}
\end{picture}
\vfill
\mbox{}\hfill
\begin{minipage}{3.5in}
The frame on this page should be $3.8125'' \times 6\frac{1}{4}''$.  When
printed on $5.8125 \times 8\frac{1}{4}''$ (A4) paper, the frame should be one
inch from each edge of the paper.\\[10pt] 
The rulers at the four edges will indicate how much of the page is
useable.  The large ticks are $.1''$ apart.
\end{minipage}
\hfill\mbox{}

\vfill
\mbox{}
\newpage
\begin{picture}(0,0)
\scriptsize
\put(0,-6.25){\framebox(3.8125,6.25){}}
% left ruler
\put(0,-3.125){\line(-1,0){2.5}}
\multiput(-.1,-3.225)(-.1,0){10}{\line(0,1){.2}}
\multiput(-.05,-3.175)(-.1,0){10}{\line(0,1){.1}}
\setcounter{foo}{1}\multiput(-.1,-2.975)(-.1,0){9}{\makebox
                                 (0,0){\arabic{foo}}\addtocounter{foo}{1}}
% right ruler
     \put(3.8125,-3.125){\line(1,0){2.5}}
\multiput(3.9125,-3.225)(.1,0){10}{\line(0,1){.2}}
\multiput(3.8625,-3.175)(.1,0){10}{\line(0,1){.1}} %fixed mit-erl!gildea 13Feb86
\setcounter{foo}{1}\multiput(3.9125,-2.975)(.1,0){9}{\makebox
                                 (0,0){\arabic{foo}}\addtocounter{foo}{1}}
% top ruler
     \put(1.90,0){\line(0,1){2.5}}
\multiput(1.80,.1)(0,.1){10}{\line(1,0){.2}}
\multiput(1.85,.05)(0,.1){10}{\line(1,0){.1}}
\setcounter{foo}{1}\multiput(2.05,.1)(0,.1){9}{\makebox
                                 (0,0){\arabic{foo}}\addtocounter{foo}{1}}
% bottom ruler
     \put(1.90,-6.25){\line(0,-1){2.5}}
\multiput(1.80,-6.35)(0,-.1){10}{\line(1,0){.2}}
\multiput(1.85,-6.30)(0,-.1){10}{\line(1,0){.1}}
\setcounter{foo}{1}\multiput(2.05,-6.35)(0,-.1){9}{\makebox
                                 (0,0){\arabic{foo}}\addtocounter{foo}{1}}
\end{picture}
\vfill
\mbox{}\hfill
\begin{minipage}{3.5in}
The frame on this page should be $3.8125'' \times 6\frac{1}{4}''$.  When
printed on $5.8125 \times 8\frac{1}{4}''$ (A4) paper, the frame should be one
inch from each edge of the paper.\\[10pt] 
The rulers at the four edges will indicate how much of the page is
useable.  The large ticks are $.1''$ apart.
\end{minipage}
\hfill\mbox{}

\vfill
\mbox{}

\end{document}


