%!PS-Adobe-3.0 EPSF-3.0 DGD50-5N D4:[rr.b9n]B9170-5N.eps 12.11.98/210501 %%BoundingBox: 70 80 415 206 %%Creator: K. Richter, BAM und TU Berlin 1997.03.15 % vergleiche K. Richter: Computergrafik und Farbmetrik: % Farbsysteme, PostScript, geraeteunabhaengige CIE-Farben % VDE-Verlag, Berlin, 1996, ISBN 3-8007-1775-1 mit CD-ROM % Buch und 500 Bilder in Formaten PS und PDF auf CD-ROM % % compare K. Richter: Computergrafik und Farbmetrik: % Farbsysteme, PostScript, geraeteunabhaengige CIE-Farben % VDE-Verlag, Berlin, 1996, ISBN 3-8007-1775-1 mit CD-ROM, % Book with 500 figures in the formats PS and PDF on CD-ROM, % For free download with 288 pages, 2,6MB, A5, in German, see % http://color.li.tu-berlin.de/BUA4BF.PDF % or K. Richter: Colour, Colour Vision, and Elementary Colours % and Colour Information Technology, % in six languages: EN, GE ,FR ,ES, IT, NO, see 76 pages % http://standards.iso.org/iso/9241/306/ed-2/ES15.PDF /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def /str {8 string } bind def /A4querL {598 0 translate 90 rotate} 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 /Courier findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /Courier-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 /TV {150 /Times-ISOL1 FS} bind def /TS {200 /Times-ISOL1 FS} bind def /TK {250 /Times-ISOL1 FS} bind def /TM {300 /Times-ISOL1 FS} bind def /TG {350 /Times-ISOL1 FS} bind def /TIV {150 /TimesI-ISOL1 FS} bind def /TIS {200 /TimesI-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 /TBV {150 /TimesB-ISOL1 FS} bind def /TBS {200 /TimesB-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 /TBIV {150 /TimesBI-ISOL1 FS} bind def /TBIS {200 /TimesBI-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 /RV {150 /Times-Roman FS} bind def /RS {200 /Times-Roman FS} bind def /RK {250 /Times-Roman FS} bind def /RM {300 /Times-Roman FS} bind def /RG {350 /Times-Roman FS} bind def /RIV {150 /Times-Italic FS} bind def /RIS {200 /Times-Italic FS} bind def /RIK {250 /Times-Italic FS} bind def /RIM {300 /Times-Italic FS} bind def /RIG {350 /Times-Italic FS} bind def /RBV {150 /Times-Bold FS} bind def /RBS {200 /Times-Bold FS} bind def /RBK {250 /Times-Bold FS} bind def /RBM {300 /Times-Bold FS} bind def /RBG {350 /Times-Bold FS} bind def /RBIV {150 /Times-BoldItalic FS} bind def /RBIS {200 /Times-BoldItalic FS} bind def /RBIK {250 /Times-BoldItalic FS} bind def /RBIM {300 /Times-BoldItalic FS} bind def /RBIG {350 /Times-BoldItalic FS} bind def /SV {150 /Symbol FS} bind def /SS {200 /Symbol FS} bind def /SK {250 /Symbol FS} bind def /SM {300 /Symbol FS} bind def /SG {350 /Symbol FS} bind def /08RN {08 /Times-Roman FS} bind def /08RI {08 /Times-Italic FS} bind def /08RB {08 /Times-Bold FS} bind def /08RBI {08 /Times-BoldItalic FS} bind def /08TN {08 /Times-ISOL1 FS} bind def /08TI {08 /TimesI-ISOL1 FS} bind def /08TB {08 /TimesB-ISOL1 FS} bind def /08TBI {08 /TimesBI-ISOL1 FS} bind def /10RN {10 /Times-Roman FS} bind def /10RI {10 /Times-Italic FS} bind def /10RB {10 /Times-Bold FS} bind def /10RBI {10 /Times-BoldItalic FS} bind def /10TN {10 /Times-ISOL1 FS} bind def /10TI {10 /TimesI-ISOL1 FS} bind def /10TB {10 /TimesB-ISOL1 FS} bind def /10TBI {10 /TimesBI-ISOL1 FS} bind def /12RN {12 /Times-Roman FS} bind def /12RI {12 /Times-Italic FS} bind def /12RB {12 /Times-Bold FS} bind def /12RBI {12 /Times-BoldItalic FS} bind def /12TN {12 /Times-ISOL1 FS} bind def /12TI {12 /TimesI-ISOL1 FS} bind def /12TB {12 /TimesB-ISOL1 FS} bind def /12TBI {12 /TimesBI-ISOL1 FS} bind def /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 /tyo {1.0 0.0 0.0} bind def %reproduction colours /tyl {0.0 1.0 0.0} bind def /tyv {0.0 0.0 1.0} bind def /tyc {0.0 1.0 1.0} bind def /tym {1.0 0.0 1.0} bind def /tyy {1.0 1.0 0.0} bind def /tyn {0.00} bind def %grey scale /tyd {0.25} bind def /tyz {0.50} bind def /tyh {0.75} bind def /tyw {1.00} bind def /tro {tyo setrgbcolor} bind def /trl {tyl setrgbcolor} bind def /trv {tyv setrgbcolor} bind def /trc {tyc setrgbcolor} bind def /trm {tym setrgbcolor} bind def /try {tyy setrgbcolor} bind def /twn {tyn setgray} bind def /twd {tyd setgray} bind def /twz {tyz setgray} bind def /twh {tyh setgray} bind def /tww {tyw setgray} bind def /twan [0.000 0.067 0.132 0.200 0.267 0.333 0.400 0.467 0.533 0.600 0.667 0.733 0.800 0.867 0.933 1.000 0.000 0.250 0.500 0.750 1.000] def /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 /lanind 1 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 /showfr {2 lanind eq {show} {pop} ifelse} bind def /showes {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 /showea {1 lanind le {show} {pop} ifelse} bind def /showm {6 lanind eq {show} {pop} ifelse} bind def /lanind1 0 def /lanind2 0 def /lanindd 01 def /lanindm 01 def /lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def /lanindd laninddf def /lanindm lanindmf def} if /lanind lanind1 def %no loops %******************************************************************* %%EndProlog gsave 8 /Times-ISOL1 FS 72 83 moveto (DGD50-5, ) show %!2 (wrpos:B9150-5N.eps) show (Picture ) showen (Bild ) showde (Fig. ) showfr (Fig. ) showes (Fig. ) showit (Figur ) showjp (C2: ) show (5 visuell gleichabst\344ndige ) showde (5 visual equidistant ) showen (5 equidistante ) showes (5 paliers de gris ) showfr (5 equidistante ) showit (5 visuelle ekvidistante ) showjp 8 /TimesI-ISOL1 FS (L*) show 8 /Times-ISOL1 FS (\255Graustufen) showde (\255grey steps) showen (\351quidistants visuel) showfr ( pasos de gris) showes ( grigio passi) showit (\255gr\345trinn) showjp 8 /TimesI-ISOL1 FS ( + N0 + W1) show 8 /Times-ISOL1 FS 72 90 translate 0.01 MM dup scale 15 setlinewidth twz 0 0 moveto 12000 0 rlineto 0 4000 rlineto -12000 0 rlineto closepath fill twn 0 0 moveto 12000 0 rlineto 0 4000 rlineto -12000 0 rlineto closepath stroke %%%%%%%%%%% oberer Schriftzug %%%%%%%%%%%%%%%% tww 100 3600 moveto TBIG (L*) show -50 -100 rmoveto TBIK (CIELAB) show 100 3200 moveto TBIK ((absolut)) showde ((absolute)) showen ((absoluta)) showes ((absolu)) showfr ((absoluta)) showit ((absolutt)) showjp 100 600 moveto TBIG (l*) show -50 -100 rmoveto TBIK (CIELAB, r) show 100 200 moveto TBIK ((relativ)) showde ((relative)) showen ((relativa)) showes ((relative)) showfr ((relativo)) showit ((relativ)) showjp 1900 600 translate %untere Reihe um +200, +200 verschoben bei dx=1000 von 1400 twn /ntu [(0,000) (0,067) (0,133) (0,200) (0,267) (0,333) (0,400) (0,467) (0,533) (0,600) (0,667) (0,733) (0,800) (0,867) (0,933) (1,000) (0,000) (0,250) (0,500) (0,750) (1,000)] def /nto [(18,0) (23,2) (28,4) (33,6) (38,8) (44,0) (49,2) (54,4) (59,6) (64,8) (70,0) (75,2) (80,4) (85,6) (90,8) (96,0) (18,0) (37,5) (57,0) (76,5) (96,0)] def TBM tww /iy0 0 def 0 1 06 {/j exch def /ix0 j 1400 mul def ix0 100 add iy0 300 sub moveto j 4 le {ntu 16 j add get show} if 5 j eq {-150 0 rmoveto TBIM (N) show 0 -50 rmoveto TBIK (0) show 50 50 rmoveto TBIM ((min.)) show 100 0 rmoveto } if 6 j eq {-150 0 rmoveto TBIM (W) show 0 -50 rmoveto TBIK (1) show 50 50 rmoveto TBIM ((max.)) show 100 0 rmoveto } if } for %j /iy0 3050 def 0 1 06 {/j exch def /ix0 100 j 1400 mul add def ix0 iy0 moveto j 4 le {nto 16 j add get show} if 5 j eq {-150 0 rmoveto TBIM (N) show 0 -50 rmoveto TBIK (0) show 50 50 rmoveto TBIM ((min.)) show 100 0 rmoveto} if 6 j eq {-150 0 rmoveto TBIM (W) show 0 -50 rmoveto TBIK (1) show 50 50 rmoveto TBIM ((max.)) show 100 0 rmoveto} if } for %j TBG twn /iy0 0 def /s 1000 def 0 1 06 {/j exch def /ix0 j 1400 mul def ix0 iy0 s s j 4 le {twan 16 j add get} if 5 j eq {twan 0 get} if 6 j eq {twan 15 get} if dup dup setrgbcolor rec fill j 2 eq { %mean grey ix0 iy0 s s 1.0 dup dup setrgbcolor rec stroke} if } for %j /s 1400 def /iy0 1500 def 0 1 06 {/j exch def /ix0 j 1400 mul 200 sub def ix0 iy0 s s j 4 le {twan 16 j add get} if 5 j eq {twan 0 get} if 6 j eq {twan 15 get} if dup dup setrgbcolor rec fill } for %j -1900 -600 translate grestore showpage %%Trailer