Xx y moveto(Offending Command = )show/command load{dup type/stringtype
Xne{(max err string)cvs}if show}exec/y y .2 sub def x y moveto(Error = )show
Xerrorname{dup type dup( max err string )cvs show( : )show/stringtype
Xne{( max err string )cvs}if show}exec errordict begin errhelpdict errorname
Xknown{x 1 add y .2 sub moveto errhelpdict errorname get show}if end
X/y y .4 sub def x y moveto(Stack =)show ostack{/y y .2 sub def x 1
Xadd y moveto dup type/stringtype ne{( max err string )cvs}if show}forall
Xshowpage}if end}def end}bd end
X%%EndResource
X%%EndProlog
X%%BeginSetup
XWin35Dict begin
Xstatusdict begin 0 setjobtimeout end
Xstatusdict begin statusdict /jobname (Microsoft Word - ARTICLE.DOC) put end
X/oldDictCnt countdictstack def {}stopped
X{ countdictstack oldDictCnt lt { Win35Dict begin }
X{1 1 countdictstack oldDictCnt sub {pop end } for } ifelse } if
X/oldDictCnt countdictstack def {a4
X}stopped
X{ countdictstack oldDictCnt lt { Win35Dict begin }
X{1 1 countdictstack oldDictCnt sub {pop end } for } ifelse } if
X[
X{mark 1.0 1.0 .98 .9 .82 .68 .56 .48 .28 .1 .06 .0 counttomark dup 3 add -1 roll exch 2 sub mul dup floor cvi dup 3 1 roll sub exch dup 3 add index exch 2 add index dup 4 1 roll sub mul add counttomark 1 add 1 roll cleartomark } bind
