home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Mega Top 1
/
os2_top1.zip
/
os2_top1
/
APPS
/
TEKST
/
DVIPS
/
EMTEX
/
PS
/
CROP.PRO
< prev
next >
Wrap
Text File
|
1993-05-05
|
321b
|
7 lines
%!
TeXDict begin /cX 18 def /CM{gsave TR 0 cX neg moveto 0 cX lineto stroke
cX neg 0 moveto cX 0 lineto stroke grestore}def end /bop-hook{cX dup TR
gsave .3 setlinewidth 0 0 CM vsize cX 2 mul sub dup hsize cX 2 mul sub
dup isls{4 2 roll}if 0 CM exch CM 0 exch CM grestore 0 cX -2 mul TR isls
{cX -2 mul 0 TR}if}def