golden hour

/usr/share/ghostscript/lib

File/Folder	Size	Actions
PDFA_def.ps	1.25 KB
PDFX_def.ps	1.77 KB
PM760p.upp	1.13 KB
PM760pl.upp	1.1 KB
PM820p.upp	1.12 KB
PM820pl.upp	1.09 KB
Stc670p.upp	1.13 KB
Stc670pl.upp	1.1 KB
Stc680p.upp	1.11 KB
Stc680pl.upp	1.09 KB
Stc740p.upp	1.01 KB
Stc740pl.upp	1.09 KB
Stc760p.upp	1.11 KB
Stc760pl.upp	1.09 KB
Stc777p.upp	1.11 KB
Stc777pl.upp	1.09 KB
Stp720p.upp	1.13 KB
Stp720pl.upp	1.09 KB
Stp870p.upp	1.11 KB
Stp870pl.upp	1.09 KB
acctest.ps	4.17 KB
align.ps	2.11 KB
bj8.rpd	639 B
bj8gc12f.upp	1.5 KB
bj8hg12f.upp	1.5 KB
bj8oh06n.upp	1.48 KB
bj8pa06n.upp	1.49 KB
bj8pp12f.upp	1.51 KB
bj8ts06n.upp	1.49 KB
bjc6000a1.upp	1.62 KB
bjc6000b1.upp	1.62 KB
bjc610a0.upp	1.49 KB
bjc610a1.upp	1.48 KB
bjc610a2.upp	1.48 KB
bjc610a3.upp	1.49 KB
bjc610a4.upp	1.49 KB
bjc610a5.upp	1.48 KB
bjc610a6.upp	1.48 KB
bjc610a7.upp	1.48 KB
bjc610a8.upp	1.49 KB
bjc610b1.upp	1.48 KB
bjc610b2.upp	1.48 KB
bjc610b3.upp	1.49 KB
bjc610b4.upp	1.49 KB
bjc610b6.upp	1.48 KB
bjc610b7.upp	1.49 KB
bjc610b8.upp	1.49 KB
caption.ps	1.72 KB
cbjc600.ppd	10.89 KB
cbjc800.ppd	11.22 KB
cdj550.upp	1.65 KB
cdj690.upp	1.95 KB
cdj690ec.upp	2.01 KB
cid2code.ps	4.39 KB
dmp_init.ps	7.08 KB
dmp_site.ps	459 B
dnj750c.upp	2.74 KB
dnj750m.upp	1.93 KB
docie.ps	7.32 KB
escp_24.src	350 B
font2pcl.ps	18.01 KB
ghostpdf.ppd	25.04 KB
gs_ce_e.ps	2.17 KB
gs_il2_e.ps	2.57 KB
gs_kanji.ps	3.91 KB
gs_ksb_e.ps	3.07 KB
gs_l.xbm	1.9 KB
gs_l.xpm	2.69 KB
gs_l_m.xbm	1.91 KB
gs_lgo_e.ps	2.67 KB
gs_lgx_e.ps	1.72 KB
gs_m.xbm	945 B
gs_m.xpm	1.4 KB
gs_m_m.xbm	955 B
gs_s.xbm	594 B
gs_s.xpm	957 B
gs_s_m.xbm	604 B
gs_t.xbm	345 B
gs_t.xpm	605 B
gs_t_m.xbm	355 B
gs_wl1_e.ps	2.44 KB
gs_wl2_e.ps	2.44 KB
gs_wl5_e.ps	2.45 KB
gslp.ps	20.24 KB
gsnup.ps	2.57 KB
ht_ccsto.ps	222.8 KB
image-qa.ps	71.34 KB
jispaper.ps	784 B
landscap.ps	1.43 KB
lines.ps	3.65 KB
mkcidfm.ps	21.8 KB
necp2x.upp	1.02 KB
necp2x6.upp	1.04 KB
pdf2dsc.ps	7.87 KB
pf2afm.ps	14.94 KB
pfbtopfa.ps	995 B
ppath.ps	1.78 KB
pphs.ps	6.68 KB
prfont.ps	7.04 KB
printafm.ps	4.78 KB
ps2ai.ps	21.78 KB
ps2epsi.ps	8.34 KB
ras1.upp	215 B
ras24.upp	219 B
ras3.upp	214 B
ras32.upp	196 B
ras4.upp	220 B
ras8m.upp	209 B
rollconv.ps	12.23 KB
s400a1.upp	1.42 KB
s400b1.upp	1.57 KB
sharp.upp	1.89 KB
sipixa6.upp	529 B
st640ih.upp	2.23 KB
st640ihg.upp	1.47 KB
st640p.upp	1.87 KB
st640pg.upp	1.11 KB
st640pl.upp	1.83 KB
st640plg.upp	1.08 KB
stc.upp	1.88 KB
stc1520h.upp	2.1 KB
stc2.upp	1.86 KB
stc200_h.upp	1.8 KB
stc2_h.upp	1.83 KB
stc2s_h.upp	2.22 KB
stc300.upp	2.09 KB
stc300bl.upp	1.31 KB
stc300bm.upp	1.4 KB
stc500p.upp	1.86 KB
stc500ph.upp	1.86 KB
stc600ih.upp	2.23 KB
stc600p.upp	1.12 KB
stc600pl.upp	1.09 KB
stc640p.upp	1.07 KB
stc740ih.upp	2.07 KB
stc800ih.upp	2.11 KB
stc800p.upp	1.09 KB
stc800pl.upp	1.07 KB
stc_h.upp	1.87 KB
stc_l.upp	734 B
stcany.upp	673 B
stcany_h.upp	681 B
stcinfo.ps	24.92 KB
stcolor.ps	4.95 KB
stocht.ps	2.44 KB
traceimg.ps	1.35 KB
traceop.ps	2.51 KB
uninfo.ps	5.85 KB
viewcmyk.ps	1.94 KB
viewgif.ps	5.27 KB
viewjpeg.ps	5.56 KB
viewmiff.ps	4.15 KB
viewpbm.ps	10.04 KB
viewpcx.ps	5.11 KB
viewps2a.ps	1.11 KB
winmaps.ps	3.52 KB
zeroline.ps	2.26 KB

