Blame images/toc-plus.eps

Packit e20b97
%!PS-Adobe-3.0 EPSF-3.0
Packit e20b97
%%Creator: (ImageMagick)
Packit e20b97
%%Title: (toc-plus.eps)
Packit e20b97
%%CreationDate: (Fri Nov  5 11:45:36 2004)
Packit e20b97
%%BoundingBox: 0 0 15 9
Packit e20b97
%%HiResBoundingBox: 0 0 15 9
Packit e20b97
%%DocumentData: Clean7Bit
Packit e20b97
%%LanguageLevel: 1
Packit e20b97
%%Pages: 1
Packit e20b97
%%EndComments
Packit e20b97
Packit e20b97
%%BeginDefaults
Packit e20b97
%%EndDefaults
Packit e20b97
Packit e20b97
%%BeginProlog
Packit e20b97
%
Packit e20b97
% Display a color image.  The image is displayed in color on
Packit e20b97
% Postscript viewers or printers that support color, otherwise
Packit e20b97
% it is displayed as grayscale.
Packit e20b97
%
Packit e20b97
/DirectClassPacket
Packit e20b97
{
Packit e20b97
  %
Packit e20b97
  % Get a DirectClass packet.
Packit e20b97
  %
Packit e20b97
  % Parameters:
Packit e20b97
  %   red.
Packit e20b97
  %   green.
Packit e20b97
  %   blue.
Packit e20b97
  %   length: number of pixels minus one of this color (optional).
Packit e20b97
  %
Packit e20b97
  currentfile color_packet readhexstring pop pop
Packit e20b97
  compression 0 eq
Packit e20b97
  {
Packit e20b97
    /number_pixels 3 def
Packit e20b97
  }
Packit e20b97
  {
Packit e20b97
    currentfile byte readhexstring pop 0 get
Packit e20b97
    /number_pixels exch 1 add 3 mul def
Packit e20b97
  } ifelse
Packit e20b97
  0 3 number_pixels 1 sub
Packit e20b97
  {
Packit e20b97
    pixels exch color_packet putinterval
Packit e20b97
  } for
Packit e20b97
  pixels 0 number_pixels getinterval
Packit e20b97
} bind def
Packit e20b97
Packit e20b97
/DirectClassImage
Packit e20b97
{
Packit e20b97
  %
Packit e20b97
  % Display a DirectClass image.
Packit e20b97
  %
Packit e20b97
  systemdict /colorimage known
Packit e20b97
  {
Packit e20b97
    columns rows 8
Packit e20b97
    [
Packit e20b97
      columns 0 0
Packit e20b97
      rows neg 0 rows
Packit e20b97
    ]
Packit e20b97
    { DirectClassPacket } false 3 colorimage
Packit e20b97
  }
Packit e20b97
  {
Packit e20b97
    %
Packit e20b97
    % No colorimage operator;  convert to grayscale.
Packit e20b97
    %
Packit e20b97
    columns rows 8
Packit e20b97
    [
Packit e20b97
      columns 0 0
Packit e20b97
      rows neg 0 rows
Packit e20b97
    ]
Packit e20b97
    { GrayDirectClassPacket } image
Packit e20b97
  } ifelse
Packit e20b97
} bind def
Packit e20b97
Packit e20b97
/GrayDirectClassPacket
Packit e20b97
{
Packit e20b97
  %
Packit e20b97
  % Get a DirectClass packet;  convert to grayscale.
Packit e20b97
  %
Packit e20b97
  % Parameters:
Packit e20b97
  %   red
Packit e20b97
  %   green
Packit e20b97
  %   blue
Packit e20b97
  %   length: number of pixels minus one of this color (optional).
Packit e20b97
  %
Packit e20b97
  currentfile color_packet readhexstring pop pop
Packit e20b97
  color_packet 0 get 0.299 mul
Packit e20b97
  color_packet 1 get 0.587 mul add
Packit e20b97
  color_packet 2 get 0.114 mul add
Packit e20b97
  cvi
Packit e20b97
  /gray_packet exch def
Packit e20b97
  compression 0 eq
Packit e20b97
  {
Packit e20b97
    /number_pixels 1 def
Packit e20b97
  }
Packit e20b97
  {
Packit e20b97
    currentfile byte readhexstring pop 0 get
Packit e20b97
    /number_pixels exch 1 add def
Packit e20b97
  } ifelse
Packit e20b97
  0 1 number_pixels 1 sub
Packit e20b97
  {
Packit e20b97
    pixels exch gray_packet put
Packit e20b97
  } for
Packit e20b97
  pixels 0 number_pixels getinterval
Packit e20b97
} bind def
Packit e20b97
Packit e20b97
/GrayPseudoClassPacket
Packit e20b97
{
Packit e20b97
  %
Packit e20b97
  % Get a PseudoClass packet;  convert to grayscale.
Packit e20b97
  %
Packit e20b97
  % Parameters:
Packit e20b97
  %   index: index into the colormap.
Packit e20b97
  %   length: number of pixels minus one of this color (optional).
Packit e20b97
  %
Packit e20b97
  currentfile byte readhexstring pop 0 get
Packit e20b97
  /offset exch 3 mul def
Packit e20b97
  /color_packet colormap offset 3 getinterval def
Packit e20b97
  color_packet 0 get 0.299 mul
Packit e20b97
  color_packet 1 get 0.587 mul add
Packit e20b97
  color_packet 2 get 0.114 mul add
Packit e20b97
  cvi
Packit e20b97
  /gray_packet exch def
Packit e20b97
  compression 0 eq
Packit e20b97
  {
Packit e20b97
    /number_pixels 1 def
Packit e20b97
  }
Packit e20b97
  {
Packit e20b97
    currentfile byte readhexstring pop 0 get
Packit e20b97
    /number_pixels exch 1 add def
Packit e20b97
  } ifelse
Packit e20b97
  0 1 number_pixels 1 sub
Packit e20b97
  {
Packit e20b97
    pixels exch gray_packet put
Packit e20b97
  } for
Packit e20b97
  pixels 0 number_pixels getinterval
Packit e20b97
} bind def
Packit e20b97
Packit e20b97
/PseudoClassPacket
Packit e20b97
{
Packit e20b97
  %
Packit e20b97
  % Get a PseudoClass packet.
Packit e20b97
  %
Packit e20b97
  % Parameters:
Packit e20b97
  %   index: index into the colormap.
Packit e20b97
  %   length: number of pixels minus one of this color (optional).
Packit e20b97
  %
Packit e20b97
  currentfile byte readhexstring pop 0 get
Packit e20b97
  /offset exch 3 mul def
Packit e20b97
  /color_packet colormap offset 3 getinterval def
Packit e20b97
  compression 0 eq
Packit e20b97
  {
Packit e20b97
    /number_pixels 3 def
Packit e20b97
  }
Packit e20b97
  {
Packit e20b97
    currentfile byte readhexstring pop 0 get
Packit e20b97
    /number_pixels exch 1 add 3 mul def
Packit e20b97
  } ifelse
Packit e20b97
  0 3 number_pixels 1 sub
Packit e20b97
  {
Packit e20b97
    pixels exch color_packet putinterval
Packit e20b97
  } for
Packit e20b97
  pixels 0 number_pixels getinterval
Packit e20b97
} bind def
Packit e20b97
Packit e20b97
/PseudoClassImage
Packit e20b97
{
Packit e20b97
  %
Packit e20b97
  % Display a PseudoClass image.
Packit e20b97
  %
Packit e20b97
  % Parameters:
Packit e20b97
  %   class: 0-PseudoClass or 1-Grayscale.
Packit e20b97
  %
Packit e20b97
  currentfile buffer readline pop
Packit e20b97
  token pop /class exch def pop
Packit e20b97
  class 0 gt
Packit e20b97
  {
Packit e20b97
    currentfile buffer readline pop
Packit e20b97
    token pop /depth exch def pop
Packit e20b97
    /grays columns 8 add depth sub depth mul 8 idiv string def
Packit e20b97
    columns rows depth
Packit e20b97
    [
Packit e20b97
      columns 0 0
Packit e20b97
      rows neg 0 rows
Packit e20b97
    ]
Packit e20b97
    { currentfile grays readhexstring pop } image
Packit e20b97
  }
Packit e20b97
  {
Packit e20b97
    %
Packit e20b97
    % Parameters:
Packit e20b97
    %   colors: number of colors in the colormap.
Packit e20b97
    %   colormap: red, green, blue color packets.
Packit e20b97
    %
Packit e20b97
    currentfile buffer readline pop
Packit e20b97
    token pop /colors exch def pop
Packit e20b97
    /colors colors 3 mul def
Packit e20b97
    /colormap colors string def
Packit e20b97
    currentfile colormap readhexstring pop pop
Packit e20b97
    systemdict /colorimage known
Packit e20b97
    {
Packit e20b97
      columns rows 8
Packit e20b97
      [
Packit e20b97
        columns 0 0
Packit e20b97
        rows neg 0 rows
Packit e20b97
      ]
Packit e20b97
      { PseudoClassPacket } false 3 colorimage
Packit e20b97
    }
Packit e20b97
    {
Packit e20b97
      %
Packit e20b97
      % No colorimage operator;  convert to grayscale.
Packit e20b97
      %
Packit e20b97
      columns rows 8
Packit e20b97
      [
Packit e20b97
        columns 0 0
Packit e20b97
        rows neg 0 rows
Packit e20b97
      ]
Packit e20b97
      { GrayPseudoClassPacket } image
Packit e20b97
    } ifelse
Packit e20b97
  } ifelse
Packit e20b97
} bind def
Packit e20b97
Packit e20b97
/DisplayImage
Packit e20b97
{
Packit e20b97
  %
Packit e20b97
  % Display a DirectClass or PseudoClass image.
Packit e20b97
  %
Packit e20b97
  % Parameters:
Packit e20b97
  %   x & y translation.
Packit e20b97
  %   x & y scale.
Packit e20b97
  %   label pointsize.
Packit e20b97
  %   image label.
Packit e20b97
  %   image columns & rows.
Packit e20b97
  %   class: 0-DirectClass or 1-PseudoClass.
Packit e20b97
  %   compression: 0-none or 1-RunlengthEncoded.
Packit e20b97
  %   hex color packets.
Packit e20b97
  %
Packit e20b97
  gsave
Packit e20b97
  /buffer 512 string def
Packit e20b97
  /byte 1 string def
Packit e20b97
  /color_packet 3 string def
Packit e20b97
  /pixels 768 string def
Packit e20b97
Packit e20b97
  currentfile buffer readline pop
Packit e20b97
  token pop /x exch def
Packit e20b97
  token pop /y exch def pop
Packit e20b97
  x y translate
Packit e20b97
  currentfile buffer readline pop
Packit e20b97
  token pop /x exch def
Packit e20b97
  token pop /y exch def pop
Packit e20b97
  currentfile buffer readline pop
Packit e20b97
  token pop /pointsize exch def pop
Packit e20b97
  /Times-Roman findfont pointsize scalefont setfont
Packit e20b97
  x y scale
Packit e20b97
  currentfile buffer readline pop
Packit e20b97
  token pop /columns exch def
Packit e20b97
  token pop /rows exch def pop
Packit e20b97
  currentfile buffer readline pop
Packit e20b97
  token pop /class exch def pop
Packit e20b97
  currentfile buffer readline pop
Packit e20b97
  token pop /compression exch def pop
Packit e20b97
  class 0 gt { PseudoClassImage } { DirectClassImage } ifelse
Packit e20b97
  grestore
Packit e20b97
} bind def
Packit e20b97
%%EndProlog
Packit e20b97
%%Page:  1 1
Packit e20b97
%%PageBoundingBox: 0 0 15 9
Packit e20b97
userdict begin
Packit e20b97
DisplayImage
Packit e20b97
0 0
Packit e20b97
15 9
Packit e20b97
12.000000
Packit e20b97
15 9
Packit e20b97
1
Packit e20b97
1
Packit e20b97
1
Packit e20b97
8
Packit e20b97
848484848484848484FFFFFFFFFFFF84FFFFFFFFFFFFFF84FFFFFFFFFFFF84FFFFFF00
Packit e20b97
FFFFFF84FFFFFFFFFFFF84FFFFFF00FFFFFF84FFFFFFFFFFFF84FF0000000000FF84FF84
Packit e20b97
FF84FF8484FFFFFF00FFFFFF84FFFFFFFFFFFF84FFFFFF00FFFFFF84FFFFFFFFFFFF84FF
Packit e20b97
FFFFFFFFFFFF84FFFFFFFFFFFF848484848484848484FFFFFFFFFFFFend
Packit e20b97
%%PageTrailer
Packit e20b97
%%Trailer
Packit e20b97
%%EOF