%!PS-Adobe-3.0 EPSF-3.0 DM98:Y10-7N.EPS  20030301
%%BoundingBox: 70 80 445 206

%START PDFDE011.EPS
/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 (PostScript pictures: Y10-7N.EPS)
  /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1)
  /Subject (goto: http://o2.ps.bam.de or http://www.ps.bam.de)
  /Keywords (image reproduction, colour devices)
  /Creator (klaus.richter@bam.de)
  /CreationDate (D:2003030112000)
  /ModDate (D:2003030112000)
/DOCINFO pdfmark
[ /View [ /FitB ]
/DOCVIEW pdfmark
%END  PDFDE011

%%Creator: K. Richter, BAM und TU Berlin, 2000.06.16
%%+Copyright (c) 1996 VDE-Verlag Berlin Offenbach

/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
 
/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
 
%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
 
/colrecfi %x y width heigth c m y n
  {setcmykcolor rec fill} bind def
 
/colrecst %x y width heigth c m y n
  {setcmykcolor rec stroke} bind def
 
/tzo {0.0 1.0 1.0 0.0} bind def %Reproduktionsfarben
/tzl {1.0 0.0 1.0 0.0} bind def
/tzv {1.0 1.0 0.0 0.0} bind def
/tzc {1.0 0.0 0.0 0.0} bind def
/tzm {0.0 1.0 0.0 0.0} bind def
/tzy {0.0 0.0 1.0 0.0} bind def

/tzn {0.0 0.0 0.0 1.00} bind def %Graureihe
/tzd {0.0 0.0 0.0 0.75} bind def
/tzz {0.0 0.0 0.0 0.50} bind def
/tzh {0.0 0.0 0.0 0.25} bind def
/tzw {0.0 0.0 0.0 0.00} bind def

/tzr {0.0 1.0 0.5 0.0} bind def %Elementarfarben
/tzg {1.0 0.0 0.5 0.0} bind def
/tzb {1.0 0.5 0.0 0.0} bind def
/tzj {0.0 0.0 1.0 0.0} bind def

/tzrz {0.0 1.0 0.5 0.5} bind def %Elementarfarben vergraut
/tzgz {1.0 0.0 0.5 0.5} bind def
/tzbz {1.0 0.5 0.0 0.5} bind def
/tzjz {0.0 0.0 1.0 0.5} bind def

/tfo {tzo setcmykcolor} bind def
/tfl {tzl setcmykcolor} bind def
/tfv {tzv setcmykcolor} bind def
/tfc {tzc setcmykcolor} bind def
/tfm {tzm setcmykcolor} bind def
/tfy {tzy setcmykcolor} bind def

/tfn {tzn setcmykcolor} bind def
/tfd {tzd setcmykcolor} bind def
/tfz {tzz setcmykcolor} bind def
/tfh {tzh setcmykcolor} bind def
/tfw {tzw setcmykcolor} bind def

/tfr {tzr setcmykcolor} bind def
/tfg {tzg setcmykcolor} bind def
/tfb {tzb setcmykcolor} bind def
/tfj {tzj setcmykcolor} bind def

/tfrz {tzrz setcmykcolor} bind def
/tfgz {tzgz setcmykcolor} bind def
/tfbz {tzbz setcmykcolor} bind def
/tfjz {tzjz setcmykcolor} bind def

%ANFA OUTLINO0 951204 
/pixf 1.0 def /ueg {1.6 pixf mul} bind def
/uek {0.8 pixf mul} bind def /ues {0.7 pixf mul} bind def
/pxd uek def /pyd uek def /pxwd ueg def /pywd ueg def
 
/outxshowf {show} bind def
 
/outxshow {show} bind def

/SK {250 16.67 div 1 sub pixf mul /Symbol FS} bind def
/SM {300 16.67 div 1 sub pixf mul /Symbol FS} bind def
/SG {350 16.67 div 1 sub pixf mul /Symbol FS} bind def

/outSK {250 16.67 div 1 sub pixf mul /Symbol FS outxshow} bind def
/outSM {300 16.67 div 1 sub pixf mul /Symbol FS outxshow} bind def
/outSG {350 16.67 div 1 sub pixf mul /Symbol FS outxshow} bind def
 
/outshowf {setcmykcolor show} bind def

/outrecfi { %x y width heigth c m y k
   setcmykcolor rec fill} bind def
 
/outrecfi4 { %x y width heigth c m y k
  outrecfi} bind def

/outrecfi3 { %x y width heigth c m y k
  outrecfi} bind def

/outrecfi2 { %x y width heigth c m y k
  outrecfi} bind def

/outlinetos { %px py c m y k
   setcmykcolor lineto stroke} bind def

/outstroke { %px1 py1 curveto ... curveto c m y k
   setcmykcolor stroke} bind def
            
%%EndProlog
gsave
 
%LANINDL0.EPS 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
/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 %no loops
/xcolor xcolor1 def
/xchart xchart1 def
%LANINDL0 END

/RK8   {8 /Times-Roman FS} bind def
/RIK8  {8 /Times-Italic FS} bind def
/RBK8  {8 /Times-Bold FS} bind def
/RBIK8 {8 /Times-BoldItalic FS} bind def

/TS8   {6 /Times-ISOL1 FS} bind def
/TK8   {8 /Times-ISOL1 FS} bind def
/TIK8  {8 /TimesI-ISOL1 FS} bind def
/TBK8  {8 /TimesB-ISOL1 FS} bind def
/TBIK8 {8 /TimesBI-ISOL1 FS} bind def

RK8 
72 83 moveto
%!2    (wrpos:Y10-7N.eps) show

TK8
(Bild D3: 14 CIE\255Pr\374ffarben ) showde
(Picture D3: 14 CIE\255test colours ) showen
(Fig. D3: 14 CIE test couleurs ) showfr
(Fig. D3: CIE 14 colores del test ) showes
(Fig. D3: 14 prova colori CIE ) showit
(Figur D3: 14 CIE\255test colours ) showjp

(sowie 2 + 16 Graustufen (sf); ) showde
(and 2 + 16 grey steps (sf); ) showen
(et 2 + 16 paliers de gris (sf); ) showfr
(y 2 + 16 pasos de gris (sf); ) showes
(e 2 + 16 grigio passi (sf); ) showit
(og 2 + 16 gr\345trinn (sf); ) showjp

TIK8 (PS) show
RK8 (-) showde (Operator) showde
( operator:) showen
( operator:) showes
TK8
( op\351rateur :) showfr
( operator:) showit
( operator:) showjp

TIK8
( cmy0* setcmykcolor (only)) show
TK8
                                                                        
72 90 translate

/pixf 16.67 def
0.1667 pixf div MM dup scale

15 setlinewidth

/adl_cmy* [ %Begin adl_cmy*; L=Linear model data 16 grey and 16 CIE-TC
00 255.0 255.0 255.0 %L 0.0000 cmy*PR18/TV18
01 238.0 238.0 238.0 %L 0.0667 cmy*PR18/TV18
02 221.0 221.0 221.0 %L 0.1333 cmy*PR18/TV18
03 204.0 204.0 204.0 %L 0.2000 cmy*PR18/TV18
04 187.0 187.0 187.0 %L 0.2667 cmy*PR18/TV18
05 170.0 170.0 170.0 %L 0.3333 cmy*PR18/TV18
06 153.0 153.0 153.0 %L 0.4000 cmy*PR18/TV18
07 136.0 136.0 136.0 %L 0.4667 cmy*PR18/TV18
08 117.0 119.0 119.0 %L 0.5333 cmy*PR18/TV18
09 102.0 102.0 102.0 %L 0.6000 cmy*PR18/TV18
10  85.0  85.0  85.0 %L 0.6667 cmy*PR18/TV18
11  68.0  68.0  68.0 %L 0.7333 cmy*PR18/TV18
12  51.0  51.0  51.0 %L 0.8000 cmy*PR18/TV18
13  34.0  34.0  34.0 %L 0.8667 cmy*PR18/TV18
14  17.0  17.0  17.0 %L 0.9333 cmy*PR18/TV18
15   0.0   0.0   0.0 %L 1.0000 cmy*PR18/TV18
16  70.8 137.9 120.5 %L no. 01 cmy*PR18/CIETC
17 102.6 114.7 181.7 %L no. 02 cmy*PR18/CIETC
18 132.7  65.4 223.5 %L no. 03 cmy*PR18/CIETC
19 174.1  33.1 159.1 %L no. 04 cmy*PR18/CIETC
20 165.4  52.0  80.5 %L no. 05 cmy*PR18/CIETC
21 167.1  78.0  -8.8 %L no. 06 cmy*PR18/CIETC
22 124.8 130.6 -29.0 %L no. 07 cmy*PR18/CIETC
23  78.8 139.2  -2.7 %L no. 08 cmy*PR18/CIETC
24  49.2 267.3 197.0 %L no. 09 cmy*PR18/CIETC
25  23.1  42.6 220.2 %L no. 10 cmy*PR18/CIETC
26 230.6  34.1 182.2 %L no. 11 cmy*PR18/CIETC
27 295.7 165.2  28.5 %L no. 12 cmy*PR18/CIETC
28  17.9  68.1  88.5 %L no. 13 cmy*PR18/CIETC
29 197.8 149.1 243.6 %L no. 14 cmy*PR18/CIETC
30 255.0 255.0 255.0 %L 1.0000 cmy*PR18/N
31   0.0   0.0   0.0 %L 0.0000 cmy*PR18/W
] def %End adl_cmy*

/s 700 def  /xw 755 def  /yw 1150 def   % Quadratseite und Abstaende

%%%%   Def. eines Quadrates fuer die Ausgabe der Farbflaechen    %%%
/colRec {moveto s 0 rlineto 0 s rlineto s neg 0 rlineto %Quadrat
  closepath} bind def
                                           
/iz7 7 def /iz74 iz7 4 mul def
/iz741 iz74 1 add def /iz742 iz74 2 add def /iz743 iz74 3 add def
/iz8 8 def /iz84 iz8 4 mul def
/iz841 iz84 1 add def /iz842 iz84 2 add def /iz843 iz84 3 add def


/tfz {adl_cmy* iz741 get adl_cmy* iz841 get add 0.5 mul 255 div
      adl_cmy* iz742 get adl_cmy* iz842 get add 0.5 mul 255 div
      adl_cmy* iz743 get adl_cmy* iz843 get add 0.5 mul 255 div
      0 setcmykcolor} def

/tfn {1.000 1.000 1.000 0.000 setcmykcolor} def  %N
/tfw {0.000 0.000 0.000 0.000 setcmykcolor} def  %W


tfz
0 0  moveto 13000 0 rlineto 0 4000 rlineto
           -13000 0 rlineto closepath fill

0 setgray
0 0  moveto 13000 0 rlineto 0 4000 rlineto
           -13000 0 rlineto closepath stroke

350 150 translate

/n* [(16) (15) (14) (13) (12) (11) (10) ( 9)
     ( 8) ( 7) ( 6) ( 5) ( 4) ( 3) ( 2) ( 1)] def

TBM
25 setlinewidth
/s 770 def /s1 770 def /s2 670 def  
0 setgray
0 1 16 {/j exch def /ix0 j s1 mul def %j
        ix0 1600 moveto 0 500 rlineto stroke
       } for %j
15 setlinewidth        

0 1 15 {/j exch def /ix00 j s1 mul def
        /s s2 def
        /ix0 ix00 50 add def /iy0 2900 def

        /j4a j 4 mul def
        /j4c j 16 add 4 mul def

        adl_cmy* j4c 1 add get 255 div
        adl_cmy* j4c 2 add get 255 div
        adl_cmy* j4c 3 add get 255 div
        0 setcmykcolor
        ix0 iy0 colRec fill
       
        /s s1 def
        /ix0 ix00 def /iy0 2050 def

        adl_cmy* j4c 1 add get 255 div
        adl_cmy* j4c 2 add get 255 div 
        adl_cmy* j4c 3 add get 255 div
        0 setcmykcolor
        ix0 iy0 colRec fill

        0 setgray
        /ix0 ix00 def /iy0 1750 def
        ix0 250 add iy0 moveto
        n* 15 j sub get show

        /s s1 def
        /ix0 ix00 def /iy0 850 def
        adl_cmy* j4a 1 add get 255 div
        adl_cmy* j4a 2 add get 255 div
        adl_cmy* j4a 3 add get 255 div
        0 setcmykcolor
        ix0 iy0 colRec fill

        /s s2 def
        /ix0 ix00 50 add def /iy0  100 def
        adl_cmy* j4a 1 add get 255 div
        adl_cmy* j4a 2 add get 255 div
        adl_cmy* j4a 3 add get 255 div
        0 setcmykcolor
        ix0 iy0 colRec fill

       } for %j


-350 -150 translate

grestore

showpage
%%Trailer