%!PS-Adobe-3.0 EPSF-3.0 DM95:Y10-7N.EPS 20030301
%%BoundingBox: 50 80 780 360
%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: Y11-1N.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 {3 lanind eq {show} {pop} ifelse} bind def
/showfr {2 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 {3 lanind ne {pop} if} bind def
/popfr {2 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 3 lanind ne {n {pop} repeat} if} bind def
/popxfr {/n exch def 2 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 2 def /lanind2 2 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
% (4x2, DM95:Y10-7, ) show
72 80 moveto
TK8
(Bild B4 und D4: 16 gleichabst\344ndige Stufen ) showde
(Picture B4 and D4: 16 equidistant steps ) showen
(Fig. B4 y D4: 16 equidistante pasos ) showes
(Fig. B4 et D4 : 16 paliers \351quidistants ) showfr
(Fig. B4 e D4: 16 equidistante passi ) showit
(Figur B4 og D4: 16 equidistant steps ) showjp
RBIK8
(B4: W-C, W-M, W-Y ) show
TK8
(und ) showde
(and ) showen
(y ) showes
(et ) showfr
(i ) showit
(og ) showjp
RBIK8
(W-N; ) show
RBIK8
(D4: W-O, W-L, W-V ) show
TK8
(und ) showde
(and ) showen
(y ) showes
(et ) showfr
(i ) showit
(og ) showjp
RBIK8
(W-N(CMY); ) show
TIK8 (PS) show
RK8 (-Operators;) showde
( operators;) showen
( operators;) showes
TK8
( op\351rateurs;) showfr
( operators;) showit
( operators;) showjp
TK8
( B4:) show
RIK8
( LAB* setcolor;) show
TK8
( D4:) show
RIK8
( LAB* setcolor ) show
TK8
72 90 translate
0.01 MM 2 mul dup scale
/nshow {180 /TimesI-ISOL1 FS show} def
/ishow {140 /Times-ISOL1 FS -100 -75 rmoveto show 50 75 rmoveto} def
1 setgray
0 0 moveto 11200 0 rlineto 0 4000 rlineto
-11200 0 rlineto closepath fill
0 setgray
0 0 moveto 11200 0 rlineto 0 4000 rlineto
-11200 0 rlineto closepath stroke
/yab -850 def
000 3950 translate
/n* [(0) (1) (2) (3) (4) (5) (6) (7)
(8) (9) (A) (B) (C) (D) (E) (F)] def
/tef [(O) (L) (V) (N)] def
/tex [(LAB*) (LAB*) (LAB*) (LAB*)] def
0 setgray
0 1 16 {/j exch def /ix0 j 700 mul def /iy0 -850 def %j=0,16
ix0 25 add iy0 3100 sub moveto
000 4000 rlineto -50 000 rlineto
000 -4000 rlineto closepath fill
} for %j=0,16
/GSC$ where {pop /LSC$ GSC$ def}
{/LSC$ (N) def} ifelse
0 1 3 {/ncol exch def %ncol=0,3
0 yab translate
/l 0 def
/iLAB 0 def
0 1 15 {/j exch def /ix0 15 j sub 700 mul def /iy0 0 def
j 15 le { %16 Testfarben; Nr. 16 fuer weisse Linie
[/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
/ISYSLAB where {pop} {/ISYSLAB 0 def} ifelse
/ISYSTEM where {pop} {/ISYSTEM 0 def} ifelse
ISYSLAB 0 eq {0 ncol eq {/LABs0X [29.93 65.39 50.52] def} if %O
1 ncol eq {/LABs0X [32.89 -62.83 34.96] def} if %L
2 ncol eq {/LABs0X [ 7.71 31.10 -44.40] def} if %V
3 ncol eq {/LABs0X [00.00 0.00 0.00] def} if %N
/LABs0W [77.40 0.00 0.00] def %LABW100
/L*NN 18.01 def /A*NN 0.5 def /B*NN -0.46 def
/L*WW 95.41 def /A*WW -0.98 def /B*WW 4.76 def
} if
ISYSLAB 1 eq {0 ncol eq {/LABs0X [50.49 76.92 64.55] def} if %O
1 ncol eq {/LABs0X [83.62 -82.75 79.90] def} if %L
2 ncol eq {/LABs0X [25.71 31.45 -44.29] def} if %V
3 ncol eq {/LABs0X [00.00 0.00 0.00] def} if %N
/LABs0W [95.40 0.00 0.00] def %LABW100
/L*NN 18.00 def /A*NN 0.00 def /B*NN 0.00 def
/L*WW 95.40 def /A*WW 0.00 def /B*WW 0.00 def
} if
ISYSLAB 2 eq {0 ncol eq {/LABs0X [29.93 65.39 50.52] def} if %O
1 ncol eq {/LABs0X [32.89 -62.83 34.96] def} if %L
2 ncol eq {/LABs0X [ 7.71 31.10 -44.40] def} if %V
3 ncol eq {/LABs0X [00.00 0.00 0.00] def} if %N
/LABs0W [77.40 0.00 0.00] def %LABW100
/L*NN 18.01 def /A*NN 0.5 def /B*NN -0.46 def
/L*WW 95.41 def /A*WW -0.98 def /B*WW 4.76 def
} if
ISYSLAB 3 eq {0 ncol eq {/LABs0X [34.99 71.79 50.18] def} if %O
1 ncol eq {/LABs0X [66.29 -79.08 74.11] def} if %L
2 ncol eq {/LABs0X [14.04 24.65 -37.54] def} if %V
3 ncol eq {/LABs0X [00.00 0.00 0.00] def} if %N
/LABs0W [77.70 0.00 0.00] def %LABW100
/L*NN 17.70 def /A*NN 0.00 def /B*NN 0.00 def
/L*WW 95.41 def /A*WW 0.00 def /B*WW 0.00 def
} if
/jmul j 15 div def
/LSs0 LABs0X 0 get LABs0W 0 get LABs0X 0 get sub
jmul mul add def
/LS* LSs0 18.01 add def
/l*CIE LS* L*NN sub L*WW L*NN sub 0.0001 add div def
/ASs0 LABs0X 1 get LABs0W 1 get LABs0X 1 get sub
jmul mul add def
/AS* ASs0 A*NN A*WW A*NN sub l*CIE mul add add def
/BSs0 LABs0X 2 get LABs0W 2 get LABs0X 2 get sub
jmul mul add def
/BS* BSs0 B*NN B*WW B*NN sub l*CIE mul add add def
LS* AS* BS*
setcolor
l 0 eq {/ixd 700 def /iyd 700 def %ixd,iyd
ix0 iy0 moveto
ixd 000 rlineto 000 iyd rlineto
ixd neg 000 rlineto closepath fill
} if %ixd,iyd
} if %16 Testfarben; Nr. 16 fuer weisse Linie
} for %j
0 setgray TBIG
11350 400 moveto tef ncol get show
TIK
11300 150 moveto tex ncol get show
0 setgray TBM
ncol 3 eq { %N
0 1 15 {/j exch def /ix0 250 j 700 mul add def /iy0 -400 def
ix0 iy0 moveto n* j get show
} for %j
} if %N
} for %ncol=0,3
000 -550 translate
1 setgray %change
0 3950 moveto 11200 0 rlineto 0 700 rlineto
-11200 0 rlineto closepath fill
0 setgray
0 3950 moveto 11200 0 rlineto 0 700 rlineto
-11200 0 rlineto closepath stroke
0 25 add 3950 moveto
0 700 rlineto -50 0 rlineto
0 -700 rlineto closepath fill
11200 25 add 3950 moveto
0 700 rlineto -50 0 rlineto
0 -700 rlineto closepath fill
0 1 7 {/j exch def %8 black squares
0 j 1400 mul add 3950 moveto 700 0 rlineto 0 700 rlineto
-700 0 rlineto closepath fill
} for %8 black squares
showpage
%%Trailer