tNroundpage.ps - plan9port - [fork] Plan 9 from user space
 (HTM) 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