Blob


1 "/Page null def\n"
2 "/Page# 0 def\n"
3 "/PDFSave null def\n"
4 "/DSCPageCount 0 def\n"
5 "/DoPDFPage {dup /Page# exch store pdfgetpage pdfshowpage } def\n"
6 "\n"
7 "/pdfshowpage_mysetpage { % <pagedict> pdfshowpage_mysetpage <pagedict>\n"
8 " dup /CropBox pget {\n"
9 " boxrect\n"
10 " 2 array astore /PageSize exch 4 2 roll\n"
11 " 4 index /Rotate pget {\n"
12 " dup 0 lt {360 add} if 90 idiv {exch neg} repeat\n"
13 " } if\n"
14 " exch neg exch 2 array astore /PageOffset exch\n"
15 " << 5 1 roll >> setpagedevice\n"
16 " } if\n"
17 "} bind def\n"
18 "\n"
19 "runpdfbegin\n"