Path: utzoo!attcan!uunet!munnari.oz.au!kaukau.comp.vuw.ac.nz!comp.vuw.ac.nz!kosmos!csc!rodgers
From: rodgers@csc.wcc.govt.nz
Newsgroups: comp.lang.postscript
Subject: Re: Postscript idiot needed help (and got it)
Message-ID: <1214.25d73e9c@csc.wcc.govt.nz>
Date: 12 Feb 90 10:54:20 GMT
References: <17807@rpp386.cactus.org> <9002040147.AA16999@en.ecn.purdue.edu> <4017@hydra.Helsinki.FI>
Organization: Wellington City Council
Lines: 27

I'm surprised no-one suggested a fat line doughnut.  How about this
(totally untried) procedure:

% stack when calling: x y rin rout
/donut { %def
  gsave
    1 index	       % x y rin rout rin
    sub                % x y rin thickness
    dup setlinewidth
    2 div add          % x y rcentre
    0 360              % x y rcentre 0 360
    3 -1 roll          % x y 0 360 rcentre
    arc stroke
  grestore
} bind def

Unfortunately I don't have my red book handy so I'm not sure if this
is even close to right but I'm sure someone will delight in telling me
if it's not.  Has anyone got enough time and enthusiasm to muck
about with usertime to see how all these donuts compare?  Woody????  I
would really be interested to know how fills compare with strokes in a
case like this.  My experience with fills has been that they are
really slow.
--
Mark Rodgers                                      Computer Services Section
rodgers@csc.wcc.govt.nz                             Wellington City Council
Telephone (04) 733-130               P.O. Box 2199, Wellington, New Zealand