%!PS-Adobe-3.0
%%Creator: A2ps version 4.3
%%CreationDate: Tue Jan 9 22:47:30 1996
%%Pages: (atend)
%%DocumentFonts: Courier Courier-Bold Helvetica Helvetica-Bold
%%EndComments
% Copyright (c) 1993, 1994, Miguel Santana, M.Santana@frgu.bull.fr
/$a2psdict 100 dict def
$a2psdict begin
% General macros.
/xdef {exch def} bind def
/getfont {exch findfont exch scalefont} bind def
% Set up ISO Latin 1 character encoding
/reencodeISO {
dup dup findfont dup length dict begin
{ 1 index /FID ne { def }{ pop pop } ifelse
} forall
/Encoding ISOLatin1Encoding def
currentdict end definefont
} def
/Helvetica-Bold reencodeISO def
/Helvetica reencodeISO def
/Courier reencodeISO def
/Courier-Bold reencodeISO def
% Create Courier backspace font
/backspacefont {
/Courier findfont dup length dict begin
{ % forall
1 index /FID eq { pop pop } { def } ifelse
} forall
currentdict /UniqueID known { % if
/UniqueID UniqueID 16#800000 xor def
} if
CharStrings length 1 add dict begin
CharStrings { def } forall
/backspace { -600 0 0 0 0 0 setcachedevice } bind def
currentdict
end
/CharStrings exch def
/Encoding Encoding 256 array copy def
Encoding 8 /backspace put
currentdict
end
definefont pop
} bind def
% FUNCTIONS
% Function filename: Initialize file printing.
/fn
{ /filenm xdef
/filenmwidth filenm stringwidth pop def
/filenmfont
filenmwidth fns gt
{
filenmfontname
fnfs fns mul filenmwidth div
getfont
}
{ sfnf }
ifelse
def
} bind def
% Function header: prints page header. no page
% is passed as argument.
/hp
{ x sd get y sd get hs sub 1 add moveto
df setfont
gsave
x sd get y sd get moveto
0 hs 2 div neg rmoveto
hs setlinewidth
0.95 setgray
pw 0 rlineto stroke
grestore
gsave
dfs hm rmoveto
d show % date/hour
grestore
gsave
pnum cvs pop % page pop up
pw (Page 999) stringwidth pop sub
hm
rmoveto
(Page ) show pnum show % page number
grestore
empty pnum copy pop
gsave
filenmfont setfont
fns filenm stringwidth pop sub 2 div dw add
bm 2 mul
add
hm
rmoveto
filenm show % file name
grestore
} bind def
% Function border: prints border page
/border
{ x sd get y sd get moveto
gsave % print four sides
0.7 setlinewidth % of the square
pw 0 rlineto
0 ph neg rlineto
pw neg 0 rlineto
closepath stroke
grestore
} bind def
% Function hborder: completes border of the header.
/hborder
{ gsave
0.7 setlinewidth
0 hs neg rmoveto
pw 0 rlineto
stroke
grestore
} bind def
% Function sheetnumber: prints the sheet number.
/sn
{ snx sny moveto
df setfont
pnum cvs
dup stringwidth pop (0) stringwidth pop sub neg 0 rmoveto show
empty pnum copy pop
} bind def
% Function loginprint: prints the login id of the requestor.
/lgp
{ lx ly moveto
df setfont
dup stringwidth pop neg 0 rmoveto show
} bind def
% Function currentdate: prints the current date.
/cd
{ dx dy moveto
df setfont
(Printed: ) show
td show
} bind def
% Function filename_footer: prints the file name at bottom of page.
/fnf
{ fnx fny moveto
df setfont
filenm center show
} bind def
% Function center: centers text.
/center
{ dup stringwidth pop
2 div neg 0 rmoveto
} bind def
% Function s: print a source line
/s { show
/y0 y0 bfs sub def
x0 y0 moveto
} bind def
% Functions b and st: change to bold or standard font
/b { show
bdf setfont
} bind def
/st { show
bf setfont
} bind def
% Strings used to make easy printing numbers
/pnum 12 string def
/empty 12 string def
% Global initializations
/CourierBack backspacefont
/filenmfontname /Helvetica-Bold def
/inch {72 mul} bind def
%
% Meaning of some variables and functions (coded names)
%
% twp: twinpages?
% sd: sheet side
% l: line counter
% c: column counter
% d: date
% td: current date (for today)
% lg: login name
% fn: filename printing function
% sn: sheetnumber printing function
% cd: current date printing function
% fnf: filename footer printing function
% lgp: login printing function
% hp: header printing function
% y: y coordinate for the logical page
% x: x coordinate for the logical page
% sny: y coordinate for the sheet number
% snx: x coordinate for the sheet number
% dy: y coordinate for the date
% dx: x coordinate for the date
% ly: y coordinate for the login
% lx: x coordinate for the login
% scx: x coordinate for the sheet center
% fny: y coordinate for the filename (footer)
% fnx: x coordinate for the filename (footer)
% fnfs: filename font size
% bfs: body font size
% dfs: date font size
% bfs: body font size
% df: date font
% bf: body font
% bdf: bold font
% sfnf: standard filename font
% dw: date width
% pw: page width
% sw: sheet width
% ph: page height
% sh: sheet height
% hm: header margin
% tm: top margin
% bm: body margin
% rm: right margin
% lm: left margin
% hs: header size
% fns: filename size
% Initialize page description variables.
/x0 0 def
/y0 0 def
/sh 11.64 inch def
/sw 8.27 inch def
/margin 1.4 inch def
/rm margin 3 div def
/lm margin 2 mul 3 div def
/d () def
/td (Jan 9 1996 22:47) def
/lg (Printed by rse from en1) def
%%EndProlog
/docsave save def
%%Page: 1 1
/pagesave save def
/twp false def
/fnfs 15 def
/dfs fnfs 0.8 mul def
/df /Helvetica dfs getfont def
/dw df setfont td stringwidth pop def
/sfnf filenmfontname fnfs getfont def
/hm fnfs 0.25 mul def
/hs 0.0 def
/bfs 9 def
/bdf /Courier-Bold bfs getfont def
/bm bfs 0.7 mul def
/bf /CourierBack bfs getfont def
/l 80 def
/c 90 def
/pw
bf setfont (0) stringwidth pop c mul bm dup add add
def
/ph
bfs l mul bm dup add add hs add
def
/fns
pw
fnfs 4 mul dw add (Page 999) stringwidth pop add
sub
def
/tm margin twp {3} {2} ifelse div def
/sd 0 def
/x [ lm dup ] def
/sny tm dfs 2 mul sub def
/snx sw rm sub dfs sub def
/dy sny def
/dx lm def
% Only one logical page
/y [ sh tm sub dup ] def
/scx sw 2 div def
/fny dy def
/fnx scx def
/ly fnfs 2 div y sd get add def
/lx snx def
/d (Jan 9 1996 22:46) def
( ) fn
/x0 x 0 get bm add def
/y0 y 0 get bm bfs add 0 add sub def
x0 y0 moveto
bf setfont
( 1|The quick brown fox) s
( 2|jumps over the lazy dog.) s
( 3|) s
( 4|) s
( 5| The quick brown fox ) s
( 6| jumps over the lazy dog.) s
( 7|) s
( 8|) s
( 9| The quick brown fox ) s
( 10| jumps over the lazy dog.) s
( 11|) s
( 12|THIS-LINE-IS-TOO-LONG!THIS-LINE-IS-TOO-LONG!THIS-LINE-IS-TOO-LONG!THIS-LINE-IS-TOO-L) s
( 13|) s
( 14|The quick brown fox) s
( 15|jumps over the lazy dog.) s
( 16|) s
( 17|) s
( 18| The quick brown fox ) s
( 19| jumps over the lazy dog.) s
( 20|) s
( 21|) s
( 22| The quick brown fox ) s
( 23| jumps over the lazy dog.) s
( 24|) s
( 25|Here follow some control characters: BS "^H", TAB "^I", FF "^L") s
( 26|) s
( 27|The quick brown fox) s
( 28|jumps over the lazy dog.) s
( 29|) s
( 30|) s
( 31| The quick brown fox ) s
( 32| jumps over the lazy dog.) s
( 33|) s
( 34|) s
( 35| The quick brown fox ) s
( 36| jumps over the lazy dog.) s
( 37|The quick brown fox) s
( 38|jumps over the lazy dog.) s
( 39|) s
( 40|) s
( 41| The quick brown fox ) s
( 42| jumps over the lazy dog.) s
( 43|) s
( 44|) s
( 45| The quick brown fox ) s
( 46| jumps over the lazy dog.) s
( 47|The quick brown fox) s
( 48|jumps over the lazy dog.) s
( 49|) s
( 50|) s
( 51| The quick brown fox ) s
( 52| jumps over the lazy dog.) s
( 53|) s
( 54|) s
( 55| The quick brown fox ) s
( 56| jumps over the lazy dog.) s
( 57|The quick brown fox) s
( 58|jumps over the lazy dog.) s
( 59|) s
( 60|) s
( 61| The quick brown fox ) s
( 62| jumps over the lazy dog.) s
( 63|) s
( 64|) s
( 65| The quick brown fox ) s
( 66| jumps over the lazy dog.) s
( 67|The quick brown fox) s
( 68|jumps over the lazy dog.) s
( 69|) s
( 70|) s
( 71| The quick brown fox ) s
( 72| jumps over the lazy dog.) s
( 73|) s
( 74|) s
( 75| The quick brown fox ) s
( 76| jumps over the lazy dog.) s
( 77|The quick brown fox) s
( 78|jumps over the lazy dog.) s
( 79|) s
( 80|) s
/sd 0 def
pagesave restore
showpage
%%Page: 2 2
/pagesave save def
/twp false def
/fnfs 15 def
/dfs fnfs 0.8 mul def
/df /Helvetica dfs getfont def
/dw df setfont td stringwidth pop def
/sfnf filenmfontname fnfs getfont def
/hm fnfs 0.25 mul def
/hs 0.0 def
/bfs 9 def
/bdf /Courier-Bold bfs getfont def
/bm bfs 0.7 mul def
/bf /CourierBack bfs getfont def
/l 80 def
/c 90 def
/pw
bf setfont (0) stringwidth pop c mul bm dup add add
def
/ph
bfs l mul bm dup add add hs add
def
/fns
pw
fnfs 4 mul dw add (Page 999) stringwidth pop add
sub
def
/tm margin twp {3} {2} ifelse div def
/sd 0 def
/x [ lm dup ] def
/sny tm dfs 2 mul sub def
/snx sw rm sub dfs sub def
/dy sny def
/dx lm def
% Only one logical page
/y [ sh tm sub dup ] def
/scx sw 2 div def
/fny dy def
/fnx scx def
/ly fnfs 2 div y sd get add def
/lx snx def
/d (Jan 9 1996 22:46) def
( ) fn
/x0 x 0 get bm add def
/y0 y 0 get bm bfs add 0 add sub def
x0 y0 moveto
bf setfont
( 81| The quick brown fox ) s
( 82| jumps over the lazy dog.) s
( 83|) s
( 84|) s
( 85| The quick brown fox ) s
( 86| jumps over the lazy dog.) s
( 87|The quick brown fox) s
( 88|jumps over the lazy dog.) s
( 89|) s
( 90|) s
( 91| The quick brown fox ) s
( 92| jumps over the lazy dog.) s
( 93|) s
( 94|) s
( 95| The quick brown fox ) s
( 96| jumps over the lazy dog.) s
( 97|The quick brown fox) s
( 98|jumps over the lazy dog.) s
( 99|) s
( 100|) s
( 101| The quick brown fox ) s
( 102| jumps over the lazy dog.) s
( 103|) s
( 104|) s
( 105| The quick brown fox ) s
( 106| jumps over the lazy dog.) s
( 107|The quick brown fox) s
( 108|jumps over the lazy dog.) s
( 109|) s
( 110|) s
( 111| The quick brown fox ) s
( 112| jumps over the lazy dog.) s
( 113|) s
( 114|) s
( 115| The quick brown fox ) s
( 116| jumps over the lazy dog.) s
( 117|The quick brown fox) s
( 118|jumps over the lazy dog.) s
( 119|) s
( 120|) s
( 121| The quick brown fox ) s
( 122| jumps over the lazy dog.) s
( 123|) s
( 124|) s
( 125| The quick brown fox ) s
( 126| jumps over the lazy dog.) s
( 127|The quick brown fox) s
( 128|jumps over the lazy dog.) s
( 129|) s
( 130|) s
( 131| The quick brown fox ) s
( 132| jumps over the lazy dog.) s
( 133|) s
( 134|) s
( 135| The quick brown fox ) s
( 136| jumps over the lazy dog.) s
( 137|The quick brown fox) s
( 138|jumps over the lazy dog.) s
( 139|) s
( 140|) s
( 141| The quick brown fox ) s
( 142| jumps over the lazy dog.) s
( 143|) s
( 144|) s
( 145| The quick brown fox ) s
( 146| jumps over the lazy dog.) s
( 147|The quick brown fox) s
( 148|jumps over the lazy dog.) s
( 149|) s
( 150|) s
( 151| The quick brown fox ) s
( 152| jumps over the lazy dog.) s
( 153|) s
( 154|) s
( 155| The quick brown fox ) s
( 156| jumps over the lazy dog.) s
( 157|The quick brown fox) s
( 158|jumps over the lazy dog.) s
( 159|) s
( 160|) s
/sd 0 def
pagesave restore
showpage
%%Page: 3 3
/pagesave save def
/twp false def
/fnfs 15 def
/dfs fnfs 0.8 mul def
/df /Helvetica dfs getfont def
/dw df setfont td stringwidth pop def
/sfnf filenmfontname fnfs getfont def
/hm fnfs 0.25 mul def
/hs 0.0 def
/bfs 9 def
/bdf /Courier-Bold bfs getfont def
/bm bfs 0.7 mul def
/bf /CourierBack bfs getfont def
/l 80 def
/c 90 def
/pw
bf setfont (0) stringwidth pop c mul bm dup add add
def
/ph
bfs l mul bm dup add add hs add
def
/fns
pw
fnfs 4 mul dw add (Page 999) stringwidth pop add
sub
def
/tm margin twp {3} {2} ifelse div def
/sd 0 def
/x [ lm dup ] def
/sny tm dfs 2 mul sub def
/snx sw rm sub dfs sub def
/dy sny def
/dx lm def
% Only one logical page
/y [ sh tm sub dup ] def
/scx sw 2 div def
/fny dy def
/fnx scx def
/ly fnfs 2 div y sd get add def
/lx snx def
/d (Jan 9 1996 22:46) def
( ) fn
/x0 x 0 get bm add def
/y0 y 0 get bm bfs add 0 add sub def
x0 y0 moveto
bf setfont
( 161| The quick brown fox ) s
( 162| jumps over the lazy dog.) s
( 163|) s
( 164|) s
( 165| The quick brown fox ) s
( 166| jumps over the lazy dog.) s
( 167|The quick brown fox) s
( 168|jumps over the lazy dog.) s
( 169|) s
( 170|) s
( 171| The quick brown fox ) s
( 172| jumps over the lazy dog.) s
( 173|) s
( 174|) s
( 175| The quick brown fox ) s
( 176| jumps over the lazy dog.) s
( 177|The quick brown fox) s
( 178|jumps over the lazy dog.) s
( 179|) s
( 180|) s
( 181| The quick brown fox ) s
( 182| jumps over the lazy dog.) s
( 183|) s
( 184|) s
( 185| The quick brown fox ) s
( 186| jumps over the lazy dog.) s
( 187|The quick brown fox) s
( 188|jumps over the lazy dog.) s
( 189|) s
( 190|) s
( 191| The quick brown fox ) s
( 192| jumps over the lazy dog.) s
( 193|) s
( 194|) s
( 195| The quick brown fox ) s
( 196| jumps over the lazy dog.) s
( 197|The quick brown fox) s
( 198|jumps over the lazy dog.) s
( 199|) s
( 200|) s
( 201| The quick brown fox ) s
( 202| jumps over the lazy dog.) s
( 203|) s
( 204|) s
( 205| The quick brown fox ) s
( 206| jumps over the lazy dog.) s
( 207|The quick brown fox) s
( 208|jumps over the lazy dog.) s
( 209|) s
( 210|) s
( 211| The quick brown fox ) s
( 212| jumps over the lazy dog.) s
( 213|) s
( 214|) s
( 215| The quick brown fox ) s
( 216| jumps over the lazy dog.) s
( 217|The quick brown fox) s
( 218|jumps over the lazy dog.) s
( 219|) s
( 220|) s
( 221| The quick brown fox ) s
( 222| jumps over the lazy dog.) s
( 223|) s
( 224|) s
( 225| The quick brown fox ) s
( 226| jumps over the lazy dog.) s
( 227|The quick brown fox) s
( 228|jumps over the lazy dog.) s
( 229|) s
( 230|) s
( 231| The quick brown fox ) s
( 232| jumps over the lazy dog.) s
( 233|) s
( 234|) s
( 235| The quick brown fox ) s
( 236| jumps over the lazy dog.) s
( 237|The quick brown fox) s
( 238|jumps over the lazy dog.) s
( 239|) s
( 240|) s
/sd 0 def
pagesave restore
showpage
%%Page: 4 4
/pagesave save def
/twp false def
/fnfs 15 def
/dfs fnfs 0.8 mul def
/df /Helvetica dfs getfont def
/dw df setfont td stringwidth pop def
/sfnf filenmfontname fnfs getfont def
/hm fnfs 0.25 mul def
/hs 0.0 def
/bfs 9 def
/bdf /Courier-Bold bfs getfont def
/bm bfs 0.7 mul def
/bf /CourierBack bfs getfont def
/l 80 def
/c 90 def
/pw
bf setfont (0) stringwidth pop c mul bm dup add add
def
/ph
bfs l mul bm dup add add hs add
def
/fns
pw
fnfs 4 mul dw add (Page 999) stringwidth pop add
sub
def
/tm margin twp {3} {2} ifelse div def
/sd 0 def
/x [ lm dup ] def
/sny tm dfs 2 mul sub def
/snx sw rm sub dfs sub def
/dy sny def
/dx lm def
% Only one logical page
/y [ sh tm sub dup ] def
/scx sw 2 div def
/fny dy def
/fnx scx def
/ly fnfs 2 div y sd get add def
/lx snx def
/d (Jan 9 1996 22:46) def
( ) fn
/x0 x 0 get bm add def
/y0 y 0 get bm bfs add 0 add sub def
x0 y0 moveto
bf setfont
( 241| The quick brown fox ) s
( 242| jumps over the lazy dog.) s
( 243|) s
( 244|) s
( 245| The quick brown fox ) s
( 246| jumps over the lazy dog.) s
( 247|The quick brown fox) s
( 248|jumps over the lazy dog.) s
( 249|) s
( 250|) s
( 251| The quick brown fox ) s
( 252| jumps over the lazy dog.) s
( 253|) s
( 254|) s
( 255| The quick brown fox ) s
( 256| jumps over the lazy dog.) s
( 257|The quick brown fox) s
( 258|jumps over the lazy dog.) s
( 259|) s
( 260|) s
( 261| The quick brown fox ) s
( 262| jumps over the lazy dog.) s
( 263|) s
( 264|) s
( 265| The quick brown fox ) s
( 266| jumps over the lazy dog.) s
( 267|The quick brown fox) s
( 268|jumps over the lazy dog.) s
( 269|) s
( 270|) s
( 271| The quick brown fox ) s
( 272| jumps over the lazy dog.) s
( 273|) s
( 274|) s
( 275| The quick brown fox ) s
( 276| jumps over the lazy dog.) s
( 277|The quick brown fox) s
( 278|jumps over the lazy dog.) s
( 279|) s
( 280|) s
( 281| The quick brown fox ) s
( 282| jumps over the lazy dog.) s
( 283|) s
( 284|) s
( 285| The quick brown fox ) s
( 286| jumps over the lazy dog.) s
( 287|The quick brown fox) s
( 288|jumps over the lazy dog.) s
( 289|) s
( 290|) s
( 291| The quick brown fox ) s
( 292| jumps over the lazy dog.) s
( 293|) s
( 294|) s
( 295| The quick brown fox ) s
( 296| jumps over the lazy dog.) s
( 297|The quick brown fox) s
( 298|jumps over the lazy dog.) s
( 299|) s
( 300|) s
( 301| The quick brown fox ) s
( 302| jumps over the lazy dog.) s
( 303|) s
( 304|) s
( 305| The quick brown fox ) s
( 306| jumps over the lazy dog.) s
/sd 0 def
pagesave restore
showpage
%%Trailer
%%Pages: 4
docsave restore end