Edit: viewpbm.ps

% Copyright (C) 2001-2018 Artifex Software, Inc.
% 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.
%
% Refer to licensing information at http://www.artifex.com or contact
% Artifex Software, Inc.,  1305 Grant Avenue - Suite 200, Novato,
% CA 94945, U.S.A., +1(415)492-9861, for further information.
%

% viewpbm.ps
% Display a PBM/PGM/PPM file.
% Requires the Level 2 `image' operator (to handle variable pixel widths).
% If SCALE is defined, maps input pixels to output pixels with that scale;
% if SCALE is undefined, scales the image to fit the page.
% If FITPAGE true, it fits the output page size to the image, honouring SCALE
% When the input is PAM (P7) RGBTAG from bitrgbtags device, -dTAG will show
% the tags is pseudo color:
% TEXT=1, IMAGE=2, PATH=4, UNTOUCHED=8
%  red     green   blue      gray

/s 100 string def
/readmaxv {		% <file> readmaxv -
  10 string readline pop cvx exec /maxv exch def
} bind def
/readrow {		% <file> <row> readrow <row>
  0 1 2 index length 1 sub {
    1 index exch 3 index token pop put
  } for exch pop
} bind def
/read01 {		% <file> <count> read01 <byte>
  0 exch {
    1 index read pop 48 xor dup 1 le { exch dup add add } { pop } ifelse
  } repeat
} bind def
/readrow01 {		% <file> <row> readrow01 <row>
  0 1 w 8 idiv {
    1 index exch 3 index 8 read01 put
  } for
  wrem 0 ne {
     dup rsize 1 sub wrem read01 8 wrem sub bitshift put
  } if
  exch pop
} bind def
/readwh {		% <file> readwh <w> <h>
 dup s readline pop		% check for comment
 (#) anchorsearch {
   pop pop dup s readline pop
 } if
 cvx exec
} bind def
/pbmtypes mark
% The procedures in this dictionary are called as
%	<file> Pn <w> <h> <readproc>
/P1 {			% ASCII 1-bit white/black
  /bpc 1 def /maxv 1 def /rsize w 7 add 8 idiv def
  /wrem w 8 mod def
  /ncomp 1 def /invert true def /DeviceGray setcolorspace
  readwh
        { readrow01 }
} bind
/P2 {			% ASCII 8-bit gray
  readwh
  /bpc 8 def 2 index readmaxv /rsize 2 index def
  /ncomp 1 def /invert false def /DeviceGray setcolorspace
        { readrow }
} bind
/P3 {			% ASCII 8-bit RGB
  readwh
  /bpc 8 def 2 index readmaxv /rsize 2 index 3 mul def
  /ncomp 3 def /invert false def /DeviceRGB setcolorspace
        { readrow }
} bind
/P4 {			% Binary 1-bit white/black
  readwh
  /bpc 1 def /maxv 1 def /rsize 2 index 7 add 8 idiv def
  /ncomp 1 def /invert true def /DeviceGray setcolorspace
        { readstring pop }
} bind
/P5 {			% Binary 8-bit gray
  readwh
  /bpc 8 def 2 index readmaxv /rsize 2 index def
  /ncomp 1 def /invert false def /DeviceGray setcolorspace
        { readstring pop }
} bind
/P6 {			% Binary 8-bit RGB
  readwh
  /bpc 8 def 2 index readmaxv /rsize 2 index 3 mul def
  /ncomp 3 def /invert false def /DeviceRGB setcolorspace
        { readstring pop }
} bind
/P7 {			% Assume Binary 8-bit CMYK -- assumes 'pf' is the input file
% P7
% WIDTH 612	%% used to set rsize and w
% HEIGHT 792	%% used to set h
% DEPTH 4	%% if present and not 1 or 4, then bail
% MAXVAL 255	%% used to set maxv
% TUPLTYPE CMYK | RGB_TAG | RGB_ALPHA | GRAYSCALE %% if present and not one of these, then bail
% ENDHDR	%% skip everything else up to this
  /P7KEYS <<
    /WIDTH { /w pf token pop def }
    /HEIGHT { /h pf token pop def }
    /DEPTH { /d pf token pop def d 4 eq d 1 eq or not {
             (*** Only DEPTH 1 or 4 PAM files supported at this time. ***) = quit
             } if
           }
    /MAXVAL { /maxv pf token pop def }
    /TUPLTYPE { pf token pop dup /CMYK eq 1 index /RGB_TAG eq or 1 index /RGB_ALPHA eq or 1 index /GRAYSCALE eq or not {
                  (*** Only CMYK, RGB_TAG, RGB_ALPHA and GRAYSCALE files supported at this time. ***) = quit
                } if
                /T exch def
              }
    /ENDHDR { exit }
    (#) cvn { pf 255 string readline pop pop }
  >> def
  { pf token not { exit } if P7KEYS exch .knownget { exec } if } loop
  /bpc 8 def
  /rsize w 4 mul def		% same bytes per line for CMYK or RGB_TAG
  /T load /CMYK eq {
    /ncomp 4 def /invert false def /DeviceCMYK setcolorspace
    w h { readstring pop }
  } if
  /T load /RGB_ALPHA eq {
    /ncomp 4 def /invert false def /DeviceCMYK setcolorspace
    w h { readstring pop }
  } if
  /T load /GRAYSCALE eq {
    /ncomp 1 def /invert false def /DeviceGray setcolorspace
    w h { readstring pop }
  } if
  /T load /RGB_TAG eq {
    % not CMYK, must be RGB_TAG since was checked above
    /TAG where {
      pop
      % show the tags as pseudo-color image
      /ncomp 1 def /invert false def /maxv 1 def
      [ /Indexed /DeviceRGB 255
        % UNTOUCHED=0, TEXT=1, IMAGE=2, PATH=4
        %     gray      red     green    blue
        768 string
        dup 0 <cccccc ff0000 00ff00 ffff00 0000ff ff00ff 00ffff ffffff 000000> putinterval
      ] setcolorspace
      w h {
        readstring pop
        % discard all but the tag
        dup length 4 div cvi
        string	% destination string
        0 1 2 index length 1 sub {
          2 index 1 index 4 mul get
          2 index exch 2 index exch
          put
          pop % done with pixel#
        } for
        exch pop
      }
    } {
      % show the image as RGB (ignore tags)
      /ncomp 3 def /invert false def /DeviceRGB setcolorspace
      w h {
        readstring pop
        % re-pack the RGB, discard the tag
        dup length 4 div 3 mul cvi string	% destination string
        0 1 2 index length 3 idiv 1 sub {
          % stack: RGBTstring destRGBstring pixel#
          2 index 1 index 4 mul 4 getinterval
          1 3 getinterval	% RGB values
          % stack RGBTstring destRGBstring pixel# RGBstring
          2 index exch 2 index 3 mul exch
          putinterval
          pop % done with pixel#
        } for
        exch pop
      }
    } ifelse
  } if
} bind

.dicttomark readonly def
/pbmsetup {			% <file> <w> <h> <readproc> pbmsetup <imagedict>
   /readproc exch def
   /h exch def
   /w exch def
   /f exch def
   20 dict begin		% image dictionary
     /ImageType 1 def
     /Width w def
     /Height h def
     /ImageMatrix [w 0 0 h neg 0 h] def
     /BitsPerComponent bpc def
     /Decode [ 0 255 maxv div invert { exch } if ncomp 1 sub { 2 copy } repeat ] def
     /DataSource [ f rsize string /readproc load /exec load ] cvx def
   currentdict end
} def
/imagescale {			% <imagedict> imagescale -
  begin
    /SCALE where {
      pop
      /FITPAGE where {/FITPAGE get}{false} ifelse
      {
          Width SCALE mul Height SCALE mul
      }
      {
        % Map pixels SCALE-for-1.  Assume orthogonal transformation.
        Width 1 0 dtransform add abs div SCALE mul
        Height 0 1 dtransform add abs div SCALE mul
      } ifelse
    } {
      /FITPAGE where {/FITPAGE get}{false} ifelse
      {
          % Scale the image (uniformly) to fit the page.
        clippath pathbbox pop pop translate	% offset to the printable origin
        pathbbox 3 -1 roll sub exch 3 -1 roll sub exch
        % stack printable_width printable_height
        2 copy gt 3 1 roll .min exch
        % stack: min(printable_w, printable_h) landscape?
        {
          % printable height is less than width (landscape)
          dup Height Width gt {
            Width mul Height div exch
          } {
            Height mul Width div
          } ifelse
        } {
          % printable width is less than height (portrait)
          dup Height Width lt {
            Width mul Height div exch
          } {
            Height mul Width div
          } ifelse
        } ifelse
      }
      {
        0 0 translate
        612 792
      }
      ifelse
    }
    ifelse
    scale
  end
} def

% Image a PBM file page by page.
/viewpbm {			% <filename> viewpbm -
  20 dict begin
    (r) file /pf exch def {
      pf token not { exit } if
      pbmtypes exch get pf exch exec pbmsetup
      currentcolorspace			% preserve colorspace around setpagedevice
      /FITPAGE where
      {
        /FITPAGE get
        {
          /SCALE where
          {
            pop
            << /PageSize [ 1 1 dtransform h SCALE mul exch abs div exch w SCALE mul exch abs div exch ] >>
          }
          {
            << /PageSize [ 1 1 dtransform h exch abs div exch w exch abs div exch ] >>
          } ifelse
          setpagedevice
        } if
      } if
      setcolorspace			% restore colorspave in case we did setpagedevice
      dup imagescale image showpage
    } loop
  end
} def

% Reassemble a composite PBM file from the CMYK separations.
/viewpsm {
  20 dict begin
    /fname exch def
    /sources [ 0 1 3 {
      /plane exch def
      /pf fname (r) file def
      pf pbmtypes pf token pop get exec
                % Stack: pf w h readproc
      plane {
        /readproc exch def /h exch def /w exch def pop
        /row rsize string def
        h { pf row readproc pop } repeat
        pf pbmtypes pf token pop get exec
      } repeat
      pbmsetup
    } for ] def
    /datas [ sources { /DataSource get 0 get } forall ] def
    /decode sources 0 get /Decode get
      dup 0 get exch 1 get add cvi 0 exch
      2 copy 4 copy 8 array astore def
    sources 0 get
      dup /MultipleDataSources true put
      dup /DataSource datas put
      dup /Decode decode put
    /DeviceCMYK setcolorspace
    /FITPAGE where
    {
      /FITPAGE get
      {
        /SCALE where
        {
            <</PageSize [w SCALE mul h SCALE mul]>>
        }
        {
            <</PageSize [w h]>>
        }ifelse
        setpagedevice
      } if
    } if
    dup imagescale image showpage
  end
} def

% If the program was invoked from the command line, run it now.
[ shellarguments
 { counttomark 1 ge
    { ] { viewpbm } forall
    }
    { cleartomark
      (Usage: gs [-dSCALE=#.#] [-dFITPAGE] [--] viewpbm.ps filename.p*m ...\n) print
      ( e.g.: gs [-dSCALE=#.#] [-dFITPAGE] [--] viewpbm.ps my.ppm another.ppm\n) print flush
      (    also -dTAG option can be used to show the pseudo-color tag image from a\n) print flush
      (    P7 RGB_TAG PAM file created by the bitrgbtags device.\n) print flush
    }
   ifelse
 }
 { pop
 }
ifelse