%!PS-Adobe-3.0 EPSF-3.0 http://farbe.li.tu-berlin.de/AES4/AES4L00XX.PS 20201101 %%BoundingBox: 07 04 414 292 /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: http://farbe.li.tu-berlin.de/AES4/AES4.HTM) /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1) /Subject (goto: http://farbe.li.tu-berlin.de http://130.149.60.45/~farbmetrik) /Keywords (image reproduction, colour devices) /Creator (klaus.richter@mac.com) /CreationDate (D:2020110112000) /ModDate (D:2020110112000) /DOCINFO pdfmark [ /View [ /Fit ] /DOCVIEW pdfmark %Y10E00NA.PS6 %line 20****************************************************** %BEG AES4/OUTLIN10.PS Emty 20120301 %END AES4/OUTLIN10.PS Emty 20120301 %BEG AES4/OUTLIN1X.PS 20110801 %EMPTY %END AES4/OUTLIN1X.PS 20110801 %BEG AES4/OUTLIN1Y2.PS Emty 20101101 %END AES4/OUTLIN1Y2.PS Emty 20101101 /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 % End for EPS file 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 /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 /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 /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 %%EndProlog %*********************************************************** %%BeginPageSetup /#copies 1 def %A4querF 0.5 0.5 scale /pgsave save def %%EndPageSetup /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)] def /SY$ [(0) (1) (2) (3) (4) (5) (6) (7) (8) (9) (A) (B) (C) (D) (E) (F)] def % 0 1 2 3 4 5 % 6 7 8 /EX$ [(1.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$ [(1.DAT) (B.DAT) (G.DAT) (H.DAT) (I.DAT) (J.DAT) (P.DAT) (T.DAT)] def %******************************************************************* /lanind1f 01 def /lanind2f 01 def /laninddf 01 def /lanindmf 01 def /colorm1f 00 def /colorm2f 00 def /colormdf 01 def /colormmf 01 def /deintp1f 00 def /deintp2f 00 def /deintpdf 01 def /deintpmf 01 def /xcolor1f 00 def /xcolor2f 00 def /xcolordf 01 def /xcolormf 01 def %2/10degree /xchart1f 00 def /xchart2f 00 def /xchartdf 01 def /xchartmf 01 def /xchart3f 01 def /xchart4f 00 def /xchart5f 00 def /pchart1f 00 def /pchart2f 00 def /pchartdf 01 def /pchartmf 01 def %=3:sRGB,Lr /colsep1f 00 def /colsep2f 00 def /colsepdf 01 def /colsepmf 01 def /pmetam1f 00 def /pmetam2f 00 def /pmetamdf 01 def /pmetammf 01 def %/lanindf lanind1f def % /lanindf lanind1f def %lanind1f laninddf lanind2f {/lanindf exch def %/colormf colorm1f def % /colormf colorm1f def %colorm1f colormdf colorm2f {/colormf exch def %/deintpf deintp1f def % /deintpf deintp1f def %deintp1f deintpdf deintp2f {/deintpf exch def %/xcolorf xcolor1f def % /xcolorf xcolor1f def %xcolor1f xcolordf xcolor2f {/xcolorf exch def %/xchartf xchart1f def % /xchartf xchart1f def %xchart1f xchartdf xchart2f {/xchartf exch def %/pchartf pchart1f def % /pchartf pchart1f def %/pchartf pchart1f def %pchart1f pchartdf pchart2f {/pchartf exch def %/colsepf colsep1f def % /colsepf colsep1f def %colsep1f colsepdf colsep2f {/colsepf exch def /lanind lanindf def /colorm colormf def /deintp deintpf def /xcolor xcolorf def /xchart xchartf def /xchartm xchart2f xchart1f sub 1 add def /xchart3 xchart3f def /xchart4 xchart4f def /pchart pchartf def /colsep colsepf def %/pmetamf pmetam1f def % /pmetamf pmetam1f def %pmetam1f pmetamdf pmetam2f {/pmetamf exch def /pmetam pmetamf def %************************************************************* %/setgray {sfgray} bind def %/setrgbcolor {sfrgbcolor} bind def %/setcmykcolor {sfcmykcolor} bind def %72 90 translate %0.01 MM dup scale %0 0 moveto 24600 0 rlineto 0 17220 rlineto % -24600 0 rlineto closepath stroke %000 -240 moveto %240 /Times-ISOL1 FS %lanindf cvishow (-) show %colormf cvishow %deintpf cvishow %xcolorf cvishow %xchartf cvishow %pchartf cvishow %colsepf cvishow (-F) show pmetamf cvishow %grestore gsave /GSS$ SS$ lanind get def /GSC$ SC$ colorm get def /GSX$ SX$ xcolor xcolor 16 idiv 16 mul sub get def /GSY$ SY$ xchart xchart 16 idiv 16 mul sub get def /GEX$ EX$ 0 get def /GEY$ EY$ 0 get def %01 %02 %03 %04 %05 %06 %07 %08 %09 %10 /12RN {12 /Times-Roman FS} bind def /10RN {10 /Times-Roman FS} bind def /12RI {12 /Times-Italic FS} bind def /10RI {10 /Times-Italic FS} bind def /12RB {12 /Times-Bold FS} bind def /10RB {10 /Times-Bold FS} bind def /12RBI {12 /Times-BoldItalic FS} bind def /10RBI {10 /Times-BoldItalic FS} bind def /12TN {12 /Times-ISOL1 FS} bind def /10TN {10 /Times-ISOL1 FS} bind def /12TI {12 /TimesI-ISOL1 FS} bind def /10TI {10 /TimesI-ISOL1 FS} bind def /12TB {12 /TimesB-ISOL1 FS} bind def /10TB {10 /TimesB-ISOL1 FS} bind def /12TBI {12 /TimesBI-ISOL1 FS} bind def /10TBI {10 /TimesBI-ISOL1 FS} bind 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 /SHSl 2 def /SHAl 2 def BeginEPSF 28 SHSl sub 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 AES40-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 (AES40-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 showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 86 SHAl add 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 AES40-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 (AES40-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 showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 28 SHSl sub 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 http://farbe.li.tu-berlin.de/AES4/AES40-3 %%BoundingBox: 71 84 421 330 %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: farbe.li.tu-berlin.de/AES4/AES4.HTM) /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1) /Subject (goto: http://farbe.li.tu-berlin.de http://130.149.60.45/~farbmetrik) /Keywords (image reproduction, colour devices) /Creator (klaus.richter@mac.com) /CreationDate (D:2020110112000) /ModDate (D:20201101112000) /DOCINFO pdfmark03 [ /View [ /Fit ] /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-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 %Umrechnung Inch -> mm /A4quer {598 0 translate 90 rotate} def /languagelevel where {pop languagelevel} {1} ifelse /PSL12 exch def /dictende {counttomark 2 idiv dup dict begin {def} repeat pop currentdict end} bind def %font0309.ps*********************************************** %special TK 250->240 /CW {100 /Courier-ISOL1 FS} bind def /CV {150 /Courier-ISOL1 FS} bind def /CS {200 /Courier-ISOL1 FS} bind def /CK {240 /Courier-ISOL1 FS} bind def /CM {300 /Courier-ISOL1 FS} bind def /CG {350 /Courier-ISOL1 FS} bind def /CBW {100 /CourierB-ISOL1 FS} bind def /CBV {150 /CourierB-ISOL1 FS} bind def /CBS {200 /CourierB-ISOL1 FS} bind def /CBK {240 /CourierB-ISOL1 FS} bind def /CBM {300 /CourierB-ISOL1 FS} bind def /CBG {350 /CourierB-ISOL1 FS} bind def /RW {100 /Times-Roman FS} bind def /RV {150 /Times-Roman FS} bind def /RS {200 /Times-Roman FS} bind def /RK {240 /Times-Roman FS} bind def /RM {300 /Times-Roman FS} bind def /RG {350 /Times-Roman FS} bind def /RIW {100 /Times-Italic FS} bind def /RIV {150 /Times-Italic FS} bind def /RIS {200 /Times-Italic FS} bind def /RIK {240 /Times-Italic FS} bind def /RIM {300 /Times-Italic FS} bind def /RIG {350 /Times-Italic FS} bind def /RBW {100 /Times-Bold FS} bind def /RBV {150 /Times-Bold FS} bind def /RBS {200 /Times-Bold FS} bind def /RBK {240 /Times-Bold FS} bind def /RBM {300 /Times-Bold FS} bind def /RBG {350 /Times-Bold FS} bind def /RBIW {100 /Times-BoldItalic FS} bind def /RBIV {150 /Times-BoldItalic FS} bind def /RBIS {200 /Times-BoldItalic FS} bind def /RBIK {240 /Times-BoldItalic FS} bind def /RBIM {300 /Times-BoldItalic FS} bind def /RBIG {350 /Times-BoldItalic FS} bind def /TW {100 /Times-ISOL1 FS} bind def /TV {150 /Times-ISOL1 FS} bind def /TS {200 /Times-ISOL1 FS} bind def /TK {240 /Times-ISOL1 FS} bind def /TM {300 /Times-ISOL1 FS} bind def /TG {350 /Times-ISOL1 FS} bind def /TIW {100 /TimesI-ISOL1 FS} bind def /TIV {150 /TimesI-ISOL1 FS} bind def /TIS {200 /TimesI-ISOL1 FS} bind def /TIK {240 /TimesI-ISOL1 FS} bind def /TIM {300 /TimesI-ISOL1 FS} bind def /TIG {350 /TimesI-ISOL1 FS} bind def /TBW {100 /TimesB-ISOL1 FS} bind def /TBV {150 /TimesB-ISOL1 FS} bind def /TBS {200 /TimesB-ISOL1 FS} bind def /TBK {240 /TimesB-ISOL1 FS} bind def /TBM {300 /TimesB-ISOL1 FS} bind def /TBG {350 /TimesB-ISOL1 FS} bind def /TBIW {100 /TimesBI-ISOL1 FS} bind def /TBIV {150 /TimesBI-ISOL1 FS} bind def /TBIS {200 /TimesBI-ISOL1 FS} bind def /TBIK {240 /TimesBI-ISOL1 FS} bind def /TBIM {300 /TimesBI-ISOL1 FS} bind def /TBIG {350 /TimesBI-ISOL1 FS} bind def /SW {100 /Symbol FS} bind def /SV {150 /Symbol FS} bind def /SS {200 /Symbol FS} bind def /SK {240 /Symbol FS} bind def /SM {300 /Symbol FS} bind def /SG {350 /Symbol FS} bind def /ishowRV {RW -00 -30 rmoveto show 00 30 rmoveto RV} def /jshowRV {RBW -00 -30 rmoveto show 00 30 rmoveto RBV} def /ishowTV {TW -00 -30 rmoveto show 00 30 rmoveto TV} def /jshowTV {TBW -00 -30 rmoveto show 00 30 rmoveto TBV} def /ishowRS {RV -00 -40 rmoveto show 00 40 rmoveto RS} def /jshowRS {RBV -00 -40 rmoveto show 00 40 rmoveto RBS} def /ishowTS {TV -00 -40 rmoveto show 00 40 rmoveto TS} def /jshowTS {TBV -00 -40 rmoveto show 00 40 rmoveto TBS} def /ishowRK {RS -00 -50 rmoveto show 00 50 rmoveto RK} def /jshowRK {RBS -00 -50 rmoveto show 00 50 rmoveto RBK} def /ishowTK {TS -00 -50 rmoveto show 00 50 rmoveto TK} def /jshowTK {TBS -00 -50 rmoveto show 00 50 rmoveto TBK} def /ishowRM {RK -00 -60 rmoveto show 00 60 rmoveto RM} def /jshowRM {RBK -00 -60 rmoveto show 00 60 rmoveto RBM} def /ishowTM {TK -00 -60 rmoveto show 00 60 rmoveto TM} def /jshowTM {TBK -00 -60 rmoveto show 00 60 rmoveto TBM} def /ishowRG {RM -00 -70 rmoveto show 00 70 rmoveto RG} def /jshowRG {RBM -00 -70 rmoveto show 00 70 rmoveto RBG} def /ishowTG {TM -00 -70 rmoveto show 00 70 rmoveto TG} def /jshowTG {TBM -00 -70 rmoveto show 00 70 rmoveto TBG} def %special /enshowTK {TS -00 80 rmoveto show 00 -80 rmoveto TK} def /ebshowTK {TBS -00 80 rmoveto show 00 -80 rmoveto TBK} def /enshowTM {TK -00 90 rmoveto show 00 -90 rmoveto TM} def /ebshowTM {TBK -00 90 rmoveto show 00 -90 rmoveto TBM} def %font0309.ps*********************************************** /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 /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 /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* 1.0 exp 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 /DecodeXYZ* {dup 6 29 div ge {dup dup mul mul} {4 29 div sub 108 841 div mul} ifelse} bind 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 %************************************************************************* %%EndProlog gsave %LANINDL2.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 /lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def} {/lanind1 1 def /lanind2 1 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 3 def /xcolor2 3 def} ifelse /xchartg where {pop /xchart1 xchartg def /xchart2 xchartg def /xchartd xchartgd def} {/xchart1 0 def /xchart2 0 def /xchartd 1 def} ifelse /pchartg where {pop /pchart1 pchartg def /pchart2 pchartg def /pchartd pchartgd def} {/pchart1 1 def /pchart2 1 def /pchartd 1 def} ifelse /colormf where {pop /colorm1 colormf def /colorm2 colormf def /colormd colormdf def} if /xcolorf where {pop /xcolor1 xcolorf def /xcolor2 xcolorf def /xcolord xcolordf def} if /xchartf where {pop /xchart1 xchartf def /xchart2 xchartf def /xchartd xchartdf def} if /pchartf where {pop /pchart1 pchartf def /pchart2 pchartf def /pchartd pchartdf def} if /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 /pchart pchart1 def %pchart1 1 pchart2 {/pchart 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 /colorml colorm def %0 1 1 {/colorml exch def %colorml=0,1 /xcolorl xcolor def %0 1 3 {/xcolorl exch def %xcolorl=0,3 /xchartl xchart def %0 1 7 {/xchartl exch def %xchartl=0,7 /pchartl pchart def %0 1 2 {/pchartl exch def %pchartl=0,2 gsave xcolorl 0 eq {/tfnx* {0 0 0 1 setcmykcolor} def /tfwx* {0 0 0 0 setcmykcolor} def /colrecfix* {setcmykcolor rec fill} bind def /colrecstx* {setcmykcolor rec stroke} bind def } if xcolorl 1 eq {/tfnx* {0 setgray} def /tfwx* {1 setgray} def /colrecfix* {setgray rec fill} bind def /colrecstx* {setgray rec stroke} bind def } if xcolorl 2 eq {/tfnx* {1 1 1 0 setcmykcolor} def /tfwx* {0 0 0 0 setcmykcolor} def /colrecfix* {setcmykcolor rec fill} bind def /colrecstx* {setcmykcolor rec stroke} bind def } if xcolorl 3 eq {/tfnx* {0 0 0 setrgbcolor} def /tfwx* {1 1 1 setrgbcolor} def /colrecfix* {setrgbcolor rec fill} bind def /colrecstx* {setrgbcolor rec stroke} bind def } if /cvishow {cvi 6 string cvs show} def gsave 72 90 translate 0.01 MM dup scale 30 setlinewidth /iout 0 def gsave 30 setlinewidth /xwidth 12200 def /ywidth 8400 def 1 1 0.5 setrgbcolor 0 0 moveto xwidth 0 rlineto 0 ywidth rlineto xwidth neg 0 rlineto closepath fill 0 setgray 0 0 moveto xwidth 0 rlineto 0 ywidth rlineto xwidth neg 0 rlineto closepath stroke 0 setgray 100 /Times-ISOL1 FS 50 -100 moveto (AES40-3N) show /iyt 300 def %text size /iyd 400 def %line difference %************************************************************************************************ /ix00 40 def %text 1 /iy00 7700 def %text 2 ix00 iy00 400 add moveto TBM (Kontraststufe ) showde (Contrast step ) showen (Paso de contraste ) showes TBK (Gammes de contrastes ) showfr TBM (Contrasto fase ) showit (Kontrast trinn ) showjp lanind 2 ne {TBIM (C) show (Yi) jshowTM TM ( (i=1 to 8), ) show} {TBIK (C) show (Yi) jshowTK TK ( (i=1 to 8), ) show} ifelse RBM (CIE-Normfarbwert ) showde TBM (CIE tristimulus value ) showen (valores triest\355mulos CIE ) showes TBK (composantes trichromatique CIE ) showfr TBM (CIE tristimulus valore ) showit (CIE tristimulus verdi ) showjp lanind 2 ne {TBIM (Y) show (N) jshowTM} {TBIK (Y) show (N) jshowTK} ifelse TBM (, ) show (Graustufen nach ) showde (grey steps according to ) showen (pasos de gris seg\372n ) showes TBK (plages de gris selon l') showfr TBM (grigio fasi secondo ) showit (gr\345 trinn i henhold til ) showjp lanind 2 ne {RBM (ISO 9241-306) show} {RBK (ISO 9241-306) show} ifelse (1\051) ebshowTM %****************************************************************************** /ix10 40 def /ix11 060 def %Contrast step /ix12 1500 def %CIE YN /ix13 3200 def %total display luminance /ix14 5100 def %projector luminance /ix15 6800 def %reflective luminance /ix16 8500 def %grey color steps, no output linearisation /ix17 10300 def %grey color steps, output linearisation /iyt1 7500 def /iy01 iyt1 def %title /iy11 iyt1 iyd 1 mul sub def %question CIE colours /iy21 iyt1 iyd 2 mul sub def %14 steps /iy31 iyt1 iyd 3 mul sub def %.... /iy41 iyt1 iyd 4 mul sub def %.... /iy51 iyt1 iyd 5 mul sub def %.... /iy61 iyt1 iyd 6 mul sub def %.... /iy71 iyt1 iyd 7 mul sub def %.... /iy81 iyt1 iyd 8 mul sub def %.... ix11 iy01 moveto RBM (Kontrast-) showde TBM (Contrast) showen RBM (paso de con-) showes TBK (Gamme de) showfr TBM (Contrasto) showit (Kontrast) showjp ix11 iy11 moveto TBM (Stufe) showde (step) showen (trast) showes TBK (contrastes) showfr TBM (fase) showit (trinn) showjp ix11 iy21 moveto lanind 2 ne {TBM (C) show (Yi) jshowTM} {TBK (C) show (Yi) jshowTK} ifelse TBM ( ) show (und ) showde (and ) showen (y ) showes TBK (et ) showfr TBM (e ) showit (og ) showjp lanind 2 ne {RBIM (Y) show} {RBIK () show} ifelse ix11 iy31 moveto TBM (\255Verh\344ltnis) showde (\255ratio) showen (\255relaci\363n) showes TBK (rapport ) showfr lanind 2 eq {TBIK (Y) show} if TBM (\255raporto) showit (\255forholdet) showjp ix11 iy41 moveto lanind 2 ne {TM ((i=1 .. 8)) show} {TK ((i=1 .. 8)) show} ifelse ix12 iy01 moveto RBM (CIE-Norm-) showde (CIE tristi-) showen (CIE valores) showes RBK (composantes) showfr RBM (CIE tristi-) showit (CIE tristi-) showjp ix12 iy11 moveto TBM (Farbwert ) showde (mulus value ) showen (triest\355mulos ) showes TBK (trichromatique ) showfr TBM (mulus valore ) showit (mulus verdi ) showjp ix12 iy21 moveto lanind 2 ne {TBIM (Y) show (N) jshowTM} {TBK (CIE ) show TBIK (Y) show (N) jshowTK} ifelse RBM ( und CIE-) showde TBM ( and CIE) showen ( y CIE) showes TBK ( et) showfr TBM ( e CIE) showit ( og CIE) showjp ix12 iy31 moveto TBM (Helligkeit) showde (lightness) showen (ligerezza) showes TBK (clart\351) showfr TBM (chiarezza) showit (skryt) showjp ix12 iy41 moveto lanind 2 ne {TBIM (L*) show (N) jshowTM} {TBIK (L*) show (N) jshowTK} ifelse TBM ( von) showde ( of) showen ( de) showes TBK ( de) showfr TBM ( di) showit ( av) showjp ix12 iy51 moveto TBM (Schwarz) showde (black) showen (negro) showes TBK (noir) showfr TBM (nero) showit (svart) showjp ix13 iy01 moveto TBM (totale) showde (total) showen (total de) showes TBK (\351clairement) showfr TBM (totale) showit (totale) showjp ix13 iy11 moveto TBM (gesehene) showde (viewing) showen (visualizaci\363n) showes TBK (total de) showfr TBM (del display de) showit (skjermvisning) showjp ix13 iy21 moveto RBM (Display-Be-) showde TBM (display) showen (pantalla) showes TBK (l'\351cran) showfr TBM (visualizzazione) showit (display) showjp ix13 iy31 moveto TBM (leuchtungs) showde (illuminance) showen (illuminancia) showes TBK (de visualisation) showfr TBM (illuminamento) showit (illuminance) showjp ix13 iy41 moveto TBM (st\344rke ) showde () showen () showes () showfr () showit () showjp lanind 2 ne {TBIM (E) show (P+R) jshowTM} {TBIK (E) show (P+R) jshowTK} ifelse ix13 iy51 moveto lanind 2 ne {TBM ([lux]) show (3\051) ebshowTM} {TBK ([lux]) show (3\051) ebshowTK} ifelse ix14 iy01 moveto TBM (gemessene) showde (measured) showen (medido) showes TBK (\351clairement) showfr TBM (misurato) showit (Målt) showjp ix14 iy11 moveto RBM (Projektor-) showde TBM (projector) showen (proyector) showes TBK (mesur\351e du dis\255) showfr TBM (mesur\351e (P)) showit (projektor) showjp ix14 iy21 moveto RBM (Display-Be-) showde TBM ((P) display) showen RBM ((P) la pan-) showes TBK (positif d'affi\255) showfr TBM ((P) display) showit ((P) vise) showjp ix14 iy31 moveto RBM (leuchtungs-) showde TBM (illuminance) showen RBM (talla illu-) showes TBK (chage de pro\255) showfr TBM (illuminamento) showit (monitor) showjp ix14 iy41 moveto TBM (st\344rke ) showde () showen (minancia) showes TBK lanind 2 eq {(jecteur (P) ) show TBIK (E) show (P) jshowTK} if TBM () showit (illuminance) showjp ix14 iy41 moveto lanind 2 ne {TBIM (E) show (P) jshowTM} {TBIK () show () jshowTK} ifelse ix14 iy51 moveto lanind 2 ne {TBM ([lux]) show (3\051) ebshowTM} {TBK ([lux]) show (3\051) ebshowTK} ifelse %************************************************* ix15 iy01 moveto RBM (Raumlicht-) showde TBM (room light) showen (luz de la sala) showes TBK (\351clairement) showfr TBM (camera luminosa) showit (lys i rommet) showjp ix15 iy11 moveto RBM ((R) Display-) showde TBM ((R) display) showen RBM ((R) pan-) showes TBK (du dispositif) showfr TBM ((R) sul display) showit ((R) display) showjp ix15 iy21 moveto RBM (Beleuch-) showde TBM (illuminance) showen RBM (talla illu-) showes TBK (d'affichage par) showfr TBM (di illumi-) showit TBM (vise) showjp ix15 iy31 moveto TBM (tungsst\344rke ) showde () showen (minancia) showes TBK (la lumi\350re de) showfr TBM (namento) showit (illuminance) showjp ix15 iy41 moveto TBK lanind 2 eq {(la salle (R) ) show TBIK (E) show (R) jshowTK} if TBM ix15 iy41 moveto lanind 2 ne {TBIM (E) show (R) jshowTM} {TBIK () show () jshowTK} ifelse ix15 iy51 moveto lanind 2 ne {TBM ([lux]) show (3\051) ebshowTM} {TBK ([lux]) show (3\051) ebshowTK} ifelse %BEG part1******************************************* ix16 iy01 moveto TBM (Graustufen) showde (grey steps) showen (pasos de) showes TBK (plages de gris) showfr TBM (grigio fasi) showit (grått trinn) showjp ix16 iy11 moveto TBM (ohne) showde (without) showen (gris sin) showes TBK (sans) showfr TBM (senza uscita) showit (uten) showjp ix16 iy21 moveto RBM (Ausgabeli-) showde TBM (output) showen (salida de) showes TBK (lin\351arisation) showfr TBM RBM (lineariz-) showit TBM (utgang) showjp ix16 iy31 moveto TBM (nearisierung) showde (linearisation) showen (linearizaci\363n) showes TBK (du rendu) showfr TBM (zazione) showit (linearisation) showjp ix16 iy41 moveto lanind 2 ne {SM (D) show 20 0 rmoveto TBIM (L*) show TBM (=1) show} {SK (D) show 20 0 rmoveto TBIK (L*) show TBK (=1) show} ifelse ix16 iy51 moveto TBM (Anzahl ) showde (amount ) showen (cantidad ) showes TBK (quatit\351 ) showfr TBM (importo ) showit (bel\370p ) showjp lanind 2 ne {TBIM (a) show (n) jshowTM (2\051) ebshowTM} {TBIK (a) show (n) jshowTK (2\051) ebshowTK} ifelse %END part1*************************************** %BEG part2*********************************** ix17 iy01 moveto TBM (Graustufen) showde (grey steps) showen (pasos de gris) showes TBK (plages de gris) showfr TBM (grigio fasi) showit (gr\345tt trinn) showjp ix17 iy11 moveto TBM (mit) showde (with) showen (con) showes TBK (avec) showfr TBM (senza) showit (med) showjp ix17 iy21 moveto RBM (Ausgabeli-) showde TBM (output) showen (salida de) showes TBK (lin\351arisation) showfr TBM (linearizzazione) showit (utgang) showjp ix17 iy31 moveto TBM (nearisierung) showde (linearisation) showen (linearizaci\363n) showes TBK (du rendu) showfr TBM (di uscita) showit (linearisation) showjp ix17 iy41 moveto lanind 2 ne {SM (D) show 20 0 rmoveto TBIM (L*) show TBM (=1) show} {SK (D) show 20 0 rmoveto TBIK (L*) show TBK (=1) show} ifelse ix17 iy51 moveto TBM (Anzahl ) showde (amount ) showen (cantidad ) showes TBK (quatit\351 ) showfr TBM (importo ) showit (bel\370p ) showjp lanind 2 ne {TBIM (a) show (l) jshowTM (2\051) ebshowTM} {TBIK (a) show (l) jshowTK (2\051) ebshowTK} ifelse %END part2*************************************** %****************************************************************************** /ix20 40 def /ix21 060 def %Contrast step /ix22 1600 def %CIE YN /ix23 3200 def %display luminance /ix24 5100 400 add def %projector luminance /ix25 6800 600 add def %reflective luminance /ix26 8500 600 add def %grey color steps, no output linearisation /ix27 10300 600 add def %grey color steps, output linearisation /ix2r 250 def %remark table /iyt2 4900 def /iy02 iyt2 def %C1 /iy12 iyt2 iyd 1 mul sub def %C2 /iy22 iyt2 iyd 2 mul sub def %C3 /iy32 iyt2 iyd 3 mul sub def %C4 /iy42 iyt2 iyd 4 mul sub def %.... /iy52 iyt2 iyd 5 mul sub def %.... /iy62 iyt2 iyd 6 mul sub def %.... /iy72 iyt2 iyd 7 mul sub def %.... /iy82 iyt2 iyd 8 mul sub def %.... /iy92 iyt2 iyd 9 mul sub def %.... TBM ix21 iy02 moveto (C) show (Y8 ) jshowTM ( 288:1) show ix21 iy12 moveto (C) show (Y7 ) jshowTM ( 144:1) show ix21 iy22 moveto (C) show (Y6 ) jshowTM ( 72:1) show ix21 iy32 moveto (C) show (Y5 ) jshowTM ( 36:1) show ix21 iy42 moveto (C) show (Y4 ) jshowTM ( 18:1) show ix21 iy52 moveto (C) show (Y3 ) jshowTM ( 9:1) show ix21 iy62 moveto (C) show (Y2 ) jshowTM ( 4,5:1) show ix21 iy72 moveto (C) show (Y1 ) jshowTM (2,25:1) show TM ix22 iy02 moveto (0,31 / 1) show ix22 iy12 moveto (0,62 / 6) show ix22 iy22 moveto (1,25 / 11) show TBM ix22 iy32 moveto (2,5 / 18) show TM ix22 iy42 moveto (5,0 / 27) show ix22 iy52 moveto (10 / 38) show ix22 iy62 moveto (20 / 52) show ix22 iy72 moveto (40 / 70) show TM ix23 iy02 moveto (80000+64000) show ix23 iy12 moveto (40000+32000) show ix23 iy22 moveto (20000+16000) show TBM ix23 iy32 moveto ( 10000+8000) show TM ix23 iy42 moveto ( 5000+4000) show ix23 iy52 moveto ( 2500+2000) show ix23 iy62 moveto ( 1250+1000) show ix23 iy72 moveto ( 625+500) show TM ix24 iy02 moveto (143500) show ix24 iy12 moveto ( 61500) show ix24 iy22 moveto ( 35500) show TBM ix24 iy32 moveto ( 17500) show TM ix24 iy42 moveto ( 8500) show ix24 iy52 moveto ( 4000) show ix24 iy62 moveto ( 1750) show ix24 iy72 moveto ( 625) show TM ix25 iy02 moveto (500) show ix25 iy12 moveto (500) show ix25 iy22 moveto (500) show TBM ix25 iy32 moveto (500) show TM ix25 iy42 moveto (500) show ix25 iy52 moveto (500) show ix25 iy62 moveto (500) show ix25 iy72 moveto (500) show ix26 400 sub iy02 moveto TM (47 (max)) show ix26 iy12 moveto (44) show ix26 iy22 moveto (42) show TBM ix26 iy32 moveto (38) show TM ix26 iy42 moveto (34) show ix26 iy52 moveto (28) show ix26 iy62 moveto (21) show ix26 iy72 moveto (12) show ix27 400 sub iy02 moveto TM (94 (max)) show ix27 iy12 moveto (88) show ix27 iy22 moveto (84) show TBM ix27 iy32 moveto (77) show TM ix27 iy42 moveto (68) show ix27 iy52 moveto (57) show ix27 iy62 moveto (43) show ix27 iy72 moveto (25) show %lines /iy01x iy01 400 add def /iy51x iy51 200 sub def /iy72x iy72 160 sub def 0 iy01x moveto xwidth 0 rlineto stroke 0 iy51x moveto xwidth 0 rlineto stroke 0 iy72x moveto xwidth 0 rlineto stroke /iyy iy01x iy72x sub def ix12 100 sub iy01x moveto 0 iyy neg rlineto stroke ix13 100 sub iy01x moveto 0 iyy neg rlineto stroke ix14 100 sub iy01x moveto 0 iyy neg rlineto stroke ix15 100 sub iy01x moveto 0 iyy neg rlineto stroke ix16 100 sub iy01x moveto 0 iyy neg rlineto stroke ix17 100 sub iy01x moveto 0 iyy neg rlineto stroke /iyt 220 def /iyd 300 def /iy92 iy82 iyd 1 mul sub def %.... /iy102 iy82 iyd 2 mul sub def %.... /iy112 iy82 iyd 3 mul sub def %.... /iy122 iy82 iyd 4 mul sub def %.... /iy132 iy82 iyd 5 mul sub def %.... %**************************************************************** /CW {100 /Courier-ISOL1 FS} bind def /CV {150 /Courier-ISOL1 FS} bind def /CS {200 /Courier-ISOL1 FS} bind def /CK {220 /Courier-ISOL1 FS} bind def /CM {300 /Courier-ISOL1 FS} bind def /CG {350 /Courier-ISOL1 FS} bind def /CBW {100 /CourierB-ISOL1 FS} bind def /CBV {150 /CourierB-ISOL1 FS} bind def /CBS {200 /CourierB-ISOL1 FS} bind def /CBK {220 /CourierB-ISOL1 FS} bind def /CBM {300 /CourierB-ISOL1 FS} bind def /CBG {350 /CourierB-ISOL1 FS} bind def /RW {100 /Times-Roman FS} bind def /RV {150 /Times-Roman FS} bind def /RS {200 /Times-Roman FS} bind def /RK {220 /Times-Roman FS} bind def /RM {300 /Times-Roman FS} bind def /RG {350 /Times-Roman FS} bind def /RIW {100 /Times-Italic FS} bind def /RIV {150 /Times-Italic FS} bind def /RIS {200 /Times-Italic FS} bind def /RIK {220 /Times-Italic FS} bind def /RIM {300 /Times-Italic FS} bind def /RIG {350 /Times-Italic FS} bind def /RBW {100 /Times-Bold FS} bind def /RBV {150 /Times-Bold FS} bind def /RBS {200 /Times-Bold FS} bind def /RBK {220 /Times-Bold FS} bind def /RBM {300 /Times-Bold FS} bind def /RBG {350 /Times-Bold FS} bind def /RBIW {100 /Times-BoldItalic FS} bind def /RBIV {150 /Times-BoldItalic FS} bind def /RBIS {200 /Times-BoldItalic FS} bind def /RBIK {220 /Times-BoldItalic FS} bind def /RBIM {300 /Times-BoldItalic FS} bind def /RBIG {350 /Times-BoldItalic FS} bind def /TW {100 /Times-ISOL1 FS} bind def /TV {150 /Times-ISOL1 FS} bind def /TS {200 /Times-ISOL1 FS} bind def /TK {220 /Times-ISOL1 FS} bind def /TM {300 /Times-ISOL1 FS} bind def /TG {350 /Times-ISOL1 FS} bind def /TIW {100 /TimesI-ISOL1 FS} bind def /TIV {150 /TimesI-ISOL1 FS} bind def /TIS {200 /TimesI-ISOL1 FS} bind def /TIK {220 /TimesI-ISOL1 FS} bind def /TIM {300 /TimesI-ISOL1 FS} bind def /TIG {350 /TimesI-ISOL1 FS} bind def /TBW {100 /TimesB-ISOL1 FS} bind def /TBV {150 /TimesB-ISOL1 FS} bind def /TBS {200 /TimesB-ISOL1 FS} bind def /TBK {220 /TimesB-ISOL1 FS} bind def /TBM {300 /TimesB-ISOL1 FS} bind def /TBG {350 /TimesB-ISOL1 FS} bind def /TBIW {100 /TimesBI-ISOL1 FS} bind def /TBIV {150 /TimesBI-ISOL1 FS} bind def /TBIS {200 /TimesBI-ISOL1 FS} bind def /TBIK {220 /TimesBI-ISOL1 FS} bind def /TBIM {300 /TimesBI-ISOL1 FS} bind def /TBIG {350 /TimesBI-ISOL1 FS} bind def /SW {100 /Symbol FS} bind def /SV {150 /Symbol FS} bind def /SS {200 /Symbol FS} bind def /SK {220 /Symbol FS} bind def /SM {300 /Symbol FS} bind def /SG {350 /Symbol FS} bind def /ishowRV {RW -00 -30 rmoveto show 00 30 rmoveto RV} def /jshowRV {RBW -00 -30 rmoveto show 00 30 rmoveto RBV} def /ishowTV {TW -00 -30 rmoveto show 00 30 rmoveto TV} def /jshowTV {TBW -00 -30 rmoveto show 00 30 rmoveto TBV} def /ishowRS {RV -00 -40 rmoveto show 00 40 rmoveto RS} def /jshowRS {RBV -00 -40 rmoveto show 00 40 rmoveto RBS} def /ishowTS {TV -00 -40 rmoveto show 00 40 rmoveto TS} def /jshowTS {TBV -00 -40 rmoveto show 00 40 rmoveto TBS} def /ishowRK {RS -00 -50 rmoveto show 00 50 rmoveto RK} def /jshowRK {RBS -00 -50 rmoveto show 00 50 rmoveto RBK} def /ishowTK {TS -00 -50 rmoveto show 00 50 rmoveto TK} def /jshowTK {TBS -00 -50 rmoveto show 00 50 rmoveto TBK} def /ishowRM {RK -00 -60 rmoveto show 00 60 rmoveto RM} def /jshowRM {RBK -00 -60 rmoveto show 00 60 rmoveto RBM} def /ishowTM {TK -00 -60 rmoveto show 00 60 rmoveto TM} def /jshowTM {TBK -00 -60 rmoveto show 00 60 rmoveto TBM} def /ishowRG {RM -00 -70 rmoveto show 00 70 rmoveto RG} def /jshowRG {RBM -00 -70 rmoveto show 00 70 rmoveto RBG} def /ishowTG {TM -00 -70 rmoveto show 00 70 rmoveto TG} def /jshowTG {TBM -00 -70 rmoveto show 00 70 rmoveto TBG} def %special /enshowTK {TS -00 80 rmoveto show 00 -80 rmoveto TK} def /ebshowTK {TBS -00 80 rmoveto show 00 -80 rmoveto TBK} def /enshowTM {TK -00 90 rmoveto show 00 -90 rmoveto TM} def /ebshowTM {TBK -00 90 rmoveto show 00 -90 rmoveto TBM} def ix20 iy82 moveto TBK (1\051 ) show ix2r iy82 moveto TBK (Das Beispiel ist vorgesehen f\374r Datenprojektoren (P). ) showde (The example is intended for data projectors (P). ) showen (El ejemplo está dise\361ado para proyectores de datos (P). ) showes (L'exemple concerne des projecteurs de donn\351es (P). ) showfr (L'esempio \351 destinato per proiettori dati (P). ) showit (eksemplet er ment for data projektorer (P). ) showjp RBK (Die Norm-Kontraststufe (fett) ) showde TBK (The standard contrast step (bold) ) showen (El paso de contraste est\341ndar (bold) ) showes TK (La gamme de contrastes normalis\351e (en gras) ) showfr TBK (Il contrasto standard passo (in grassetto) ) showit (Standard kontrastforhold trinn (bold) ) showjp lanind 2 ne {TBIK (C) show (Y5) jshowTK TBK ( = 36:1 ) show} {TIK (C) show (Y5) ishowTK TK ( = 36:1 ) show} ifelse TBK (ist kaum erreichbar.) showde (is hard to reach.) showen (es dif\355cil de alcanzar.) showes TK (est difficile \340 obtenir.) showfr TBK (è difficile da raggiungere.) showit (er vanskelig \345 n\345.) showjp ix20 iy92 moveto TK (2\051 ) show ix2r iy92 moveto (F\374r die Anzahl der unterscheidbaren Farbstufen gelten die Gleichungen: ) showde (For the amount of discriminable colour steps use the equations: ) showen (por la cantidad de color discriminable pasos utilizan las ecuaciones: ) showes (Pour la quantit\351 de plages de couleurs distinguables, utiliser les \351quations: ) showfr (per la quantit/341 di colore distinguibile passaggi utilizzano le equazioni: ) showit (For mengden discriminable farge trinn bruk ligninger: ) showjp TIK (c) show (n) ishowTK TK ( = ) show TIK (a) show (n) ishowTK (3) enshowTK TK ( ) show (oder ) showde (or ) showen (o ) showes (ou ) showfr (o ) showit (eller ) showjp TIK (c) show (l) ishowTK TK ( = ) show TIK (a) show (l) ishowTK (3) enshowTK TK (, ) show (zum Beispiel ) showde (for example ) showen (por ejemplo ) showes (par exemple ) showfr (ad esempio ) showit (for eksempel ) showjp TIK (c) show (n) ishowTK TK ( = 4096 ) show TK (f\374r) showde (for) showen (para) showes (pour) showfr (per) showit (for) showjp TIK ( a) show (n) ishowTK TK ( = 16.) show ix20 iy102 moveto TK (3\051 ) show (F\374r den Kontrast ) showde (For the contrast ) showen (Para el contraste ) showes (Pour le contraste ) showfr (Per il contrasto ) showit (For Kontrast ) showjp TIK (C) show (Y) ishowTK TK (=2:1 ) show TK (sind die gesehene Leuchtdichte von Schwarz in der Projektion ) showde (the viewing luminances of both the black in the projection ) showen (la visualizaci\363n de luminancias de ambas en la proyecci\363n del negro ) showes (les luminances de vision du noir dans la projection ) showfr (la visualizzazione delle luminanze sia del nero nella sporgenza ) showit (visning luminances av b\345de svart i projeksjon ) showjp TK (und dem weissen Standardpapier gleich (!).) showde (and the white standard offset paper are equal (!).) showen (y el blanco papel offset est\341ndar son iguales (!).) showes (et le papier offset blanc standard sont \351gales (!).) showfr (e il bianco standard carta offset sono uguali (!).) showit (og den hvite standard offset papir er lik (!).) showjp ix2r iy112 moveto TK (Visuelle Erm\374dung durch das Leuchtdichteverh\344ltnis) showde (Visual fatigue caused by the adaptation luminance ratio) showen (La fatiga visual provocada por la relaci\363n de luminancias adaptaci\363n) showes (La fatigue visuelle due au rapport de luminance d'adaptation) showfr (Affaticamento visivo causati dall' adeguamento del rapporto di luminanza) showit (Visuell tretthet for\345rsaket av tilpasning luminans forholdet) showjp TK ( 36:1 ) show TK (aller Farben auf dem Display und dem Papier sollte reduziert werden.) showde (of the black at the screen and the black at the paper shall be reduced.) showen (de la pantalla en negro y el negro en el papel se reducir\341.) showes (du noir \340 l'\351cran et du noir sur le papier doit \340 l'est r\351duit. Si par) showfr (del nero a schermo e il nero a la carta deve essere ridotta.) showit (av den svarte p\345 skjermen og svart p\345 papir skal bli redusert.) showjp ix2r iy122 moveto TK (Wenn ein graues Display mit dem Normfarbwert ) showde (If for example a grey screen with the CIE tristimulus value ) showen (Por ejemplo, si una pantalla gris con los valores triest\355mulos CIE ) showes (exemple un \351cran gris avec la composante trichromatique CIE ) showfr (Se ad esempio una schermata grigia con la CIE tristimulus valore ) showit (Hvis for eksempel en gr\345 skjerm med CIE tristimulus verdi ) showjp TIK (Y) show (Z) ishowTK TK ( = 22,2 (=0,25*88.9)) show TK ( benutzt wird, dann bleibt die Kontraststufe ) showde ( is used the contrast step ) showen ( se utiliza el contraste paso ) showes ( est utilis\351 la gamme de contrastes ) showfr ( è utilizzato il contrasto fase ) showit ( brukes den kontrast trinn ) showjp TIK (C) show (Yi) ishowTK TK ( konstant.) showde ( remains constant.) showen ( permanece constante.) showes ( reste con\255) showfr ( rimane costante.) showit ( forblir konstant.) showjp ix2r iy132 moveto TK (Das Leuchtdichteverh\344ltnis aller Farben auf Bildschirm ) showde (und Papier ist reduziert auf 9:1. ) showde (Dies reduziert die visuelle Erm\374dung.) showde (Then the luminance ratio of all colours at the screen ) showen (and the paper has reduced to 9:1. ) showen (This reduces visual fatigue.) showen (A continuaci\363n, la relaci\363n de luminancias de todos los colores ) showes (en la pantalla y el papel se ha reducido a 9:1. ) showes (Esto reduce la fatiga visual.) showes (stante. Ainsi, le rapport de luminance de toutes les couleurs ) showfr (\340 l'\351cran ) showfr (et sur le papier a \351t\351 r\351duit \340 9:1. ) showfr (Cela r\351duit la fatigue visuelle.) showfr (Quindi il rapporto di luminanza di tutti i colori a schermo ) showit (e la carta \350 ridotto a 9:1. ) showit (Questo riduce l'affaticamento visivo.) showit (Deretter luminansen utveksling av alle farger p\345 skjermen ) showjp (og p\345 papir har redusert til 9:1. ) showjp (Dette reduserer visuell tretthet.) showjp showpage grestore %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 86 SHAl add 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 AES40-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 (AES40-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 showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 28 SHSl sub 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 AES40-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 (AES40-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 showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 86 SHAl add 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 AES40-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 (AES40-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 showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF /xc1 16 def /yc1 12 def /xt 1 def xchart 1 eq {/xt 1 def} if 28 SHSl sub MM 20 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 http://farbe.li.tu-berlin.de/AES4/AES40-7 %%BoundingBox: 71 82 421 330 %START PDFDE011.EPS /pdfmark07 where {pop} {userdict /pdfmark07 /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: farbe.li.tu-berlin.de/AES4/AES4.HTM) /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1) /Subject (goto: http://farbe.li.tu-berlin.de http://130.149.60.45/~farbmetrik) /Keywords (image reproduction, colour devices) /Creator (klaus.richter@mac.com) /CreationDate (D:2020110112000) /ModDate (D:20201101112000) /DOCINFO pdfmark07 [ /View [ /Fit ] /DOCVIEW pdfmark07 %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 %Umrechnung Inch -> mm /A4quer {598 0 translate 90 rotate} def /languagelevel where {pop languagelevel} {1} ifelse /PSL12 exch def /dictende {counttomark 2 idiv dup dict begin {def} repeat pop currentdict end} bind def %font0309.ps*********************************************** %special TK 250->240 /CW {100 /Courier-ISOL1 FS} bind def /CV {150 /Courier-ISOL1 FS} bind def /CS {200 /Courier-ISOL1 FS} bind def /CK {240 /Courier-ISOL1 FS} bind def /CM {300 /Courier-ISOL1 FS} bind def /CG {350 /Courier-ISOL1 FS} bind def /CBW {100 /CourierB-ISOL1 FS} bind def /CBV {150 /CourierB-ISOL1 FS} bind def /CBS {200 /CourierB-ISOL1 FS} bind def /CBK {240 /CourierB-ISOL1 FS} bind def /CBM {300 /CourierB-ISOL1 FS} bind def /CBG {350 /CourierB-ISOL1 FS} bind def /RW {100 /Times-Roman FS} bind def /RV {150 /Times-Roman FS} bind def /RS {200 /Times-Roman FS} bind def /RK {240 /Times-Roman FS} bind def /RM {300 /Times-Roman FS} bind def /RG {350 /Times-Roman FS} bind def /RIW {100 /Times-Italic FS} bind def /RIV {150 /Times-Italic FS} bind def /RIS {200 /Times-Italic FS} bind def /RIK {240 /Times-Italic FS} bind def /RIM {300 /Times-Italic FS} bind def /RIG {350 /Times-Italic FS} bind def /RBW {100 /Times-Bold FS} bind def /RBV {150 /Times-Bold FS} bind def /RBS {200 /Times-Bold FS} bind def /RBK {240 /Times-Bold FS} bind def /RBM {300 /Times-Bold FS} bind def /RBG {350 /Times-Bold FS} bind def /RBIW {100 /Times-BoldItalic FS} bind def /RBIV {150 /Times-BoldItalic FS} bind def /RBIS {200 /Times-BoldItalic FS} bind def /RBIK {240 /Times-BoldItalic FS} bind def /RBIM {300 /Times-BoldItalic FS} bind def /RBIG {350 /Times-BoldItalic FS} bind def /TW {100 /Times-ISOL1 FS} bind def /TV {150 /Times-ISOL1 FS} bind def /TS {200 /Times-ISOL1 FS} bind def /TK {240 /Times-ISOL1 FS} bind def /TM {300 /Times-ISOL1 FS} bind def /TG {350 /Times-ISOL1 FS} bind def /TIW {100 /TimesI-ISOL1 FS} bind def /TIV {150 /TimesI-ISOL1 FS} bind def /TIS {200 /TimesI-ISOL1 FS} bind def /TIK {240 /TimesI-ISOL1 FS} bind def /TIM {300 /TimesI-ISOL1 FS} bind def /TIG {350 /TimesI-ISOL1 FS} bind def /TBW {100 /TimesB-ISOL1 FS} bind def /TBV {150 /TimesB-ISOL1 FS} bind def /TBS {200 /TimesB-ISOL1 FS} bind def /TBK {240 /TimesB-ISOL1 FS} bind def /TBM {300 /TimesB-ISOL1 FS} bind def /TBG {350 /TimesB-ISOL1 FS} bind def /TBIW {100 /TimesBI-ISOL1 FS} bind def /TBIV {150 /TimesBI-ISOL1 FS} bind def /TBIS {200 /TimesBI-ISOL1 FS} bind def /TBIK {240 /TimesBI-ISOL1 FS} bind def /TBIM {300 /TimesBI-ISOL1 FS} bind def /TBIG {350 /TimesBI-ISOL1 FS} bind def /SW {100 /Symbol FS} bind def /SV {150 /Symbol FS} bind def /SS {200 /Symbol FS} bind def /SK {240 /Symbol FS} bind def /SM {300 /Symbol FS} bind def /SG {350 /Symbol FS} bind def /ishowRV {RW -00 -30 rmoveto show 00 30 rmoveto RV} def /jshowRV {RBW -00 -30 rmoveto show 00 30 rmoveto RBV} def /ishowTV {TW -00 -30 rmoveto show 00 30 rmoveto TV} def /jshowTV {TBW -00 -30 rmoveto show 00 30 rmoveto TBV} def /ishowRS {RV -00 -40 rmoveto show 00 40 rmoveto RS} def /jshowRS {RBV -00 -40 rmoveto show 00 40 rmoveto RBS} def /ishowTS {TV -00 -40 rmoveto show 00 40 rmoveto TS} def /jshowTS {TBV -00 -40 rmoveto show 00 40 rmoveto TBS} def /ishowRK {RS -00 -50 rmoveto show 00 50 rmoveto RK} def /jshowRK {RBS -00 -50 rmoveto show 00 50 rmoveto RBK} def /ishowTK {TS -00 -50 rmoveto show 00 50 rmoveto TK} def /jshowTK {TBS -00 -50 rmoveto show 00 50 rmoveto TBK} def /ishowRM {RK -00 -60 rmoveto show 00 60 rmoveto RM} def /jshowRM {RBK -00 -60 rmoveto show 00 60 rmoveto RBM} def /ishowTM {TK -00 -60 rmoveto show 00 60 rmoveto TM} def /jshowTM {TBK -00 -60 rmoveto show 00 60 rmoveto TBM} def /ishowRG {RM -00 -70 rmoveto show 00 70 rmoveto RG} def /jshowRG {RBM -00 -70 rmoveto show 00 70 rmoveto RBG} def /ishowTG {TM -00 -70 rmoveto show 00 70 rmoveto TG} def /jshowTG {TBM -00 -70 rmoveto show 00 70 rmoveto TBG} def %special /enshowTK {TS -00 80 rmoveto show 00 -80 rmoveto TK} def /ebshowTK {TBS -00 80 rmoveto show 00 -80 rmoveto TBK} def /enshowTM {TK -00 90 rmoveto show 00 -90 rmoveto TM} def /ebshowTM {TBK -00 90 rmoveto show 00 -90 rmoveto TBM} def %font0309.ps*********************************************** /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 /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 /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* 1.0 exp 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 /DecodeXYZ* {dup 6 29 div ge {dup dup mul mul} {4 29 div sub 108 841 div mul} ifelse} bind 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 %************************************************************************* %%EndProlog gsave %LANINDL2.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 /lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def} {/lanind1 1 def /lanind2 1 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 3 def /xcolor2 3 def} ifelse /xchartg where {pop /xchart1 xchartg def /xchart2 xchartg def /xchartd xchartgd def} {/xchart1 0 def /xchart2 0 def /xchartd 1 def} ifelse /pchartg where {pop /pchart1 pchartg def /pchart2 pchartg def /pchartd pchartgd def} {/pchart1 1 def /pchart2 1 def /pchartd 1 def} ifelse /colormf where {pop /colorm1 colormf def /colorm2 colormf def /colormd colormdf def} if /xcolorf where {pop /xcolor1 xcolorf def /xcolor2 xcolorf def /xcolord xcolordf def} if /xchartf where {pop /xchart1 xchartf def /xchart2 xchartf def /xchartd xchartdf def} if /pchartf where {pop /pchart1 pchartf def /pchart2 pchartf def /pchartd pchartdf def} if /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 /pchart pchart1 def %pchart1 1 pchart2 {/pchart 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 /colorml colorm def %0 1 1 {/colorml exch def %colorml=0,1 /xcolorl xcolor def %0 1 3 {/xcolorl exch def %xcolorl=0,3 /xchartl xchart def %0 1 7 {/xchartl exch def %xchartl=0,7 /pchartl pchart def %0 1 2 {/pchartl exch def %pchartl=0,2 gsave xcolorl 0 eq {/tfnx* {0 0 0 1 setcmykcolor} def /tfwx* {0 0 0 0 setcmykcolor} def /colrecfix* {setcmykcolor rec fill} bind def /colrecstx* {setcmykcolor rec stroke} bind def } if xcolorl 1 eq {/tfnx* {0 setgray} def /tfwx* {1 setgray} def /colrecfix* {setgray rec fill} bind def /colrecstx* {setgray rec stroke} bind def } if xcolorl 2 eq {/tfnx* {1 1 1 0 setcmykcolor} def /tfwx* {0 0 0 0 setcmykcolor} def /colrecfix* {setcmykcolor rec fill} bind def /colrecstx* {setcmykcolor rec stroke} bind def } if xcolorl 3 eq {/tfnx* {0 0 0 setrgbcolor} def /tfwx* {1 1 1 setrgbcolor} def /colrecfix* {setrgbcolor rec fill} bind def /colrecstx* {setrgbcolor rec stroke} bind def } if /cvishow {cvi 6 string cvs show} def gsave 72 90 translate 0.01 MM dup scale 30 setlinewidth /iout 0 def gsave 30 setlinewidth /xwidth 12200 def /ywidth 8400 def 1 1 0.5 setrgbcolor 0 0 moveto xwidth 0 rlineto 0 ywidth rlineto xwidth neg 0 rlineto closepath fill 0 setgray 0 0 moveto xwidth 0 rlineto 0 ywidth rlineto xwidth neg 0 rlineto closepath stroke 0 setgray 100 /Times-ISOL1 FS 50 -100 moveto (AES40-7N) show %************************************************************************************************ /iyt 300 def %text size /iyd 400 def %line difference /ix00 40 def %text 1 /iy00 7700 def %text 2 ix00 iy00 400 add moveto TBM (Kontraststufe ) showde (Contrast step ) showen (Paso de contraste ) showes TBK (Gammes de contrastes ) showfr TBM (Contrasto fase ) showit (Kontrast trinn ) showjp lanind 2 ne {TBIM (C) show (Yi) jshowTM TM ( (i=1 to 8) ) show} {TBIK (C) show (Yi) jshowTK TBK ( (i=1 to 8) ) show} ifelse TBM (und absolutes und relatives Gamma) showde (and absolute and relative Gamma) showen (y Gamma absolutos y relativos) showes TBK (et valeur gamma absolue et relative) showfr TBM (e assoluta e relativa Gamma) showit (og absolut og relativ Gamma) showjp TBM ( nach ) showde ( according to ) showen ( seg\372n ) showes TBK ( selon l') showfr TBM ( secondo ) showit ( til ) showjp lanind 2 ne {RBM (ISO 9241-306) show} {RBK (ISO 9241-306) show} ifelse (1\051) ebshowTM %****************************************************************************** /ix10 40 def /ix11 060 def %Contrast step /ix12 1500 def %YW:YN /ix13 3300 def %YN1..YN2 /ix14 5100 def %Gamma G /ix15 7200 def %gamma g /ix16 9160 def %application & remarks /ix17 10700 def % /iyt1 7500 def /iy01 iyt1 def %title /iy11 iyt1 iyd 1 mul sub def %question CIE colours /iy21 iyt1 iyd 2 mul sub def %14 steps /iy31 iyt1 iyd 3 mul sub def %.... /iy41 iyt1 iyd 4 mul sub def %.... /iy51 iyt1 iyd 5 mul sub def %.... /iy61 iyt1 iyd 6 mul sub def %.... /iy71 iyt1 iyd 7 mul sub def %.... /iy81 iyt1 iyd 8 mul sub def %.... ix11 iy01 moveto RBM (Kontrast-) showde TBM (Contrast) showen RBM (paso de con-) showes TBK (Gamme de) showfr TBM (Contrasto) showit (Kontrast) showjp ix11 iy11 moveto TBM (Stufe) showde (step) showen (trast) showes TBK (contrastes) showfr TBM (fase) showit (trinn) showjp ix11 iy21 moveto lanind 2 ne {TBIM (C) show (Yi) jshowTM} {TBIK (C) show (Yi) jshowTK} ifelse TBM ( ) show (und ) showde (and ) showen (y ) showes TBK (et ) showfr TBM (e ) showit (og ) showjp lanind 2 ne {RBIM (Y) show} {RBIK () show} ifelse ix11 iy31 moveto TBM (\255Verh\344ltnis) showde (\255ratio) showen (\255relaci\363n) showes TBK (rapport ) showfr lanind 2 eq {TBIK (Y) show} if TBM (\255raporto) showit (\255forholdet) showjp ix11 iy41 moveto lanind 2 ne {TM ((i=1 .. 8)) show} {TK ((i=1 .. 8)) show} ifelse ix12 iy01 moveto RBM (CIE-Norm-) showde (CIE tristi-) showen (CIE valores) showes RBK (Composantes) showfr RBM (CIE tristi-) showit (CIE tristi-) showjp ix12 iy11 moveto TBM (Farbwert;) showde (mulus value;) showen (triest\355mulos;) showes TBK (trichromatiques) showfr TBM (mulus valore;) showit (mulus verdi;) showjp ix12 iy21 moveto TBM (Verh\344ltnis) showde (ratio) showen (relaci\363n) showes TBK (CIE; Rapport) showfr TBM (raporto) showit (forholdet) showjp ix12 iy31 moveto lanind 2 ne {TBIM (Y) show (W) jshowTM ( : ) show TBIM (Y) show (N) jshowTM} {TBIK (Y) show (W) jshowTK ( : ) show TBIK (Y) show (N) jshowTK} ifelse ix12 iy41 moveto TBM (Wei\337) showde (White) showen (Blanco) showes TBK (du Blanc) showfr TBM (bianco) showit (hvit) showjp lanind 2 ne {TBIM ( W) show} {TBIK ( W) show} ifelse TBM ( und) showde ix12 iy51 moveto TBM () showde (and) showen (y) showes TBK (et) showfr TBM (e) showit (og) showjp TBM ( ) show (Schwarz) showde (Black) showen (Negro) showes TBK (du Noir) showfr TBM (Nero) showit (Svart) showjp lanind 2 ne {TBIM ( N) show} {TBIK ( N) show} ifelse ix13 iy01 moveto RBM (CIE-Norm-) showde (CIE tristi-) showen (CIE valores) showes RBK (Composantes) showfr RBM (CIE tristi-) showit (CIE tristi-) showjp ix13 iy11 moveto TBM (Farbwert;) showde (mulus value;) showen (triest\355mulos;) showes TBK (trichromatiques) showfr TBM (mulus valore;) showit (mulus verdi;) showjp ix13 iy21 moveto TBM (Bereich) showde (range) showen (rango) showes TBK (CIE; Rapport) showfr TBM (gamma) showit (omr\345det) showjp ix13 iy31 moveto lanind 2 ne {TBIM (Y) show (N1) jshowTM TBM ( ... ) show TBIM (Y) show (N2) jshowTM} {TBIK (Y) show (N1) jshowTK TBK ( ... ) show TBIK (Y) show (N2) jshowTK} ifelse ix14 iy01 moveto TBM (absolutes) showde (absolute) showen (absoluta) showes TBK (Valeur gamma ab\255) showfr TBM (absoluta) showit (absolutt) showjp ix14 iy11 moveto lanind 2 ne {TBM (Gamma) show} {TBK (solue ) show TBIK (G) show (Pk) jshowTK TK ((k=0 \340 7)) showfr } ifelse ix14 iy21 moveto lanind 2 ne { TBIM (G) show (Pk) jshowTM TM ((k=0 bis 7)) showde ((k=0 to 7)) showen ((k=0 a 7)) showes ((k=0 \340 7)) showfr ((k=0 a 7)) showit ((k=0 til 7)) showjp } { TBK (par le dispositif) showfr } ifelse ix14 iy31 moveto TBM (f\374r Display (P)) showde (for display (P)) showen (para mostar (P)) showes TBK (d'affichage (P)) showfr TBM (per i monitor (P)) showit (for visning (P)) showjp ix14 iy41 moveto TBM (mit ) showde (with ) showen (con ) showes TBK (avec ) showfr TBM (con ) showit (med ) showjp lanind 2 ne {TBIM (G) show (P0) jshowTM TBM (=2,4) show (2\051) ebshowTM} {TBIK (G) show (P0) jshowTM TBK (=2,4) show (2\051) ebshowTK} ifelse ix14 iy51 moveto lanind 2 ne {TBIM (G) show (Pk) jshowTM RBM (=2,4-0,18) show TBIM (k) show} {TBIK (G) show (Pk) jshowTM RBK (=2,4-0,18) show TBIK (k) show} ifelse ix15 iy01 moveto TBM (relatives) showde (relative) showen (relativa) showes TBK (Valeur gamma re\255) showfr TBM (relativa) showit (relativ) showjp ix15 iy11 moveto lanind 2 ne {TBM (Gamma) show} {TBK (lative ) show TBIK (g) show (Pk) jshowTK TK ((k=0 \340 7)) showfr } ifelse ix15 iy21 moveto lanind 2 ne { TBIM (g) show (Pk) jshowTM TM ((k=0 bis 7)) showde ((k=0 to 7)) showen ((k=0 a 7)) showes ((k=0 \340 7)) showfr ((k=0 a 7)) showit ((k=0 til 7)) showjp } { TBK (par le dispositif) showfr } ifelse ix15 iy31 moveto TBM (f\374r Display (P)) showde (for display (P)) showen (para mostar (P)) showes TBK (d'affichage (P)) showfr TBM (per i monitor (P)) showit (for visning (P)) showjp ix15 iy41 moveto TBM (mit ) showde (with ) showen (con ) showes TBK (avec ) showfr TBM (con ) showit (med ) showjp lanind 2 ne {TBIM (G) show (P0) jshowTM TBM (=2,4) show (2\051) ebshowTM} {TBIK (G) show (P0) jshowTM TBK (=2,4) show (2\051) ebshowTK} ifelse ix15 iy51 moveto lanind 2 ne {TBIM (g) show (Pk) jshowTM TBM (=) show TBIM (G) show (Pk) jshowTM TBM (/2,4) show} {TBIK (g) show (Pk) jshowTK TBK (=) show TBIK (G) show (Pk) jshowTK TBK (/2,4) show} ifelse ix16 iy01 moveto TBM (Anwendung und) showde (application and) showen (aplicaci\363n y) showes TBK (application et) showfr TBM (applicazione e la) showit (program og) showjp ix16 iy11 moveto TBM (Farbmodus) showde (colour mode) showen (il modo de color) showes TBK (mode de couleurs) showfr TBM (modalita \340 colori) showit (farge modus) showjp ix16 iy21 moveto TBM (am Arbeitsplatz;) showde (at work place;) showen (en el lugar de trabajo;) showes TBK (au poste de travail;) showfr TBM (al posto di lavoro;) showit (p\345 arbeitsplassen;) showjp ix16 iy31 moveto TBM (Beleuchtungsst\344rke) showde (illuminance) showen (illuminancia) showes TBK (\351clairement sur le) showfr TBM (illuminamento) showit (illuminance) showjp ix16 iy41 moveto TBM (auf Display ) showde (on display ) showen (en la monitor) showes TBK (dispositif d'affichage ) showfr TBM (sul monitor ) showit (p\345 display ) showjp lanind 2 ne {TBM (500 lux) show} {TBK (500 lux) show} ifelse ix16 iy51 moveto TBM (oder ) showde (or ) showen (o ) showes TBK (ou ) showfr TBM (o ) showit (eller ) showjp lanind 2 ne {TBM (250/125/62 lux) show} {TBK (250/125/62 lux) show} ifelse %****************************************************************************** /ix20 40 def /ix21 060 def %Contrast step /ix22 1500 def %YW:YN /ix23 3300 def %YN1..YN2 /ix24 5100 def %Gamma G /ix25 7200 def %gamma g /ix26 9200 def %application & remarks /ix27 10700 def % /ix2r 250 def %remark table /iyt2 4900 def /iy02 iyt2 def %C1 /iy12 iyt2 iyd 1 mul sub def %C2 /iy22 iyt2 iyd 2 mul sub def %C3 /iy32 iyt2 iyd 3 mul sub def %C4 /iy42 iyt2 iyd 4 mul sub def %.... /iy52 iyt2 iyd 5 mul sub def %.... /iy62 iyt2 iyd 6 mul sub def %.... /iy72 iyt2 iyd 7 mul sub def %.... /iy82 iyt2 iyd 8 mul sub def %.... /iy92 iyt2 iyd 9 mul sub def %.... ix21 iy02 moveto TBIM (C) show (Y8 ) jshowTM TBM ( 288:1) show ix21 iy12 moveto TBIM (C) show (Y7 ) jshowTM ( 144:1) show ix21 iy22 moveto TBIM (C) show (Y6 ) jshowTM ( 72:1) show ix21 iy32 moveto TBIM (C) show (Y5 ) jshowTM ( 36:1) show ix21 iy42 moveto TBIM (C) show (Y4 ) jshowTM ( 18:1) show ix21 iy52 moveto TBIM (C) show (Y3 ) jshowTM ( 9:1) show ix21 iy62 moveto TBIM (C) show (Y2 ) jshowTM ( 4,5:1) show ix21 iy72 moveto TBIM (C) show (Y1) jshowTM (2,25:1) show (3\051) ebshowTM TM ix22 iy02 moveto (88,9 : 0,31) show ix22 iy12 moveto (88,9 : 0,62) show ix22 iy22 moveto (88,9 : 1,25) show ix22 iy32 moveto TBM (88,9 : 2,50) show TM ix22 iy42 moveto (88,9 : 5,00) show ix22 iy52 moveto (88,9 : 10,0) show ix22 iy62 moveto (88,9 : 20,0) show ix22 iy72 moveto (88,9 : 40,0) show TM ix23 iy02 moveto (0,00 ... <0,46) show ix23 iy12 moveto (0,46 ... <0,93) show ix23 iy22 moveto (0,93 ... <1,87) show ix23 iy32 moveto TBM (1,87 ... <3,75) show TM ix23 iy42 moveto (3,75 ... <7,50) show ix23 iy52 moveto (7,50 ... <15,0) show ix23 iy62 moveto (15,0 ... <30,0) show ix23 iy72 moveto (30,0 ... <60,0) show ix24 iy02 moveto TIM (G) show (P0) ishowTM TM ( = 2,40) show ix24 iy12 moveto TIM (G) show (P1) ishowTM TM ( = 2,22) show ix24 iy22 moveto TIM (G) show (P2) ishowTM TM ( = 2,04) show ix24 iy32 moveto TBIM (G) show (P3) jshowTM TBM ( = 1,86) show ix24 iy42 moveto TIM (G) show (P4) ishowTM TM ( = 1,68) show ix24 iy52 moveto TIM (G) show (P5) ishowTM TM ( = 1,50) show ix24 iy62 moveto TIM (G) show (P6) ishowTM TM ( = 1,32) show ix24 iy72 moveto TIM (G) show (P7) ishowTM TM ( = 1,14) show ix25 iy02 moveto TIM (g) show (P0) ishowTM TM ( = 1,000) show ix25 iy12 moveto TIM (g) show (P1) ishowTM TM ( = 0,925) show ix25 iy22 moveto TIM (g) show (P2) ishowTM TM ( = 0,850) show ix25 iy32 moveto TBIM (g) show (P3) jshowTM TBM ( = 0,775) show ix25 iy42 moveto TIM (g) show (P4) ishowTM TM ( = 0,700) show ix25 iy52 moveto TIM (g) show (P5) ishowTM TM ( = 0,625) show ix25 iy62 moveto TIM (g) show (P6) ishowTM TM ( = 0,550) show ix25 iy72 moveto TIM (g) show (P7) ishowTM TM ( = 0,475) show ix26 iy02 moveto TM (Display, nur 062 lux) showde (display, only 062 lux) showen (monitor, s\363lo 062 lux) showes TK (l'\351cran, seulement 062 lux) showfr TM (monitor, solo 062 lux) showit (monitor, bare 062 lux) showjp ix26 iy12 moveto TM (Display, nur 125 lux) showde (display, only 125 lux) showen (monitor, s\363lo 125 lux) showes TK (l'\351cran, seulement 125 lux) showfr TM (monitor, solo 125 lux) showit (monitor, bare 125 lux) showjp ix26 iy22 moveto TM (Display, nur 250 lux) showde (display, only 250 lux) showen (monitor, s\363lo 250 lux) showes TK (l'\351cran, seulement 250 lux) showfr TM (monitor, solo 250 lux) showit (monitor, bare 250 lux) showjp ix26 iy32 moveto TBM (Display und Oberfl\344che) showde (display and surface) showen (display y superficie) showes TBK (l'\351cran et la surface) showfr TBM (display et la superficie) showit (display og overflaten) showjp ix26 iy42 moveto TM (Display und Oberfl\344che) showde (display and surface) showen (display y superficie) showes TK (l'\351cran et la surface) showfr TM (display et la superficie) showit (display og overflaten) showjp ix26 iy52 moveto TM (Display und Oberfl\344che) showde (display and surface) showen (display y superficie) showes TK (l'\351cran et la surface) showfr TM (display et la superficie) showit (display og overflaten) showjp ix26 iy62 moveto TM (Display und Oberfl\344che) showde (display and surface) showen (display y superficie) showes TK (l'\351cran et la surface) showfr TM (display et la superficie) showit (display og overflaten) showjp ix26 iy72 moveto TM (Display und Oberfl\344che) showde (display and surface) showen (display y superficie) showes TK (l'\351cran et la surface) showfr TM (display et la superficie) showit (display og overflaten) showjp %lines /iy01x iy01 400 add def /iy51x iy51 200 sub def /iy72x iy72 160 sub def 0 iy01x moveto xwidth 0 rlineto stroke 0 iy51x moveto xwidth 0 rlineto stroke 0 iy72x moveto xwidth 0 rlineto stroke /iyy iy01x iy72x sub def ix12 40 sub iy01x moveto 0 iyy neg rlineto stroke ix13 40 sub iy01x moveto 0 iyy neg rlineto stroke ix14 40 sub iy01x moveto 0 iyy neg rlineto stroke ix15 40 sub iy01x moveto 0 iyy neg rlineto stroke ix16 40 sub iy01x moveto 0 iyy neg rlineto stroke %ix17 40 sub iy01x moveto 0 iyy neg rlineto stroke /iyt 220 def /iyd 300 def /iy92 iy82 iyd 1 mul sub def %.... /iy102 iy82 iyd 2 mul sub def %.... /iy112 iy82 iyd 3 mul sub def %.... /iy122 iy82 iyd 4 mul sub def %.... /iy132 iy82 iyd 5 mul sub def %.... %**************************************************************** /CW {100 /Courier-ISOL1 FS} bind def /CV {150 /Courier-ISOL1 FS} bind def /CS {200 /Courier-ISOL1 FS} bind def /CK {220 /Courier-ISOL1 FS} bind def /CM {300 /Courier-ISOL1 FS} bind def /CG {350 /Courier-ISOL1 FS} bind def /CBW {100 /CourierB-ISOL1 FS} bind def /CBV {150 /CourierB-ISOL1 FS} bind def /CBS {200 /CourierB-ISOL1 FS} bind def /CBK {220 /CourierB-ISOL1 FS} bind def /CBM {300 /CourierB-ISOL1 FS} bind def /CBG {350 /CourierB-ISOL1 FS} bind def /RW {100 /Times-Roman FS} bind def /RV {150 /Times-Roman FS} bind def /RS {200 /Times-Roman FS} bind def /RK {220 /Times-Roman FS} bind def /RM {300 /Times-Roman FS} bind def /RG {350 /Times-Roman FS} bind def /RIW {100 /Times-Italic FS} bind def /RIV {150 /Times-Italic FS} bind def /RIS {200 /Times-Italic FS} bind def /RIK {220 /Times-Italic FS} bind def /RIM {300 /Times-Italic FS} bind def /RIG {350 /Times-Italic FS} bind def /RBW {100 /Times-Bold FS} bind def /RBV {150 /Times-Bold FS} bind def /RBS {200 /Times-Bold FS} bind def /RBK {220 /Times-Bold FS} bind def /RBM {300 /Times-Bold FS} bind def /RBG {350 /Times-Bold FS} bind def /RBIW {100 /Times-BoldItalic FS} bind def /RBIV {150 /Times-BoldItalic FS} bind def /RBIS {200 /Times-BoldItalic FS} bind def /RBIK {220 /Times-BoldItalic FS} bind def /RBIM {300 /Times-BoldItalic FS} bind def /RBIG {350 /Times-BoldItalic FS} bind def /TW {100 /Times-ISOL1 FS} bind def /TV {150 /Times-ISOL1 FS} bind def /TS {200 /Times-ISOL1 FS} bind def /TK {220 /Times-ISOL1 FS} bind def /TM {300 /Times-ISOL1 FS} bind def /TG {350 /Times-ISOL1 FS} bind def /TIW {100 /TimesI-ISOL1 FS} bind def /TIV {150 /TimesI-ISOL1 FS} bind def /TIS {200 /TimesI-ISOL1 FS} bind def /TIK {220 /TimesI-ISOL1 FS} bind def /TIM {300 /TimesI-ISOL1 FS} bind def /TIG {350 /TimesI-ISOL1 FS} bind def /TBW {100 /TimesB-ISOL1 FS} bind def /TBV {150 /TimesB-ISOL1 FS} bind def /TBS {200 /TimesB-ISOL1 FS} bind def /TBK {220 /TimesB-ISOL1 FS} bind def /TBM {300 /TimesB-ISOL1 FS} bind def /TBG {350 /TimesB-ISOL1 FS} bind def /TBIW {100 /TimesBI-ISOL1 FS} bind def /TBIV {150 /TimesBI-ISOL1 FS} bind def /TBIS {200 /TimesBI-ISOL1 FS} bind def /TBIK {220 /TimesBI-ISOL1 FS} bind def /TBIM {300 /TimesBI-ISOL1 FS} bind def /TBIG {350 /TimesBI-ISOL1 FS} bind def /SW {100 /Symbol FS} bind def /SV {150 /Symbol FS} bind def /SS {200 /Symbol FS} bind def /SK {220 /Symbol FS} bind def /SM {300 /Symbol FS} bind def /SG {350 /Symbol FS} bind def /ishowRV {RW -00 -30 rmoveto show 00 30 rmoveto RV} def /jshowRV {RBW -00 -30 rmoveto show 00 30 rmoveto RBV} def /ishowTV {TW -00 -30 rmoveto show 00 30 rmoveto TV} def /jshowTV {TBW -00 -30 rmoveto show 00 30 rmoveto TBV} def /ishowRS {RV -00 -40 rmoveto show 00 40 rmoveto RS} def /jshowRS {RBV -00 -40 rmoveto show 00 40 rmoveto RBS} def /ishowTS {TV -00 -40 rmoveto show 00 40 rmoveto TS} def /jshowTS {TBV -00 -40 rmoveto show 00 40 rmoveto TBS} def /ishowRK {RS -00 -50 rmoveto show 00 50 rmoveto RK} def /jshowRK {RBS -00 -50 rmoveto show 00 50 rmoveto RBK} def /ishowTK {TS -00 -50 rmoveto show 00 50 rmoveto TK} def /jshowTK {TBS -00 -50 rmoveto show 00 50 rmoveto TBK} def /ishowRM {RK -00 -60 rmoveto show 00 60 rmoveto RM} def /jshowRM {RBK -00 -60 rmoveto show 00 60 rmoveto RBM} def /ishowTM {TK -00 -60 rmoveto show 00 60 rmoveto TM} def /jshowTM {TBK -00 -60 rmoveto show 00 60 rmoveto TBM} def /ishowRG {RM -00 -70 rmoveto show 00 70 rmoveto RG} def /jshowRG {RBM -00 -70 rmoveto show 00 70 rmoveto RBG} def /ishowTG {TM -00 -70 rmoveto show 00 70 rmoveto TG} def /jshowTG {TBM -00 -70 rmoveto show 00 70 rmoveto TBG} def %special /enshowTK {TS -00 80 rmoveto show 00 -80 rmoveto TK} def /ebshowTK {TBS -00 80 rmoveto show 00 -80 rmoveto TBK} def /enshowTM {TK -00 90 rmoveto show 00 -90 rmoveto TM} def /ebshowTM {TBK -00 90 rmoveto show 00 -90 rmoveto TBM} def ix20 iy82 moveto TBK (1\051 ) show ix2r iy82 moveto TBK (Das Beispiel ist vorgesehen f\374r Datenprojektoren (P)) showde (The example is intended for data projectors (P)) showen (El ejemplo est\341 dise\361ado para proyectores de datos (P)) showes (L'exemple concerne des projecteurs de donn\351es (P)) showfr (L'esempio \351 destinato per proiettori dati (P)) showit (eksemplet er ment for data projektorer (P)) showjp TBK ( ) show (mit ) showde (with ) showen (con ) showes (avec ) showfr (con ) showit (med ) showjp TBIK ( ) show (G) show (P0) jshowTK TBK (=2,4.) show TBK ( ) show (vergleiche ) showde (compare ) showen (comparar ) showes (Voir l') showfr (confronta ) showit (sammemligne ) showjp RBK (IEC 61966-2-1: ) show TBIK (G) show (P0) jshowTK TBK (=2,4.) show lanind 2 eq {TK (2\051 ) show TK (Le syst\350me d'exploitation) showfr} if ix20 iy92 moveto lanind 2 ne {TK (2\051 ) show} if ix2r iy92 moveto TK (Das Rechnerbetriebssystem) showde (The computer operating system) showen (El sistema operativo del ordenador) showes (informatique) showfr (Il sistema operativo del computer) showit (Datamaskinen operativsystemet) showjp TIK ( Apple ) show TK (benutzte den Wert 1,8 bis 2010. ) showde (has used the value 1,8 until 2010. ) showen (ha utilizado el valor 1,8 hasta 2010. ) showes (a utilis\351 la valeur 1,8 jusqu'en 2010. ) showfr (ha utilizzado il valore 1,8 fino al 2010. ) showit (har brukt verdien 1,8 til 2010. ) showjp TK (Die \304nderung nach 2,4 ) showde (The change to 2,4 ) showen (El cambio a 2,4 ) showes (Le changement \340 2,4 ) showfr (Il cambiamento di 2,4 ) showit (Endringen til 2,4 ) showjp TIK ((= Windows)) show TK ( ist in die flasche Richtung.) showde ( is in the wrong direction.) showen ( est\341 en la direcci\363n equivocada.) showes ( c'effectue dans le mauvaise direction.) showfr ( \350 nella direzione sbagliata.) showit ( er i feil retning.) showjp ix20 iy102 moveto TK (3\051 ) show (F\374r den Kontrast ) showde (For the contrast ) showen (Para el contraste ) showes (Pour le contraste ) showfr (Per il contrasto ) showit (For Kontrast ) showjp TIK (C) show (Y) ishowTK TK (=2:1 ) show TK (sind die gesehene Leuchtdichte von Schwarz in der Projektion ) showde (the viewing luminances of both the black in the projection ) showen (la visualizaci\363n de luminancias de ambas en la proyecci\363n del negro ) showes (les luminances de vision du noir dans la projection ) showfr (la visualizzazione delle luminanze sia del nero nella sporgenza ) showit (visning luminances av b\345de svart i projeksjon ) showjp TK (und dem weissen Standardpapier gleich (!).) showde (and the white standard offset paper are equal (!).) showen (y el blanco papel offset est\341ndar son iguales (!).) showes (et le papier offset blanc standard sont \351gales (!).) showfr (e il bianco standard carta offset sono uguali (!).) showit (og den hvite standard offset papir er lik (!).) showjp ix2r iy112 moveto TK (Visuelle Erm\374dung durch das Leuchtdichteverh\344ltnis) showde (Visual fatigue caused by the adaptation luminance ratio) showen (La fatiga visual provocada por la relaci\363n de luminancias adaptaci\363n) showes (La fatigue visuelle due au rapport de luminance d'adaptation) showfr (Affaticamento visivo causati dall' adeguamento del rapporto di luminanza) showit (Visuell tretthet for\345rsaket av tilpasning luminans forholdet) showjp TK ( 36:1 ) show TK (aller Farben auf dem Display und dem Papier sollte reduziert werden.) showde (of the black at the screen and the black at the paper shall be reduced.) showen (de la pantalla en negro y el negro en el papel se reducir\341.) showes (du noir \340 l'\351cran et du noir sur le papier doit \340 l'est r\351duit. Si par) showfr (del nero a schermo e il nero a la carta deve essere ridotta.) showit (av den svarte p\345 skjermen og svart p\345 papir skal bli redusert.) showjp ix2r iy122 moveto TK (Wenn ein graues Display mit dem Normfarbwert ) showde (If for example a grey screen with the CIE tristimulus value ) showen (Por ejemplo, si una pantalla gris con los valores triest\355mulos CIE ) showes (exemple un \351cran gris avec la composante trichromatique CIE ) showfr (Se ad esempio una schermata grigia con la CIE tristimulus valore ) showit (Hvis for eksempel en gr\345 skjerm med CIE tristimulus verdi ) showjp TIK (Y) show (Z) ishowTK TK ( = 22,2 (=0,25*88.9)) show TK ( benutzt wird, dann bleibt die Kontraststufe ) showde ( is used the contrast step ) showen ( se utiliza el contraste paso ) showes ( est utilis\351 la gamme de contrastes ) showfr ( è utilizzato il contrasto fase ) showit ( brukes den kontrast trinn ) showjp TIK (C) show (Yi) ishowTK TK ( konstant.) showde ( remains constant.) showen ( permanece constante.) showes ( reste con\255) showfr ( rimane costante.) showit ( forblir konstant.) showjp ix2r iy132 moveto TK (Das Leuchtdichteverh\344ltnis aller Farben auf Bildschirm ) showde (und Papier ist reduziert auf 9:1. ) showde (Dies reduziert die visuelle Erm\374dung.) showde (Then the luminance ratio of all colours at the screen ) showen (and the paper has reduced to 9:1. ) showen (This reduces visual fatigue.) showen (A continuaci\363n, la relaci\363n de luminancias de todos los colores ) showes (en la pantalla y el papel se ha reducido a 9:1. ) showes (Esto reduce la fatiga visual.) showes (stante. Ainsi, le rapport de luminance de toutes les couleurs ) showfr (\340 l'\351cran ) showfr (et sur le papier a \351t\351 r\351duit \340 9:1. ) showfr (Cela r\351duit la fatigue visuelle.) showfr (Quindi il rapporto di luminanza di tutti i colori a schermo ) showit (e la carta \350 ridotto a 9:1. ) showit (Questo riduce l'affaticamento visivo.) showit (Deretter luminansen utveksling av alle farger p\345 skjermen ) showjp (og p\345 papir har redusert til 9:1. ) showjp (Dette reduserer visuell tretthet.) showjp showpage grestore %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 86 SHAl add 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 18 %line 409 %!PS-Adobe-3.0 EPSF-3.0 AES40-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 (AES40-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 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 /SHSr 2 MM def /SHAr 2 MM def BeginEPSF 161 MM 06 MM sub SHSr sub 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 AES41-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 (AES41-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 showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 219 MM 06 MM sub SHAr add 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 AES41-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 (AES41-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 showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 06 MM sub SHSr sub 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 http://farbe.li.tu-berlin.de/AES4/AES41-3 %%BoundingBox: 70 84 383 320 %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: farbe.li.tu-berlin.de/AES4/AES4.HTM) /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1) /Subject (goto: http://farbe.li.tu-berlin.de http://130.149.60.45/~farbmetrik) /Keywords (image reproduction, colour devices) /Creator (klaus.richter@mac.com) /CreationDate (D:2020110112000) /ModDate (D:20201101112000) /DOCINFO pdfmark13 [ /View [ /Fit ] /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 /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 /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 %font0309.ps*********************************************** %special size TS,BS 200->160 /CW {100 /Courier-ISOL1 FS} bind def /CV {150 /Courier-ISOL1 FS} bind def /CS {160 /Courier-ISOL1 FS} bind def /CK {250 /Courier-ISOL1 FS} bind def /CM {300 /Courier-ISOL1 FS} bind def /CG {350 /Courier-ISOL1 FS} bind def /CBW {100 /CourierB-ISOL1 FS} bind def /CBV {150 /CourierB-ISOL1 FS} bind def /CBS {160 /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 /RW {100 /Times-Roman FS} bind def /RV {150 /Times-Roman FS} bind def /RS {160 /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 /RIW {100 /Times-Italic FS} bind def /RIV {150 /Times-Italic FS} bind def /RIS {160 /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 /RBW {100 /Times-Bold FS} bind def /RBV {150 /Times-Bold FS} bind def /RBS {160 /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 /RBIW {100 /Times-BoldItalic FS} bind def /RBIV {150 /Times-BoldItalic FS} bind def /RBIS {160 /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 /TW {100 /Times-ISOL1 FS} bind def /TV {150 /Times-ISOL1 FS} bind def /TS {160 /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 /TIW {100 /TimesI-ISOL1 FS} bind def /TIV {150 /TimesI-ISOL1 FS} bind def /TIS {160 /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 /TBW {100 /TimesB-ISOL1 FS} bind def /TBV {150 /TimesB-ISOL1 FS} bind def /TBS {160 /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 /TBIW {100 /TimesBI-ISOL1 FS} bind def /TBIV {150 /TimesBI-ISOL1 FS} bind def /TBIS {160 /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 /SW {100 /Symbol FS} bind def /SV {150 /Symbol FS} bind def /SS {160 /Symbol FS} bind def /SK {250 /Symbol FS} bind def /SM {300 /Symbol FS} bind def /SG {350 /Symbol FS} bind def /ishowRV {RW -00 -30 rmoveto show 00 30 rmoveto RV} def /jshowRV {RBW -00 -30 rmoveto show 00 30 rmoveto RBV} def /ishowTV {TW -00 -30 rmoveto show 00 30 rmoveto TV} def /jshowTV {TBW -00 -30 rmoveto show 00 30 rmoveto TBV} def /ishowRS {RV -00 -40 rmoveto show 00 40 rmoveto RS} def /jshowRS {RBV -00 -40 rmoveto show 00 40 rmoveto RBS} def /ishowTS {TV -00 -40 rmoveto show 00 40 rmoveto TS} def /jshowTS {TBV -00 -40 rmoveto show 00 40 rmoveto TBS} def /ishowRK {RS -00 -50 rmoveto show 00 50 rmoveto RK} def /jshowRK {RBS -00 -50 rmoveto show 00 50 rmoveto RBK} def /ishowTK {TS -00 -50 rmoveto show 00 50 rmoveto TK} def /jshowTK {TBS -00 -50 rmoveto show 00 50 rmoveto TBK} def /ishowRM {RK -00 -60 rmoveto show 00 60 rmoveto RM} def /jshowRM {RBK -00 -60 rmoveto show 00 60 rmoveto RBM} def /ishowTM {TK -00 -60 rmoveto show 00 60 rmoveto TM} def /jshowTM {TBK -00 -60 rmoveto show 00 60 rmoveto TBM} def /ishowRG {RM -00 -70 rmoveto show 00 70 rmoveto RG} def /jshowRG {RBM -00 -70 rmoveto show 00 70 rmoveto RBG} def /ishowTG {TM -00 -70 rmoveto show 00 70 rmoveto TG} def /jshowTG {TBM -00 -70 rmoveto show 00 70 rmoveto TBG} def %font0309.ps*********************************************** /A4quer {598 0 translate 90 rotate} def /LAB*rc 33 array def /XYZrc 33 array def /LAB*ra 33 array def /XYZra 33 array def /LAB*la 33 array def /XYZla 33 array def /LAB*lc 33 array def /XYZlc 33 array def %part 2 /LAB*c 48 array def /XYZc 48 array def /LAB*sa 48 array def /XYZsa 48 array def /LAB*s0 48 array def /XYZc0 48 array def /Xrcr089 16 array def /Yrcr089 16 array def /Zrcr089 16 array def /Lrcr089 16 array def /arcr089 16 array def /brcr089 16 array def /Xrcrn089 16 array def /Yrcrn089 16 array def /Zrcrn089 16 array def /Lrcrn089 16 array def /arcrn089 16 array def /brcrn089 16 array def /LABN 12 array def /LAB*system { %BEG procedure LAB*system /LAB*ORS [%D=Device OYLCVMO+NW %for Offset Reflective System (ORS) 58.62 -30.63 -42.75 %C 0 %see Table 1 of ISO/IEC 15775:1999-12 25.72 31.45 -44.36 %V 1 48.13 75.20 -6.80 %M 2 47.94 65.31 52.07 %0 3 90.37 -11.16 96.17 %Y 4 50.90 -62.97 36.71 %L 5 58.62 -32.63 -42.75 %C 6 18.01 0.50 -0.47 %N 7 95.41 -0.99 4.76 %W 8 00.01 0.84 -1.69 %N0 9 100.0 -1.08 5.06 %W1 10 ] def %OYLCVMO+NW /LAB*TLS0 [%D=Device OYLCVMO+NW %for Television Luminous System (TLS) 86.88 -46.17 -13.56 %C 0 %see Table 1 of ISO/IEC 15775:1999-12 30.39 76.06 -103.6 %V 1 57.30 94.35 -20.70 %M 2 50.50 76.92 64.55 %0 3 92.66 -20.70 90.75 %Y 4 83.63 -82.76 79.90 %L 5 86.88 -46.17 -13.56 %C 6 0.01 0.00 0.00 %N0 7 95.41 0.00 0.00 %W 8 18.01 0.00 0.00 %N 9 100.0 0.00 0.00 %W1 10 ] def %OYLCVMO+NW /LAB*TLS [%D=Device OYLCVMO+NW %for Television Luminous System (TLS) 87.14 -44.43 -13.13 %C 0 %computed from Table 1 of ISO/IEC 15775:1999-12 31.90 24.46 -37.39 %V 1 % with Yn=2.52 59.01 89.33 -19.44 %M 2 52.76 71.63 49.88 %0 3 92.74 -20.04 84.97 %Y 4 84.00 -79.00 73.94 %L 5 87.14 -44.43 -13.13 %C 6 18.01 0.00 0.00 %N 7 95.41 0.00 0.00 %W 8 0.01 0.00 0.00 %N0 9 100.0 0.00 0.00 %W1 10 ] def %OYLCVMO+NW 7 1 8 {/sISO exch def /i30 sISO 3 mul def /i31 i30 1 add def /i32 i30 2 add def ISYSTEM 0 eq { %ORS LAB*rc i30 LAB*ORS i30 get put LAB*rc i31 LAB*ORS i31 get put LAB*rc i32 LAB*ORS i32 get put } if ISYSTEM 1 eq { %TLS LAB*rc i30 LAB*TLS i30 get put LAB*rc i31 LAB*TLS i31 get put LAB*rc i32 LAB*TLS i32 get put } if } for /L*N LAB*rc 21 get def /A*N LAB*rc 22 get def /B*N LAB*rc 23 get def /L*W LAB*rc 24 get def /A*W LAB*rc 25 get def /B*W LAB*rc 26 get def } bind def %END procedure LAB*system /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 /cvishowb {cvi 6 string cvs show ( ) show} def /cvsshow1b {10 mul cvi 0.1 mul 7 string cvs show ( ) show} def /cvsshow2b {100 mul cvi 0.01 mul 7 string cvs show ( ) show} def /cvsshow3b {1000 mul cvi 0.001 mul 7 string cvs show ( ) show} def /cvsshow1r {0.05 add 10 mul cvi 0.1 mul 7 string cvs show} def /cvsshow2r {0.005 add 100 mul cvi 0.01 mul 7 string cvs show} def /cvsshow3r {0.0005 add 1000 mul cvi 0.001 mul 7 string cvs show} def /cvsshow1br {0.05 add 10 mul cvi 0.1 mul 7 string cvs show ( ) show} def /cvsshow2br {0.005 add 100 mul cvi 0.01 mul 7 string cvs show ( ) show} def /cvsshow3br {0.0005 add 1000 mul cvi 0.001 mul 7 string cvs show ( ) show} def /cvi100 {100 mul cvi /xi exch def xi 0 lt {/vorz -1 def} {/vorz 1 def} ifelse /xia xi abs def vorz -1 eq {(\255) show} {(0) show} ifelse xia 0 ge xia 9 le {(0000) show} if xia 10 ge xia 99 le and {(000) show} if xia 100 ge xia 999 le and {(00) show} if xia 1000 ge xia 9999 le and {(0) show} if xia cvishow } bind def /cvi001 {/xi exch def /xia xi abs 0.5 add cvi def xia 0 ge xia 9 le {(0) show} if xia cvishow } bind def /tspace {dup abs 1.0 le {( ) show} if dup dup -1.0 le exch -10 gt and {( ) show} if dup dup 1.0 gt exch 10 lt and {( ) show} if dup dup 1.0 gt exch 10 ge and {( ) show} if } bind def /trushow {tspace 0.005 add 100 mul truncate 100 div 10 string cvs show} bind def /troshow {0.005 add 100 mul truncate 100 div 10 string cvs show} bind def /trushow3 {0.0005 add 1000 mul truncate 1000 div 10 string cvs show} bind def %%EndProlog /lanind 0 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 {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 /showea {1 lanind le {show} {pop} ifelse} bind def /lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def} {/lanind1 1 def /lanind2 1 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 /xchartg where {pop /xchart xchartg def} {/xchart 0 def} ifelse /xcolorg where {pop /xcolor xcolorg def} {/xcolor 1 def} ifelse gsave /DecodeXYZ* {dup 6 29 div ge {dup dup mul mul} {4 29 div sub 108 841 div mul} ifelse} bind def /LABN [(00, F) (01, E) (02, D) (03, C) (04, B) (05, A) (06, 9) (07, 8) (08, 7) (09, 6) (10, 5) (11, 4) (12, 3) (13, 2) (14, 1) (15, 0)] def /ISYSTEM 1 def %1 1 1 {/ISYSTEM exch def %ISYSTEM=0,1 %0 1 3 {/iout exch def %iout=0,3 /iout 2 def gsave LAB*system /ix1 50 def %COLOR /ix2 850 def %L* /ix3 3450 def %Y /ix4 6150 def %Yt /ix5 8850 def %t /ixd 1200 def /iyd 170 def /iy00 4600 def /iy0d 1510 def /iy01 iy00 def /iy02 iy01 iy0d sub def /iy03 iy02 iy0d sub def /iy04 iy03 iy0d sub def /iy05 iy04 iy0d sub def 72 90 translate 0.02 MM dup scale 15 setlinewidth 1 1 0.5 setrgbcolor 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto closepath fill 0 0 0 setrgbcolor 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto closepath stroke 0 setgray 100 /Times-ISOL1 FS 50 -100 moveto (AES41-3N) show %iout 0 eq {(AES40-3N) show} if %iout 1 eq {(AES40-7N) show} if %iout 2 eq {(AES41-3N) show} if %iout 3 eq {(AES41-7N) show} if /x00 370 def /y00 400 def x00 y00 moveto 3000 0 rlineto stroke x00 y00 moveto 0 2800 rlineto stroke 0 1 14 {/i exch def %i=1,14 x00 i 200 mul add y00 100 sub moveto 0 200 rlineto stroke %horizontal x00 i 200 mul add 050 sub y00 300 sub moveto i 8 le {( ) show} if i 1 add cvishow } for %i=1,14 0 1 07 {/i exch def %i=1,07 x00 100 sub y00 i 400 mul add moveto 200 0 rlineto stroke %horizontal x00 200 sub y00 i 400 mul add 030 sub moveto % i cvsshow1 i cvishow %(,0) show } for %i=1,06 x00 y00 moveto 0 3100 rlineto stroke %vertical axis x00 050 sub y00 3000 add moveto 050 100 rlineto 050 -100 rlineto stroke %arrow 100 y00 3200 add moveto SS (D) show 20 0 rmoveto TBIS (L*) show x00 3000 add y00 300 sub moveto TBS (Grau\255Differenzen) showde (Grey differences) showen (gris diferencias) showes (Diff\351rences de gris) showfr (differenze del grigio) showit (gr\345 forskjeller) showjp TBIS ( n) show x00 2900 add y00 050 add moveto 100 -050 rlineto -100 -050 rlineto stroke %arrow %ix2 200 sub 3600 moveto 0 0400 rlineto stroke % achromatic (D65) colours /XLWD65100 95.04 def /YLWD65100 100.00 def /ZLWD65100 108.88 def /Xwref XYZra 24 get def /Ywref XYZra 25 get def /Zwref XYZra 26 get def /Xnref 2.52 0.9505 mul def /Ynref 2.52 def /Znref 2.52 1.0888 mul def /ix2i ix2 800 add def /iy iy02 iyd add 50 add def /iy0 iy 500 add def /iy1 iy 290 add def 020 iy0 moveto TBS (Helligkeit ) showde (Lightness ) showen (Claridad ) showes (Clart\351 ) showfr (Chiarezza ) showit (Lyshet ) showjp TBIS (L*) show (CIELAB) jshowTS /ilf 8 array def /ilf [0.00 0.25 0.50 1.00 2.00 4.00 8.00 16.00] def /Lrefl 8 array def /Lrefl [(0%) (0,6%) (1,2%) (2,5%) (5%) (10%) (20%) (40%)] def %Reference black and factors /YrN 2.52 def /LrefNt 8 array def /LrefNi 8 array def LrefNi 0 0 put 1 1 7 {/i exch def %i=0,7 /Ynref YrN ilf i get mul def LrefNi i 116 Ynref 0.01 mul 0.3333 exp mul 16 sub put } for %i=0,7 iout 0 eq {/ila1 0 def /ilad 7 def /ila2 7 def} if iout 1 eq {/ila1 0 def /ilad 3 def /ila2 3 def} if iout 2 eq {/ila1 0 def /ilad 7 def /ila2 7 def} if iout 3 eq {/ila1 0 def /ilad 3 def /ila2 3 def} if ila1 ilad ila2 {/il exch def %il=0,x /il2 il 2 mul def /Xnref YrN ilf il get mul 0.9505 mul def /Ynref YrN ilf il get mul def /Znref YrN ilf il get mul 1.0890 mul def /PLref (System OLS00) def /TLref (System TLS00) def LAB*TLS 21 LrefNi il get put /i11 7 3 mul def /i12 i11 1 add def /i13 i11 2 add def %colour N /i21 8 3 mul def /i22 i21 1 add def /i23 i21 2 add def %colour W 0 1 15 {/sISO exch def /i30 sISO 3 mul def /i31 i30 1 add def /i32 i30 2 add def ISYSTEM 0 eq { %ORS LAB*c i30 LAB*ORS i11 get LAB*ORS i21 get LAB*ORS i11 get sub sISO 15 div mul add put LAB*c i31 LAB*ORS i12 get LAB*ORS i22 get LAB*ORS i12 get sub sISO 15 div mul add put LAB*c i32 LAB*ORS i13 get LAB*ORS i23 get LAB*ORS i13 get sub sISO 15 div mul add put } if ISYSTEM 1 eq { %TLS LAB*c i30 LAB*TLS i11 get LAB*TLS i21 get LAB*TLS i11 get sub sISO 15 div mul add put LAB*c i31 LAB*TLS i12 get LAB*TLS i22 get LAB*TLS i12 get sub sISO 15 div mul add put LAB*c i32 LAB*TLS i13 get LAB*TLS i23 get LAB*TLS i13 get sub sISO 15 div mul add put } if } for /L*N LAB*c 0 get def /A*N LAB*c 1 get def /B*N LAB*c 2 get def /L*W LAB*c 45 get def /A*W LAB*c 46 get def /B*W LAB*c 47 get def /A*D A*W A*N sub def /B*D B*W B*N sub def /L*Nsa L*N def /A*Nsa 0.0 def /B*Nsa 0.0 def /L*Wsa L*W def /A*Wsa 0.0 def /B*Wsa 0.0 def /L*Ns0 0.0 def /A*Ns0 0.0 def /B*Ns0 0.0 def /L*Ws0 L*W L*N sub def /A*Ws0 0.0 def /B*Ws0 0.0 def /Xssrefl Xnref def /Yssrefl Ynref def /Zssrefl Znref def /Xrsrefl Xnref def /Yrsrefl Ynref def /Zrsrefl Znref def 0 1 15 {/i exch def /i30 i 3 mul def /i31 i 3 mul 1 add def /i32 i 3 mul 2 add def /X* {LAB*c i30 get 16 add 116 div LAB*c i31 get 500 div add} bind def /Y* {LAB*c i30 get 16 add 116 div} bind def /Z* {LAB*c i30 get 16 add 116 div LAB*c i32 get 200 div sub} bind def XYZc i30 X* DecodeXYZ* 95.05 mul put XYZc i31 Y* DecodeXYZ* 100.00 mul put XYZc i32 Z* DecodeXYZ* 108.90 mul put il 0 eq {%il=0 XYZc0 i30 XYZc i30 get put XYZc0 i31 XYZc i31 get put XYZc0 i32 XYZc i32 get put } if %il=0 } for %i=0,15 0 1 15 {/i exch def /i30 i 3 mul def /i31 i 3 mul 1 add def /i32 i 3 mul 2 add def LAB*sa i30 LAB*c i30 get put /l*CIE LAB*c i30 get L*N sub L*W L*N sub div def %system rel. lightn. /a*s A*W A*N sub l*CIE mul def /b*s B*W B*N sub l*CIE mul def LAB*sa i31 LAB*c i31 get A*N sub a*s sub put LAB*sa i32 LAB*c i32 get B*N sub b*s sub put } for %i=0,15 0 1 15 {/i exch def /i30 i 3 mul def /i31 i 3 mul 1 add def /i32 i 3 mul 2 add def /X*sa {LAB*sa i30 get 16 add 116 div LAB*sa i31 get 500 div add} bind def /Y*sa {LAB*sa i30 get 16 add 116 div} bind def /Z*sa {LAB*sa i30 get 16 add 116 div LAB*sa i32 get 200 div sub} bind def XYZsa i30 X*sa DecodeXYZ* 95.05 mul put XYZsa i31 Y*sa DecodeXYZ* 100.00 mul put XYZsa i32 Z*sa DecodeXYZ* 108.90 mul put } for %i=0,15 0 1 15 {/i exch def %i=0,15 /i30 i 3 mul def /i31 i 3 mul 1 add def /i32 i 3 mul 2 add def Xrcr089 i XYZc0 i30 get put Yrcr089 i XYZc0 i31 get put Zrcr089 i XYZc0 i32 get put } for %i=0,15 0 1 15 {/i exch def %i=0,15 Yrcrn089 i Yrcr089 i get Ynref add Yrcr089 15 get Ynref add div 88.59 mul put /YQ Yrcrn089 i get YLWD65100 div def YQ 0 lt {/YQ 0.00000001 def} if Lrcrn089 i YQ 0.008856 lt {903.3 YQ mul} {YQ 0.33333333 exp 116 mul 16 sub} ifelse put } for %i=0,15 %standard difference 0 1 0 setrgbcolor /deltaL 1.7 def x00 y00 deltaL 400 mul add moveto 3000 0 rlineto stroke 0 setgray il 0 eq {%il=0 0 setgray /deltaL Lrcrn089 15 get Lrcrn089 0 get sub 15 div def x00 1800 add y00 deltaL 400 mul add 150 add moveto TS (Start\255 und linearisierte Ausgabe; ) showde (start and linearized output; ) showen (inicio y salida linealizada; ) showes (rendu initial et linearis\351; ) showfr (prima uscita e uscita linearizzato; ) showit (start og linearized utgang; ) showjp TIS (Y) show (N) ishowTS TS (=0) show 0 setgray x00 3030 add y00 deltaL 400 mul add 050 sub moveto SS (D) show 20 0 rmoveto TIS (L*) show TS (=6,3) show %deltaL cvsshow1 TS (; ) show TIS (L*) show (N) ishowTS TS (=) show LrefNi il get cvi001 newpath } if %il=0 newpath iout 2 ge {%iout>=2 0 1 14 {/i exch def %i=1,14 /r15 i 15 div def r15 dup dup setrgbcolor i 14 eq {0 setgray} if %/deltaL Lrcrn089 15 get Lrcrn089 0 get sub 15 div def /deltaL 1.7 def x00 i 200 mul add y00 deltaL 400 mul add 050 0 360 arc i 13 le {fill} {stroke} ifelse %horizontal } for %i=1,14 il 0 ne {%il#0 0 setgray x00 3030 add y00 deltaL 400 mul add 150 add moveto TS (linearisierte Ausgabe; ) showde (linearized output; ) showen (salida linealizada; ) showes (rendu linearis\351; ) showfr (uscita linearizzato; ) showit (linearized utgang; ) showjp TIS (Y) show (N) ishowTS TS (=40) show 0 setgray x00 3030 add y00 deltaL 400 mul add 100 sub moveto SS (D) show 20 0 rmoveto TIS (L*) show TS (=1,7; ) show %deltaL cvsshow1 TIS (L*) show (N) ishowTS TS (=70) show %LrefNi il get cvi001 newpath } if %il#0 } if %iout>=2 1 0 0 setrgbcolor /deltaL 1 def x00 y00 deltaL 400 mul add moveto 3000 0 rlineto stroke 0 setgray x00 3030 add y00 deltaL 400 mul add 050 sub moveto SS (D) show 20 0 rmoveto TIS (L*) show TS (=1,0) show %deltaL cvsshow1 x00 3030 add y00 deltaL 400 mul add 250 sub moveto TS (=Schwelle) showde (=Threshold) showen (=Umbral) showes (=Seuil) showfr (=Valore di soglia) showes (=Terskel) showjp newpath 0 1 14 {/i exch def %i=1,14 /r15 i 15 div def r15 dup dup setrgbcolor i 14 eq {0 setgray} if x00 i 200 mul add y00 Lrcrn089 i 1 add get Lrcrn089 i get sub 400 mul add 050 0 360 arc i 13 le {fill} {stroke} ifelse %horizontal } for %i=1,14 il 0 ne {%il#0 /deltaL Lrcrn089 15 get Lrcrn089 14 get sub def 0 setgray x00 3030 add y00 deltaL 400 mul add 150 sub iout 0 eq iout 2 eq or {300 add} if moveto iout 0 eq iout 2 eq or x00 3030 add y00 deltaL 400 mul add 150 add moveto { TS (Startausgabe; ) showde (start output; ) showen (inicio salida; ) showes (rendu de d\351part; ) showfr (prima uscita; ) showit (start utgang; ) showjp TIS (Y) show (N) ishowTS TS (=40) show x00 3030 add y00 deltaL 400 mul add 50 sub moveto SS (D) show 20 0 rmoveto TIS (L*) show TS (=variabel, ) showde (=variable, ) showen (=variable, ) showes (=variable, ) showfr (=variable, ) showit (=variabel, ) showjp TIS (L*) show (N) ishowTS TS (=70) show } {x00 3030 add y00 deltaL 400 mul add 150 sub TS (Startausgabe; ) showde (start output; ) showen (inicio salida; ) showes (rendu de d\351part; ) showfr (prima uscita; ) showit (start utgang; ) showjp TIS (Y) show (N) ishowTS TS (=2,5) show} ifelse } if %il#0 } for %il=0,x x00 500 add y00 200 add moveto TS ("gleiche dunkle Graus") showde ("equal dark greys") showen ("Igual grises oscuros") showes ("gris fonc\351s \351quidistants") showfr ("uguale grigio scuro") showit ("lik m\370rke gr\345farger") showjp TBS x00 450 add y00 2700 add moveto (A) show x00 450 add y00 0800 add moveto (C) show x00 1500 add y00 1300 add moveto (B) show showpage grestore % } for %iout=0,3 %} for %ISYSTEM=0,1 %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 219 MM 06 MM sub SHAr add 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 AES41-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 (AES41-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 showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 06 MM sub SHSr sub 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 AES41-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 (AES41-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 showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 219 MM 06 MM sub SHAr add 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 AES41-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 (AES41-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 showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 06 MM sub SHSr sub 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 http://farbe.li.tu-berlin.de/AES4/AES41-7 %%BoundingBox: 70 84 383 320 %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: farbe.li.tu-berlin.de/AES4/AES4.HTM) /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1) /Subject (goto: http://farbe.li.tu-berlin.de http://130.149.60.45/~farbmetrik) /Keywords (image reproduction, colour devices) /Creator (klaus.richter@mac.com) /CreationDate (D:2020110112000) /ModDate (D:20201101112000) /DOCINFO pdfmark17 [ /View [ /Fit ] /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 /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 /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 %font0309.ps*********************************************** /CW {100 /Courier-ISOL1 FS} bind def /CV {150 /Courier-ISOL1 FS} bind def /CS {160 /Courier-ISOL1 FS} bind def /CK {250 /Courier-ISOL1 FS} bind def /CM {300 /Courier-ISOL1 FS} bind def /CG {350 /Courier-ISOL1 FS} bind def /CBW {100 /CourierB-ISOL1 FS} bind def /CBV {150 /CourierB-ISOL1 FS} bind def /CBS {160 /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 /RW {100 /Times-Roman FS} bind def /RV {150 /Times-Roman FS} bind def /RS {160 /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 /RIW {100 /Times-Italic FS} bind def /RIV {150 /Times-Italic FS} bind def /RIS {160 /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 /RBW {100 /Times-Bold FS} bind def /RBV {150 /Times-Bold FS} bind def /RBS {160 /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 /RBIW {100 /Times-BoldItalic FS} bind def /RBIV {150 /Times-BoldItalic FS} bind def /RBIS {160 /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 /TW {100 /Times-ISOL1 FS} bind def /TV {150 /Times-ISOL1 FS} bind def /TS {160 /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 /TIW {100 /TimesI-ISOL1 FS} bind def /TIV {150 /TimesI-ISOL1 FS} bind def /TIS {160 /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 /TBW {100 /TimesB-ISOL1 FS} bind def /TBV {150 /TimesB-ISOL1 FS} bind def /TBS {160 /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 /TBIW {100 /TimesBI-ISOL1 FS} bind def /TBIV {150 /TimesBI-ISOL1 FS} bind def /TBIS {160 /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 /SW {100 /Symbol FS} bind def /SV {150 /Symbol FS} bind def /SS {160 /Symbol FS} bind def /SK {250 /Symbol FS} bind def /SM {300 /Symbol FS} bind def /SG {350 /Symbol FS} bind def /ishowRV {RW -00 -30 rmoveto show 00 30 rmoveto RV} def /jshowRV {RBW -00 -30 rmoveto show 00 30 rmoveto RBV} def /ishowTV {TW -00 -30 rmoveto show 00 30 rmoveto TV} def /jshowTV {TBW -00 -30 rmoveto show 00 30 rmoveto TBV} def /ishowRS {RV -00 -40 rmoveto show 00 40 rmoveto RS} def /jshowRS {RBV -00 -40 rmoveto show 00 40 rmoveto RBS} def /ishowTS {TV -00 -40 rmoveto show 00 40 rmoveto TS} def /jshowTS {TBV -00 -40 rmoveto show 00 40 rmoveto TBS} def /ishowRK {RS -00 -50 rmoveto show 00 50 rmoveto RK} def /jshowRK {RBS -00 -50 rmoveto show 00 50 rmoveto RBK} def /ishowTK {TS -00 -50 rmoveto show 00 50 rmoveto TK} def /jshowTK {TBS -00 -50 rmoveto show 00 50 rmoveto TBK} def /ishowRM {RK -00 -60 rmoveto show 00 60 rmoveto RM} def /jshowRM {RBK -00 -60 rmoveto show 00 60 rmoveto RBM} def /ishowTM {TK -00 -60 rmoveto show 00 60 rmoveto TM} def /jshowTM {TBK -00 -60 rmoveto show 00 60 rmoveto TBM} def /ishowRG {RM -00 -70 rmoveto show 00 70 rmoveto RG} def /jshowRG {RBM -00 -70 rmoveto show 00 70 rmoveto RBG} def /ishowTG {TM -00 -70 rmoveto show 00 70 rmoveto TG} def /jshowTG {TBM -00 -70 rmoveto show 00 70 rmoveto TBG} def %font0309.ps*********************************************** /A4quer {598 0 translate 90 rotate} def /LAB*rc 33 array def /XYZrc 33 array def /LAB*ra 33 array def /XYZra 33 array def /LAB*la 33 array def /XYZla 33 array def /LAB*lc 33 array def /XYZlc 33 array def %part 2 /LAB*c 48 array def /XYZc 48 array def /LAB*sa 48 array def /XYZsa 48 array def /LAB*s0 48 array def /XYZc0 48 array def /Xrcr089 16 array def /Yrcr089 16 array def /Zrcr089 16 array def /Lrcr089 16 array def /arcr089 16 array def /brcr089 16 array def /Xrcrn089 16 array def /Yrcrn089 16 array def /Zrcrn089 16 array def /Lrcrn089 16 array def /arcrn089 16 array def /brcrn089 16 array def /LABN 12 array def /LAB*system { %BEG procedure LAB*system /LAB*ORS [%D=Device OYLCVMO+NW %for Offset Reflective System (ORS) 58.62 -30.63 -42.75 %C 0 %see Table 1 of ISO/IEC 15775:1999-12 25.72 31.45 -44.36 %V 1 48.13 75.20 -6.80 %M 2 47.94 65.31 52.07 %0 3 90.37 -11.16 96.17 %Y 4 50.90 -62.97 36.71 %L 5 58.62 -32.63 -42.75 %C 6 18.01 0.50 -0.47 %N 7 95.41 -0.99 4.76 %W 8 00.01 0.84 -1.69 %N0 9 100.0 -1.08 5.06 %W1 10 ] def %OYLCVMO+NW /LAB*TLS0 [%D=Device OYLCVMO+NW %for Television Luminous System (TLS) 86.88 -46.17 -13.56 %C 0 %see Table 1 of ISO/IEC 15775:1999-12 30.39 76.06 -103.6 %V 1 57.30 94.35 -20.70 %M 2 50.50 76.92 64.55 %0 3 92.66 -20.70 90.75 %Y 4 83.63 -82.76 79.90 %L 5 86.88 -46.17 -13.56 %C 6 0.01 0.00 0.00 %N0 7 95.41 0.00 0.00 %W 8 18.01 0.00 0.00 %N 9 100.0 0.00 0.00 %W1 10 ] def %OYLCVMO+NW /LAB*TLS [%D=Device OYLCVMO+NW %for Television Luminous System (TLS) 87.14 -44.43 -13.13 %C 0 %computed from Table 1 of ISO/IEC 15775:1999-12 31.90 24.46 -37.39 %V 1 % with Yn=2.52 59.01 89.33 -19.44 %M 2 52.76 71.63 49.88 %0 3 92.74 -20.04 84.97 %Y 4 84.00 -79.00 73.94 %L 5 87.14 -44.43 -13.13 %C 6 18.01 0.00 0.00 %N 7 95.41 0.00 0.00 %W 8 0.01 0.00 0.00 %N0 9 100.0 0.00 0.00 %W1 10 ] def %OYLCVMO+NW 7 1 8 {/sISO exch def /i30 sISO 3 mul def /i31 i30 1 add def /i32 i30 2 add def ISYSTEM 0 eq { %ORS LAB*rc i30 LAB*ORS i30 get put LAB*rc i31 LAB*ORS i31 get put LAB*rc i32 LAB*ORS i32 get put } if ISYSTEM 1 eq { %TLS LAB*rc i30 LAB*TLS i30 get put LAB*rc i31 LAB*TLS i31 get put LAB*rc i32 LAB*TLS i32 get put } if } for /L*N LAB*rc 21 get def /A*N LAB*rc 22 get def /B*N LAB*rc 23 get def /L*W LAB*rc 24 get def /A*W LAB*rc 25 get def /B*W LAB*rc 26 get def } bind def %END procedure LAB*system /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 /cvishowb {cvi 6 string cvs show ( ) show} def /cvsshow1b {10 mul cvi 0.1 mul 7 string cvs show ( ) show} def /cvsshow2b {100 mul cvi 0.01 mul 7 string cvs show ( ) show} def /cvsshow3b {1000 mul cvi 0.001 mul 7 string cvs show ( ) show} def /cvsshow1r {0.05 add 10 mul cvi 0.1 mul 7 string cvs show} def /cvsshow2r {0.005 add 100 mul cvi 0.01 mul 7 string cvs show} def /cvsshow3r {0.0005 add 1000 mul cvi 0.001 mul 7 string cvs show} def /cvsshow1br {0.05 add 10 mul cvi 0.1 mul 7 string cvs show ( ) show} def /cvsshow2br {0.005 add 100 mul cvi 0.01 mul 7 string cvs show ( ) show} def /cvsshow3br {0.0005 add 1000 mul cvi 0.001 mul 7 string cvs show ( ) show} def /cvi100 {100 mul cvi /xi exch def xi 0 lt {/vorz -1 def} {/vorz 1 def} ifelse /xia xi abs def vorz -1 eq {(\255) show} {(0) show} ifelse xia 0 ge xia 9 le {(0000) show} if xia 10 ge xia 99 le and {(000) show} if xia 100 ge xia 999 le and {(00) show} if xia 1000 ge xia 9999 le and {(0) show} if xia cvishow } bind def /cvi001 {/xi exch def /xia xi abs 0.5 add cvi def xia 0 ge xia 9 le {(0) show} if xia cvishow } bind def /tspace {dup abs 1.0 le {( ) show} if dup dup -1.0 le exch -10 gt and {( ) show} if dup dup 1.0 gt exch 10 lt and {( ) show} if dup dup 1.0 gt exch 10 ge and {( ) show} if } bind def /trushow {tspace 0.005 add 100 mul truncate 100 div 10 string cvs show} bind def /troshow {0.005 add 100 mul truncate 100 div 10 string cvs show} bind def /trushow3 {0.0005 add 1000 mul truncate 1000 div 10 string cvs show} bind def %%EndProlog /lanind 0 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 {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 /showea {1 lanind le {show} {pop} ifelse} bind def /lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def} {/lanind1 1 def /lanind2 1 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 /xchartg where {pop /xchart xchartg def} {/xchart 0 def} ifelse /xcolorg where {pop /xcolor xcolorg def} {/xcolor 1 def} ifelse gsave /DecodeXYZ* {dup 6 29 div ge {dup dup mul mul} {4 29 div sub 108 841 div mul} ifelse} bind def /LABN [(00, F) (01, E) (02, D) (03, C) (04, B) (05, A) (06, 9) (07, 8) (08, 7) (09, 6) (10, 5) (11, 4) (12, 3) (13, 2) (14, 1) (15, 0)] def /ISYSTEM 1 def %1 1 1 {/ISYSTEM exch def %ISYSTEM=0,1 %0 1 3 {/iout exch def %iout=0,3 /iout 3 def gsave LAB*system /ix1 50 def %COLOR /ix2 850 def %L* /ix3 3450 def %Y /ix4 6150 def %Yt /ix5 8850 def %t /ixd 1200 def /iyd 170 def /iy00 4600 def /iy0d 1510 def /iy01 iy00 def /iy02 iy01 iy0d sub def /iy03 iy02 iy0d sub def /iy04 iy03 iy0d sub def /iy05 iy04 iy0d sub def 72 90 translate 0.02 MM dup scale 15 setlinewidth 1 1 0.5 setrgbcolor 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto closepath fill 0 0 0 setrgbcolor 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto closepath stroke 0 setgray 100 /Times-ISOL1 FS 50 -100 moveto (AES41-7N) show %iout 0 eq {(AES40-3N) show} if %iout 1 eq {(AES40-7N) show} if %iout 2 eq {(AES41-3N) show} if %iout 3 eq {(AES41-7N) show} if /x00 370 def /y00 400 def x00 y00 moveto 3000 0 rlineto stroke x00 y00 moveto 0 2800 rlineto stroke 0 1 14 {/i exch def %i=1,14 x00 i 200 mul add y00 100 sub moveto 0 200 rlineto stroke %horizontal x00 i 200 mul add 050 sub y00 300 sub moveto i 8 le {( ) show} if i 1 add cvishow } for %i=1,14 0 1 07 {/i exch def %i=1,07 x00 100 sub y00 i 400 mul add moveto 200 0 rlineto stroke %horizontal x00 200 sub y00 i 400 mul add 030 sub moveto % i cvsshow1 i cvishow %(,0) show } for %i=1,06 x00 y00 moveto 0 3100 rlineto stroke %vertical axis x00 050 sub y00 3000 add moveto 050 100 rlineto 050 -100 rlineto stroke %arrow 020 y00 3200 add moveto SS (D) show 20 0 rmoveto TBIS (L*) show x00 3000 add y00 300 sub moveto TBS (Grau\255Differenzen) showde (Grey differences) showen (gris diferencias) showes (Diff\351rences de gris) showfr (differenze del grigio) showit (gr\345 forskjeller) showjp TBIS ( n) show x00 2900 add y00 050 add moveto 100 -050 rlineto -100 -050 rlineto stroke %arrow %ix2 200 sub 3600 moveto 0 0400 rlineto stroke % achromatic (D65) colours /XLWD65100 95.04 def /YLWD65100 100.00 def /ZLWD65100 108.88 def /Xwref XYZra 24 get def /Ywref XYZra 25 get def /Zwref XYZra 26 get def /Xnref 2.52 0.9505 mul def /Ynref 2.52 def /Znref 2.52 1.0888 mul def /ix2i ix2 800 add def /iy iy02 iyd add 50 add def /iy0 iy 500 add def /iy1 iy 290 add def 020 iy0 moveto TBS (Helligkeit ) showde (Lightness ) showen (Claridad ) showes (Clart\351 ) showfr (Chiarezza ) showit (Lyshet ) showjp TBIS (L*) show (CIELAB) jshowTS /ilf 8 array def /ilf [0.00 0.25 0.50 1.00 2.00 4.00 8.00 16.00] def /Lrefl 8 array def /Lrefl [(0%) (0,6%) (1,2%) (2,5%) (5%) (10%) (20%) (40%)] def %Reference black and factors /YrN 2.52 def /LrefNt 8 array def /LrefNi 8 array def LrefNi 0 0 put 1 1 7 {/i exch def %i=0,7 /Ynref YrN ilf i get mul def LrefNi i 116 Ynref 0.01 mul 0.3333 exp mul 16 sub put } for %i=0,7 iout 0 eq {/ila1 0 def /ilad 7 def /ila2 7 def} if iout 1 eq {/ila1 0 def /ilad 3 def /ila2 3 def} if iout 2 eq {/ila1 0 def /ilad 7 def /ila2 7 def} if iout 3 eq {/ila1 0 def /ilad 3 def /ila2 3 def} if ila1 ilad ila2 {/il exch def %il=0,x /il2 il 2 mul def /Xnref YrN ilf il get mul 0.9505 mul def /Ynref YrN ilf il get mul def /Znref YrN ilf il get mul 1.0890 mul def /PLref (System OLS00) def /TLref (System TLS00) def LAB*TLS 21 LrefNi il get put /i11 7 3 mul def /i12 i11 1 add def /i13 i11 2 add def %colour N /i21 8 3 mul def /i22 i21 1 add def /i23 i21 2 add def %colour W 0 1 15 {/sISO exch def /i30 sISO 3 mul def /i31 i30 1 add def /i32 i30 2 add def ISYSTEM 0 eq { %ORS LAB*c i30 LAB*ORS i11 get LAB*ORS i21 get LAB*ORS i11 get sub sISO 15 div mul add put LAB*c i31 LAB*ORS i12 get LAB*ORS i22 get LAB*ORS i12 get sub sISO 15 div mul add put LAB*c i32 LAB*ORS i13 get LAB*ORS i23 get LAB*ORS i13 get sub sISO 15 div mul add put } if ISYSTEM 1 eq { %TLS LAB*c i30 LAB*TLS i11 get LAB*TLS i21 get LAB*TLS i11 get sub sISO 15 div mul add put LAB*c i31 LAB*TLS i12 get LAB*TLS i22 get LAB*TLS i12 get sub sISO 15 div mul add put LAB*c i32 LAB*TLS i13 get LAB*TLS i23 get LAB*TLS i13 get sub sISO 15 div mul add put } if } for /L*N LAB*c 0 get def /A*N LAB*c 1 get def /B*N LAB*c 2 get def /L*W LAB*c 45 get def /A*W LAB*c 46 get def /B*W LAB*c 47 get def /A*D A*W A*N sub def /B*D B*W B*N sub def /L*Nsa L*N def /A*Nsa 0.0 def /B*Nsa 0.0 def /L*Wsa L*W def /A*Wsa 0.0 def /B*Wsa 0.0 def /L*Ns0 0.0 def /A*Ns0 0.0 def /B*Ns0 0.0 def /L*Ws0 L*W L*N sub def /A*Ws0 0.0 def /B*Ws0 0.0 def /Xssrefl Xnref def /Yssrefl Ynref def /Zssrefl Znref def /Xrsrefl Xnref def /Yrsrefl Ynref def /Zrsrefl Znref def 0 1 15 {/i exch def /i30 i 3 mul def /i31 i 3 mul 1 add def /i32 i 3 mul 2 add def /X* {LAB*c i30 get 16 add 116 div LAB*c i31 get 500 div add} bind def /Y* {LAB*c i30 get 16 add 116 div} bind def /Z* {LAB*c i30 get 16 add 116 div LAB*c i32 get 200 div sub} bind def XYZc i30 X* DecodeXYZ* 95.05 mul put XYZc i31 Y* DecodeXYZ* 100.00 mul put XYZc i32 Z* DecodeXYZ* 108.90 mul put il 0 eq {%il=0 XYZc0 i30 XYZc i30 get put XYZc0 i31 XYZc i31 get put XYZc0 i32 XYZc i32 get put } if %il=0 } for %i=0,15 0 1 15 {/i exch def /i30 i 3 mul def /i31 i 3 mul 1 add def /i32 i 3 mul 2 add def LAB*sa i30 LAB*c i30 get put /l*CIE LAB*c i30 get L*N sub L*W L*N sub div def %system rel. lightn. /a*s A*W A*N sub l*CIE mul def /b*s B*W B*N sub l*CIE mul def LAB*sa i31 LAB*c i31 get A*N sub a*s sub put LAB*sa i32 LAB*c i32 get B*N sub b*s sub put } for %i=0,15 0 1 15 {/i exch def /i30 i 3 mul def /i31 i 3 mul 1 add def /i32 i 3 mul 2 add def /X*sa {LAB*sa i30 get 16 add 116 div LAB*sa i31 get 500 div add} bind def /Y*sa {LAB*sa i30 get 16 add 116 div} bind def /Z*sa {LAB*sa i30 get 16 add 116 div LAB*sa i32 get 200 div sub} bind def XYZsa i30 X*sa DecodeXYZ* 95.05 mul put XYZsa i31 Y*sa DecodeXYZ* 100.00 mul put XYZsa i32 Z*sa DecodeXYZ* 108.90 mul put } for %i=0,15 0 1 15 {/i exch def %i=0,15 /i30 i 3 mul def /i31 i 3 mul 1 add def /i32 i 3 mul 2 add def Xrcr089 i XYZc0 i30 get put Yrcr089 i XYZc0 i31 get put Zrcr089 i XYZc0 i32 get put } for %i=0,15 0 1 15 {/i exch def %i=0,15 Yrcrn089 i Yrcr089 i get Ynref add Yrcr089 15 get Ynref add div 88.59 mul put /YQ Yrcrn089 i get YLWD65100 div def YQ 0 lt {/YQ 0.00000001 def} if Lrcrn089 i YQ 0.008856 lt {903.3 YQ mul} {YQ 0.33333333 exp 116 mul 16 sub} ifelse put } for %i=0,15 %standard difference 0 1 0 setrgbcolor /deltaL 5.2 def x00 y00 deltaL 400 mul add moveto 3000 0 rlineto stroke 0 setgray il 0 eq {%il=0 0 setgray /deltaL Lrcrn089 15 get Lrcrn089 0 get sub 15 div def x00 1800 add y00 deltaL 400 mul add 350 add moveto TS (Start\255 und linearisierte Ausgabe; ) showde (start and linearized output; ) showen (inicio y salida linealizada; ) showes (rendu initial et linearis\351; ) showfr (prima uscita e uscita linearizzato; ) showit (start og linearized utgang; ) showjp TIS (Y) show (N) ishowTS TS (=0) show 0 setgray x00 1800 add y00 deltaL 400 mul add 150 add moveto SS (D) show 20 0 rmoveto TIS (L*) show TS (=6,3) show %deltaL cvsshow1 TS (; ) show TIS (L*) show (N) ishowTS TS (=) show LrefNi il get cvi001 newpath } if %il=0 newpath iout 2 ge {%iout>=2 0 1 14 {/i exch def %i=1,14 /r15 i 15 div def r15 dup dup setrgbcolor i 14 eq {0 setgray} if /deltaL Lrcrn089 15 get Lrcrn089 0 get sub 15 div def %/deltaL 5.2 def x00 i 200 mul add y00 deltaL 400 mul add 050 0 360 arc i 13 le {fill} {stroke} ifelse %horizontal } for %i=1,14 il 0 ne {%il#0 0 setgray x00 3030 add y00 deltaL 400 mul add 050 add moveto TS (linearisierte Ausgabe; ) showde (linearized output; ) showen (salida linealizada; ) showes (rendu linearis\351; ) showfr (uscita linearizzato; ) showit (linearized utgang; ) showjp TIS (Y) show (N) ishowTS TS (=2,5) show 0 setgray x00 3030 add y00 deltaL 400 mul add 150 sub moveto SS (D) show 20 0 rmoveto TIS (L*) show TS (=5,2; ) show %deltaL cvsshow1 TIS (L*) show (N) ishowTS TS (=18) show %LrefNi il get cvi001 newpath } if %il#0 } if %iout>=2 1 0 0 setrgbcolor /deltaL 1 def x00 y00 deltaL 400 mul add moveto 3000 0 rlineto stroke 0 setgray x00 3030 add y00 deltaL 400 mul add 050 sub moveto SS (D) show 20 0 rmoveto TIS (L*) show TS (=) show deltaL cvsshow1 x00 3030 add y00 deltaL 400 mul add 250 sub moveto TS (=Schwelle) showde (=Threshold) showen newpath 0 1 14 {/i exch def %i=1,14 /r15 i 15 div def r15 dup dup setrgbcolor i 14 eq {0 setgray} if x00 i 200 mul add y00 Lrcrn089 i 1 add get Lrcrn089 i get sub 400 mul add 050 0 360 arc i 13 le {fill} {stroke} ifelse %horizontal } for %i=1,14 il 0 ne {%il#0 /deltaL Lrcrn089 15 get Lrcrn089 14 get sub def 0 setgray x00 3030 add y00 deltaL 400 mul add 150 sub iout 0 eq iout 2 eq or {300 add} if moveto iout 0 eq iout 2 eq or x00 3030 add y00 deltaL 400 mul add 150 add moveto { TS (Startausgabe; ) showde (start output; ) showen (inicio salida; ) showes (rendu de d\351part; ) showfr (prima uscita; ) showit (start utgang; ) showjp TIS (Y) show (N) ishowTS TS (=40) show x00 3030 add y00 deltaL 400 mul add 25 sub moveto SS (D) show 20 0 rmoveto TIS (L*) show TS (=variabel, ) showde (=variable, ) showen (=variable, ) showes (=variable, ) showfr (=variable, ) showit (=variabel, ) showjp TIS (L*) show (N) ishowTS TS(=40) show } {x00 3030 add y00 deltaL 400 mul add 050 add moveto TS (Startausgabe; ) showde (start output; ) showen (inicio salida; ) showes (rendu de d\351part; ) showfr (prima uscita; ) showit (start utgang; ) showjp TIS (Y) show (N) ishowTS TS (=2,5) show} ifelse x00 3030 add y00 deltaL 400 mul add 125 sub moveto SS (D) show 20 0 rmoveto TIS (L*) show (=variable, ) showea (=variabel, ) showde TIS (L*) show (N) ishowTS TS (=18) show } if %il#0 } for %il=0,x %x00 500 add y00 200 add moveto %TS %("gleiche dunkle Graus") showde %("equal dark greys") showen %("Igual grises oscuros") showes %("\351gale gris sombre") showfr %("uguale grigio scuro") showit %("lik m\370rke gr\345farger") showjp TBS x00 550 add y00 2650 add moveto (A) show x00 550 add y00 2150 add moveto (C) show x00 550 add y00 1550 add moveto (B) show showpage grestore % } for %iout=0,3 %} for %ISYSTEM=0,1 %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 219 MM 06 MM sub SHAr add 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 AES41-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 (AES41-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 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 DG02 20070101 %%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 /showea {1 lanind le {show} {pop} ifelse} bind def /lanind1 01 def /lanind2 01 def /lanindd 01 def /colorm1 00 def /colorm2 00 def /colormd 01 def /deintp1 00 def /deintp2 00 def /deintpd 01 def /xcolor1 03 def /xcolor2 03 def /xcolord 01 def /xchart1 00 def /xchart2 00 def /xchartd 01 def /pchart1 00 def /pchart2 00 def /pchartd 01 def /colsep1 00 def /colsep2 00 def /colsepd 01 def /pmetam1 00 def /pmetam2 00 def /pmetamd 01 def /lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def /lanindd laninddf def} if /colormf where {pop /colorm1 colormf def /colorm2 colormf def /colormd colormdf def} if /deintpf where {pop /deintp1 deintpf def /deintp2 deintpf def /deintpd deintpdf def} if /xcolorf where {pop /xcolor1 xcolorf def /xcolor2 xcolorf def /xcolord xcolordf def} if /xchartf where {pop /xchart1 xchartf def /xchart2 xchartf def /xchartd xchartdf def /xchartm xchart2f xchart1f sub 1 add def} {/xchartm 1 def} ifelse /xchart3f where {pop /xchart3 xchart3f def} {/xchart3 1 def} ifelse /xchart4f where {pop /xchart4 xchart4f def} {/xchart4 0 def} ifelse /pchartf where {pop /pchart1 pchartf def /pchart2 pchartf def /pchartd pchartdf def} if /colsepf where {pop /colsep1 colsepf def /colsep2 colsepf def /colsepd colsepdf def} if /pmetamf where {pop /pmetam1 pmetamf def /pmetam2 pmetamf def /pmetamd pmetamdf def} if /lanind lanind1 def % /colorm colorm1 def % /deintp deintp1 def % /xcolor xcolor1 def % /xchart xchart1 def % /pchart pchart1 def % /colsep colsep1 def % /pmetam pmetam1 def % /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 0 def /i*ptrsc 0 def gsave 0 setgray 1.0 1.0 scale 0.0 MM 0.0 MM translate 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 colorm 0 eq deintp 0 eq and {/Txx (d) def /Fxx (d) def} if %colorm=0, deintp=0 colorm 0 eq deintp 1 eq and {/Txx (e) def /Fxx (e) def} if %colorm=0, deintp=1 colorm 1 eq deintp 0 eq and {/Txx (dd) def /Fxx (d) def} if %colorm=1, deintp=0 colorm 1 eq deintp 1 eq and {/Txx (de) def /Fxx (e) def} if %colorm=1, deintp=1 xchart 0 eq {/Txx (-) def /Fxx (-) def} if xchart 1 ge {%xchart>=1 /i0 12 def /i1 i0 1 add def /i2 i0 2 add def /i3 i0 3 add def 2.5 MM /Times-ISOL1 FS x i0 get MM 40 MM add y i0 get MM 1 MM sub moveto lanind cvishow (-) show colorm cvishow deintp cvishow xcolor cvishow xchart cvishow pchart cvishow colsep cvishow (-F) show pmetam cvishow } if %xchart>=1 /xt 1 def xchart 1 eq {/xt 1 def} if xt 0 eq {%xt=0,1 ifelse /i0 12 def /i1 i0 1 add def /i2 i0 2 add def /i3 i0 3 add def 2.5 MM /Times-ISOL1 FS x i0 get MM 110 MM add y i0 get MM 1 MM sub moveto (http://130.149.60.45/~farbmetrik/AES4/AES4) show colorm cvishow deintp cvishow colorm 0 eq {(N) show} {(F) show} ifelse (P.PDF & ) show (http://130.149.60.45/~farbmetrik/AES4/AES4) show colorm cvishow deintp cvishow colorm 0 eq {(N) show} {(F) show} ifelse (P.TXT & ) show (http://130.149.60.45/~farbmetrik/AES4/AES4.HTM) show } %xt=0 { %xt=1 /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 /xmo xlo xro xlo sub 0.5 mul add def /ymo yro 1 MM sub def xmo 1 MM sub ymo moveto 2 MM 0 rlineto stroke xmo ymo 1 MM sub moveto 0 1 MM rlineto stroke 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 /10TIN {10 /Times-ISOL1 FS} def /10TRN {10 /Times-Roman FS} def /12TIN {12 /Times-ISOL1 FS} def /12TRN {12 /Times-Roman FS} def /10TII {10 /TimesI-ISOL1 FS} def /10TRI {10 /Times-Italic FS} def /12TII {12 /TimesI-ISOL1 FS} def /12TRI {12 /Times-Italic FS} def /10TIB {10 /TimesB-ISOL1 FS} def /10TRB {10 /Times-Bold FS} def /12TIB {12 /TimesB-ISOL1 FS} def /12TRB {12 /Times-Bold FS} def /10TIBI {10 /TimesBI-ISOL1 FS} def /10TRBI {10 /Times-BoldItalic FS} def /12TIBI {12 /TimesBI-ISOL1 FS} def /12TRBI {12 /Times-BoldItalic FS} def %special /10TIN10 {10TIN 0 -3 rmoveto xcolor 1 eq {(10) show} if 0 3 rmoveto} def /10TINi10 {10TIN 0 -3 rmoveto (i) show xcolor 1 eq {(,10) show} if 0 3 rmoveto} def /TELi0 8 array def /TELi1 8 array def /TELi 8 array def /TELi0 [(P60) (P55) (P50) (P45) (P40) (P35) (P30) (P25)] def %7 illumin. /TELi1 [(D65) (D50) (P40) (A00) (E00) (C00) (P00) (Q00)] def %7 illumin. /xchart8 1 def %xchart8=0: Pxx, xchart8=1: Dxx 0 1 7 {/i exch def %i=0,7 xchart8 0 eq {%xchart8=0 TELi i TELi0 i get put }%xchart8=0 {%xchart8=1 TELi i TELi1 i get put } ifelse %xchart8=1 } for %i=0,7 /xchart41 0 def /xchart42 0 def 0 setgray 12TIN 61 MM 13.5 MM moveto (TUB\255Pr\374fvorlage AES4; ) showde %0AES4X-Y 0000# (TUB\255test chart AES4; ) showen %1AES4X-Y 0000# (gr\341fico TUB\255AES4; ) showes %2AES4X-Y 0000# (TUB\255test graphique AES4; ) showfr %3AES4X-Y 0000# (grafico TUB\255AES4; ) showit %4AES4X-Y 0000# (TUB\255test chart AES4; ) showjp %5AES4X-Y 0000# xchart41 0 eq {%xchart41=0 %F0,1 12TIN (L*\255Differenz von 16 Graustufen) showde (L* difference of 16 grey steps) showen } if %xchart41=0 61 MM 09.5 MM moveto 12TIN xchart42 0 eq {%xchart42=0 (Änderung der Stufung für 2 Reflexionen: ) showde (L*=2,5% und 40%; sRGB-Display) showde (Change of spacing by two reflections: ) showen (Lr=2,5% and 40%, sRGB display) showen } if %xchart42=0 xchart 1 ge {%xchart>=1 12TIN (, 3D=) show colorm cvishow (, de=) show deintp cvishow 12TII xchart5f 0 eq {(, sRGB) show} if xchart5f 1 eq {(, cmyk) show} if xchart5f 2 eq {(, cmy0) show} if xchart5f 3 eq {(, cmyk) show} if colorm 1 eq {(*) show} if } if %xchart>=1 12TIN 182 MM 13.5 MM moveto (Eingabe: ) showde %0AES4X-Y 0500# (input: ) showen %1AES4X-Y 0500# (entrada: ) showes %2AES4X-Y 0500# (entr\351e: ) showfr %3AES4X-Y 0500# (immettere: ) showit %4AES4X-Y 0500# (input: ) showjp %5AES4X-Y 0500# 12TII (rgb/cmy0/000k/n) show %xchart41 0 eq {( (No 1MR)) show} % {(->rgb ) show % ((1MR)) show} ifelse %xchart xchart3 lt {(w/rgb/cmyk) show % } if %xchart xchart3 ge {%xchart>=xchart3 % (rgb) show % } if %xchart>=xchart3 %10 /Times-ISOL1 FS %0 -2 rmoveto Txx show 0 2 rmoveto %12TIN %12TIN %182 MM 9.5 MM moveto %(Ausgabe: ) showde %0AES4X-Y 0600# %(output: ) showen %1AES4X-Y 0600# %(salida: ) showes %2AES4X-Y 0600# %(sortie: ) showfr %3AES4X-Y 0600# %(uscita: ) showit %4AES4X-Y 0600# %(output: ) showjp %5AES4X-Y 0600# %colorm=0,1! 12TIN xchart 0 eq {%xchart=0,#0 xchart41 0 eq {12TIN %(no change) showen %(keine \304nderung) showde } {12TIN (change of gamma ) showen (\304nderung Gamma ) showde 12TII (g) show 10TIN 0 -2 rmoveto (P) show 0 2 rmoveto} ifelse %12TIN %(rechts) showde %0AES4X-Y 0700# %(right) showea %1AES4X-Y 0700# %(ning\372n cambio) showes %2AES4X-Y 0700# %(aucun changement) showfr %3AES4X-Y 0700# %(nessun cambiamento) showit %4AES4X-Y 0700# %(no change compared) showjp %5AES4X-Y 0700# }%xchart=0 {%xchart#0 12TIN colorm 0 eq {%colorm=0 (Transfer nach ) showde %0AES4X-Y 0800# (transfer to ) showen %1AES4X-Y 0800# (transfiera a ) showes %2AES4X-Y 0800# (transf\351rer \340 ) showfr %3AES4X-Y 0800# (trasferire a ) showit %4AES4X-Y 0800# (transfer to ) showjp %5AES4X-Y 0800# }%colorm=0 {%colorm=1 (3D\255Linearisierung ) showde %0AES4X-Y 0900# (3D\255linearization to ) showen %1AES4X-Y 0900# (3D\255linealizaci\363n a ) showes %2AES4X-Y 0900# (linearisation 3D selon ) showfr %3AES4X-Y 0900# (3D\255linearizzazione a ) showit %4AES4X-Y 0900# (3D\255linearization to ) showjp %5AES4X-Y 0900# } ifelse %colorm=1 12TII xchart5f 0 eq {(rgb) show} if xchart5f 1 eq {(cmyk) show} if xchart5f 2 eq {(cmy0) show} if xchart5f 3 eq {(cmyk) show} if colorm 1 eq {(*) show} if 10 /Times-ISOL1 FS 0 -2 rmoveto Txx show 0 2 rmoveto 12TIN } ifelse %xchart=0,#0 %0 setgray %end white and unvisible 12TIN 62 MM 198.5 MM moveto 12TRN (http://farbe.li.tu-berlin.de/AES4/AES4L) show 12TIN (0) show % LSC$ show LEX$ show xchart41 4 le {(; only vector graphic VG) showen (; nur Vektorgrafik VG) showde} if % {(; VG with ISO\255PG image) showen % (; VG mit ISO\255PG\255Bild) showde} ifelse %1 setgray %start white and unvisible (; ) show xchart 0 eq { (Start\255Ausgabe) showde %0AES4X-Y 1000# (start output) showen %1AES4X-Y 1000# (comience salida) showes %2AES4X-Y 1000# (sortie de production) showfr %3AES4X-Y 1000# (cominciare l'uscita) showit %4AES4X-Y 1000# (start output) showjp %5AES4X-Y 1000# } if LSC$ (C) eq { (Start\255Ausgabe) showde %0AES4X-Y 1100# (start output) showen %1AES4X-Y 1100# (comience salida) showes %2AES4X-Y 1100# (sortie de production) showfr %3AES4X-Y 1100# (cominciare l'uscita) showit %4AES4X-Y 1100# (start output) showjp %5AES4X-Y 1100# } if xchart 1 ge {%xchart>=1 colorm 0 eq {%colorm=0,1 (Transfer Ausgabe) showde %0AES4X-Y 1200# (transfer output) showen %1AES4X-Y 1200# (salida de transferencia) showes %2AES4X-Y 1200# (sortie de transfert) showfr %3AES4X-Y 1200# (uscita di trasferimento) showit %4AES4X-Y 1200# (transfer output) showjp %5AES4X-Y 1200# }%colorm=0 {%colorm=1 (3D\255Linearisierung) showde %0AES4X-Y 1300# (3D\255linearization) showen %1AES4X-Y 1300# (3D\255linealizaci\363n) showes %2AES4X-Y 1300# (linearisation 3D) showfr %3AES4X-Y 1300# (3D\255linearizzzazione) showit %4AES4X-Y 1300# (3D\255linearization) showjp %5AES4X-Y 1300# } ifelse %colorm=0,1 } if %xchart>=1 62 MM 194 MM moveto LSC$ (N) eq LSC$ (C) eq or { (N: Keine 3D\255Linearisierung (OL) ) showde %0AES4X-Y 1400# (N: no 3D\255linearization (OL) ) showen %1AES4X-Y 1400# (N: ninguna 3D\255linealizaci\363n (OL) ) showes %2AES4X-Y 1400# (N: aucun linearisation 3D (OL) ) showfr %3AES4X-Y 1400# (N: nessun 3D\255linearizzazione (OL) ) showit %4AES4X-Y 1400# (N: no 3D\255linearization (OL) ) showjp %5AES4X-Y 1400# (in Datei (F) oder PS\255Startup (S)) showde %0AES4X-Y 1500# (in file (F) or PS\255startup (S)) showen %1AES4X-Y 1500# (en archivo (F) o PS\255startup (S)) showes %2AES4X-Y 1500# (dans fichier (F) ou PS\255startup (S)) showfr %3AES4X-Y 1500# (nel file (F) o PS\255startup (S)) showit %4AES4X-Y 1500# (in file (F) or PS\255startup (S)) showjp %5AES4X-Y 1500# } {LSC$ show (: ) show (3D\255Linearisierung) showde %0AES4X-Y 1600# (3D\255linearization) showen %1AES4X-Y 1600# (3D\255linealizaci\363n) showes %2AES4X-Y 1600# (linearisation 3D) showfr %3AES4X-Y 1600# (3D\255linearizzzazione) showit %4AES4X-Y 1600# (3D\255linearization) showjp %5AES4X-Y 1600# ( AES4/AES4L) show LSS$ show LSX$ show (0) show % LSC$ show LEY$ show } ifelse LSC$ (F) eq { ( in Datei (F)) showde %0AES4X-Y 1700# ( in file (F)) showen %1AES4X-Y 1700# ( en archivo (F)) showes %2AES4X-Y 1700# ( dans fichier (F)) showfr %3AES4X-Y 1700# ( nel file (F)) showit %4AES4X-Y 1700# ( in file (F)) showjp %5AES4X-Y 1700# } if LSC$ (S) eq { ( im Distiller Startup (S) Directory) showde %0AES4X-Y 1800# ( in Distiller Startup (S) Directory) showen %1AES4X-Y 1800# ( en el Distiller Startup (S) Directory) showes %2AES4X-Y 1800# ( dans le Distiller Startup (S) Directory) showfr %3AES4X-Y 1800# ( nel Distiller Startup (S) Directory) showit %4AES4X-Y 1800# ( in Distiller Startup (S) Directory) showjp %5AES4X-Y 1800# } if LSC$ (D) eq { ( in PS\255Device (D)) showde %0AES4X-Y 1900# ( in PS\255device (D)) showen %1AES4X-Y 1900# ( en el PS\255device (D)) showes %2AES4X-Y 1900# ( dans l'appareil PS (D)) showfr %3AES4X-Y 1900# ( nel PS\255dispositivo (D)) showit %4AES4X-Y 1900# ( in PS\255Device (D)) showjp %5AES4X-Y 1900# } if LSC$ (T) eq { ( im Distiller Startup (S) Directory) showde %0AES4X-Y 2000# ( in Distiller Startup (S) Directory) showen %1AES4X-Y 2000# ( en el Distiller Startup (S) Directory) showes %2AES4X-Y 2000# ( dans le Distiller Startup (S) Directory) showfr %3AES4X-Y 2000# ( nel Distiller Startup (S) Directory) showit %4AES4X-Y 2000# ( in Distiller Startup (S) Directory) showjp %5AES4X-Y 2000# } if LSC$ (E) eq { ( in PS\255Device (D)) showde %0AES4X-Y 2100# ( in PS\255device (D)) showen %1AES4X-Y 2100# ( en el PS\255device (D)) showes %2AES4X-Y 2100# ( dans appareil PS (D)) showfr %3AES4X-Y 2100# ( nel PS\255dispositivo (D)) showit %4AES4X-Y 2100# ( in PS\255Device (D)) showjp %5AES4X-Y 2100# } if %0 setgray %end white and unvisible %(, Seite ) showde %0AES4X-Y 2200# %(, page ) showen %1AES4X-Y 2200# %(, p\341gina ) showes %2AES4X-Y 2200# %(, page ) showfr %3AES4X-Y 2200# %(, pagina ) showit %4AES4X-Y 2200# %(, page ) showjp %5AES4X-Y 2200# %xchart 1 add cvishow (/) show %xchartm cvishow 16 MM 185 MM moveto -90 rotate (Siehe \344hnliche Dateien: ) showde %0AES4X-Y 2300# (see similar files: ) showen %1AES4X-Y 2300# (vea archivos semejantes: ) showes %2AES4X-Y 2300# (voir des fichiers similaires: ) showfr %3AES4X-Y 2300# (vedere dei file simili: ) showit %4AES4X-Y 2300# (see similar files: ) showjp %5AES4X-Y 2300# 12TRN (http://farbe.li.tu-berlin.de/AES4/AES4.HTM) show 12TIN %(0) show % %LSC$ show LEX$ show 90 rotate 12 MM 185 MM moveto -90 rotate (Technische Information: ) showde %0AES4X-Y 2400# (technical information: ) showen %1AES4X-Y 2400# (informaci\363n t\351cnica: ) showes %2AES4X-Y 2400# (informations techniques: ) showfr %3AES4X-Y 2400# (informazioni tecniche: ) showit %4AES4X-Y 2400# (technical information: ) showjp %5AES4X-Y 2400# 12TRN (http://farbe.li.tu-berlin.de) show 12TIN ( oder ) showde %0AES4X-Y 2500# ( or ) showen %1AES4X-Y 2500# ( o ) showes %2AES4X-Y 2500# ( ou ) showfr %3AES4X-Y 2500# ( o ) showit %4AES4X-Y 2500# ( or ) showjp %5AES4X-Y 2500# 12TRN (http://130.149.60.45/~farbmetrik) show 12TIN 90 rotate 281 MM 185 MM moveto -90 rotate (TUB\255Registrierung: 20201101\255AES4/AES4L) showde %0AES4X-Y 2600# (TUB registration: 20201101\255AES4/AES4L) showen %1AES4X-Y 2600# (TUB matr\355cula: 20201101\255AES4/AES4L) showes %2AES4X-Y 2600# (TUB enregistrement: 20201101\255AES4/AES4L) showfr %3AES4X-Y 2600# (TUB iscrizione: 20201101\255AES4/AES4L) showit %4AES4X-Y 2600# (TUB registration: 20201101\255AES4/AES4L) showjp %5AES4X-Y 2600# (0) show % LSC$ show LEX$ show 90 rotate 281 MM 74 MM moveto -90 rotate (TUB\255Material: Code=rha4ta) showde %0AES4X-Y 2700# (TUB material: code=rha4ta) showen %1AES4X-Y 2700# (TUB material: code=rha4ta) showes %2AES4X-Y 2700# (TUB mat\351riel: code=rha4ta) showfr %3AES4X-Y 2700# (TUB materiale: code=rha4ta) showit %4AES4X-Y 2700# (TUB material: code=rha4ta) showjp %5AES4X-Y 2700# 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 Beurteilung und Messung ) showde %0AES4X-Y 2800# ( application for evaluation and measurement ) showen %1AES4X-Y 2800# ( aplicaci\363n para la medida ) showes %2AES4X-Y 2800# ( application pour la mesure ) showfr %3AES4X-Y 2800# ( la domanda per la misura ) showit %4AES4X-Y 2800# ( application for measurement ) showjp %5AES4X-Y 2800# xchart5f 0 eq {%xchart5f=0 (von Display\255 oder Druck\255Ausgabe) showde %0AES4X-Y 2900# (of display or print output) showen %1AES4X-Y 2900# (de display output) showes %2AES4X-Y 2900# (de sortie sur \350cran) showfr %3AES4X-Y 2900# (di stampa di display) showit %4AES4X-Y 2900# (of display output) showjp %5AES4X-Y 2900# } if %xchart5f=0 xchart5f 1 eq xchart5f 2 eq or {%xchart5f=1,2 (von Offsetdruck\255Ausgabe) showde %0AES4X-Y 3000# (of offset print output) showen %1AES4X-Y 3000# (salida en la impressi\363n offset) showes %2AES4X-Y 3000# (des sorties sur offset) showfr %3AES4X-Y 3000# (uscita nella stampa di offset) showit %4AES4X-Y 3000# (of offset print output) showjp %5AES4X-Y 3000# } if %xchart5f=1,2 xchart5f 3 eq {%xchart5f=3 (von Laserdrucker\255Ausgabe) showde %0AES4X-Y 3100# (of laser printer output) showen %1AES4X-Y 3100# (salida de impresora l\341ser) showes %2AES4X-Y 3100# (des sorties sur imprimante laser) showfr %3AES4X-Y 3100# (di uscita della stampante laser) showit %4AES4X-Y 3100# (of laser printer output) showjp %5AES4X-Y 3100# } if %xchart5f=3 xchart 1 ge {%xchart>=1 xchart5f 0 eq {%xchart5f=0 (, keine Separation) showde %0AES4X-Y 3200# (, no separation) showen %1AES4X-Y 3200# (, ninguna separaci\363n) showes %2AES4X-Y 3200# (, aucune s\351paration) showfr %3AES4X-Y 3200# (, nessuna separazione) showit %4AES4X-Y 3200# (, no separation) showjp %5AES4X-Y 3200# } if %chart5f=0 xchart5f 1 ge {%xchart5f>=1 (, Separation) showde %0AES4X-Y 3300# (, separation) showen %1AES4X-Y 3300# (, separaci\363n) showes %2AES4X-Y 3300# (, s\351paration) showfr %3AES4X-Y 3300# (, separazione) showit %4AES4X-Y 3300# (, separation) showjp %5AES4X-Y 3300# xchart5f 1 eq xchart5f 3 eq or {(cmyn6) show} if xchart5f 2 eq {(cmy0) show} if colorm 1 eq {(*) show} if colsep 0 eq {( (CMYK))}{( (CMY0))} ifelse show } if %xchart5f>=1 } if %xchart>=1 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 %/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 } ifelse %xt=1 grestore gsave %********************************************************** %%Trailer %%EndDocument EndEPSF grestore gsave showpage grestore %} for %colsepf=0,1 %} for %pchartf=0,0 %} for %xchartf=0,0 %} for %xcolorf=0,1 %} for %deintpf=0,1 %} for %colormf=0,1 %} for %lanindf=0,0 %%Trailer