tNroundpage.ps - plan9port - [fork] Plan 9 from user space
HTML git clone git://src.adamsgaard.dk/plan9port
DIR Log
DIR Files
DIR Refs
DIR README
DIR LICENSE
---
tNroundpage.ps (287B)
---
1 %
2 % A version of roundpage.ps that assumes a symmetric clipping path. Thanks
3 % to Matthijs Melchior for the suggestion.
4 %
5
6 /roundpagebbox {
7 pagebbox dup 0 get pagebbox 2 get add 2 exch put
8 pagebbox dup 1 get pagebbox 3 get add 3 exch put
9 pagebbox 0 0 put
10 pagebbox 1 0 put
11 } bind def