diff options
Diffstat (limited to 'Master/tlpkg/tlgs/lib/gsnup.ps')
-rw-r--r-- | Master/tlpkg/tlgs/lib/gsnup.ps | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/Master/tlpkg/tlgs/lib/gsnup.ps b/Master/tlpkg/tlgs/lib/gsnup.ps index 9b4fa039d39..b990dd097dd 100644 --- a/Master/tlpkg/tlgs/lib/gsnup.ps +++ b/Master/tlpkg/tlgs/lib/gsnup.ps @@ -1,20 +1,20 @@ %! % Copyright (C) 1999 Aladdin Enterprises. All rights reserved. -% +% % This software is provided AS-IS with no warranty, either express or % implied. -% +% % This software is distributed under license and may not be copied, % modified or distributed except as expressly authorized under the terms % of the license contained in the file LICENSE in this distribution. -% +% % For more information about licensing, please refer to % http://www.ghostscript.com/licensing/. For information on % commercial licensing, go to http://www.artifex.com/licensing/ or % contact Artifex Software, Inc., 101 Lucas Valley Road #110, % San Rafael, CA 94903, U.S.A., +1(415)492-9861. -% $Id: gsnup.ps 6300 2005-12-28 19:56:24Z giles $ +% $Id$ % Prefix this to very well-behaved PostScript files for n-up printing. /cdef { 1 index where { pop pop } { def } ifelse } def @@ -59,23 +59,23 @@ false setglobal grestore 2 copy exch .Nx div exch .Ny div .Pn dup .Nx mod exch .Nx idiv .Ny 1 sub exch sub - % Stack: nmax pw ph pw/nx ph/ny ix iy + % Stack: nmax pw ph pw/nx ph/ny ix iy exch 3 index mul exch 2 index mul translate - % Stack: nmax pw ph pw/nx ph/ny + % Stack: nmax pw ph pw/nx ph/ny 4 -1 roll 4 index div 4 -1 roll 4 index div - % Stack: nmax pw/nx ph/ny pw/nmax ph/nmax + % Stack: nmax pw/nx ph/ny pw/nmax ph/nmax exch 4 -1 roll exch sub 2 div 3 1 roll sub 2 div translate - % Stack: nmax + % Stack: nmax 1 exch div dup scale .BP } /EndPage { dup 2 lt { .ELevel 0 vmstatus pop pop put - .Ps 0 .Pn 1 add .Nx .Ny mul mod put + .Ps 0 .Pn 1 add .Nx .Ny mul mod put .Pn 0 eq { .EP } { |