03.eps

03.eps [ retoursource ]

Conversion au format PDF de 03.eps
%!PS-Adobe-2.0 
%%Title: Blue Book Program 3, on page 137 
%%Creator: Adobe Systems Incorporated 
%%CreationDate: Thu Dec 28 13:17:45 PST 1989 
%%EndComments 
 
/ellipsedict 8 dict def 
ellipsedict /mtrx matrix put 
/ellipse 
 { ellipsedict begin 
 /endangle exch def 
 /startangle exch def 
 /yrad exch def 
 /xrad exch def 
 /y exch def 
 /x exch def 
 
 /savematrix mtrx currentmatrix def 
 x y translate 
 xrad yrad scale 
 0 0 1 startangle endangle arc 
 savematrix setmatrix 
 end 
 } def 
 
newpath 
 144 400 72 144 0 360 ellipse 
stroke 
 
newpath 
 400 400 144 36 0 360 ellipse 
fill 
 
newpath 
 300 180 144 72 30 150 ellipse 
stroke 
 
newpath 
 480 150 30 50 270 90 ellipse 
fill 
 
showpage