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 "GS_PDF_ProcSet begin\n" 20 "pdfdict begin\n" 21