06.eps

06.eps [ retoursource ]

Conversion au format PDF de 06.eps
%!PS-Adobe-2.0 
%%Title: Blue Book Program 6, on page 149 
%%Creator: Adobe Systems Incorporated 
%%CreationDate: Thu Dec 28 13:20:04 PST 1989 
%%EndComments 
 
/concatprocs 
 { /proc2 exch cvlit def 
 /proc1 exch cvlit def 
 
 /newproc proc1 length proc2 length add array def 
 newproc 0 proc1 putinterval 
 newproc proc1 length proc2 putinterval 
 newproc cvx 
 } def 
 
/inch { 72 mul } def 
/picstr 3 string def 
 
/imageturkey 
 { 24 23 1 [24 0 0 -23 0 23] 
 { currentfile picstr readhexstring pop } 
 image 
 } def 
 
gsave 
 3 inch 4 inch translate 
 2 inch dup scale 
 { 1 exch sub } currenttransfer concatprocs 
 settransfer 
 imageturkey 
 003B00 002700 002480 0E4940 
 114920 14B220 3CB650 75FE88 
 17FF8C 175F14 1C07E2 3803C4 
 703182 F8EDFC B2BBC2 BB6F84 
 31BFC2 18EA3C 0E3E00 07FC00 
 03F800 1E1800 1FF800 
 
grestore 
showpage