%!PS-Adobe-3.0 EPSF-3.0 NG39L0NX.PS 20101101
%%BoundingBox: 14 08 828 584

/pdfmark where {pop} {userdict /pdfmark /cleartomark load put} ifelse
/languagelevel where {pop languagelevel} {1} ifelse
2 lt { userdict (<<) cvn ([) cvn load put
       userdict (>>) cvn (]) cvn load put
     } if
[ /Title (PDF/PS pictures: http://130.149.60.445/~farbmetrik/NG39/NG39.HTM)
  /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1)
  /Subject (goto: http://www.ps.bam.de or http://130.149.60.445/~farbmetrik)
  /Keywords (image reproduction, colour devices)
  /Creator (klaus.richter@mac.com)
  /CreationDate (D:2010110112000)
  /ModDate (D:2010110112000)
/DOCINFO pdfmark

[ /View [ /Fit ]
/DOCVIEW pdfmark

%BEG NG39/OUTLIN10.PS Output Linearization (OL) 20101101
%IDENTICAL TO NG39/OUTLIN11.PS
%Early Binding: needed for colour transfer
/sgcmykcolor {setcmykcolor} bind def
/sggray {setgray} bind def
/sgrgbcolor {setrgbcolor} bind def

%FILE PREPARED FOR MIXED MODE, e. g. input ORS18 and output TLS00
 /IMES 0 def %0=LAB* used, no reflection factor necessary
%/IMES 1 def /Yre 2.52 def %1=XYZ measurement and standard device reflection
%/i*ptrsc 0 def %LAB* setcolor to cmy0* / 000n* setcmykcolor
 /i*ptrsc 1 def %LAB* setcolor to olv* setrgbcolor / w* setgray
%/i*ptrsc 2 def %LAB* setcolor to cmy0* / nnn0* setcmykcolor
%/i*ptrsc 3 def %LAB* setcolor to olv* / www* setrgbcolor
%/i*ptrsc 4 def %LAB* setcolor to lab* setcolor
%/i*ptrsc 5 def %LAB* setcolor to LAB* setcolor
%/i*ptrsc 6 def %LAB* setcolor to 000n* setcmykcolor
%/i*ptrsc 7 def %LAB* setcolor to w* setgray
 /ISIN*ioG 0 def %default input  for Offset Reflective System (ORS18)
 /ISOU*ioG 0 def %default output dto.
%/ISIN*ioG 1 def %input  for Television Luminous System (TLS00)
%/ISOU*ioG 1 def %output dto.
%/ISIN*ioG 2 def %input  for Device Reflective measurement system (FRS06)
%/ISOU*ioG 2 def %output dto.
%/ISIN*ioG 3 def %input  for Television Luminous Reflection System (TLS18)
%/ISOU*ioG 3 def %output dto.
%/ISIN*ioG 4 def %input  for Natural Luminous System (NLS00)
%/ISOU*ioG 4 def %output dto.
%/ISIN*ioG 5 def %input  for Natural Reflective System (NRS18)
%/ISOU*ioG 5 def %output dto.
%/ISIN*ioG 6 def %input  for Standard Reflective System (SRS18)
%/ISOU*ioG 6 def %output dto.
%/ISIN*ioG 7 def %input  for Standard Reflective System (TLS70)
%/ISOU*ioG 7 def %output dto.
 /iLAB 0 def /ISIO*ioG 0 def /ISRL*ioG 0 def % for io-System, only once
 /auszg 8 def /halfg 0 def /ausz 8 def /half 0 def /VisTol*ioG 1.00 def
%END NG39/OUTLIN10.PS Output Linearization (OL) 20090901

%BEG NG39/OUTLIN1X.PS Emty 20101101

%END NG39/OUTLIN1X.PS Emty 20101101
                                                                         
%1
%2
%3
%4
%5

%change scount2g from  2 to  10 for 10 series
%change pcount2g from  8 to 240 for 240 pages of each series
/scount1g 1 def /scount2g   1 def /scountg 1 def
/pcount1g 1 def /pcount2g   1 def /pcountg 1 def
/xchart1g 0 def /xchart2g   1 def /xchartg 0 def

/BeginEPSF {            % def   % Prepare for EPS file
/b4_Inc_state save def          % Save state for cleanup
/dict_count countdictstack def
/op_count count 1 sub def       % Count objects on op stack
userdict begin                  % Make userdict current dict
/showpage {} def
0 setgray 0 setlinecap
1 setlinewidth 0 setlinejoin
10 setmiterlimit [] 0 setdash newpath
/languagelevel where            % If level not equal to 1 then
 {pop languagelevel where       % If level not equal to 1 then
 1 ne
 {false setstrokeadjust false setoverprint
 } if
} if
} bind def

/EndEPSF {	% def
 count op_count sub {pop} repeat
 countdictstack dict_count sub {end} repeat	% Clean up dict stack
 b4_Inc_state restore
} bind def
         
/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def /str {8 string } bind def
/languagelevel where {pop languagelevel} {1} ifelse
                     /PSL12 exch def
/dictende {counttomark 2 idiv dup dict begin {def}
           repeat pop currentdict end} bind def
                                                    
% !AUSTAUSCH Times-Roman -> Times-Roman-ISOLatin1=Times-I
 
/Times-Roman findfont dup length dict  begin
{1 index /FID ne {def} {pop pop} ifelse }forall
/Encoding ISOLatin1Encoding def
currentdict end
 
/Times-ISOL1 exch definefont pop
 
/Times-Italic findfont dup length dict  begin
{1 index /FID ne {def} {pop pop} ifelse }forall
/Encoding ISOLatin1Encoding def
currentdict end
 
/TimesI-ISOL1 exch definefont pop
 
/Times-Bold findfont dup length dict  begin
{1 index /FID ne {def} {pop pop} ifelse }forall
/Encoding ISOLatin1Encoding def
currentdict end
 
/TimesB-ISOL1 exch definefont pop
 
/Times-BoldItalic findfont dup length dict  begin
{1 index /FID ne {def} {pop pop} ifelse }forall
/Encoding ISOLatin1Encoding def
currentdict end
 
/TimesBI-ISOL1 exch definefont pop
 
/Courier-Bold findfont dup length dict  begin
{1 index /FID ne {def} {pop pop} ifelse }forall
/Encoding ISOLatin1Encoding def
currentdict end

/CourierB-ISOL1 exch definefont pop

/TK {250 /Times-ISOL1 FS} bind def
/TM {300 /Times-ISOL1 FS} bind def
/TG {350 /Times-ISOL1 FS} bind def
 
/TIK {250 /TimesI-ISOL1 FS} bind def
/TIM {300 /TimesI-ISOL1 FS} bind def
/TIG {350 /TimesI-ISOL1 FS} bind def
 
/TBK {250 /TimesB-ISOL1 FS} bind def
/TBM {300 /TimesB-ISOL1 FS} bind def
/TBG {350 /TimesB-ISOL1 FS} bind def
 
/TBIK {250 /TimesBI-ISOL1 FS} bind def
/TBIM {300 /TimesBI-ISOL1 FS} bind def
/TBIG {350 /TimesBI-ISOL1 FS} bind def
 
/CBKK {200 /CourierB-ISOL1 FS} bind def
/CBK {250 /CourierB-ISOL1 FS} bind def
/CBM {300 /CourierB-ISOL1 FS} bind def
/CBG {350 /CourierB-ISOL1 FS} bind def

%ANFA CMYKDEF
%CMYKDEA0 (A0=Standard-Drucker-CMYKDEF) 15.3.97
/tzac [1.000 0.933 0.867 0.800 0.733 0.667 0.600 0.533
       0.467 0.400 0.333 0.267 0.200 0.132 0.067 0.000
       1.000 0.750 0.500 0.250 0.000] def
/tzam [1.000 0.933 0.867 0.800 0.733 0.667 0.600 0.533
       0.467 0.400 0.333 0.267 0.200 0.132 0.067 0.000
       1.000 0.750 0.500 0.250 0.000] def
/tzay [1.000 0.933 0.867 0.800 0.733 0.667 0.600 0.533
       0.467 0.400 0.333 0.267 0.200 0.132 0.067 0.000
       1.000 0.750 0.500 0.250 0.000] def
/tzan [1.000 0.933 0.867 0.800 0.733 0.667 0.600 0.533
       0.467 0.400 0.333 0.267 0.200 0.132 0.067 0.000
       1.000 0.750 0.500 0.250 0.000] def
/tza0 [0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000
       0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000
       0.000 0.000 0.000 0.000 0.000] def
/tza1 [1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000
       1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000
       1.000 1.000 1.000 1.000 1.000] def
%ENDE CMYKD
 
/rec %x, y width heigth
  {/heigth exch def /width exch def
   moveto width 0 rlineto 0 heigth rlineto width neg 0 rlineto
   closepath } bind def
 
/colrecfiLAB* %x y width heigth LAB*
  { setcolor rec fill} bind def

/colrecstLAB* %x y width heigth LAB*
  { setcolor rec stroke} bind def

/colrecficmyn* %x y width heigth cmy0* or 000n*
  { setcmykcolor rec fill} bind def
 
/colrecstcmyn* %x y width heigth cmy0* or 000n*
  { setcmykcolor rec stroke} bind def

/colrecfiw* %x y width heigth w*
  { setgray rec fill} bind def

/colrecstw* %x y width heigth w*
  { setgray rec stroke} bind def

/colrecfiolv* %x y width heigth olv*
  { setrgbcolor rec fill} bind def

/colrecstolv* %x y width heigth olv*
  { setrgbcolor rec stroke} bind def
 
/tzocmy0* {0.0 1.0 1.0 0.0} bind def %Reproduction colours
/tzlcmy0* {1.0 0.0 1.0 0.0} bind def %cmyn* setcmykcolor
/tzvcmy0* {1.0 1.0 0.0 0.0} bind def
/tzccmy0* {1.0 0.0 0.0 0.0} bind def
/tzmcmy0* {0.0 1.0 0.0 0.0} bind def
/tzycmy0* {0.0 0.0 1.0 0.0} bind def

/tzoolv* {1.0 0.0 0.0} bind def %Reproduction colours
/tzlolv* {0.0 1.0 0.0} bind def %olv* setrgbcolor
/tzvolv* {0.0 0.0 1.0} bind def
/tzcolv* {0.0 1.0 1.0} bind def
/tzmolv* {1.0 0.0 1.0} bind def
/tzyolv* {1.0 1.0 0.0} bind def
 
/tzoLAB* [53.34  72.46  50.66] def %Reproduction colours
/tzlLAB* [84.93 -79.83  74.80] def %LAB* setcolor
/tzvLAB* [32.20  24.88 -37.89] def
/tzcLAB* [88.10 -44.88 -13.36] def
/tzmLAB* [59.66  90.32 -19.65] def
/tzyLAB* [93.76 -20.24  85.93] def

/tzncmy0* {1.00 1.00 1.00 0.00} bind def %grey series
/tzdcmy0* {0.75 0.75 0.75 0.00} bind def %cmy0* setcmykcolor
/tzzcmy0* {0.50 0.50 0.50 0.00} bind def
/tzhcmy0* {0.25 0.25 0.25 0.00} bind def
/tzwcmy0* {0.00 0.00 0.00 0.00} bind def
 
/tzn000n* {0.00 0.00 0.00 1.00} bind def %grey series 000n*
/tzd000n* {0.00 0.00 0.00 0.75} bind def %000n* setcmykcolor
/tzz000n* {0.00 0.00 0.00 0.50} bind def
/tzh000n* {0.00 0.00 0.00 0.25} bind def
/tzw000n* {0.00 0.00 0.00 0.00} bind def

/tznw* {0.00} bind def %grey series
/tzdw* {0.25} bind def %w* setgray
/tzzw* {0.50} bind def
/tzhw* {0.75} bind def
/tzww* {1.00} bind def

/tznolv* {0.00 0.00 0.00} bind def %grey series
/tzdolv* {0.25 0.25 0.25} bind def %olv* setrgbcolor
/tzzolv* {0.50 0.50 0.50} bind def
/tzholv* {0.75 0.75 0.75} bind def
/tzwolv* {1.00 1.00 1.00} bind def

/tznLAB* [18.01 0.00 0.00] def %grey series
/tzdLAB* [37.36 0.00 0.00] def %LAB* setcolor
/tzzLAB* [56.71 0.00 0.00] def
/tzhLAB* [76.06 0.00 0.00] def
/tzwLAB* [95.41 0.00 0.00] def

/tfn {0 setgray} bind def
/tfw {1 setgray} bind def
 
/A4quer {598 0 translate 90 rotate} def
%0
%1
/cvishow {cvi 6 string cvs show} def
/cvsshow1 {10 mul cvi 0.1 mul 7 string cvs show} def
/cvsshow2 {100 mul cvi 0.01 mul 7 string cvs show} def
/cvsshow3 {1000 mul cvi 0.001 mul 7 string cvs show} def

/tzank [1.000 0.933 0.867 0.800 0.733 0.667 0.600 0.533
        0.467 0.400 0.333 0.267 0.200 0.132 0.067 0.000
        1.000 0.750 0.500 0.250 0.000] def 

%BEG 61 lines comment or new PS operators possible
%1
%2
%3
%4
%5
%6
%7
%8

%%EndProlog

%%BeginPageSetup
/#copies 1 def
%A4quer
1.0 1.0 scale

/pgsave save def
%%EndPageSetup
0.0 MM 0.0 MM translate %Verschiebung nach oben und links fuer Belichter
gsave

/SS$ [(G) (E) (S) (F) (I) (J) (M)] def
/SC$ [(N) (F) (S) (D) (T) (E) (C)] def
/SX$ [(0) (1) (2) (3) (4) (5) (6) (7) (8) (9) (A) (B) (C) (D) (E) (F)%max 32
      (G) (H) (I) (J) (K) (L) (M) (N) (O) (P) (Q) (R) (S) (T) (U) (V)] def
/SY$ [(0) (1) (2) (3) (4) (5) (6) (7) (8) (9) (A) (B) (C) (D) (E) (F)%max 32
      (G) (H) (I) (J) (K) (L) (M) (N) (O) (P) (Q) (R) (S) (T) (U) (V)] def
%       0           1            2            3            4            5
%       6           7            8         
/EX$ [(A.TXT /.PS) (B.BMP /.PS) (G.GIF /.PS) (H.HTM /.PS) (I.HTM /.PS)
      (J.JPE /.PS) (P.PDF /.PS) (T.TIF /.PS)] def
/EY$ [(A.DAT) (B.DAT) (G.DAT) (H.DAT) (I.DAT) (J.DAT)
      (P.DAT) (T.DAT)] def
/lanindg1 0 def /lanindg2 0 def
/colormg1 0 def /colormg2 0 def
/xcolorg1 0 def /xcolorg2 0 def
/xchartg1 0 def /xchartg2 0 def
/lanindg lanindg1 def %no loops
/colormg colormg1 def
/xcolorg xcolorg1 def
/xchartg xchartg1 def

/pcount2x pcount2g xchart2g sub 2 add def

%scount1g 1 scount2g {/scountg exch def %s=serie, e. g. 1,1,10
%pcount1g 1 pcount2x {/pcountg exch def %p=page, e. g. 1,1,250
/xchart10 0 def /xchart20 0 def
%pcountg pcount1g eq {/xchart10 0 def /xchart20  0 def}
%                    {/xchart10 1 def /xchart20  1 def} ifelse
%pcountg pcount2x eq {/xchart10 2 def /xchart20  9 def} if
/xchartg 0 def %xchart10 1 xchart20 {/xchartg exch def

/ausz 8 def

/colorm colormg def /xchart xchartg def /xchartg0 0 def
%needs Definition of xcharti, is only in OUTLIN1X.PS

colorm 1 eq {proc_ColTra*ioG} if %proc_ColTra*ioL only in Y10-7!

%2 MM /Times-Roman FS
%274 MM 82 MM moveto -90 rotate (/NG39/  ) show (Form: ) show
%xchartg 1 add cvi 6 string cvs show (/) show
%xchart2g 1 add cvi 6 string cvs show (,) show 90 rotate
%274 MM 65 MM moveto -90 rotate (Serie: ) show
%scountg cvi 6 string cvs show (/) show
%scount2g cvi 6 string cvs show (,) show 90 rotate
%274 MM 55 MM moveto -90 rotate
%lanindg 0 eq {(Seite: )}{(Page: )} ifelse show
%pcountg xchartg xchart10 sub add cvi 6 string cvs show 90 rotate

%274 MM 45 MM moveto
%-90 rotate
%lanindg 0 eq {(Seitenz\344hlung )}{(Page: count: )} ifelse show
%scountg 1 sub pcount2g mul pcountg add
%pcountg pcount2x eq {xchartg add pcount1g pcount2x ne {2 sub } if} if
%cvi 6 string cvs show
%90 rotate
/GSS$ SS$ lanindg get def
/GSC$ SC$ colormg get def
/GSX$ SX$ xcolorg xcolorg 16 idiv 16 mul sub get def
/GSY$ SY$ xchartg xchartg 16 idiv 16 mul sub get def %special
/GEX$ EX$ 6 get def
/GEY$ EY$ 6 get def

%gsave
BeginEPSF
 28 MM 197 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 10

%line 329

%%EndDocument
EndEPSF grestore gsave
                    
BeginEPSF
 28 MM 152 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 11

%line 339
%!PS-Adobe-3.0 EPSF-3.0 NG390-1
%%BoundingBox: 70 83 226 206
%old BoundingBox: 72 90 226 206
 
%START PDFDE011.EPS
/pdfmark01 where {pop} {userdict /pdfmark01 /cleartomark load put} ifelse
/languagelevel where {pop languagelevel} {1} ifelse
2 lt { userdict (<<) cvn ([) cvn load put
       userdict (>>) cvn (]) cvn load put} if
[ /Title (PostScript pictures: NG390-1)
  /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1)
  /Subject (goto: http://www.ps.bam.de or http://130.149.60.445/~farbmetrik)
  /Keywords (image reproduction, colour devices)
  /Creator (klaus.richter@me.com)
  /CreationDate (D:2010110112000)
  /ModDate (D:2010110112000)
/DOCINFO pdfmark01
[ /View [ /FitB ]
/DOCVIEW pdfmark01
%END  PDFDE011

%SETCMYK_OLV.PS
/setcmyk_olvcolor %transfer cmyk to olv
{/ncolor exch def /ycolor exch def
 /mcolor exch def /ccolor exch def
 ncolor 0 eq {1 ccolor sub
              1 mcolor sub
              1 ycolor sub setrgbcolor
             }
             {ccolor 0 eq 
              mcolor 0 eq and
              ycolor 0 eq and {%only black n
                               1 ncolor sub 
                               dup
                               dup
                               setrgbcolor
                              }
                              {%cmy and black n
                               1 ccolor sub 1 ncolor sub mul
                               1 mcolor sub 1 ncolor sub mul
                               1 ycolor sub 1 ncolor sub mul
                               setrgbcolor
                              } ifelse
             } ifelse
} bind def


/Times-Roman findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/Times-ISOL1 exch definefont pop
 
/Times-Italic findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/TimesI-ISOL1 exch definefont pop
 
/Times-Bold findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/TimesB-ISOL1 exch definefont pop
 
/Times-BoldItalic findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/TimesBI-ISOL1 exch definefont pop
 
/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
 
%%EndProlog
gsave
%LANINDL2 START  20000505
/lanind 0 def
/lantex [(G) (E) (S) (F) (I) (J) (M)] def
/showde {0 lanind eq {show} {pop} ifelse} bind def
/showen {1 lanind eq {show} {pop} ifelse} bind def
/showes {2 lanind eq {show} {pop} ifelse} bind def
/showfr {3 lanind eq {show} {pop} ifelse} bind def
/showit {4 lanind eq {show} {pop} ifelse} bind def
/showjp {5 lanind eq {show} {pop} ifelse} bind def
/showm  {6 lanind eq {show} {pop} ifelse} bind def
 
/popde {0 lanind ne {pop} if} bind def
/popen {1 lanind ne {pop} if} bind def
/popes {2 lanind ne {pop} if} bind def
/popfr {3 lanind ne {pop} if} bind def
/popit {4 lanind ne {pop} if} bind def
/popjp {5 lanind ne {pop} if} bind def
/popm  {6 lanind ne {pop} if} bind def
 
/popxde {/n exch def 0 lanind ne {n {pop} repeat} if} bind def
/popxen {/n exch def 1 lanind ne {n {pop} repeat} if} bind def
/popxes {/n exch def 2 lanind ne {n {pop} repeat} if} bind def
/popxfr {/n exch def 3 lanind ne {n {pop} repeat} if} bind def
/popxit {/n exch def 4 lanind ne {n {pop} repeat} if} bind def
/popxjp {/n exch def 5 lanind ne {n {pop} repeat} if} bind def
/popxm  {/n exch def 6 lanind ne {n {pop} repeat} if} bind def
 
/lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def}
               {/lanind1 0 def /lanind2 0 def} ifelse
lanind1 1 lanind2 {/lanind exch def %output showpage
gsave
%LANINDL2 END
 
5 /Times-ISOL1 FS
180 85 moveto
 (NG390-1, B8_48_1) show %    ( B7371_2, M8540-1, B8_48_1, N=8_48_1) show
 
72 90 translate
 
 
0.01 MM 0.01 MM scale  %d2:[rr.b4f]bausz8y.eps
/ausz 8 def
15 setlinewidth
0.0 0.0 0.5 0.0 setcmyk_olvcolor
0 0  moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto
closepath fill
0.0 0.0 0.0 1.0 setcmyk_olvcolor
 
0 0  moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto
closepath stroke
 
0 3100 moveto  5333 0 rlineto  0 900 rlineto -5333 0 rlineto
closepath stroke
 
/TE3 {/T3 exch def /T2 exch def /T1 exch def
      /yu exch def /xu exch def
 350 /Times-ISOL1 FS
 xu yu moveto T1 show
 xu yu yd 1 mul sub moveto T2 show
 xu yu yd 2 mul sub moveto T3 show} bind def
/TEk3 {/T3 exch def /T2 exch def /T1 exch def
      /yu exch def /xu exch def
 350 /TimesI-ISOL1 FS
 xu yu moveto T1 show
 xu yu yd 1 mul sub moveto T2 show
 xu yu yd 2 mul sub moveto T3 show} bind def
 
/nshow {350 /Times-ISOL1 FS  show} bind def
/kshow {350 /TimesI-ISOL1 FS  show} bind def
/ishow {300 /Times-ISOL1 FS  0 -100 rmoveto show 0 100 rmoveto} bind def
 
/yd 400 def
/yD 800 def
/y1 2400 def
/y2 1050 def
 
%Titeltext
50 3700 moveto
(CIEBased) nshow 25 0 rmoveto (ABC) kshow
 
( - Optimierung der) popde                                      %08540-1 1
( \255optimization of) popen                                    %18540-1 1
( - Optimizaci\363n del) popes                                  %28540-1 1
( \255optimization of) popfr                                    %38540-1 1
( \255optimization of) popit                                    %48540-1 1
( \255optimization of) popjp                                    %58540-1 1
nshow
 
50 3350 moveto
(Farbwiedergabe ) popde                                         %08540-1 2
(color rendering ) popen                                        %18540-1 2
(color dado ) popes                                             %28540-1 2
(color rendering ) popfr                                        %38540-1 2
(color rendering ) popit                                        %48540-1 2
(color rendering ) popjp                                        %58540-1 2
nshow
 
(XYZ) kshow (soll) ishow
             ( - ) nshow (XYZ) kshow (opt) ishow
 
50 2800 moveto
(PSL2\255Programm) popde                                        %08540-1 5
(PSL2\255program) popen                                         %18540-1 5
(PSL2\255Programa) popes                                        %28540-1 5
(PSL2\255program) popfr                                         %38540-1 5
(PSL2\255program) popit                                         %48540-1 5
(PSL2\255program) popjp                                         %58540-1 5
nshow
 
2700 2800 moveto
(Monitor) popde                                                 %08540-1 6
(monitor) popen                                                 %18540-1 6
(Monitor) popes                                                 %28540-1 6
(monitor) popfr                                                 %38540-1 6
(monitor) popit                                                 %48540-1 6
(monitor) popjp                                                 %58540-1 6
nshow
 
4000 2800 moveto
(Messung) popde                                                 %08540-1 7
(measure) popen                                                 %18540-1 7
(Dimen.) popes                                                  %28540-1 7
(measure) popfr                                                 %38540-1 7
(measure) popit                                                 %48540-1 7
(measure) popjp                                                 %58540-1 7
nshow
 
%XYZ -> XYZ
100 y1        moveto (X) kshow
(soll) popde                                                    %08540-1 8
(aim) popen                                                     %18540-1 8
(meta) popes                                                    %28540-1 8
(aim) popfr                                                     %38540-1 8
(aim) popit                                                     %48540-1 8
(aim) popjp                                                     %58540-1 8
ishow
 
100 y1 yd sub moveto (Y) kshow
(soll) popde                                                    %08540-1 9
(aim) popen                                                     %18540-1 9
(meta) popes                                                    %28540-1 9
(aim) popfr                                                     %38540-1 9
(aim) popit                                                     %48540-1 9
(aim) popjp                                                     %58540-1 9
ishow
 
100 y1 yD sub moveto (Z) kshow
(soll) popde                                                    %08540-110
(aim) popen                                                     %18540-110
(meta) popes                                                    %28540-110
(aim) popfr                                                     %38540-110
(aim) popit                                                     %48540-110
(aim) popjp                                                     %58540-110
ishow
 
1000 y1 () (->) () TE3
1500 y1 (L) (M) (N) TEk3
2000 y1 (->) (->) (->) TE3
2500 y1 (L*) (M*) (N*) TEk3
3000 y1 (->) (->) (->) TE3
3500 y1 (L) (M) (N) TEk3
3900 y1 () (->) () TE3
4400 y1        moveto (X) kshow
(ist) popde                                                     %08540-111
(real) popen                                                    %18540-111
(real) popes                                                    %28540-111
(real) popfr                                                    %38540-111
(real) popit                                                    %48540-111
(real) popjp                                                    %58540-111
ishow
 
4400 y1 yd sub moveto (Y) kshow
(ist) popde                                                     %08540-112
(real) popen                                                    %18540-112
(real) popes                                                    %28540-112
(real) popfr                                                    %38540-112
(real) popit                                                    %48540-112
(real) popjp                                                    %58540-112
ishow
 
4400 y1 yD sub moveto (Z) kshow
(ist) popde                                                     %08540-113
(real) popen                                                    %18540-113
(real) popes                                                    %28540-113
(real) popfr                                                    %38540-113
(real) popit                                                    %48540-113
(real) popjp                                                    %58540-113
ishow
 
%XYZ -> XYZ
100 y2        moveto (X) kshow
(sollk) popde                                                   %08540-114
(aimc) popen                                                    %18540-114
(metac) popes                                                   %28540-114
(aimc) popfr                                                    %38540-114
(aimc) popit                                                    %48540-114
(aimc) popjp                                                    %58540-114
ishow
 
100 y2 yd sub moveto (Y) kshow
(sollk) popde                                                   %08540-115
(aimc) popen                                                    %18540-115
(metac) popes                                                   %28540-115
(aimc) popfr                                                    %38540-115
(aimc) popit                                                    %48540-115
(aimc) popjp                                                    %58540-115
ishow
 
100 y2 yD sub moveto (Z) kshow
(sollk) popde                                                   %08540-116
(aimc) popen                                                    %18540-116
(metac) popes                                                   %28540-116
(aimc) popfr                                                    %38540-116
(aimc) popit                                                    %48540-116
(aimc) popjp                                                    %58540-116
ishow
1000 y2 (=) (=) (=) TE3
1300 y2        moveto (X) kshow
(soll) popde                                                    %08540-117
(aim) popen                                                     %18540-117
(meta) popes                                                    %28540-117
(aim) popfr                                                     %38540-117
(aim) popit                                                     %48540-117
(aim) popjp                                                     %58540-117
ishow
 
1300 y2 yd sub moveto (Y) kshow
(soll) popde                                                    %08540-118
(aim) popen                                                     %18540-118
(meta) popes                                                    %28540-118
(aim) popfr                                                     %38540-118
(aim) popit                                                     %48540-118
(aim) popjp                                                     %58540-118
ishow
1300 y2 yD sub moveto (Z) kshow
(soll) popde                                                    %08540-119
(aim) popen                                                     %18540-119
(meta) popes                                                    %28540-119
(aim) popfr                                                     %38540-119
(aim) popit                                                     %48540-119
(aim) popjp                                                     %58540-119
ishow
 
2000 y2 (+) (+) (+) TE3
2300 y2        moveto (\050) nshow (X) kshow
(soll) popde                                                    %08540-120
(aim) popen                                                     %18540-120
(meta) popes                                                    %28540-120
(aim) popfr                                                     %38540-120
(aim) popit                                                     %48540-120
(aim) popjp                                                     %58540-120
ishow
 
2300 y2 yd sub moveto (\050) nshow (Y) kshow
(soll) popde                                                    %08540-121
(aim) popen                                                     %18540-121
(meta) popes                                                    %28540-121
(aim) popfr                                                     %38540-121
(aim) popit                                                     %48540-121
(aim) popjp                                                     %58540-121
ishow
 
2300 y2 yD sub moveto (\050) nshow (Z) kshow
(soll) popde                                                    %08540-122
(aim) popen                                                     %18540-122
(meta) popes                                                    %28540-122
(aim) popfr                                                     %38540-122
(aim) popit                                                     %48540-122
(aim) popjp                                                     %58540-122
ishow
 
3100 y2 (-) (-) (-) TE3
3350 y2        moveto (X) kshow
(ist) popde                                                     %08540-123
(real) popen                                                    %18540-123
(real) popes                                                    %28540-123
(real) popfr                                                    %38540-123
(real) popit                                                    %48540-123
(real) popjp                                                    %58540-123
ishow
 
30 0 rmoveto (\051) nshow
3350 y2 yd sub moveto (Y) kshow
(ist) popde                                                     %08540-124
(real) popen                                                    %18540-124
(real) popes                                                    %28540-124
(real) popfr                                                    %38540-124
(real) popit                                                    %48540-124
(real) popjp                                                    %58540-124
ishow
 
30 0 rmoveto (\051) nshow
3350 y2 yD sub moveto (Z) kshow
(ist) popde                                                     %08540-125
(real) popen                                                    %18540-125
(real) popes                                                    %28540-125
(real) popfr                                                    %38540-125
(real) popit                                                    %48540-125
(real) popjp                                                    %58540-125
ishow
 
40 0 rmoveto (\051) nshow
4200 y2 () (-) () TE3
4300 y2 () (>) () TE3
4600 y2        moveto (X) kshow (opt) ishow
4600 y2 yd sub moveto (Y) kshow (opt) ishow
4600 y2 yD sub moveto (Z) kshow (opt) ishow
 
showpage
grestore
} for %output with langind end
%%Trailer

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
 86 MM 152 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 12

%line 349
%!PS-Adobe-3.0 EPSF-3.0 NG390-2
%%BoundingBox: 70 83 226 206
%old BoundingBox: 72 90 226 206
 
%START PDFDE011.EPS
/pdfmark02 where {pop} {userdict /pdfmark02 /cleartomark load put} ifelse
/languagelevel where {pop languagelevel} {1} ifelse
2 lt { userdict (<<) cvn ([) cvn load put
       userdict (>>) cvn (]) cvn load put} if
[ /Title (PostScript pictures: NG390-2)
  /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1)
  /Subject (goto: http://www.ps.bam.de or http://130.149.60.445/~farbmetrik)
  /Keywords (image reproduction, colour devices)
  /Creator (klaus.richter@me.com)
  /CreationDate (D:2010110112000)
  /ModDate (D:2010110112000)
/DOCINFO pdfmark02
[ /View [ /FitB ]
/DOCVIEW pdfmark02
%END  PDFDE011

%SETCMYK_OLV.PS
/setcmyk_olvcolor %transfer cmyk to olv
{/ncolor exch def /ycolor exch def
 /mcolor exch def /ccolor exch def
 ncolor 0 eq {1 ccolor sub
              1 mcolor sub
              1 ycolor sub setrgbcolor
             }
             {ccolor 0 eq 
              mcolor 0 eq and
              ycolor 0 eq and {%only black n
                               1 ncolor sub 
                               dup
                               dup
                               setrgbcolor
                              }
                              {%cmy and black n
                               1 ccolor sub 1 ncolor sub mul
                               1 mcolor sub 1 ncolor sub mul
                               1 ycolor sub 1 ncolor sub mul
                               setrgbcolor
                              } ifelse
             } ifelse
} bind def


/Times-Roman findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
 
/Times-Bold findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/TimesB-ISOL1 exch definefont pop
 
/Times-ISOL1 exch definefont pop
 
/Times-Italic findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/TimesI-ISOL1 exch definefont pop
 
/Times-Bold findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/TimesB-ISOL1 exch definefont pop
 
/Times-BoldItalic findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/TimesBI-ISOL1 exch definefont pop
 
/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
 
%%EndProlog
gsave
%LANINDL2 START  20000505
/lanind 0 def
/lantex [(G) (E) (S) (F) (I) (J) (M)] def
/showde {0 lanind eq {show} {pop} ifelse} bind def
/showen {1 lanind eq {show} {pop} ifelse} bind def
/showes {2 lanind eq {show} {pop} ifelse} bind def
/showfr {3 lanind eq {show} {pop} ifelse} bind def
/showit {4 lanind eq {show} {pop} ifelse} bind def
/showjp {5 lanind eq {show} {pop} ifelse} bind def
/showm  {6 lanind eq {show} {pop} ifelse} bind def
 
/popde {0 lanind ne {pop} if} bind def
/popen {1 lanind ne {pop} if} bind def
/popes {2 lanind ne {pop} if} bind def
/popfr {3 lanind ne {pop} if} bind def
/popit {4 lanind ne {pop} if} bind def
/popjp {5 lanind ne {pop} if} bind def
/popm  {6 lanind ne {pop} if} bind def
 
/popxde {/n exch def 0 lanind ne {n {pop} repeat} if} bind def
/popxen {/n exch def 1 lanind ne {n {pop} repeat} if} bind def
/popxes {/n exch def 2 lanind ne {n {pop} repeat} if} bind def
/popxfr {/n exch def 3 lanind ne {n {pop} repeat} if} bind def
/popxit {/n exch def 4 lanind ne {n {pop} repeat} if} bind def
/popxjp {/n exch def 5 lanind ne {n {pop} repeat} if} bind def
/popxm  {/n exch def 6 lanind ne {n {pop} repeat} if} bind def
 
/lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def}
               {/lanind1 0 def /lanind2 0 def} ifelse
lanind1 1 lanind2 {/lanind exch def %output showpage
gsave
%LANINDL2 END
 
5 /Times-ISOL1 FS
180 85 moveto
 (NG390-2, B8_48_2) show %    ( B7370_3, M8540-2, B8_48_2, N=8_48_2) show
 
72 90 translate
 
 
/yhoe 4000 def
0.01 MM 0.01 MM scale  %d2:[rr.b4f]bausz8y.eps
/ausz 8 def
15 setlinewidth
0.0 0.0 0.5 0.0 setcmyk_olvcolor
0 0  moveto 05400 0 rlineto 0 yhoe rlineto -05400 0 rlineto
closepath fill
0.0 0.0 0.0 1.0 setcmyk_olvcolor
 
0 0  moveto 05400 0 rlineto 0 yhoe rlineto -05400 0 rlineto
closepath stroke
 
0 yhoe 600 sub moveto 05400 0 rlineto 0 600 rlineto -05400 0 rlineto
closepath stroke
 
/nshow2 {250 /Times-ISOL1 FS  show} bind def
/kshow2 {250 /TimesI-ISOL1 FS  show} bind def
/bshow2 {250 /TimesB-ISOL1 FS  show} bind def
/jshow2 {250 /Times-BoldItalic FS  show} bind def
/ishow2 {200 /Times-ISOL1 FS 10 -60 rmoveto show -10 60 rmoveto} bind def
/ikshow2* {200 /TimesI-ISOL1 FS -50 -70 rmoveto show 50 70 rmoveto} bind def
/ikshow2 {200 /TimesI-ISOL1 FS 30 -60 rmoveto show -30 60 rmoveto} bind def
/eshow2 {200 /Times-ISOL1 FS 0 160 rmoveto show 0 -160 rmoveto} bind def
 
%Spalten
/S1 150 def
/S2 0800 def
/S3 1400 def
/S4 2000 def
/S5 2800 def
/S6 3700 def
/S7 4600 def
 
/TE7 {
 S7 yu moveto show
 S6 yu moveto show
 S5 yu moveto show
 S4 yu moveto show
 S3 yu moveto show
 S2 yu moveto show
 S1 yu moveto show /yu yu 195 sub def} bind def
 
/y0 3530 def
50 3750 moveto
(Foto\255CD mit CIE\255Testfarben: ) popde                      %08540-2 1
(photo\255CD with CIE\255test colors: ) popen                   %18540-2 1
(Foto\255CD, CIE\255Testcolor: ) popes                          %28540-2 1
(photo\255CD with CIE\255test colors: ) popfr                   %38540-2 1
(photo\255CD with CIE\255test colors: ) popit                   %48540-2 1
(photo\255CD with CIE\255test colors: ) popjp                   %58540-2 1
nshow2
 
(u) kshow2
(=unnormierte Daten) popde                                      %08540-2 2
(=unnormalized data) popen                                      %18540-2 2
(=datos sin mormalizado) popes                                  %28540-2 2
(=unnormalized data) popfr                                      %38540-2 2
(=unnormalized data) popit                                      %48540-2 2
(=unnormalized data) popjp                                      %58540-2 2
nshow2
 
S1 50 sub y0 moveto
(Nr.) popde                                                     %08540-2 3
(no.) popen                                                     %18540-2 3
(Nr.) popes                                                     %28540-2 3
(no.) popfr                                                     %38540-2 3
(no.) popit                                                     %48540-2 3
(no.) popjp                                                     %58540-2 3
nshow2
 
S2        y0 moveto (O*) kshow2 -50 0 rmoveto (u) ikshow2*
S3        y0 moveto (L*) kshow2 -50 0 rmoveto (u) ikshow2*
S4        y0 moveto (V*) kshow2 -50 0 rmoveto (u) ikshow2*
S5        y0 moveto (X) kshow2
(soll,) popde                                                   %08540-2 4
(aim,) popen                                                    %18540-2 4
(meta,) popes                                                   %28540-2 4
(aim,) popfr                                                    %38540-2 4
(aim,) popit                                                    %48540-2 4
(aim,) popjp                                                    %58540-2 4
ishow2
 
(u) ikshow2
S6        y0 moveto (Y) kshow2
(soll,) popde                                                   %08540-2 5
(aim,) popen                                                    %18540-2 5
(meta,) popes                                                   %28540-2 5
(aim,) popfr                                                    %38540-2 5
(aim,) popit                                                    %48540-2 5
(aim,) popjp                                                    %58540-2 5
ishow2
 
(u) ikshow2
S7        y0 moveto (Z) kshow2
(soll,) popde                                                   %08540-2 6
(aim,) popen                                                    %18540-2 6
(meta,) popes                                                   %28540-2 6
(aim,) popfr                                                    %38540-2 6
(aim,) popit                                                    %48540-2 6
(aim,) popjp                                                    %58540-2 6
ishow2
 
(u) ikshow2
 
200 /Times-ISOL1 FS
/yu 3200 def
 
 (  1) (141)  (109)  (  95) (0,3587) (0,3203) (0,2553) TE7
 (  2) (128)  (119)  (  65) (0,3113) (0,3208) (0,1577) TE7
 (  3) (102)  (129)  (  45) (0,2777) (0,3538) (0,1006) TE7
 (  4) (  83) (130)  (  79) (0,2383) (0,3395) (0,2272) TE7
 (  5) (  82) (132)  (130)  (0,2844) (0,3547) (0,3920) TE7
 (  6) (  95) (122)  (158)  (0,3029) (0,3269) (0,5119) TE7
 (  7) (136)  (115)  (160)  (0,3506) (0,3092) (0,4580) TE7
 (  8) (187)  (117)  (148)  (0,3869) (0,3206) (0,3899) TE7
 (  9) (173)  (  40) (  43) (0,2193) (0,1081) (0,0547) TE7
 (10)  (190)  (168)  (  43) (0,5872) (0,6319) (0,1315) TE7
 (11)  (  55) (106)  (  64) (0,1348) (0,2261) (0,1644) TE7
 (12)  (   9) (  50) (  99) (0,0489) (0,0667) (0,2548) TE7
 (13)  (204)  (166)  (124)  (0,6046) (0,5837) (0,3921) TE7
 (14)  (  61) (  78) (  37) (0,1312) (0,1573) (0,0745) TE7
 (15)  (  39) (  42) (  39) (0,0482) (0,0502) (0,0545) TE7
 (16)  (  89) (  95) (  88) (0,2305) (0,2413) (0,2388) TE7
 (17)  (220)  (222)  (211)  (0,7193) (0,7615) (0,6669) TE7
 
200 /TimesI-ISOL1 FS
S1 300 add yu 195 1 mul add moveto (W) show
S1 300 add yu 195 2 mul add moveto (Z) show
S1 300 add yu 195 3 mul add moveto (N) show
 
S1 300 add yu 195 9 mul add moveto (R) show
S1 300 add yu 195 8 mul add moveto (J) show
S1 300 add yu 195 7 mul add moveto (G) show
S1 300 add yu 195 6 mul add moveto (B) show
 
showpage
grestore
} for %output with langind end
%%Trailer

%%EndDocument
EndEPSF grestore gsave
                         
BeginEPSF
 28 MM 108 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 13

%line 359
%!PS-Adobe-3.0 EPSF-3.0 NG390-3
%%BoundingBox: 70 83 226 206
%old BoundingBox: 72 90 226 206
 
%START PDFDE011.EPS
/pdfmark03 where {pop} {userdict /pdfmark03 /cleartomark load put} ifelse
/languagelevel where {pop languagelevel} {1} ifelse
2 lt { userdict (<<) cvn ([) cvn load put
       userdict (>>) cvn (]) cvn load put} if
[ /Title (PostScript pictures: NG390-3)
  /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1)
  /Subject (goto: http://www.ps.bam.de or http://130.149.60.445/~farbmetrik)
  /Keywords (image reproduction, colour devices)
  /Creator (klaus.richter@me.com)
  /CreationDate (D:2010110112000)
  /ModDate (D:2010110112000)
/DOCINFO pdfmark03
[ /View [ /FitB ]
/DOCVIEW pdfmark03
%END  PDFDE011

%SETCMYK_OLV.PS
/setcmyk_olvcolor %transfer cmyk to olv
{/ncolor exch def /ycolor exch def
 /mcolor exch def /ccolor exch def
 ncolor 0 eq {1 ccolor sub
              1 mcolor sub
              1 ycolor sub setrgbcolor
             }
             {ccolor 0 eq 
              mcolor 0 eq and
              ycolor 0 eq and {%only black n
                               1 ncolor sub 
                               dup
                               dup
                               setrgbcolor
                              }
                              {%cmy and black n
                               1 ccolor sub 1 ncolor sub mul
                               1 mcolor sub 1 ncolor sub mul
                               1 ycolor sub 1 ncolor sub mul
                               setrgbcolor
                              } ifelse
             } ifelse
} bind def


/Times-Roman findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
 
/Times-Bold findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/TimesB-ISOL1 exch definefont pop
 
/Times-ISOL1 exch definefont pop
 
/Times-Italic findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/TimesI-ISOL1 exch definefont pop
 
/Times-Bold findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/TimesB-ISOL1 exch definefont pop
 
/Times-BoldItalic findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/TimesBI-ISOL1 exch definefont pop
 
/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
 
%%EndProlog
gsave
%LANINDL2 START  20000505
/lanind 0 def
/lantex [(G) (E) (S) (F) (I) (J) (M)] def
/showde {0 lanind eq {show} {pop} ifelse} bind def
/showen {1 lanind eq {show} {pop} ifelse} bind def
/showes {2 lanind eq {show} {pop} ifelse} bind def
/showfr {3 lanind eq {show} {pop} ifelse} bind def
/showit {4 lanind eq {show} {pop} ifelse} bind def
/showjp {5 lanind eq {show} {pop} ifelse} bind def
/showm  {6 lanind eq {show} {pop} ifelse} bind def
 
/popde {0 lanind ne {pop} if} bind def
/popen {1 lanind ne {pop} if} bind def
/popes {2 lanind ne {pop} if} bind def
/popfr {3 lanind ne {pop} if} bind def
/popit {4 lanind ne {pop} if} bind def
/popjp {5 lanind ne {pop} if} bind def
/popm  {6 lanind ne {pop} if} bind def
 
/popxde {/n exch def 0 lanind ne {n {pop} repeat} if} bind def
/popxen {/n exch def 1 lanind ne {n {pop} repeat} if} bind def
/popxes {/n exch def 2 lanind ne {n {pop} repeat} if} bind def
/popxfr {/n exch def 3 lanind ne {n {pop} repeat} if} bind def
/popxit {/n exch def 4 lanind ne {n {pop} repeat} if} bind def
/popxjp {/n exch def 5 lanind ne {n {pop} repeat} if} bind def
/popxm  {/n exch def 6 lanind ne {n {pop} repeat} if} bind def
 
/lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def}
               {/lanind1 0 def /lanind2 0 def} ifelse
lanind1 1 lanind2 {/lanind exch def %output showpage
gsave
%LANINDL2 END
 
5 /Times-ISOL1 FS
180 85 moveto
 (NG390-3, B8_48_3) show %    ( B7370_4, M8540-3, B8_48_3, N=8_48_3) show
 
72 90 translate
 
 
/yhoe 4000 def
0.01 MM 0.01 MM scale  %d2:[rr.b4f]bausz8y.eps
/ausz 8 def
15 setlinewidth
0.0 0.0 0.5 0.0 setcmyk_olvcolor
0 0  moveto 05400 0 rlineto 0 yhoe rlineto -05400 0 rlineto
closepath fill
0.0 0.0 0.0 1.0 setcmyk_olvcolor
 
0 0  moveto 05400 0 rlineto 0 yhoe rlineto -05400 0 rlineto
closepath stroke
 
0 yhoe 600 sub moveto 05400 0 rlineto 0 600 rlineto -05400 0 rlineto
closepath stroke
 
/nshow2 {250 /Times-ISOL1 FS  show} bind def
/kshow2 {250 /TimesI-ISOL1 FS  show} bind def
/bshow2 {250 /TimesB-ISOL1 FS  show} bind def
/jshow2 {250 /Times-BoldItalic FS  show} bind def
/ishow2 {200 /Times-ISOL1 FS 10 -60 rmoveto show -10 60 rmoveto} bind def
/ikshow2* {200 /TimesI-ISOL1 FS -50 -70 rmoveto show 50 70 rmoveto} bind def
/ikshow2 {200 /TimesI-ISOL1 FS 30 -60 rmoveto show -30 60 rmoveto} bind def
/eshow2 {200 /Times-ISOL1 FS 0 160 rmoveto show 0 -160 rmoveto} bind def
 
%Spalten
/S1 150 def
/S2 0800 def
/S3 1400 def
/S4 2000 def
/S5 2800 def
/S6 3700 def
/S7 4600 def
 
/TE7 {
 S7 yu moveto show
 S6 yu moveto show
 S5 yu moveto show
 S4 yu moveto show
 S3 yu moveto show
 S2 yu moveto show
 S1 yu moveto show /yu yu 195 sub def} bind def
 
/y0 3530 def
50 3750 moveto
(Foto\255CD mit CIE\255Testfarben: ) popde                      %08540-3 1
(photo\255CD with CIE\255test colors: ) popen                   %18540-3 1
(Foto\255CD con CIE\255Testcolor: ) popes                       %28540-3 1
(photo\255CD with CIE\255test colors: ) popfr                   %38540-3 1
(photo\255CD with CIE\255test colors: ) popit                   %48540-3 1
(photo\255CD with CIE\255test colors: ) popjp                   %58540-3 1
nshow2
 
(n) kshow2
(=normierte Daten) popde                                        %08540-3 2
(=normalized data) popen                                        %18540-3 2
(=datos mormalizado) popes                                      %28540-3 2
(=normalized data) popfr                                        %38540-3 2
(=normalized data) popit                                        %48540-3 2
(=normalized data) popjp                                        %58540-3 2
nshow2
 
S1 50 sub y0 moveto
(Nr.) popde                                                     %08540-3 3
(no.) popen                                                     %18540-3 3
(Nr.) popes                                                     %28540-3 3
(no.) popfr                                                     %38540-3 3
(no.) popit                                                     %48540-3 3
(no.) popjp                                                     %58540-3 3
nshow2
 
S2        y0 moveto (O*) kshow2 -50 0 rmoveto (n) ikshow2*
S3        y0 moveto (L*) kshow2 -50 0 rmoveto (n) ikshow2*
S4        y0 moveto (V*) kshow2 -50 0 rmoveto (n) ikshow2*
S5        y0 moveto (X) kshow2
(sollk,) popde                                                  %08540-3 4
(aimc,) popen                                                   %18540-3 4
(metac,) popes                                                  %28540-3 4
(aimc,) popfr                                                   %38540-3 4
(aimc,) popit                                                   %48540-3 4
(aimc,) popjp                                                   %58540-3 4
ishow2
 
(n) ikshow2
S6        y0 moveto (Y) kshow2
(sollk,) popde                                                  %08540-3 5
(aimc,) popen                                                   %18540-3 5
(metac,) popes                                                  %28540-3 5
(aimc,) popfr                                                   %38540-3 5
(aimc,) popit                                                   %48540-3 5
(aimc,) popjp                                                   %58540-3 5
ishow2
 
(n) ikshow2
S7        y0 moveto (Z) kshow2
(sollk,) popde                                                  %08540-3 6
(aimc,) popen                                                   %18540-3 6
(metac,) popes                                                  %28540-3 6
(aimc,) popfr                                                   %38540-3 6
(aimc,) popit                                                   %48540-3 6
(aimc,) popjp                                                   %58540-3 6
ishow2
 
(n) ikshow2
 
200 /Times-ISOL1 FS
/yu 3200 def
 
 (  1) (163)  (125)  (114)  (0,4987) (0,4206) (0,3828) TE7
 (  2) (148)  (136)  (  78) (0,4328) (0,4213) (0,2365) TE7
 (  3) (118)  (148)  (  54) (0,3861) (0,4646) (0,1508) TE7
 (  4) (  96) (149)  (  95) (0,3313) (0,4458) (0,3407) TE7
 (  5) (  95) (151)  (157)  (0,3954) (0,4658) (0,5878) TE7
 (  6) (110)  (140)  (190)  (0,4211) (0,4293) (0,7676) TE7
 (  7) (157)  (132)  (193)  (0,4874) (0,4060) (0,6868) TE7
 (  8) (216)  (134)  (178)  (0,5379) (0,4210) (0,5846) TE7
 (  9) (200)  (  45) (  51) (0,3049) (0,1420) (0,0820) TE7
 (10)  (220)  (192)  (  51) (0,8163) (0,8298) (0,1972) TE7
 (11)  (  63) (121)  (  77) (0,1874) (0,2969) (0,2465) TE7
 (12)  (  10) (  57) (119)  (0,0680) (0,0876) (0,3821) TE7
 (13)  (236)  (190)  (149)  (0,8405) (0,7665) (0,5879) TE7
 (14)  (  70) (  89) (  44) (0,1824) (0,2066) (0,1117) TE7
 (15)  (  45) (  48) (  47) (0,0670) (0,0659) (0,0817) TE7
 (16)  (103)  (109)  (106)  (0,3205) (0,3169) (0,3581) TE7
 (17)  (255)  (255)  (255)  (1,0000) (1,0000) (1,0000) TE7
 
200 /TimesI-ISOL1 FS
S1 300 add yu 195 1 mul add moveto (W) show
S1 300 add yu 195 2 mul add moveto (Z) show
S1 300 add yu 195 3 mul add moveto (N) show
 
S1 300 add yu 195 9 mul add moveto (R) show
S1 300 add yu 195 8 mul add moveto (J) show
S1 300 add yu 195 7 mul add moveto (G) show
S1 300 add yu 195 6 mul add moveto (B) show
 
showpage
grestore
} for %output with langind end
%%Trailer

%%EndDocument
EndEPSF grestore gsave
                         
BeginEPSF
 86 MM 108 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 14

%line 369
%!PS-Adobe-3.0 EPSF-3.0 NG390-4
%%BoundingBox: 70 83 226 206
%old BoundingBox: 72 90 226 206
 
%START PDFDE011.EPS
/pdfmark04 where {pop} {userdict /pdfmark04 /cleartomark load put} ifelse
/languagelevel where {pop languagelevel} {1} ifelse
2 lt { userdict (<<) cvn ([) cvn load put
       userdict (>>) cvn (]) cvn load put} if
[ /Title (PostScript pictures: NG390-4)
  /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1)
  /Subject (goto: http://www.ps.bam.de or http://130.149.60.445/~farbmetrik)
  /Keywords (image reproduction, colour devices)
  /Creator (klaus.richter@me.com)
  /CreationDate (D:2010110112000)
  /ModDate (D:2010110112000)
/DOCINFO pdfmark04
[ /View [ /FitB ]
/DOCVIEW pdfmark04
%END  PDFDE011

%SETCMYK_OLV.PS
/setcmyk_olvcolor %transfer cmyk to olv
{/ncolor exch def /ycolor exch def
 /mcolor exch def /ccolor exch def
 ncolor 0 eq {1 ccolor sub
              1 mcolor sub
              1 ycolor sub setrgbcolor
             }
             {ccolor 0 eq 
              mcolor 0 eq and
              ycolor 0 eq and {%only black n
                               1 ncolor sub 
                               dup
                               dup
                               setrgbcolor
                              }
                              {%cmy and black n
                               1 ccolor sub 1 ncolor sub mul
                               1 mcolor sub 1 ncolor sub mul
                               1 ycolor sub 1 ncolor sub mul
                               setrgbcolor
                              } ifelse
             } ifelse
} bind def


/Times-Roman findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/Times-ISOL1 exch definefont pop
 
/Times-Italic findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/TimesI-ISOL1 exch definefont pop
 
/Times-Bold findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/TimesB-ISOL1 exch definefont pop
 
/Times-BoldItalic findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/TimesBI-ISOL1 exch definefont pop
 
/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
 
%%EndProlog
gsave
%LANINDL2 START  20000505
/lanind 0 def
/lantex [(G) (E) (S) (F) (I) (J) (M)] def
/showde {0 lanind eq {show} {pop} ifelse} bind def
/showen {1 lanind eq {show} {pop} ifelse} bind def
/showes {2 lanind eq {show} {pop} ifelse} bind def
/showfr {3 lanind eq {show} {pop} ifelse} bind def
/showit {4 lanind eq {show} {pop} ifelse} bind def
/showjp {5 lanind eq {show} {pop} ifelse} bind def
/showm  {6 lanind eq {show} {pop} ifelse} bind def
 
/popde {0 lanind ne {pop} if} bind def
/popen {1 lanind ne {pop} if} bind def
/popes {2 lanind ne {pop} if} bind def
/popfr {3 lanind ne {pop} if} bind def
/popit {4 lanind ne {pop} if} bind def
/popjp {5 lanind ne {pop} if} bind def
/popm  {6 lanind ne {pop} if} bind def
 
/popxde {/n exch def 0 lanind ne {n {pop} repeat} if} bind def
/popxen {/n exch def 1 lanind ne {n {pop} repeat} if} bind def
/popxes {/n exch def 2 lanind ne {n {pop} repeat} if} bind def
/popxfr {/n exch def 3 lanind ne {n {pop} repeat} if} bind def
/popxit {/n exch def 4 lanind ne {n {pop} repeat} if} bind def
/popxjp {/n exch def 5 lanind ne {n {pop} repeat} if} bind def
/popxm  {/n exch def 6 lanind ne {n {pop} repeat} if} bind def
 
/lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def}
               {/lanind1 0 def /lanind2 0 def} ifelse
lanind1 1 lanind2 {/lanind exch def %output showpage
gsave
%LANINDL2 END
 
5 /Times-ISOL1 FS
180 85 moveto
 (NG390-4, B8_49_1) show %    ( B7370_7, M8540-4, B8_49_1, N=8_49_1) show
 
72 90 translate
 
 
0.01 MM 0.01 MM scale  %d2:[rr.b4f]bausz8y.eps
/ausz 8 def
15 setlinewidth
0.0 0.0 0.5 0.0 setcmyk_olvcolor
0 0  moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto
closepath fill
0.0 0.0 0.0 1.0 setcmyk_olvcolor
 
0 0  moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto
closepath stroke
 
0 2800 moveto  5333 0 rlineto  0 1200 rlineto -5333 0 rlineto
closepath stroke
 
/KLa {/yu exch def /xu exch def
 400 /Symbol FS
 xu yu moveto (\346) show
 xu yu yd 1 mul sub moveto (\347) show
 xu yu yd 2 mul sub moveto (\350) show} bind def
 
/KLz {/yu exch def /xu exch def
 400 /Symbol FS
 xu yu moveto (\366) show
 xu yu yd 1 mul sub moveto (\367) show
 xu yu yd 2 mul sub moveto (\370) show} bind def
 
/TE3 {/T3 exch def /T2 exch def /T1 exch def
      /yu exch def /xu exch def
 350 /Times-ISOL1 FS
 xu yu moveto T1 show
 xu yu yd 1 mul sub moveto T2 show
 xu yu yd 2 mul sub moveto T3 show} bind def
 
/TEk3 {/T3 exch def /T2 exch def /T1 exch def
      /yu exch def /xu exch def
 350 /TimesI-ISOL1 FS
 xu yu moveto T1 show
 xu yu yd 1 mul sub moveto T2 show
 xu yu yd 2 mul sub moveto T3 show} bind def
 
/nshow {350 /Times-ISOL1 FS  show} bind def
/kshow {350 /TimesI-ISOL1 FS  show} bind def
/ishow  {280 /Times-ISOL1 FS 10 -60 rmoveto show -10 60 rmoveto} bind def
/ikshow* {280 /TimesI-ISOL1 FS -130 -90 rmoveto show 130 90 rmoveto} bind def
/ikshow  {280 /TimesI-ISOL1 FS 10 -60 rmoveto show -10 60 rmoveto} bind def
 
/yd 400 def
/yD 800 def
/y1 2400 def
/y2 1000 def
 
%Titeltext
 50 3700 moveto
(CIEBased) nshow 25 0 rmoveto (ABC-) kshow
(Farbraum in PSL2) popde                                        %08540-4 1
(color space in PSL2) popen                                     %18540-4 1
(espacio\255color\255PSL2) popes                                %28540-4 1
(color space in PSL2) popfr                                     %38540-4 1
(color space in PSL2) popit                                     %48540-4 1
(color space in PSL2) popjp                                     %58540-4 1
nshow
 
 50 3700 yd sub moveto (OLV*) kshow (n) ikshow* ( -> ) nshow
(OLV)  kshow (n) ikshow  ( -> ) nshow
(XYZ)  kshow (soll,) ishow 30 0 rmoveto (n) ikshow
50 3700 yD sub moveto
(NEC\255Bildschirm\255Phosphore, NeXT) popde                    %08540-4 2
(NEC\255screen phosphors, NeXT, D65) popen                      %18540-4 2
(NEC\255Pantalla\255Fosforo, NeXT, D65) popes                   %28540-4 2
(NEC\255screen phosphors, NeXT, D65) popfr                      %38540-4 2
(NEC\255screen phosphors, NeXT, D65) popit                      %48540-4 2
(NEC\255screen phosphors, NeXT, D65) popjp                      %58540-4 2
nshow
 
%LMN* -> LMN
 100 y1 (O) (L) (V) TEk3
 400 y1 (=) (=) (=) TE3
 700 y1 moveto (Decode) nshow (O*) kshow
 700 y1 yd sub moveto (Decode) nshow (L*) kshow
 700 y1 yD sub moveto (Decode) nshow (V*) kshow
2200 y1 (=) (=) (=) TE3
2450 y1 ({1.16 mul 1.63 exp}) ({1.15 mul 1.62 exp})
        ({1.21 mul 1.51 exp}) TE3
 
%LMN -> XYZ
% vgl. aus Mayer, Rundfunkt. Mitteil. 16 (1972), H.6, S.253
% vgl. NTSC-Daten aus PSL2 Adobe, Techn. Note #5122, S. 4
% Matching RGB Color from Monitor to Printer
 100 y2 KLa
 250 y2 (X) (Y) (Z) TEk3
 450 y2 KLz
 700 y2 () (=) () TE3
 950 y2 KLa
1050 y2 (  0,447) (  0,191) (-0,050) TE3
2275 y2 (  0,545) (  0,904) (  0,120) TE3
3300 y2 (  0,055)  (-0,056) (  0,952) TE3
4200 y2 KLz
4425 y2 () (\327) () TE3
4650 y2 KLa
4800 y2 (O) (L) (V) TEk3
5050 y2 KLz
 
showpage
grestore
} for %output with langind end
%%Trailer

%%EndDocument
EndEPSF grestore gsave
                         
BeginEPSF
 28 MM 064 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 15

%line 379
%!PS-Adobe-3.0 EPSF-3.0 NG390-5
%%BoundingBox: 70 83 226 206
%old BoundingBox: 72 90 226 206
 
%START PDFDE011.EPS
/pdfmark05 where {pop} {userdict /pdfmark05 /cleartomark load put} ifelse
/languagelevel where {pop languagelevel} {1} ifelse
2 lt { userdict (<<) cvn ([) cvn load put
       userdict (>>) cvn (]) cvn load put} if
[ /Title (PostScript pictures: NG390-5)
  /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1)
  /Subject (goto: http://www.ps.bam.de or http://130.149.60.445/~farbmetrik)
  /Keywords (image reproduction, colour devices)
  /Creator (klaus.richter@me.com)
  /CreationDate (D:2010110112000)
  /ModDate (D:2010110112000)
/DOCINFO pdfmark05
[ /View [ /FitB ]
/DOCVIEW pdfmark05
%END  PDFDE011

%SETCMYK_OLV.PS
/setcmyk_olvcolor %transfer cmyk to olv
{/ncolor exch def /ycolor exch def
 /mcolor exch def /ccolor exch def
 ncolor 0 eq {1 ccolor sub
              1 mcolor sub
              1 ycolor sub setrgbcolor
             }
             {ccolor 0 eq 
              mcolor 0 eq and
              ycolor 0 eq and {%only black n
                               1 ncolor sub 
                               dup
                               dup
                               setrgbcolor
                              }
                              {%cmy and black n
                               1 ccolor sub 1 ncolor sub mul
                               1 mcolor sub 1 ncolor sub mul
                               1 ycolor sub 1 ncolor sub mul
                               setrgbcolor
                              } ifelse
             } ifelse
} bind def


/Times-Roman findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/Times-ISOL1 exch definefont pop
 
/Times-Italic findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/TimesI-ISOL1 exch definefont pop
 
/Times-Bold findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/TimesB-ISOL1 exch definefont pop
 
/Times-BoldItalic findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/TimesBI-ISOL1 exch definefont pop
 
/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
 
%%EndProlog
gsave
%LANINDL2 START  20000505
/lanind 0 def
/lantex [(G) (E) (S) (F) (I) (J) (M)] def
/showde {0 lanind eq {show} {pop} ifelse} bind def
/showen {1 lanind eq {show} {pop} ifelse} bind def
/showes {2 lanind eq {show} {pop} ifelse} bind def
/showfr {3 lanind eq {show} {pop} ifelse} bind def
/showit {4 lanind eq {show} {pop} ifelse} bind def
/showjp {5 lanind eq {show} {pop} ifelse} bind def
/showm  {6 lanind eq {show} {pop} ifelse} bind def
 
/popde {0 lanind ne {pop} if} bind def
/popen {1 lanind ne {pop} if} bind def
/popes {2 lanind ne {pop} if} bind def
/popfr {3 lanind ne {pop} if} bind def
/popit {4 lanind ne {pop} if} bind def
/popjp {5 lanind ne {pop} if} bind def
/popm  {6 lanind ne {pop} if} bind def
 
/popxde {/n exch def 0 lanind ne {n {pop} repeat} if} bind def
/popxen {/n exch def 1 lanind ne {n {pop} repeat} if} bind def
/popxes {/n exch def 2 lanind ne {n {pop} repeat} if} bind def
/popxfr {/n exch def 3 lanind ne {n {pop} repeat} if} bind def
/popxit {/n exch def 4 lanind ne {n {pop} repeat} if} bind def
/popxjp {/n exch def 5 lanind ne {n {pop} repeat} if} bind def
/popxm  {/n exch def 6 lanind ne {n {pop} repeat} if} bind def
 
/lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def}
               {/lanind1 0 def /lanind2 0 def} ifelse
lanind1 1 lanind2 {/lanind exch def %output showpage
gsave
%LANINDL2 END
 
5 /Times-ISOL1 FS
180 85 moveto
 (NG390-5, B8_49_2) show %    ( B7370_8, M8540-5, B8_49_2, N=8_49_2) show
 
72 90 translate
 
 
0.01 MM 0.01 MM scale  %d2:[rr.b4f]bausz8y.eps
/ausz 8 def
15 setlinewidth
0.0 0.0 0.5 0.0 setcmyk_olvcolor
0 0  moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto
closepath fill
0.0 0.0 0.0 1.0 setcmyk_olvcolor
 
0 0  moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto
closepath stroke
 
0 2800 moveto  5333 0 rlineto  0 1200 rlineto -5333 0 rlineto
closepath stroke
 
/KLa {/yu exch def /xu exch def
 400 /Symbol FS
 xu yu moveto (\346) show
 xu yu yd 1 mul sub moveto (\347) show
 xu yu yd 2 mul sub moveto (\350) show} bind def
 
/KLz {/yu exch def /xu exch def
 400 /Symbol FS
 xu yu moveto (\366) show
 xu yu yd 1 mul sub moveto (\367) show
 xu yu yd 2 mul sub moveto (\370) show} bind def
 
/TE3 {/T3 exch def /T2 exch def /T1 exch def
      /yu exch def /xu exch def
 350 /Times-ISOL1 FS
 xu yu moveto T1 show
 xu yu yd 1 mul sub moveto T2 show
 xu yu yd 2 mul sub moveto T3 show} bind def
 
/TEk3 {/T3 exch def /T2 exch def /T1 exch def
      /yu exch def /xu exch def
 350 /TimesI-ISOL1 FS
 xu yu moveto T1 show
 xu yu yd 1 mul sub moveto T2 show
 xu yu yd 2 mul sub moveto T3 show} bind def
 
/nshow {350 /Times-ISOL1 FS  show} bind def
/kshow {350 /TimesI-ISOL1 FS  show} bind def
/ishow  {280 /Times-ISOL1 FS 10 -60 rmoveto show -10 60 rmoveto} bind def
/ikshow* {280 /TimesI-ISOL1 FS -130 -90 rmoveto show 130 90 rmoveto} bind def
/ikshow  {280 /TimesI-ISOL1 FS 10 -60 rmoveto show -10 60 rmoveto} bind def
 
/yd 400 def
/yD 800 def
/y1 2400 def
/y2 1000 def
 
%Titeltext
50 3700 moveto
(CIEBased) nshow 25 0 rmoveto (ABC-) kshow
(Farbraum in PSL2) popde                                        %08540-5 1
(color space in PSL2) popen                                     %18540-5 1
(espacio\255color\255PSL2) popes                                %28540-5 1
(color space in PSL2) popfr                                     %38540-5 1
(color space in PSL2) popit                                     %48540-5 1
(color space in PSL2) popjp                                     %58540-5 1
nshow
 
 50 3700 yd sub moveto (OLV*) kshow (n) ikshow* ( -> ) nshow
                       (OLV)  kshow (n) ikshow  ( -> ) nshow
                       (XYZ)  kshow (sollk,) ishow 30 0 rmoveto (n) ikshow
50 3700 yD sub moveto
(NEC\255Bildschirm\255Phosphore, NeXT) popde                    %08540-5 2
(NEC\255screen phosphors, NeXT, D65) popen                      %18540-5 2
(NEC\255Pantalla\255Fosforo, NeXT, D65) popes                   %28540-5 2
(NEC\255screen phosphors, NeXT, D65) popfr                      %38540-5 2
(NEC\255screen phosphors, NeXT, D65) popit                      %48540-5 2
(NEC\255screen phosphors, NeXT, D65) popjp                      %58540-5 2
nshow
 
%LMN* -> LMN
 100 y1 (O) (L) (V) TEk3
 400 y1 (=) (=) (=) TE3
 700 y1 moveto (Decode) nshow (O*) kshow
 700 y1 yd sub moveto (Decode) nshow (L*) kshow
 700 y1 yD sub moveto (Decode) nshow (V*) kshow
2200 y1 (=) (=) (=) TE3
2450 y1 ({1.16 mul 1.48 exp}) ({1.15 mul 1.47 exp})
        ({1.21 mul 1.26 exp}) TE3
 
%LMN -> XYZ
% vgl. aus Mayer, Rundfunkt. Mitteil. 16 (1972), H.6, S.253
% vgl. NTSC-Daten aus PSL2 Adobe, Techn. Note #5122, S. 4
% Matching RGB Color from Monitor to Printer
 100 y2 KLa
 250 y2 (X) (Y) (Z) TEk3
 450 y2 KLz
 700 y2 () (=) () TE3
 950 y2 KLa
1050 y2 (  0,448) (  0,146) (-0,071) TE3
2275 y2 (  0,599) (  0,999) (  0,000) TE3
3300 y2 (  0,002)  (-0,102) (  0,952) TE3
4200 y2 KLz
4425 y2 () (\327) () TE3
4650 y2 KLa
4800 y2 (O) (L) (V) TEk3
5050 y2 KLz
 
%Optimierungsdaten mit wrstl:xysinsu.for am 10.8.95
% JJ,X(J)  :  1  0.2210E-02 -0.2158E-02 -0.8873E-04  0.3472E-02
% JJ,X0K(J):  1  0.4468E+00  0.5453E+00  0.5447E-01  0.1634E+01 1 soll
% JJ,X(J)  :  2  0.2453E-04 -0.1153E-04 -0.1643E-04  0.6671E-04
% JJ,X0K(J):  2  0.1908E+00  0.9044E+00 -0.5566E-01  0.1620E+01 1 soll
% JJ,X(J)  :  3 -0.1847E-05 -0.6595E-04  0.6226E-04  0.2457E-04
% JJ,X0K(J):  3 -0.5044E-01  0.1199E+00  0.9520E+00  0.1505E+01 1 soll
% JJ,X(J)  :  4  0.6571E-04 -0.5497E-04 -0.1275E-04 -0.7977E-05
% JJ,X0K(J):  4  0.2557E+01 -0.1326E+01 -0.2922E+00  0.5889E+00
% JJ,X(J)  :  5 -0.6429E-04  0.5549E-04  0.1148E-05 -0.3315E-04
% JJ,X0K(J):  5 -0.6543E+00  0.1524E+01  0.9484E-01  0.6057E+00
% JJ,X(J)  :  6  0.1958E-04 -0.7072E-04  0.4993E-04 -0.1347E-04
% JJ,X0K(J):  6  0.2740E+00 -0.3512E+00  0.1039E+01  0.6329E+00
% JJ,X(J)  :  7  0.7261E-04 -0.6950E-04 -0.8741E-05  0.6359E-04
% JJ,X0K(J):  7  0.4479E+00  0.5985E+00  0.1591E-02  0.1474E+01 2 sollk
% JJ,X(J)  :  8  0.2498E-04 -0.1335E-05 -0.2569E-04  0.6913E-04
% JJ,X0K(J):  8  0.1459E+00  0.9985E+00 -0.1020E+00  0.1467E+01 2 sollk
% JJ,X(J)  :  9 -0.7097E-05 -0.7596E-04  0.7737E-04  0.3552E-05
% JJ,X0K(J):  9 -0.7889E-01  0.1622E+00  0.9517E+00  0.1259E+01 2 sollk
% JJ,X(J)  : 10  0.6480E-04 -0.6103E-04 -0.6370E-05 -0.9396E-05
% JJ,X0K(J): 10  0.2446E+01 -0.1323E+01 -0.1873E+00  0.6332E+00
% JJ,X(J)  : 11 -0.7568E-04  0.5290E-04  0.8653E-05 -0.5883E-04
% JJ,X0K(J): 11 -0.4066E+00  0.1256E+01  0.1063E+00  0.6665E+00
% JJ,X(J)  : 12  0.1822E-04 -0.6966E-04  0.4797E-04 -0.1254E-04
% JJ,X0K(J): 12  0.2767E+00 -0.3519E+00  0.1022E+01  0.7615E+00
 
showpage
grestore
} for %output with langind end
%%Trailer

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
 86 MM 064 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 16

%line 389
%!PS-Adobe-3.0 EPSF-3.0 NG390-6,
%%BoundingBox: 70 90 226 206

/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
%%EndProlog
gsave

8 /Times-Roman FS
72 83 moveto
%!2     (NG390-6,) show

72 90 translate

%! 0.01 MM 0.01 MM scale
%! 15 setlinewidth
%! 0 0  moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto
%! closepath stroke

grestore

%SETCMYK_OLV.PS
/setcmyk_olvcolor %transfer cmyk to olv
{/ncolor exch def /ycolor exch def
 /mcolor exch def /ccolor exch def
 ncolor 0 eq {1 ccolor sub
              1 mcolor sub
              1 ycolor sub setrgbcolor
             }
             {ccolor 0 eq 
              mcolor 0 eq and
              ycolor 0 eq and {%only black n
                               1 ncolor sub 
                               dup
                               dup
                               setrgbcolor
                              }
                              {%cmy and black n
                               1 ccolor sub 1 ncolor sub mul
                               1 mcolor sub 1 ncolor sub mul
                               1 ycolor sub 1 ncolor sub mul
                               setrgbcolor
                              } ifelse
             } ifelse
} bind def


showpage
%%Trailer

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
 28 MM 020 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 17

%line 399
%!PS-Adobe-3.0 EPSF-3.0 NG390-7,
%%BoundingBox: 70 90 226 206

/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
%%EndProlog
gsave

8 /Times-Roman FS
72 83 moveto
%!2     (NG390-7,) show

72 90 translate

%! 0.01 MM 0.01 MM scale
%! 15 setlinewidth
%! 0 0  moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto
%! closepath stroke

grestore

%SETCMYK_OLV.PS
/setcmyk_olvcolor %transfer cmyk to olv
{/ncolor exch def /ycolor exch def
 /mcolor exch def /ccolor exch def
 ncolor 0 eq {1 ccolor sub
              1 mcolor sub
              1 ycolor sub setrgbcolor
             }
             {ccolor 0 eq 
              mcolor 0 eq and
              ycolor 0 eq and {%only black n
                               1 ncolor sub 
                               dup
                               dup
                               setrgbcolor
                              }
                              {%cmy and black n
                               1 ccolor sub 1 ncolor sub mul
                               1 mcolor sub 1 ncolor sub mul
                               1 ycolor sub 1 ncolor sub mul
                               setrgbcolor
                              } ifelse
             } ifelse
} bind def


showpage
%%Trailer

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
 86 MM 020 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 18

%line 409
%!PS-Adobe-3.0 EPSF-3.0 NG390-8,
%%BoundingBox: 70 90 226 206

/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
%%EndProlog
gsave

8 /Times-Roman FS
72 83 moveto
%!2     (NG390-8,) show

72 90 translate

%! 0.01 MM 0.01 MM scale
%! 15 setlinewidth
%! 0 0  moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto
%! closepath stroke

grestore

%SETCMYK_OLV.PS
/setcmyk_olvcolor %transfer cmyk to olv
{/ncolor exch def /ycolor exch def
 /mcolor exch def /ccolor exch def
 ncolor 0 eq {1 ccolor sub
              1 mcolor sub
              1 ycolor sub setrgbcolor
             }
             {ccolor 0 eq 
              mcolor 0 eq and
              ycolor 0 eq and {%only black n
                               1 ncolor sub 
                               dup
                               dup
                               setrgbcolor
                              }
                              {%cmy and black n
                               1 ccolor sub 1 ncolor sub mul
                               1 mcolor sub 1 ncolor sub mul
                               1 ycolor sub 1 ncolor sub mul
                               setrgbcolor
                              } ifelse
             } ifelse
} bind def


showpage
%%Trailer

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
161 MM 197 MM translate
  10 /Times-ISOL1 FS  1 1 scale  -77 -91 translate
%%BeginDocument: Bild 12

%line 419

%%EndDocument
EndEPSF grestore gsave
                                        
BeginEPSF
161 MM 152 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 21

%line 429
%!PS-Adobe-3.0 EPSF-3.0 NG391-1,
%%BoundingBox: 70 90 226 206

/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
%%EndProlog
gsave

8 /Times-Roman FS
72 83 moveto
%!2     (NG391-1,) show

72 90 translate

%! 0.01 MM 0.01 MM scale
%! 15 setlinewidth
%! 0 0  moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto
%! closepath stroke

grestore

%SETCMYK_OLV.PS
/setcmyk_olvcolor %transfer cmyk to olv
{/ncolor exch def /ycolor exch def
 /mcolor exch def /ccolor exch def
 ncolor 0 eq {1 ccolor sub
              1 mcolor sub
              1 ycolor sub setrgbcolor
             }
             {ccolor 0 eq 
              mcolor 0 eq and
              ycolor 0 eq and {%only black n
                               1 ncolor sub 
                               dup
                               dup
                               setrgbcolor
                              }
                              {%cmy and black n
                               1 ccolor sub 1 ncolor sub mul
                               1 mcolor sub 1 ncolor sub mul
                               1 ycolor sub 1 ncolor sub mul
                               setrgbcolor
                              } ifelse
             } ifelse
} bind def


showpage
%%Trailer

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
219 MM 152 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 22

%line 439
%!PS-Adobe-3.0 EPSF-3.0 NG391-2,
%%BoundingBox: 70 90 226 206

/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
%%EndProlog
gsave

8 /Times-Roman FS
72 83 moveto
%!2     (NG391-2,) show

72 90 translate

%! 0.01 MM 0.01 MM scale
%! 15 setlinewidth
%! 0 0  moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto
%! closepath stroke

grestore

%SETCMYK_OLV.PS
/setcmyk_olvcolor %transfer cmyk to olv
{/ncolor exch def /ycolor exch def
 /mcolor exch def /ccolor exch def
 ncolor 0 eq {1 ccolor sub
              1 mcolor sub
              1 ycolor sub setrgbcolor
             }
             {ccolor 0 eq 
              mcolor 0 eq and
              ycolor 0 eq and {%only black n
                               1 ncolor sub 
                               dup
                               dup
                               setrgbcolor
                              }
                              {%cmy and black n
                               1 ccolor sub 1 ncolor sub mul
                               1 mcolor sub 1 ncolor sub mul
                               1 ycolor sub 1 ncolor sub mul
                               setrgbcolor
                              } ifelse
             } ifelse
} bind def


showpage
%%Trailer

%%EndDocument
EndEPSF grestore gsave
                         
BeginEPSF
161 MM 108 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 23

%line 449
%!PS-Adobe-3.0 EPSF-3.0 NG391-3
%%BoundingBox: 70 83 392 335
%old BoundingBox: 72 90 392 335
 
%START PDFDE011.EPS
/pdfmark13 where {pop} {userdict /pdfmark13 /cleartomark load put} ifelse
/languagelevel where {pop languagelevel} {1} ifelse
2 lt { userdict (<<) cvn ([) cvn load put
       userdict (>>) cvn (]) cvn load put} if
[ /Title (PostScript pictures: NG391-3)
  /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1)
  /Subject (goto: http://www.ps.bam.de or http://130.149.60.445/~farbmetrik)
  /Keywords (image reproduction, colour devices)
  /Creator (klaus.richter@me.com)
  /CreationDate (D:2010110112000)
  /ModDate (D:2010110112000)
/DOCINFO pdfmark13
[ /View [ /FitB ]
/DOCVIEW pdfmark13
%END  PDFDE011

%SETCMYK_OLV.PS
/setcmyk_olvcolor %transfer cmyk to olv
{/ncolor exch def /ycolor exch def
 /mcolor exch def /ccolor exch def
 ncolor 0 eq {1 ccolor sub
              1 mcolor sub
              1 ycolor sub setrgbcolor
             }
             {ccolor 0 eq 
              mcolor 0 eq and
              ycolor 0 eq and {%only black n
                               1 ncolor sub 
                               dup
                               dup
                               setrgbcolor
                              }
                              {%cmy and black n
                               1 ccolor sub 1 ncolor sub mul
                               1 mcolor sub 1 ncolor sub mul
                               1 ycolor sub 1 ncolor sub mul
                               setrgbcolor
                              } ifelse
             } ifelse
} bind def


%  40mm =  80*72/25.4 = 232; 232+90+13 = 335
% !AUSTAUSCH Times-Roman -> Times-Roman-ISOLatin1=Times-Roman-I
/Times-Roman findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/Times-ISOL1 exch definefont pop
 
/Times-Italic findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/TimesI-ISOL1 exch definefont pop
 
/Times-Bold findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/TimesB-ISOL1 exch definefont pop
 
/Times-BoldItalic findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/TimesBI-ISOL1 exch definefont pop
 
/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
 
%%EndProlog
gsave
%LANINDL2 START  20000505
/lanind 0 def
/lantex [(G) (E) (S) (F) (I) (J) (M)] def
/showde {0 lanind eq {show} {pop} ifelse} bind def
/showen {1 lanind eq {show} {pop} ifelse} bind def
/showes {2 lanind eq {show} {pop} ifelse} bind def
/showfr {3 lanind eq {show} {pop} ifelse} bind def
/showit {4 lanind eq {show} {pop} ifelse} bind def
/showjp {5 lanind eq {show} {pop} ifelse} bind def
/showm  {6 lanind eq {show} {pop} ifelse} bind def
 
/popde {0 lanind ne {pop} if} bind def
/popen {1 lanind ne {pop} if} bind def
/popes {2 lanind ne {pop} if} bind def
/popfr {3 lanind ne {pop} if} bind def
/popit {4 lanind ne {pop} if} bind def
/popjp {5 lanind ne {pop} if} bind def
/popm  {6 lanind ne {pop} if} bind def
 
/popxde {/n exch def 0 lanind ne {n {pop} repeat} if} bind def
/popxen {/n exch def 1 lanind ne {n {pop} repeat} if} bind def
/popxes {/n exch def 2 lanind ne {n {pop} repeat} if} bind def
/popxfr {/n exch def 3 lanind ne {n {pop} repeat} if} bind def
/popxit {/n exch def 4 lanind ne {n {pop} repeat} if} bind def
/popxjp {/n exch def 5 lanind ne {n {pop} repeat} if} bind def
/popxm  {/n exch def 6 lanind ne {n {pop} repeat} if} bind def
 
/lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def}
               {/lanind1 0 def /lanind2 0 def} ifelse
lanind1 1 lanind2 {/lanind exch def %output showpage
gsave
%LANINDL2 END
 
5 /Times-ISOL1 FS
340 85 moveto
 (NG391-3, B8_50) show %    ( B7390_3, M8541-3, B8_50, N=8_50 2x2) show
 
72 90 translate
 
 
/yhoe 8500 def
0.01 MM 0.01 MM scale  %d2:[rr.b4f]bausz8y.eps
/ausz 8 def
15 setlinewidth
0.0 0.0 0.5 0.0 setcmyk_olvcolor
0 0  moveto 11200 0 rlineto 0 yhoe rlineto -11200 0 rlineto
closepath fill
0.0 0.0 0.0 1.0 setcmyk_olvcolor
 
0 0  moveto 11200 0 rlineto 0 yhoe rlineto -11200 0 rlineto
closepath stroke
 
/tedef {/anz exch def /ydt exch def /y0t exch def /x0t exch def} bind def
 
/bs1 {350 /TimesB-ISOL1 FS  show} bind def
 
/ns {300 /Times-ISOL1 FS  show} bind def
/ks {300 /TimesI-ISOL1 FS  show} bind def
/bs {300 /TimesB-ISOL1 FS  show} bind def
/js {300 /TimesBI-ISOL1 FS  show} bind def
/ss {300 /Symbol FS  show} bind def
/is {200 /Times-ISOL1 FS 0 -90 rlineto show 0   90 rlineto} bind def
/es {200 /Times-ISOL1 FS 0 200 rlineto show 0 -200 rlineto} bind def
 
/TEn {300 /Times-ISOL1 FS tedef} bind def
/TEk {300 /TimesI-ISOL1 FS tedef} bind def
/TEb {300 /TimesB-ISOL1 FS tedef} bind def
/TEj {300 /TimesBI-ISOL1 FS tedef} bind def
/TEs {300 /Symbol FS tedef} bind def
 
/TEA {anz 1 sub -1 0 {ydt mul y0t add x0t exch moveto show} for} bind def
 
/yd -400 def %y-Zeilenabstand
 
%Spalten
/S1 100 def
/S2 1000 def
/S3 2000 def
/S4 3000 def
/S5 4600 def
/S6 5600 def
/S7 6600 def
/S8 7800 def
/S9 8900 def
/S10 10100 def
 
/yz 400 def
/yu0 0 def
/yu1 {yu0 -50 add yz 16.7 mul add} bind def
/yu2 {yu1 100 add yz 2 mul add} bind def
/yu3 {yu2 100 add yz 1 mul add} bind def
 
%Titeltext
050 yu3 moveto
(Farbma\337zahlen der 17 ) popde                                %08541-3 1
(CIE\255Testfarben nach DIN 6169 ) popde                        %08541-3 11
(color parameters of 17 ) popen                                 %18541-3 1
(CIE\255test colors by DIN 6169 ) popen                         %18541-3 11
(Muestra de 17 colores ) popes                                  %28541-3 1
(de CIE\255Testcolor por DIN 6169 ) popes                       %28541-3 11
(color parameters of 17 ) popfr                                 %38541-3 1
(CIE\255test colors by DIN 6169 ) popfr                         %38541-3 11
(color parameters of 17 ) popit                                 %48541-3 1
(CIE\255test colors by DIN 6169 ) popit                         %48541-3 11
(color parameters of 17 ) popjp                                 %58541-3 1
(CIE\255test colors by DIN 6169 ) popjp                         %58541-3 11
exch bs1 bs1
 
350 /Times-Bold FS (\271) show
(Farbwiedergabe) popde                                          %08541-3 2
(color rendering) popen                                         %18541-3 2
(color dado) popes                                              %28541-3 2
(color rendering) popfr                                         %38541-3 2
(color rendering) popit                                         %48541-3 2
(color rendering) popjp                                         %58541-3 2
bs1
 
350 /Times-Bold FS (\272) show
 
 
 S1 yu2 yd 1 TEb
(Farb\255) popde                                                %08541-3 3
(color) popen                                                   %18541-3 3
(Color\255) popes                                               %28541-3 3
(color) popfr                                                   %38541-3 3
(color) popit                                                   %48541-3 3
(color) popjp                                                   %58541-3 3
TEA
 
 S1 yu2 400 sub moveto
(Nr.) popde                                                     %08541-3 4
(no.) popen                                                     %18541-3 4
(Nr.) popes                                                     %28541-3 4
(no.) popfr                                                     %38541-3 4
(no.) popit                                                     %48541-3 4
(no.) popjp                                                     %58541-3 4
bs
 
 S2 yu2 moveto
(     CIELAB\255Daten) popde                                    %08541-3 5
(                  Normfarbwerte und \255anteile) popde         %08541-3 5
(     CIELAB\255data                  ) popen                   %18541-3 5
(CIE tristimulus value and chromaticity) popen                  %18541-3 5
(     CIELAB\255Datos                  ) popes                  %28541-3 5
(CIE Color tristimulus y cromatico) popes                       %28541-3 5
(     CIELAB\255data                  ) popfr                   %38541-3 5
(CIE tristimulus value and chromaticity) popfr                  %38541-3 5
(     CIELAB\255data                  ) popit                   %48541-3 5
(CIE tristimulus value and chromaticity) popit                  %48541-3 5
(     CIELAB\255data                  ) popjp                   %58541-3 5
(CIE tristimulus value and chromaticity) popjp                  %58541-3 5
exch bs bs
 
 S2 yu2 400 sub moveto
(    L*         a*         b*) js
S8 yu2 400 sub moveto
(    x            y             Y) js
S5 yu2 400 sub moveto
(   X           Y           Z) js
 
S1 yu1 yd 17 TEn %Nr
(01) (02) (03) (04) (05) (06) (07) (08) (09) (10)
(11) (12) (13) (14) (15) (16) (17) TEA
 
S2 yu1 yd 17 TEn %L*
(61,45) (60,69) (62,02) (61,20) (62,40)
(61,51) (61,12) (62,77) (39,92) (81,26)
(52,23) (30,57) (80,23) (40,75) (22,27)
(51,65) (89,93) TEA
 
S3 yu1 yd 17 TEn %a*
(  17,53)  (    0,08) (-20,59)  (-33,17)  (-17,48)
(  -0,37)  (  20,15)  (  27,42) (  58,74) (  -2,90)
(-42,43)   (    1,41) (  11,37) (-13,81)  (    0,12)
(    0,00) (    0,02) TEA
 
S4 yu1 yd 17 TEn %b*
(  11,74) (  28,92) (  44,41) (  17,07) (  -8,56)
(-28,40) (-24,56) (-13,64) (  27,99) (  71,56)
(  13,60) (-46,48) (  21,04) (  24,23) (  -0,17)
(    0,04) (    0,03) TEA
 
S5 yu1 yd 17 TEn %X
(32,98) (27,49) (23,93) (20,45) (25,02)
(28,26) (33,33) (37,57) (20,48) (54,87)
(12,12) (  6,28) (58,85) (  9,35) (  3,42)
(18,85) (72,39) TEA
 
S6 yu1 yd 17 TEn %Y
(29,76) (28,90) (30,43) (29,48) (30,87)
(29,83) (29,39) (31,31) (11,20) (58,94)
(20,35) (  6,47) (57,09) (11,71) (  3,59)
(19,83) (76,15) TEA
 
S7 yu1 yd 17 TEn %Z
(24,59) (15,01) (  9,96) (21,27) (40,42)
(57,91) (53,22) (45,44) (  4,36) (12,08)
(15,33) (27,73) (41,39) (  5,43) (  3,94)
(21,57) (82,89) TEA
 
S8 yu1 yd 17 TEn %x
(0,3776) (0,3850) (0,3720) (0,2872) (0,2597)
(0,2436) (0,2874) (0,3286) (0,5682) (0,4358)
(0,2535) (0,1551) (0,3740) (0,3529) (0,3123)
(0,3128) (0,3127) TEA
 
S9 yu1 yd 17 TEn %y
(0,3407) (0,4047) (0,4731) (0,4140) (0,3205)
(0,2571) (0,2534) (0,2738) (0,3107) (0,4681)
(0,4257) (0,1598) (0,3628) (0,4420) (0,3278)
(0,3291) (0,3290) TEA
 
S10 yu1 yd 17 TEn %Y
(29,76) (28,90) (30,43) (29,48) (30,87)
(29,83) (29,39) (31,31) (11,20) (58,94)
(20,35) (  6,47) (57,09) (11,71) (  3,59)
(19,83) (76,15) TEA
 
showpage
grestore
} for %output with langind end
%%Trailer

%%EndDocument
EndEPSF grestore gsave
                         
BeginEPSF
219 MM 108 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 24

%line 459
%!PS-Adobe-3.0 EPSF-3.0 NG391-4,
%%BoundingBox: 70 90 226 206

/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
%%EndProlog
gsave

8 /Times-Roman FS
72 83 moveto
%!2     (NG391-4,) show

72 90 translate

%! 0.01 MM 0.01 MM scale
%! 15 setlinewidth
%! 0 0  moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto
%! closepath stroke

grestore

%SETCMYK_OLV.PS
/setcmyk_olvcolor %transfer cmyk to olv
{/ncolor exch def /ycolor exch def
 /mcolor exch def /ccolor exch def
 ncolor 0 eq {1 ccolor sub
              1 mcolor sub
              1 ycolor sub setrgbcolor
             }
             {ccolor 0 eq 
              mcolor 0 eq and
              ycolor 0 eq and {%only black n
                               1 ncolor sub 
                               dup
                               dup
                               setrgbcolor
                              }
                              {%cmy and black n
                               1 ccolor sub 1 ncolor sub mul
                               1 mcolor sub 1 ncolor sub mul
                               1 ycolor sub 1 ncolor sub mul
                               setrgbcolor
                              } ifelse
             } ifelse
} bind def


showpage
%%Trailer

%%EndDocument
EndEPSF grestore gsave
              
BeginEPSF
161 MM 064 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 25

%line 469
%!PS-Adobe-3.0 EPSF-3.0 NG391-5,
%%BoundingBox: 70 90 226 206

/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
%%EndProlog
gsave

8 /Times-Roman FS
72 83 moveto
%!2     (NG391-5,) show

72 90 translate

%! 0.01 MM 0.01 MM scale
%! 15 setlinewidth
%! 0 0  moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto
%! closepath stroke

grestore

%SETCMYK_OLV.PS
/setcmyk_olvcolor %transfer cmyk to olv
{/ncolor exch def /ycolor exch def
 /mcolor exch def /ccolor exch def
 ncolor 0 eq {1 ccolor sub
              1 mcolor sub
              1 ycolor sub setrgbcolor
             }
             {ccolor 0 eq 
              mcolor 0 eq and
              ycolor 0 eq and {%only black n
                               1 ncolor sub 
                               dup
                               dup
                               setrgbcolor
                              }
                              {%cmy and black n
                               1 ccolor sub 1 ncolor sub mul
                               1 mcolor sub 1 ncolor sub mul
                               1 ycolor sub 1 ncolor sub mul
                               setrgbcolor
                              } ifelse
             } ifelse
} bind def


showpage
%%Trailer

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
219 MM 064 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 26

%line 479
%!PS-Adobe-3.0 EPSF-3.0 NG391-6,
%%BoundingBox: 70 90 226 206

/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
%%EndProlog
gsave

8 /Times-Roman FS
72 83 moveto
%!2     (NG391-6,) show

72 90 translate

%! 0.01 MM 0.01 MM scale
%! 15 setlinewidth
%! 0 0  moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto
%! closepath stroke

grestore

%SETCMYK_OLV.PS
/setcmyk_olvcolor %transfer cmyk to olv
{/ncolor exch def /ycolor exch def
 /mcolor exch def /ccolor exch def
 ncolor 0 eq {1 ccolor sub
              1 mcolor sub
              1 ycolor sub setrgbcolor
             }
             {ccolor 0 eq 
              mcolor 0 eq and
              ycolor 0 eq and {%only black n
                               1 ncolor sub 
                               dup
                               dup
                               setrgbcolor
                              }
                              {%cmy and black n
                               1 ccolor sub 1 ncolor sub mul
                               1 mcolor sub 1 ncolor sub mul
                               1 ycolor sub 1 ncolor sub mul
                               setrgbcolor
                              } ifelse
             } ifelse
} bind def


showpage
%%Trailer

%%EndDocument
EndEPSF grestore gsave
                         
BeginEPSF
161 MM 020 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 27

%line 489
%!PS-Adobe-3.0 EPSF-3.0 NG391-7
%%BoundingBox: 70 83 392 335
%old BoundingBox: 72 90 392 335
 
%START PDFDE011.EPS
/pdfmark17 where {pop} {userdict /pdfmark17 /cleartomark load put} ifelse
/languagelevel where {pop languagelevel} {1} ifelse
2 lt { userdict (<<) cvn ([) cvn load put
       userdict (>>) cvn (]) cvn load put} if
[ /Title (PostScript pictures: NG391-7)
  /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1)
  /Subject (goto: http://www.ps.bam.de or http://130.149.60.445/~farbmetrik)
  /Keywords (image reproduction, colour devices)
  /Creator (klaus.richter@me.com)
  /CreationDate (D:2010110112000)
  /ModDate (D:2010110112000)
/DOCINFO pdfmark17
[ /View [ /FitB ]
/DOCVIEW pdfmark17
%END  PDFDE011

%SETCMYK_OLV.PS
/setcmyk_olvcolor %transfer cmyk to olv
{/ncolor exch def /ycolor exch def
 /mcolor exch def /ccolor exch def
 ncolor 0 eq {1 ccolor sub
              1 mcolor sub
              1 ycolor sub setrgbcolor
             }
             {ccolor 0 eq 
              mcolor 0 eq and
              ycolor 0 eq and {%only black n
                               1 ncolor sub 
                               dup
                               dup
                               setrgbcolor
                              }
                              {%cmy and black n
                               1 ccolor sub 1 ncolor sub mul
                               1 mcolor sub 1 ncolor sub mul
                               1 ycolor sub 1 ncolor sub mul
                               setrgbcolor
                              } ifelse
             } ifelse
} bind def


%  40mm =  80*72/25.4 = 232; 232+90+13 = 335
% !AUSTAUSCH Times-Roman -> Times-Roman-ISOLatin1=Times-Roman-I
/Times-Roman findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/Times-ISOL1 exch definefont pop
 
/Times-Italic findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/TimesI-ISOL1 exch definefont pop
 
/Times-Bold findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/TimesB-ISOL1 exch definefont pop
 
/Times-BoldItalic findfont dup length dict  begin
 {1 index /FID ne {def} {pop pop} ifelse }forall
 /Encoding ISOLatin1Encoding def
 currentdict end
/TimesBI-ISOL1 exch definefont pop
 
/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
 
%%EndProlog
gsave
%LANINDL2 START  20000505
/lanind 0 def
/lantex [(G) (E) (S) (F) (I) (J) (M)] def
/showde {0 lanind eq {show} {pop} ifelse} bind def
/showen {1 lanind eq {show} {pop} ifelse} bind def
/showes {2 lanind eq {show} {pop} ifelse} bind def
/showfr {3 lanind eq {show} {pop} ifelse} bind def
/showit {4 lanind eq {show} {pop} ifelse} bind def
/showjp {5 lanind eq {show} {pop} ifelse} bind def
/showm  {6 lanind eq {show} {pop} ifelse} bind def
 
/popde {0 lanind ne {pop} if} bind def
/popen {1 lanind ne {pop} if} bind def
/popes {2 lanind ne {pop} if} bind def
/popfr {3 lanind ne {pop} if} bind def
/popit {4 lanind ne {pop} if} bind def
/popjp {5 lanind ne {pop} if} bind def
/popm  {6 lanind ne {pop} if} bind def
 
/popxde {/n exch def 0 lanind ne {n {pop} repeat} if} bind def
/popxen {/n exch def 1 lanind ne {n {pop} repeat} if} bind def
/popxes {/n exch def 2 lanind ne {n {pop} repeat} if} bind def
/popxfr {/n exch def 3 lanind ne {n {pop} repeat} if} bind def
/popxit {/n exch def 4 lanind ne {n {pop} repeat} if} bind def
/popxjp {/n exch def 5 lanind ne {n {pop} repeat} if} bind def
/popxm  {/n exch def 6 lanind ne {n {pop} repeat} if} bind def
 
/lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def}
               {/lanind1 0 def /lanind2 0 def} ifelse
lanind1 1 lanind2 {/lanind exch def %output showpage
gsave
%LANINDL2 END
 
5 /Times-ISOL1 FS
340 85 moveto
 (NG391-7, B8_51) show %    ( B7390_7, M8541-7, B8_51, N=8_51 2x2) show
 
72 90 translate
 
 
/yhoe 8500 def
0.01 MM 0.01 MM scale  %d2:[rr.b4f]bausz8y.eps
/ausz 8 def
15 setlinewidth
0.0 0.0 0.5 0.0 setcmyk_olvcolor
0 0  moveto 11200 0 rlineto 0 yhoe rlineto -11200 0 rlineto
closepath fill
0.0 0.0 0.0 1.0 setcmyk_olvcolor
 
0 0  moveto 11200 0 rlineto 0 yhoe rlineto -11200 0 rlineto
closepath stroke
 
/tedef {/anz exch def /ydt exch def /y0t exch def /x0t exch def} bind def
 
/bs1 {350 /TimesB-ISOL1 FS  show} bind def
/ss1 {350 /Symbol FS  show} bind def
/js1 {350 /TimesBI-ISOL1 FS  show} bind def
 
/ns {300 /Times-ISOL1 FS  show} bind def
/ks {300 /TimesI-ISOL1 FS  show} bind def
/bs {300 /TimesB-ISOL1 FS  show} bind def
/js {300 /TimesBI-ISOL1 FS  show} bind def
/ss {300 /Symbol FS  show} bind def
/is {200 /Times-ISOL1 FS 0 -90 rlineto show 0   90 rlineto} bind def
/es {200 /Times-ISOL1 FS 0 200 rlineto show 0 -200 rlineto} bind def
 
/TEn {300 /Times-ISOL1 FS tedef} bind def
/TEk {300 /TimesI-ISOL1 FS tedef} bind def
/TEb {300 /TimesB-ISOL1 FS tedef} bind def
/TEj {300 /TimesBI-ISOL1 FS tedef} bind def
/TEs {300 /Symbol FS tedef} bind def
 
/TEA {anz 1 sub -1 0 {ydt mul y0t add x0t exch moveto show} for} bind def
 
/yd -400 def %y-Zeilenabstand
 
%Spalten
/S1 100 def
/S2 1000 def
/S3 2000 def
/S4 3000 def
/S5 4600 def
/S6 5600 def
/S7 6600 def
/S8 7800 def
/S9 8900 def
/S10 10100 def
 
/yz 400 def
/yu0 0 def
/yu1 {yu0 yz 17.3 mul add} bind def
 
/yu2 {yu1 yz 1.5 mul add} bind def
/yu3 {yu1 yz 2.5 mul add} bind def
 
%Titeltext
S1 8100 moveto
(Farbabstand ) popde                                            %08541-7 0
(color difference ) popen                                       %18541-7 0
(Diferencia de color ) popes                                    %28541-7 0
(color difference ) popfr                                       %38541-7 0
(color difference ) popit                                       %48541-7 0
(color difference ) popjp                                       %58541-7 0
bs1
 
(D) ss1 30 0 rmoveto (E*) js1
 
( f\374r Aufsicht255 -> ) popde                                 %08541-7 1
(Lichtfarben mit 3\3273\255Matrix, ) popde                      %08541-7 11
( for reflection -> ) popen                                     %18541-7 1
(light colors with 3\3273\255matrix, ) popen                    %18541-7 11
( reflecti\363n ->) popes                                       %28541-7 1
( Luz\255color con 3\3273\255Matrix, ) popes                    %28541-7 11
( for reflection -> ) popfr                                     %38541-7 1
(light colors with 3\3273\255matrix, ) popfr                    %38541-7 11
( for reflection -> ) popit                                     %48541-7 1
(light colors with 3\3273\255matrix, ) popit                    %48541-7 11
( for reflection -> ) popjp                                     %58541-7 1
(light colors with 3\3273\255matrix, ) popjp                    %58541-7 11
exch bs1 bs1
 
(g) ss1 ( = 1,7) bs1
 
/yu2 7700 def
 
S1 yu2 yd 1 TEb
(Farb\255) popde                                                %08541-7 3
(color) popen                                                   %18541-7 3
(Color\255) popes                                               %28541-7 3
(color) popfr                                                   %38541-7 3
(color) popit                                                   %48541-7 3
(color) popjp                                                   %58541-7 3
TEA
 
S1 yu2 300 sub moveto
(Nr.) popde                                                     %08541-7 4
(no.) popen                                                     %18541-7 4
(Nr.) popes                                                     %28541-7 4
(no.) popfr                                                     %38541-7 4
(no.) popit                                                     %48541-7 4
(no.) popjp                                                     %58541-7 4
bs
 
S2 yu2 yd 1 TEb
(Soll\255CIELAB Werte         Ist\255CIELAB Werte) popde        %08541-7 5
(intended CIELAB data         real CIELAB data  ) popen         %18541-7 5
(meta CIELAB Valor         real CIELAB Valor  ) popes           %28541-7 5
(intended CIELAB data         real CIELAB data  ) popfr         %38541-7 5
(intended CIELAB data         real CIELAB data  ) popit         %48541-7 5
(intended CIELAB data         real CIELAB data  ) popjp         %58541-7 5
 
TEA
S2 yu2 300 sub moveto
(    L*          a*          b*) js
 
S8 100 add yu2 yd 1 TEb
(Farbabstand  CIELAB) popde                                     %08541-7 6
(color difference CIELAB) popen                                 %18541-7 6
(espacio\255color  CIELAB) popes                                %28541-7 6
(color difference CIELAB) popfr                                 %38541-7 6
(color difference CIELAB) popit                                 %48541-7 6
(color difference CIELAB) popjp                                 %58541-7 6
TEA
 
S8 yu2 300 sub moveto
 (                  D) ss (E*) js
S5 yu2 300 sub moveto
(    L*          a*          b*) js
 
S1 yu1 yd 17 mul add moveto
(Farbabstand  f\374r 17 CIE\255Testfarben im Mittel:) popde     %08541-7 7
(mean color difference for 17 CIE\255test colors:) popen        %18541-7 7
(17 colores estandard para CIE\255Testcolor involucrado:) popes %28541-7 7
(mean color difference for 17 CIE\255test colors:) popfr        %38541-7 7
(mean color difference for 17 CIE\255test colors:) popit        %48541-7 7
(mean color difference for 17 CIE\255test colors:) popjp        %58541-7 7
bs
 
S1 yu1 yd 17 TEn %Nr
(01) (02) (03) (04) (05) (06) (07) (08) (09) (10)
(11) (12) (13) (14) (15) (16) (17) TEA
 
S2 yu1 yd 17 TEn %L*
(61,45) (60,69) (62,02) (61,20) (62,40)
(61,51) (61,12) (62,77) (39,92) (81,26)
(52,23) (30,57) (80,23) (40,75) (22,27)
(51,65) (89,93) TEA
 
S3 yu1 yd 17 TEn %a*
(  17,53)  (    0,08) (-20,59)  (-33,17)  (-17,48)
(  -0,37)  (  20,15)  (  27,42) (  58,74) (  -2,90)
(-42,43)   (    1,41) (  11,37) (-13,81)  (    0,12)
(    0,00) (    0,02) TEA
 
S4 yu1 yd 17 TEn %b*
(  11,74) (  28,92) (  44,41) (  17,07) (  -8,56)
(-28,40) (-24,56) (-13,64) (  27,99) (  71,56)
(  13,60) (-46,48) (  21,04) (  24,23) (  -0,17)
(    0,04) (    0,03) TEA
 
S5 yu1 yd 17 TEn %L*ist
(60,93) (60,04) (61,60) (61,26) (61,48)
(60,69) (60,43) (62,57) (49,51) (82,38)
(53,30) (35,01) (80,55) (41,04) (23,43)
(50,69) (89,93) TEA
 
S6 yu1 yd 17 TEn %a*ist
(  18,72)  (    1,10) (-18,79)  (-30,55)  (-12,40)
(    8,18) (  24,45)  (  29,44) (  51,50) (    3,16)
(-33,50)   (  18,53)  (  15,20) (-12,20)  (    0,00)
(    0,45) (    2,83)
TEA
 
S7 yu1 yd 17 TEn %b*ist
(  13,81) (  30,46) (  43,86) (  16,60) (-14,30)
(-38,62)  (-32,53)  (-16,63)  (  40,79) (  73,10)
(  13,23) (-50,70)  (  25,75) (  20,27) (  -2,50)
(  -2,69) (  -3,62) TEA
 
S9 yu1 yd 18 TEn %Esoll-Eist
(  2,44) (  1,96) (  1,91) (  2,66) (  7,72)
(13,35) (  9,09) (  3,62) (17,56) (  6,36)
(  8,90) (18,20) (  6,08) (  4,27) (  2,62)
(  2,93) (  4,60) (  6,70) TEA
 
showpage
grestore
} for %output with langind end
%%Trailer

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
219 MM 020 MM translate 12 /Times-ISOL1 FS -9 MM -7 MM  moveto ( ) show
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 28

%line 499
%!PS-Adobe-3.0 EPSF-3.0 NG391-8,
%%BoundingBox: 70 90 226 206

/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
%%EndProlog
gsave

8 /Times-Roman FS
72 83 moveto
%!2     (NG391-8,) show

72 90 translate

%! 0.01 MM 0.01 MM scale
%! 15 setlinewidth
%! 0 0  moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto
%! closepath stroke

grestore

%SETCMYK_OLV.PS
/setcmyk_olvcolor %transfer cmyk to olv
{/ncolor exch def /ycolor exch def
 /mcolor exch def /ccolor exch def
 ncolor 0 eq {1 ccolor sub
              1 mcolor sub
              1 ycolor sub setrgbcolor
             }
             {ccolor 0 eq 
              mcolor 0 eq and
              ycolor 0 eq and {%only black n
                               1 ncolor sub 
                               dup
                               dup
                               setrgbcolor
                              }
                              {%cmy and black n
                               1 ccolor sub 1 ncolor sub mul
                               1 mcolor sub 1 ncolor sub mul
                               1 ycolor sub 1 ncolor sub mul
                               setrgbcolor
                              } ifelse
             } ifelse
} bind def


showpage
%%Trailer

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
219 MM 080 MM add 008 MM translate %80 MM Breite von TestStreifen
  10 /Times-ISOL1 FS  53 MM 1 MM moveto () show 1 1 scale -77 21 MM sub -91 translate
%%BeginDocument: Bild 29 Teststreifen Ueberlaenge

%line 509

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
-0.0 MM -0.0 MM translate %xy-Verschiebung Rechteckrahmen nach innen%

%%BeginDocument: Bild 30 %Rechteckrahmen

%line 519
%!PS-Adobe-3.0 EPSF-3.0 Frame arround with Internet text NG39 20101101
%%BoundingBox: 0 0 598 845

%%EndProlog
gsave

/lanind 1 def
/lantex [(G) (E) (S) (N) (I) (J) (M)] def
/showde {0 lanind eq {show} {pop} ifelse} bind def
/showen {1 lanind eq {show} {pop} ifelse} bind def
/showes {2 lanind eq {show} {pop} ifelse} bind def
/showfr {3 lanind eq {show} {pop} ifelse} bind def
/showit {4 lanind eq {show} {pop} ifelse} bind def
/showjp {5 lanind eq {show} {pop} ifelse} bind def
/showm {6 lanind eq {show} {pop} ifelse} bind def
/lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def}
               {/lanind1 0 def /lanind2 0 def} ifelse
/colormg where {pop /colorm1 colormg def /colorm2 colormg def}
               {/colorm1 0 def /colorm2 0 def} ifelse
/xcolorg where {pop /xcolor1 xcolorg def /xcolor2 xcolorg def}
               {/xcolor1 0 def /xcolor2 0 def} ifelse
/xchartg where {pop /xchart1 xchartg def /xchart2 xchartg def}
               {/xchart1 0 def /xchart2 0 def} ifelse
/lanind lanind1 def %lanind1 1 lanind2 {/lanind exch def %output showpage
/colorm colorm1 def %colorm1 1 colorm2 {/colorm exch def %output showpage
/xcolor xcolor1 def %xcolor1 1 xcolor2 {/xcolor exch def %output showpage
/xchart xchart1 def %xchart1 1 xchart2 {/xchart exch def %output showpage

/GSS$ where {pop /LSS$ GSS$ def}
            {/LSS$ (1) def} ifelse
/GSC$ where {pop /LSC$ GSC$ def}
            {/LSC$ (N) def} ifelse
/GSX$ where {pop /LSX$ GSX$ def}
            {/LSX$ (0) def} ifelse
/GSY$ where {pop /LSY$ GSY$ def}
            {/LSY$ (0) def} ifelse
/GEX$ where {pop /LEX$ GEX$ def}
            {/LEX$ (P.PS./PDF) def} ifelse
/GEY$ where {pop /LEY$ GEY$ def}
            {/LEY$ (P.DAT) def} ifelse
/IMES where {pop %/IMES IMES def
            }
            {/IMES 0 def} ifelse
/i*ptrsc where {pop %/i*ptrsc i*ptrsc def
               }
               {/i*ptrsc 0 def} ifelse
gsave

/xchartg where {pop /xchart xchartg def} {/xchart 0 def} ifelse
/scountg where {pop /scount scountg def} {/scount 1 def} ifelse

xchart 0 eq  {%beg if xchart=0

0 setgray

0.15 MM setlinewidth

/x 20 array def
/y 20 array def
/d 20 array def

/x [000 296 296 000  002 294 294 002  005 291 291 005 %speziell
    006 290 290 006  008 288 288 008 ] def
/y [000 000 210 210  002 002 208 208  005 005 205 205 %speziell
    006 006 204 204  008 008 202 202 ] def 
/d [060 017 -60 -17  058 015 -58 -15  056 013 -56 -13
    054 011 -54 -11  052 009 -52 -09 ] def

/xlu 017 MM def /ylu 017 MM def
/xro 279 MM def /yro 193 MM def
/xlo 017 MM def /ylo 193 MM def
/xru 279 MM def /yru 017 MM def

xlu 8 MM sub ylu moveto  16 MM 0 rlineto stroke
xlu ylu 8 MM sub moveto 0  16 MM rlineto stroke
xro 8 MM add yro moveto -16 MM 0 rlineto stroke
xro yro 8 MM add moveto 0 -16 MM rlineto stroke

xru 8 MM sub yru moveto  16 MM 0 rlineto stroke
xru yru 8 MM sub moveto 0  16 MM rlineto stroke
xlo 8 MM add ylo moveto -16 MM 0 rlineto stroke
xlo ylo 8 MM add moveto 0 -16 MM rlineto stroke

1 2 7 {/i exch def %Zentrierkreise
xlu ylu i MM 0 360 arc stroke
xro yro i MM 0 360 arc stroke
xru yru i MM 0 360 arc stroke
xlo ylo i MM 0 360 arc stroke
      } for %i

12 4 16 {/i exch def /i0 i def %i=0,16
%0 4 16 {/i exch def /i0 i def %i=0,16
        /i1 i0 1 add def /i2 i0 2 add def /i3 i0 3 add def

i 16 eq {0.30 MM setlinewidth} {0.15 MM setlinewidth} ifelse

0 setgray        
x i0 get MM y i0 get MM moveto x i1 get MM y i1 get MM lineto
x i2 get MM y i2 get MM lineto x i3 get MM y i3 get MM lineto
x i0 get MM y i0 get MM lineto stroke

i 16 eq {6 /Times-ISOL1 FS
         /x00 67 def /xdif 32 def /y0o 202.3 def /y0u 6.3 def  
         /x0l 6.1 def /x0r 288 def /y00 22 def /ydif 32 def
         x00 xdif 0 mul add MM y0o MM moveto (V) show
         x00 xdif 0 mul add MM y0u MM moveto (C) show
         x00 xdif 1 mul add MM y0o MM moveto (L) show
         x00 xdif 1 mul add MM y0u MM moveto (M) show
         x00 xdif 2 mul add MM y0o MM moveto (O) show
         x00 xdif 2 mul add MM y0u MM moveto (Y) show
         x00 xdif 3 mul add MM y0o MM moveto (Y) show
         x00 xdif 3 mul add MM y0u MM moveto (O) show
         x00 xdif 4 mul add MM y0o MM moveto (M) show
         x00 xdif 4 mul add MM y0u MM moveto (L) show
         x00 xdif 5 mul add MM y0o MM moveto (C) show
         x00 xdif 5 mul add MM y0u MM moveto (V) show

         x0l MM y00 ydif 0 mul add MM moveto (V) show
         x0r MM y00 ydif 0 mul add MM moveto (C) show
         x0l MM y00 ydif 1 mul add MM moveto (L) show
         x0r MM y00 ydif 1 mul add MM moveto (M) show
         x0l MM y00 ydif 2 mul add MM moveto (O) show
         x0r MM y00 ydif 2 mul add MM moveto (Y) show
         x0l MM y00 ydif 3 mul add MM moveto (Y) show
         x0r MM y00 ydif 3 mul add MM moveto (O) show
         x0l MM y00 ydif 4 mul add MM moveto (M) show
         x0r MM y00 ydif 4 mul add MM moveto (L) show
         x0l MM y00 ydif 5 mul add MM moveto (C) show
         x0r MM y00 ydif 5 mul add MM moveto (V) show
        } if

       } for %i=0,16

0 1 10 {/j0 exch def /j1 j0 1 add def %j0
 
         j0 0 eq {tzccmy0* setcmykcolor} if
         j0 1 eq {0 setgray} if
         j0 2 eq {tzmcmy0* setcmykcolor} if
         j0 3 eq {0 setgray} if
         j0 4 eq {tzycmy0* setcmykcolor} if
         j0 5 eq {0 setgray} if
         j0 6 eq {tzocmy0* setcmykcolor} if
         j0 7 eq {0 setgray} if
         j0 8 eq {tzlcmy0* setcmykcolor} if
         j0 9 eq {0 setgray} if
         j0 10 eq {tzvcmy0* setcmykcolor} if

12 4 16 {/i exch def /i0 i def %i=0,16
%0 4 16 {/i exch def /i0 i def %i=0,16
        /i1 i0 1 add def /i2 i0 2 add def /i3 i0 3 add def

i 16 eq {0.30 MM setlinewidth} {0.15 MM setlinewidth} ifelse         

x i0 get d i0 get add 16 j0 mul add MM y i0 get MM moveto
x i0 get d i0 get add 16 j1 mul add MM y i0 get MM lineto stroke

x i1 get MM y i1 get d i1 get add 16 j0 mul add MM moveto
x i1 get MM y i1 get d i1 get add 16 j1 mul add MM lineto stroke

x i2 get d i2 get add 16 j0 mul sub MM y i2 get MM moveto
x i2 get d i2 get add 16 j1 mul sub MM y i2 get MM lineto stroke

x i3 get MM y i3 get d i3 get add 16 j0 mul sub MM moveto
x i3 get MM y i3 get d i3 get add 16 j1 mul sub MM lineto stroke

       } for %i=0,16

       } for %j0

0.15 MM setlinewidth
/s 7 MM def /s1 8 MM def /s5 36 MM def
16 1 20 {/j exch def /j0 j 16 sub def %j=16,20
         /ix0 xlu  8 MM add j0 7 MM mul add def /iy0 ylu 8 MM sub def

0 1 3 {/ij exch def %ij=0,3

 ij 0 eq {/ix0 xlu  8 MM add j0 7 MM mul add def /iy0 ylu 8 MM sub def} if
 ij 1 eq {/ix0 xru 43 MM sub j0 7 MM mul add def /iy0 yru 8 MM sub def} if
 ij 2 eq {/ix0 xlo  8 MM add j0 7 MM mul add def /iy0 ylo 1 MM add def} if
 ij 3 eq {/ix0 xro 43 MM sub j0 7 MM mul add def /iy0 yro 1 MM add def} if

i*ptrsc 0 eq i*ptrsc 2 eq or {%i*ptrsc=0,2 cmy0* setcmykcolor
              j 16 eq {tzan j get dup dup 0 setcmykcolor
                       ix0 0.5 MM sub iy0 0.5 MM sub s5 s1 rec fill} if
              tzan j get dup dup 0 setcmykcolor
              ix0 iy0 s s  rec fill
             } if %i*ptrsc=0,2
             
i*ptrsc 1 eq i*ptrsc 3 eq or {%i*ptrsc=1,3 www* setrgbcolor
              j 16 eq {1 tzan j get 1 sub dup dup setrgbcolor %N
                       ix0 0.5 MM sub iy0 0.5 MM sub s5 s1 rec fill} if
              1 tzan j get sub dup dup setrgbcolor %N
              ix0 iy0 s s  rec fill
             } if %i*ptrsc=1,3
             
i*ptrsc 4 eq i*ptrsc 5 eq or {%i*ptrsc=4,5
  [/CIEBasedABC <<    %Farbraum und Grenzen fuer D65
  /RangeABC [0 100 -128 127 -128 127]
  /DecodeABC [{16 add 116 div} bind {500 div} bind {200 div} bind]
  /MatrixABC [1 1 1 1 0 0 0 0 -1]
  /DecodeLMN
    [{dup 6 29 div ge {dup dup mul mul}
     {4 29 div sub 108 841 div mul} ifelse 0.9505 mul} bind
     {dup 6 29 div ge {dup dup mul mul}
     {4 29 div sub 108 841 div mul} ifelse} bind
     {dup 6 29 div ge {dup dup mul mul}
     {4 29 div sub 108 841 div mul} ifelse 1.0890 mul} bind]
    /WhitePoint  [0.9505 1 1.089]                %CIEXYZ fuer D65
 >>] setcolorspace

 j 16 eq {tznLAB* 0 get tzwLAB* 0 get tznLAB* 0 get sub 0.25 j0 mul mul add
          tznLAB* 1 get tzwLAB* 1 get tznLAB* 1 get sub 0.25 j0 mul mul add
          tznLAB* 2 get tzwLAB* 2 get tznLAB* 2 get sub 0.25 j0 mul mul add
          setcolor %N
          ix0 0.5 MM sub iy0 0.5 MM sub s5 s1 rec fill} if
          tznLAB* 0 get tzwLAB* 0 get tznLAB* 0 get sub 0.25 j0 mul mul add
          tznLAB* 1 get tzwLAB* 1 get tznLAB* 1 get sub 0.25 j0 mul mul add
          tznLAB* 2 get tzwLAB* 2 get tznLAB* 2 get sub 0.25 j0 mul mul add
          setcolor %N
          ix0 iy0 s s  rec fill
             } if %i*ptrsc=4,5

i*ptrsc 6 eq {%i*ptrsc=6 000n* setcmykcolor
              j 16 eq {0 0 0 tzan j get setcmykcolor
                       ix0 0.5 MM sub iy0 0.5 MM sub s5 s1 rec fill} if
              0 0 0 tzan j get setcmykcolor
              ix0 iy0 s s  rec fill
             } if %i*ptrsc=6

i*ptrsc 7 eq {%i*ptrsc=7 w* setgray
              j 16 eq {1 tzan j get sub setgray
                       ix0 0.5 MM sub iy0 0.5 MM sub s5 s1 rec fill} if
              1 tzan j get sub setgray
              ix0 iy0 s s  rec fill
             } if %i*ptrsc=7

      } for %ij=0,3

        } for %j=16,20
                                                      
0 setgray
018 MM 008.2 MM moveto 6 /Times-Roman FS (-8) show
018 MM 006.2 MM moveto 6 /Times-Roman FS (-6) show

276 MM 008.2 MM moveto 6 /Times-Roman FS (-8) show
276 MM 006.2 MM moveto 6 /Times-Roman FS (-6) show

018 MM 202.2 MM moveto 6 /Times-Roman FS (-8) show
018 MM 204.2 MM moveto 6 /Times-Roman FS (-6) show

276 MM 202.2 MM moveto 6 /Times-Roman FS (-8) show
276 MM 204.2 MM moveto 6 /Times-Roman FS (-6) show

0 setgray
12 /Times-ISOL1 FS
61 MM 13 MM  moveto
(TUB\255Pr\374fvorlage NG39; Richter: Computergrafik und Farbmetrik) showde
(TUB\255test chart NG39; Richter: Computer graphics, colorimetry) showen

12 /Times-ISOL1 FS
61 MM 09 MM  moveto
(Farbbuchserien: Farbmetrische Tabellen und Berechnungen Nr. 1) showde
(Colour book series: colorimetric tables and calculations no. 1) showen

175 MM 13 MM moveto
(input: ) showen
(Eingabe: ) showde
12 /TimesI-ISOL1 FS
(rgb setrgbcolor) show

12 /Times-ISOL1 FS
175 MM 9 MM moveto
(output: ) showen
(Ausgabe: ) showde

LSC$ (N) eq {%LSC$=N
12 /Times-ISOL1 FS
xchart 1 le {(no colour data change) showen
             (keine Farbdaten\344nderung) showde}
            {12 /TimesI-ISOL1 FS (->cmy0 setcmykcolor) show
             12 /Times-ISOL1 FS} ifelse
             } if %LSC$=N

%1 setgray %start white and unvisible
LSC$ (S) eq {
(Startup (S) data dependend) show
            } if
                 
LSC$ (F) eq {
12 /Times-Italic FS
             i*ptrsc 0 eq {(cmy0* / 000n* setcmykcolor) show} if
             i*ptrsc 1 eq {(olv* setrgbcolor / w* setgray) show} if
             i*ptrsc 2 eq {(cmy0* / nnn0* setcmykcolor) show} if
             i*ptrsc 3 eq {(olv* / www* setrgbcolor) show} if
             i*ptrsc 4 eq {(lab* setcolor) show} if
             i*ptrsc 5 eq {(LAB* setcolor) show} if
             i*ptrsc 6 eq {(000n* setcmykcolor) show} if
             i*ptrsc 7 eq {(w* setgray) show} if
            } if
%0 setgray %end white and unvisible

12 /Times-ISOL1 FS

 62 MM 198.5 MM  moveto
(http://130.149.60.45/~farbmetrik/NG39/NG39L) show
(0) show
LSC$ show LEX$ show

%1 setgray %start white and unvisible
(; ) show
LSC$ (N) eq {
(Start\255Ausgabe) showde
(start output) showen
(start output) showes
(start output) showfr
(start output) showit
(start output) showjp
(start output) showm
           } if
LSC$ (C) eq {
(Start\255Ausgabe) showde
(start output) showen
(start output) showes
(start output) showfr
(start output) showit
(start output) showjp
(start output) showm
           } if
LSC$ (F) eq {
(Linearisierte\255Ausgabe) showde
(linearized output) showen
(linearized output) showes
(linearized output) showfr
(linearized output) showit
(linearized output) showjp
(linearized output) showm
           } if

 62 MM 194 MM  moveto
LSC$ (N) eq LSC$ (C) eq or {
(N: Keine Ausgabe\255Linearisierung (OL) in Datei (F), Startup (S), Ger\344t (D)) showde
(N: No Output Linearization (OL) data in File (F), Startup (S) or Device (D)) showen
(N: No Output Linearization (OL) data in File (F), Startup (S) or Device (D)) showes
(N: No Output Linearization (OL) data in File (F), Startup (S) or Device (D)) showfr
(N: No Output Linearization (OL) data in File (F), Startup (S) or Device (D)) showit
(N: No Output Linearization (OL) data in File (F), Startup (S) or Device (D)) showjp
(N: No Output Linearization (OL) data in File (F), Startup (S) or Device (D)) showm
           }
           {LSC$ show (: ) show
(Ausgabe\255Linearisierung (OL\255Daten) ) showde
(Output Linearization (OL) data ) showen
(Output Linearization (OL) data ) showes
(Output Linearization (OL) data ) showfr
(Output Linearization (OL) data ) showit
(Output Linearization (OL) data ) showjp
(Output Linearization (OL) data ) showm
(NG39/NG39L) show
LSS$ show LSX$ show (0) show
LSC$ show LEY$ show
          } ifelse
LSC$ (F) eq {
( in der Datei (F)) showde
( in File (F)) showen
( in File (F)) showes
( in File (F)) showfr
( in File (F)) showit
( in File (F)) showjp
( in File (F)) showm
           } if
LSC$ (S) eq {
( im Distiller Startup (S) Directory) showde
( in Distiller Startup (S) Directory) showen
( in Distiller Startup (S) Directory) showes
( in Distiller Startup (S) Directory) showfr
( in Distiller Startup (S) Directory) showit
( in Distiller Startup (S) Directory) showjp
( in Distiller Startup (S) Directory) showm
           } if
LSC$ (D) eq {
( in PostScript Device (D)) showde
( in PostScript Device (D)) showen
( in PostScript Device (D)) showes
( in PostScript Device (D)) showfr
( in PostScript Device (D)) showit
( in PostScript Device (D)) showjp
( in PostScript Device (D)) showm
           } if
LSC$ (T) eq {
( von Distiller Startup (S) Directory) showde
( of Distiller Startup (S) Directory) showen
( of Distiller Startup (S) Directory) showes
( of Distiller Startup (S) Directory) showfr
( of Distiller Startup (S) Directory) showit
( of Distiller Startup (S) Directory) showjp
( of Distiller Startup (S) Directory) showm
           } if
LSC$ (E) eq {
( von PostScript Device (D)) showde
( of PostScript Device (D)) showen
( of PostScript Device (D)) showes
( of PostScript Device (D)) showfr
( of PostScript Device (D)) showit
( of PostScript Device (D)) showjp
( of PostScript Device (D)) showm
           } if
%0 setgray %end white and unvisible

 16 MM 185 MM moveto
-90 rotate
(Siehe Original/Kopie: ) showde
(See original or copy: ) showen
(http://web.me.com/klaus.richter/NG39/NG39L) show
(0) show
LSC$ show LEX$ show
90 rotate

 12 MM 185 MM moveto
-90 rotate
(Technische Information: ) showde
(Technical information: ) showen
(http://www.ps.bam.de) show
( or ) showen ( oder ) showde
(http://130.149.60.45/~farbmetrik) show
 90 rotate

281 MM 185 MM moveto
-90 rotate
(TUB\255Registrierung: 20101101\255NG39/NG39L) showde
(TUB registration: 20101101\255NG39/NG39L) showen
(0) show
LSC$ show LEX$ show
90 rotate

281 MM 74 MM moveto
-90 rotate
(TUB\255Material: Code=rha4ta) showde
(TUB material: code=rha4ta) showen
90 rotate

277 MM 185 MM moveto
-90 rotate
/cvishow {cvi 6 string cvs show} def
/cvsshow1 {10 mul cvi 0.1 mul 7 string cvs show} def

( Anwendung f\374r Messung von Drucker- oder Monitorsystemen) showde
( application for measurement of printer or monitor systems) showen
( application for measurement of printer or monitor systems) showes
( application for measurement of printer or monitor systems) showfr
( application for measurement of printer or monitor systems) showit
( application for measurement of printer or monitor systems) showjp
( application for measurement of printer or monitor systems) showm

IMES 1 eq LSC$ (N) ne and { %IMES=1
             (, Yr=) show Yre cvsshow1 (, XYZ) show
          } if %IMES=1
90 rotate

/i0 8 def
/i1 i0 1 add def /i2 i0 2 add def /i3 i0 3 add def
0.30 MM setlinewidth
0 setgray
x i0 get MM y i0 get MM moveto x i1 get MM y i1 get MM lineto
x i2 get MM y i2 get MM lineto x i3 get MM y i3 get MM lineto
x i0 get MM y i0 get MM lineto stroke


} if %end if xchart=0

/xlu1 013 MM def /ylu1 010 MM def
/xro1 283 MM def /yro1 200 MM def
/xlo1 013 MM def /ylo1 200 MM def
/xru1 283 MM def /yru1 010 MM def

xlu1 4 MM sub ylu1 moveto  8 MM 0 rlineto stroke
xlu1 ylu1 4 MM sub moveto 0  8 MM rlineto stroke
xro1 4 MM add yro1 moveto -8 MM 0 rlineto stroke
xro1 yro1 4 MM add moveto 0 -8 MM rlineto stroke

xru1 4 MM sub yru1 moveto  8 MM 0 rlineto stroke
xru1 yru1 4 MM sub moveto 0  8 MM rlineto stroke
xlo1 4 MM add ylo1 moveto -8 MM 0 rlineto stroke
xlo1 ylo1 4 MM add moveto 0 -8 MM rlineto stroke


%} for %output with xchart end
%} for %output with colorm end
%} for %output with xcolor end
%} for %output with lanind end

%%Trailer

%%EndDocument
EndEPSF grestore gsave
                                                        
showpage
grestore

%} for %end for xchartg=xchartg1,xchartg2
%} for %end for pcountg=pcountg1,pcount2g
%} for %end for scountg=scountg1,scount2g

%%Trailer