1 9e6fcbd7 2005-01-04 devnull /Page null def
 2 9e6fcbd7 2005-01-04 devnull /Page# 0 def
 3 9e6fcbd7 2005-01-04 devnull /PDFSave null def
 4 9e6fcbd7 2005-01-04 devnull /DSCPageCount 0 def
 5 9e6fcbd7 2005-01-04 devnull /DoPDFPage {dup /Page# exch store pdfgetpage mypdfshowpage } def
 6 9e6fcbd7 2005-01-04 devnull 
 7 9e6fcbd7 2005-01-04 devnull /pdfshowpage_mysetpage {	% <pagedict> pdfshowpage_mysetpage <pagedict>
 8 9e6fcbd7 2005-01-04 devnull   dup /CropBox pget {
 9 9e6fcbd7 2005-01-04 devnull       boxrect
10 9e6fcbd7 2005-01-04 devnull       2 array astore /PageSize exch 4 2 roll
11 9e6fcbd7 2005-01-04 devnull       neg exch neg exch 2 array astore /PageOffset exch
12 9e6fcbd7 2005-01-04 devnull       << 5 1 roll >> setpagedevice
13 9e6fcbd7 2005-01-04 devnull   } if
14 9e6fcbd7 2005-01-04 devnull } bind def
15 9e6fcbd7 2005-01-04 devnull 
16 9e6fcbd7 2005-01-04 devnull /mypdfshowpage		% <pagedict> pdfshowpage -
17 9e6fcbd7 2005-01-04 devnull  { dup /Page exch store
18 9e6fcbd7 2005-01-04 devnull    pdfshowpage_init 
19 9e6fcbd7 2005-01-04 devnull    pdfshowpage_setpage 
20 9e6fcbd7 2005-01-04 devnull    pdfshowpage_mysetpage
21 9e6fcbd7 2005-01-04 devnull    save /PDFSave exch store
22 9e6fcbd7 2005-01-04 devnull    (before exec) VMDEBUG
23 9e6fcbd7 2005-01-04 devnull      pdfshowpage_finish
24 9e6fcbd7 2005-01-04 devnull    (after exec) VMDEBUG
25 9e6fcbd7 2005-01-04 devnull    PDFSave restore
26 9e6fcbd7 2005-01-04 devnull  } bind def
27 9e6fcbd7 2005-01-04 devnull 
28 9e6fcbd7 2005-01-04 devnull GS_PDF_ProcSet begin
29 9e6fcbd7 2005-01-04 devnull pdfdict begin