1
0

Nroundpage.ps 287 B

1234567891011
  1. %
  2. % A version of roundpage.ps that assumes a symmetric clipping path. Thanks
  3. % to Matthijs Melchior for the suggestion.
  4. %
  5. /roundpagebbox {
  6. pagebbox dup 0 get pagebbox 2 get add 2 exch put
  7. pagebbox dup 1 get pagebbox 3 get add 3 exch put
  8. pagebbox 0 0 put
  9. pagebbox 1 0 put
  10. } bind def