> (ct (max 1 (round (- (box-x1 vib) x0 .75) wid)))) thank you. that's got it working. bill -------------- next part -------------- An HTML attachment was scrubbed... URL: <https://cm-mail.stanford.edu/pipermail/cmdist/attachments/20071102/59fb46e4/attachment.html>