%!PS-Adobe-3.0 EPSF-3.0 http://farbe.li.tu-berlin.de/MS51/MS51L00XX.PS 190801 %%BoundingBox: 14 08 828 584 /pdfmark where {pop} {userdict /pdfmark /cleartomark load put} ifelse /languagelevel where {pop languagelevel} {1} ifelse 2 lt { userdict (<<) cvn ([) cvn load put userdict (>>) cvn (]) cvn load put} if [/Title (PostScript pictures: farbe.li.tu-berlin.de/MS51/MS51.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:2019080112000) /ModDate (D:20190801112000) /DOCINFO pdfmark [ /View [ /Fit ] /DOCVIEW pdfmark /sfgray {setgray} bind def /ypaper 0 def %Early Frame File (f) definition /sfrgbcolor {setrgbcolor} bind def /sfcmykcolor {setcmykcolor} bind def %line20****************************************************** %BEG MS51/OUTLIN10.PS Emty 20120301 %END MS51/OUTLIN10.PS Emty 20120301 /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 /A4querF {598 0 translate 90 rotate} def /Times-Roman findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /Times-ISOL1 exch definefont pop /Times-Italic findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /TimesI-ISOL1 exch definefont pop /Times-Bold findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /TimesB-ISOL1 exch definefont pop /Times-BoldItalic findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /TimesBI-ISOL1 exch definefont pop /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 %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 /tzrcmy0* {0.0 1.0 1.0 0.0} bind def %Reproduction colours /tzgcmy0* {1.0 0.0 1.0 0.0} bind def %cmyn* setcmykcolor /tzbcmy0* {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 /tzrolv* {1.0 0.0 0.0} bind def %Reproduction colours /tzgolv* {0.0 1.0 0.0} bind def %olv* setrgbcolor /tzbolv* {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 /tzrLAB* [53.34 72.46 50.66] def %Reproduction colours /tzgLAB* [84.93 -79.83 74.80] def %LAB* setcolor /tzbLAB* [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 %%EndProlog %*********************************************************** %%BeginPageSetup /#copies 1 def %A4querF 1.0 1.0 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$ [(0.TXT /.PS) (B.BMP /.PS) (G.GIF /.PS) (H.HTM /.PS) (I.HTM /.PS) (J.JPE /.PS) (P.PDF /.PS) (T.TIF /.PS)] def /EY$ [(A.DAT) (B.DAT) (G.DAT) (H.DAT) (I.DAT) (J.DAT) (P.DAT) (T.DAT)] def %******************************************************************* %line 360 ******************************************************************* /lanind1f 03 def /lanind2f 03 def /laninddf 01 def /colorm1f 00 def /colorm2f 00 def /colormdf 01 def /deintp1f 00 def /deintp2f 00 def /deintpdf 01 def /xcolor1f 03 def /xcolor2f 03 def /xcolordf 01 def /xchart1f 00 def /xchart2f 00 def /xchartdf 01 def %0-1,2-5,6-9,10-23 /xchart3f 01 def /xchart4f 00 def /xchart5f 00 def /pchart1f 00 def /pchart2f 00 def /pchartdf 01 def %=3 for sRGB, Lr=0 /colsep1f 00 def /colsep2f 00 def /colsepdf 01 def /pmetam1f 00 def /pmetam2f 00 def /pmetamdf 01 def %/lanindf lanind1f def % /lanindf lanind1f def %lanind1f laninddf lanind2f {/lanindf exch def %/colormf colorm1f def % colorm1f colormdf colorm2f {/colormf exch 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 % xchart1f xchartdf xchart2f {/xchartf exch 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 /xchart3P0 xchart3 0 add def /xchart4 xchart4f def /pchart pchartf def /colsep colsepf def /xchart3P8 xchart3 8 add def %/pmetamf pmetam1f def % /pmetamf pmetam1f def %pmetam1f pmetamdf pmetam2f {/pmetamf exch def /pmetam pmetamf def %************************************************************* xchart xchart3 lt {%xchart=xchart3 for CM %BEG special for ColorInterpolation /xchartj pchart def %sRGB, Lr=0%, pchart=3 /hei -1 def /heM -1 def /ausz 8 def /xchartt (F) def %necessary PROC_LAB_IOF % PROC_RX0F_IOF PROC_COLSEP_IOF colorm 1 eq {PROC_COLINT_IOF} if % PROC_COLINT_IOF % PROC_SPEC_IOF % Colordata_sRGB_F %new % setcolortrans_F %new proc_LAB729a_to_LAB*LabCh64M proc_LAB*LabCh64M_to_tab362_dy %END special for ColorInterpolation %********************************************************* } ifelse %xchart>=xchart3 for CM xchart xchart3P8 le {72 90 translate} {72 56 translate} ifelse 0.01 MM dup scale %0 0 moveto 24600 0 rlineto 0 17220 rlineto % -24600 0 rlineto closepath stroke 200 -180 moveto 180 /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 %01 %02 %03 %04 %05 %06 %07 %08 xchart xchart3P0 le {%xchart<=xchart3P0 %gsave BeginEPSF 28 MM 197 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto 1 1 scale -77 -91 translate %%BeginDocument: Bild 10 %line 329 %%EndDocument EndEPSF grestore gsave BeginEPSF 28 MM 152 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto 1 1 scale -77 -91 translate %%BeginDocument: Bild 11 %line 339 %!PS-Adobe-3.0 EPSF-3.0 MS510-1 %%BoundingBox: 70 83 392 206 %START PDFDE011.EPS /pdfmark01 where {pop} {userdict /pdfmark01 /cleartomark load put} ifelse /languagelevel where {pop languagelevel} {1} ifelse 2 lt { userdict (<<) cvn ([) cvn load put userdict (>>) cvn (]) cvn load put} if [/Title (PostScript pictures: farbe.li.tu-berlin.de/MS51/MS51.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:2019080112000) /ModDate (D:20190801112000) /DOCINFO pdfmark01 [ /View [ /FitB ] /DOCVIEW pdfmark01 %END PDFDE011 %SETCMYK_OLV.PS /setcmyk_olvcolor %transfer cmyk to olv {/ncolor exch def /ycolor exch def /mcolor exch def /ccolor exch def ncolor 0 eq {1 ccolor sub 1 mcolor sub 1 ycolor sub setrgbcolor } {ccolor 0 eq mcolor 0 eq and ycolor 0 eq and {%only black n 1 ncolor sub dup dup setrgbcolor } {%cmy and black n 1 ccolor sub 1 ncolor sub mul 1 mcolor sub 1 ncolor sub mul 1 ycolor sub 1 ncolor sub mul setrgbcolor } ifelse } ifelse } bind def % 113mm = 113*72/25.4 = 320; 320+72 = 392 % 40mm = 40*72/25.4 = 116; 116+90 = 206 % !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 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def /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 %%EndProlog gsave %LANINDL2 START 20000505 /lanind 1 def /lantex [(G) (E) (S) (F) (I) (J) (M)] def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind eq {show} {pop} ifelse} bind def /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 /showno {5 lanind eq {show} {pop} ifelse} bind def /showpt {6 lanind eq {show} {pop} ifelse} bind def /showx1 {7 lanind eq {show} {pop} ifelse} bind def /showy1 {8 lanind eq {show} {pop} ifelse} bind def /showz1 {9 lanind eq {show} {pop} ifelse} bind def /lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def /lanindd laninddf def} {/lanind1 3 def /lanind2 3 def} ifelse /colormf where {pop /colorm1 colormf def /colorm2 colormf def /colormd colormdf def} {/colorm1 0 def} ifelse /deintpf where {pop /deintp1 deintpf def /deintp2 deintpf def /deintpd deintpdf def} {/deintp1 0 def} ifelse /xcolorf where {pop /xcolor1 xcolorf def /xcolor2 xcolorf def /xcolord xcolordf def} {/xcolor1 3 def} ifelse /xchartf where {pop /xchart1 xchartf def /xchart2 xchartf def /xchartd xchartdf def /xchartm xchart2f xchart1f sub 1 add def} {/xchart1 0 def /xchartm 1 def} ifelse /xchart3f where {pop /xchart3 xchart3f def} {/xchart3 0 def} ifelse /xchart4f where {pop /xchart4 xchart4f def} {/xchart4 0 def} ifelse /pchartf where {pop /pchart1 pchartf def /pchart2 pchartf def /pchartd pchartdf def} {/pchart1 3 def} ifelse /colsepf where {pop /colsep1 colsepf def /colsep2 colsepf def /colsepd colsepdf def} {/colsep1 0 def} ifelse /pmetamf where {pop /pmetam1 pmetamf def /pmetam2 pmetamf def /pmetamd pmetamdf def} {/pmetam1 0 def} ifelse %either defaul values for xchart=0 or values for xchart=1 /lanind lanind1 def % /colorm colorm1 def % /deintp deintp1 def % /xcolor xcolor1 def % /xchart xchart1 def % /pchart pchart1 def % /colsep colsep1 def % /pmetam pmetam1 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 %always independent of intended output 5 /Times-ISOL1 FS /cvishow {cvi 6 string cvs show} def 75 85 moveto lanind cvishow (-) show colorm cvishow deintp cvishow xcolor cvishow xchart cvishow pchart cvishow colsep cvishow (-L) show pmetam cvishow gsave %LANINDL2 END 5 /Times-ISOL1 FS 340 85 moveto (MS510-1) show xchart 0 eq {(N) show} {deintp colorm 2 mul add cvishow} ifelse (, B2_01) show % ( B8280_7, M8120-1, B2_01, N=2_01 2x1) show 72 90 translate 0.01 MM 0.01 MM scale %d2:[rr.b4f]bausz8y.eps 15 setlinewidth 0.0 0.0 0.5 0.0 setcmyk_olvcolor 0 0 moveto 11200 0 rlineto 0 4000 rlineto -11200 0 rlineto closepath fill 0.0 0.0 0.0 1.0 setcmyk_olvcolor 0 0 moveto 11200 0 rlineto 0 4000 rlineto -11200 0 rlineto closepath stroke /TRI {350 /Times-ISOL1 FS} bind def /TII {350 /TimesI-ISOL1 FS} bind def /TBI {350 /TimesB-ISOL1 FS} bind def /TBII {350 /TimesBI-ISOL1 FS} bind def /TE1 {/T2 exch def /yu exch def /xu exch def xu yu moveto T2 show} bind def /TE2 {/T2 exch def /T1 exch def /yu exch def /xu exch def xu yu moveto T1 show xu yu yd 1 mul sub moveto T2 show} bind def /TE3 {/T3 exch def /T2 exch def /T1 exch def /yu exch def /xu exch def xu yu moveto T1 show xu yu yd 2 mul sub moveto T2 show xu yu yd 4 mul sub moveto T3 show} bind def /rec {/yw exch def /xw exch def /yu exch def /xu exch def xu yu moveto xw 0 rlineto 0 yw rlineto xw neg 0 rlineto closepath stroke} bind def /yd 400 def %Tabelle, Frame 11200:4000 100 100 3100 3800 rec TII 200 3450 yd 0 mul sub moveto (psychologische) showde %0MS510-1 00000 (psychological) showen %1MS510-1 00001 (orden) showes %3MS510-1 00003 (ordre) showfr %2MS510-1 00002 (Ordinamento) showit %4MS510-1 00004 (psykologisk) showno %5MS510-1 00005 (ordre) showpt %6MS510-1 00006 (psychological) showx1 %7MS510-1 00007 (psychological) showy1 %8MS510-1 00008 (psychological) showz1 %9MS510-1 00009 TII 200 3450 yd 1 mul sub moveto (Ordnung:) showde %0MS510-1 01000 (ordering:) showen %1MS510-1 01001 (psicol\363gico:) showes %3MS510-1 01003 (psychologique:) showfr %2MS510-1 01002 (psicologico:) showit %4MS510-1 01004 (ordning:) showno %5MS510-1 01005 (psychologique:) showpt %6MS510-1 01006 (ordering:) showx1 %7MS510-1 01007 (ordering:) showy1 %8MS510-1 01008 (ordering:) showz1 %9MS510-1 01009 TM TRI 200 2150 yd 0 mul sub moveto (Farbenvielfalt) showde %0MS510-1 02000 (colour variety) showen %1MS510-1 02001 (variedad del color) showes %3MS510-1 02003 (vari\351t\351 de couleur) showfr %2MS510-1 02002 (variet\340 dei colori) showit %4MS510-1 02004 (fargemangfold) showno %5MS510-1 02005 (vari\351t\351 de couleur) showpt %6MS510-1 02006 (colour variety) showx1 %7MS510-1 02007 (colour variety) showy1 %8MS510-1 02008 (colour variety) showz1 %9MS510-1 02009 TRI 200 2150 yd 2 mul sub moveto (Farbordnung) showde %0MS510-1 03000 (colour order) showen %1MS510-1 03001 (ordenaci\363n del color) showes %3MS510-1 03003 (ordre de couleur) showfr %2MS510-1 03002 (ordinamento) showit %4MS510-1 03004 (Ordning av farger) showno %5MS510-1 03005 (ordre de couleur) showpt %6MS510-1 03006 (colour order) showx1 %7MS510-1 03007 (colour order) showy1 %8MS510-1 03008 (colour order) showz1 %9MS510-1 03009 TRI 200 2150 yd 3 mul sub moveto () showde %0MS510-1 04000 () showen %1MS510-1 04001 () showes %3MS510-1 04003 () showfr %2MS510-1 04002 (dei colori) showit %4MS510-1 04004 () showno %5MS510-1 04005 () showpt %6MS510-1 04006 () showx1 %7MS510-1 04007 () showy1 %8MS510-1 04008 () showz1 %9MS510-1 04009 TRI 200 2150 yd 4 mul sub moveto (Farbmerkmale) showde %0MS510-1 05000 (colour attributes) showen %1MS510-1 05001 (atributos del color) showes %3MS510-1 05003 (attributs de couleur) showfr %2MS510-1 05002 (attributi dei colori) showit %4MS510-1 05004 (fargekjennetegn) showno %5MS510-1 05005 (attributs de couleur) showpt %6MS510-1 05006 (colour attributes) showx1 %7MS510-1 05007 (colour attributes) showy1 %8MS510-1 05008 (colour attributes) showz1 %9MS510-1 05009 4050 1750 3100 1000 rec TBI 4300 2350 0 yd mul sub moveto (Farbe und) showde %0MS510-1 06000 (colour and) showen %1MS510-1 06001 (color y) showes %3MS510-1 06003 (couleur et vision) showfr %2MS510-1 06002 (colore e) showit %4MS510-1 06004 (farge og) showno %5MS510-1 06005 (couleur et vision) showpt %6MS510-1 06006 (colour and) showx1 %7MS510-1 06007 (colour and) showy1 %8MS510-1 06008 (colour and) showz1 %9MS510-1 06009 TBI 4300 2350 1 yd mul sub moveto (Farbsehen) showde %0MS510-1 07000 (colour vision) showen %1MS510-1 07001 (visi\363n del color) showes %3MS510-1 07003 (des couleurs) showfr %2MS510-1 07002 (visione dei colori) showit %4MS510-1 07004 (fargesyn) showno %5MS510-1 07005 (des couleurs) showpt %6MS510-1 07006 (colour vision) showx1 %7MS510-1 07007 (colour vision) showy1 %8MS510-1 07008 (colour vision) showz1 %9MS510-1 07009 8000 100 3100 3800 rec TII 8100 3450 yd 0 mul sub moveto (psycho\255physikali\255) showde %0MS510-1 08000 (psycho\255physical) showen %1MS510-1 08001 (descripci\363n) showes %3MS510-1 08003 (description) showfr %2MS510-1 08002 (descrizione) showit %4MS510-1 08004 (psykofysisk) showno %5MS510-1 08005 (description) showpt %6MS510-1 08006 (psycho\255physical) showx1 %7MS510-1 08007 (psycho\255physical) showy1 %8MS510-1 08008 (psycho\255physical) showz1 %9MS510-1 08009 TII 8100 3450 yd 1 mul sub moveto (sche Beschreibung:) showde %0MS510-1 09000 (description:) showen %1MS510-1 09001 (psico\255f\355sica:) showes %3MS510-1 09003 (psycho\255physicale:) showfr %2MS510-1 09002 (psico-fisica:) showit %4MS510-1 09004 (beskrivelse:) showno %5MS510-1 09005 (psycho\255physicale:) showpt %6MS510-1 09006 (description:) showx1 %7MS510-1 09007 (description:) showy1 %8MS510-1 09008 (description:) showz1 %9MS510-1 09009 TRI 8100 2150 yd 0 mul sub moveto (Farbspektrum) showde %0MS510-1 10000 (colour spectrum) showen %1MS510-1 10001 (espectro de color) showes %3MS510-1 10003 (spectre de couleur) showfr %2MS510-1 10002 (spettro del colore) showit %4MS510-1 10004 (fargespektrum) showno %5MS510-1 10005 (spectre de couleur) showpt %6MS510-1 10006 (colour spectrum) showx1 %7MS510-1 10007 (colour spectrum) showy1 %8MS510-1 10008 (colour spectrum) showz1 %9MS510-1 10009 TRI 8100 2150 yd 2 mul sub moveto (Normfarbwerte) showde %0MS510-1 11000 (tristimulus values) showen %1MS510-1 11001 (valores triest\355mulo) showes %3MS510-1 11003 (valeurs tristimulus) showfr %2MS510-1 11002 (valori tristimolo) showit %4MS510-1 11004 (tristimulusverdier) showno %5MS510-1 11005 (valeurs tristimulus) showpt %6MS510-1 11006 (tristimulus values) showx1 %7MS510-1 11007 (tristimulus values) showy1 %8MS510-1 11008 (tristimulus values) showz1 %9MS510-1 11009 TRI 8100 2150 yd 4 mul sub moveto (Farbmischung) showde %0MS510-1 12000 (colour mixture) showen %1MS510-1 12001 (mezcla de color) showes %3MS510-1 12003 (m\351lange de couleurs) showfr %2MS510-1 12002 (miscela di colori) showit %4MS510-1 12004 (fargeblanding) showno %5MS510-1 12005 (m\351lange de couleurs) showpt %6MS510-1 12006 (colour mixture) showx1 %7MS510-1 12007 (colour mixture) showy1 %8MS510-1 12008 (colour mixture) showz1 %9MS510-1 12009 %Pfeile 3200 2250 moveto 4050 2250 lineto stroke 7150 2250 moveto 8000 2250 lineto stroke 3200 2250 moveto 200 60 rlineto 0 -120 rlineto closepath fill 4050 2250 moveto -200 60 rlineto 0 -120 rlineto closepath fill 7150 2250 moveto 200 60 rlineto 0 -120 rlineto closepath fill 8000 2250 moveto -200 60 rlineto 0 -120 rlineto closepath fill showpage grestore %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 86 MM 152 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 12 %line 349 %!PS-Adobe-3.0 EPSF-3.0 MS510-2 %%BoundingBox: 70 83 226 206 %START PDFDE011.EPS /pdfmark02 where {pop} {userdict /pdfmark02 /cleartomark load put} ifelse /languagelevel where {pop languagelevel} {1} ifelse 2 lt { userdict (<<) cvn ([) cvn load put userdict (>>) cvn (]) cvn load put} if [/Title (PostScript pictures: farbe.li.tu-berlin.de/MS51/MS51.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:2019080112000) /ModDate (D:20190801112000) /DOCINFO pdfmark02 [ /View [ /FitB ] /DOCVIEW pdfmark02 %END PDFDE011 % !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 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave %LANINDL2 START 20000505 /lanind 0 def /lantex [(G) (E) (S) (F) (I) (J) (M)] def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind eq {show} {pop} ifelse} bind def /showes {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 /showno {5 lanind eq {show} {pop} ifelse} bind def /showpt {6 lanind eq {show} {pop} ifelse} bind def /showx1 {7 lanind eq {show} {pop} ifelse} bind def /showy1 {8 lanind eq {show} {pop} ifelse} bind def /showz1 {9 lanind eq {show} {pop} ifelse} bind def /lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def} {/lanind1 3 def /lanind2 3 def} ifelse lanind1 1 lanind2 {/lanind exch def %output showpage gsave %LANINDL2 END 5 /Times-ISOL1 FS 190 85 moveto %!2 (MS510-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 showpage grestore } for %output with langind end %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 28 MM 108 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 13 %line 359 %!PS-Adobe-3.0 EPSF-3.0 MS510-3 %%BoundingBox: 70 83 226 206 %START PDFDE011.EPS /pdfmark03 where {pop} {userdict /pdfmark03 /cleartomark load put} ifelse /languagelevel where {pop languagelevel} {1} ifelse 2 lt { userdict (<<) cvn ([) cvn load put userdict (>>) cvn (]) cvn load put} if [/Title (PostScript pictures: farbe.li.tu-berlin.de/MS51/MS51.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:2019080112000) /ModDate (D:20190801112000) /DOCINFO pdfmark03 [ /View [ /FitB ] /DOCVIEW pdfmark03 %END PDFDE011 %SETCMYK_OLV.PS /setcmyk_olvcolor %transfer cmyk to olv {/ncolor exch def /ycolor exch def /mcolor exch def /ccolor exch def ncolor 0 eq {1 ccolor sub 1 mcolor sub 1 ycolor sub setrgbcolor } {ccolor 0 eq mcolor 0 eq and ycolor 0 eq and {%only black n 1 ncolor sub dup dup setrgbcolor } {%cmy and black n 1 ccolor sub 1 ncolor sub mul 1 mcolor sub 1 ncolor sub mul 1 ycolor sub 1 ncolor sub mul setrgbcolor } ifelse } ifelse } bind def % !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 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave %LANINDL2 START 20000505 /lanind 1 def /lantex [(G) (E) (S) (F) (I) (J) (M)] def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind eq {show} {pop} ifelse} bind def /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 /showno {5 lanind eq {show} {pop} ifelse} bind def /showpt {6 lanind eq {show} {pop} ifelse} bind def /showx1 {7 lanind eq {show} {pop} ifelse} bind def /showy1 {8 lanind eq {show} {pop} ifelse} bind def /showz1 {9 lanind eq {show} {pop} ifelse} bind def /lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def /lanindd laninddf def} {/lanind1 3 def /lanind2 3 def} ifelse /colormf where {pop /colorm1 colormf def /colorm2 colormf def /colormd colormdf def} {/colorm1 0 def} ifelse /deintpf where {pop /deintp1 deintpf def /deintp2 deintpf def /deintpd deintpdf def} {/deintp1 0 def} ifelse /xcolorf where {pop /xcolor1 xcolorf def /xcolor2 xcolorf def /xcolord xcolordf def} {/xcolor1 3 def} ifelse /xchartf where {pop /xchart1 xchartf def /xchart2 xchartf def /xchartd xchartdf def /xchartm xchart2f xchart1f sub 1 add def} {/xchart1 0 def /xchartm 1 def} ifelse /xchart3f where {pop /xchart3 xchart3f def} {/xchart3 0 def} ifelse /xchart4f where {pop /xchart4 xchart4f def} {/xchart4 0 def} ifelse /pchartf where {pop /pchart1 pchartf def /pchart2 pchartf def /pchartd pchartdf def} {/pchart1 3 def} ifelse /colsepf where {pop /colsep1 colsepf def /colsep2 colsepf def /colsepd colsepdf def} {/colsep1 0 def} ifelse /pmetamf where {pop /pmetam1 pmetamf def /pmetam2 pmetamf def /pmetamd pmetamdf def} {/pmetam1 0 def} ifelse %either defaul values for xchart=0 or values for xchart=1 /lanind lanind1 def % /colorm colorm1 def % /deintp deintp1 def % /xcolor xcolor1 def % /xchart xchart1 def % /pchart pchart1 def % /colsep colsep1 def % /pmetam pmetam1 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 %always independent of intended output 5 /Times-ISOL1 FS /cvishow {cvi 6 string cvs show} def 75 85 moveto lanind cvishow (-) show colorm cvishow deintp cvishow xcolor cvishow xchart cvishow pchart cvishow colsep cvishow (-L) show pmetam cvishow gsave %LANINDL2 END 5 /Times-ISOL1 FS 180 85 moveto (MS510-3) show xchart 0 eq {(N) show} {deintp colorm 2 mul add cvishow} ifelse (, B2_30) show % ( B8321_6, M8120-3, B2_30, N=2_30) show 72 90 translate 0.01 MM 0.01 MM scale %d2:[rr.b4f]bausz8y.eps 15 setlinewidth 0.0 0.0 0.5 0.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath fill 0.0 0.0 0.0 1.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath stroke 200 0 translate %Lampe 0 3000 100 0 360 arc stroke %Strahlengang 0 3000 moveto %Lampe 2000 3000 lineto %Prisma 4000 1000 lineto %Schirm 0 3000 lineto stroke %Schirm um 4000 1000 % 4000 1000 moveto 4330 1500 moveto %+30 Linienbreite 3730 0500 lineto stroke %Prisma % 2000 3000 moveto %Mitte 2200 3400 moveto 2200 3400 lineto 2100 2600 lineto 1600 2800 lineto 2200 3400 lineto stroke 15 setlinewidth 300 /Times-ISOL1 FS -175 3700 moveto 290 /Times-ISOL1 FS (Prinzip Spektrales Farbmischger\344t) showde %0MS510-3 00000 (principle of a spectral color integrator) showen %1MS510-3 00001 (principio de un integrador espectral) showes %3MS510-3 00003 (principe d'un int\351grateur spectral) showfr %2MS510-3 00002 (Principio di funzionamento di un integratore) showit %4MS510-3 00004 (prinsipp for spektral fargeintegrator) showno %5MS510-3 00005 (principe d'un int\351grateur spectral) showpt %6MS510-3 00006 (principle of a spectral color integrator) showx1 %7MS510-3 00007 (principle of a spectral color integrator) showy1 %8MS510-3 00008 (principle of a spectral color integrator) showz1 %9MS510-3 00009 3000 3400 moveto (spettrale di colore) showit %4MS510-3 00004 -150 3300 moveto 300 /Times-ISOL1 FS (Xenonlampe) showde %0MS510-3 01000 (xenon lamp) showen %1MS510-3 01001 (l\341mpara de xen\363n) showes %3MS510-3 01003 (lampe xenon) showfr %2MS510-3 01002 280 /Times-ISOL1 FS (lampada allo xenon) showit %4MS510-3 01004 300 /Times-ISOL1 FS (xenonlampe) showno %5MS510-3 01005 (lampe xenon) showpt %6MS510-3 01006 (xenon lamp) showx1 %7MS510-3 01007 (xenon lamp) showy1 %8MS510-3 01008 (xenon lamp) showz1 %9MS510-3 01009 2300 3000 moveto 300 /Times-ISOL1 FS (Prisma) showde %0MS510-3 02000 (prism) showen %1MS510-3 02001 (prisma) showes %3MS510-3 02003 (prisme) showfr %2MS510-3 02002 (prisma) showit %4MS510-3 02004 (prisme) showno %5MS510-3 02005 (prisme) showpt %6MS510-3 02006 (prism) showx1 %7MS510-3 02007 (prism) showy1 %8MS510-3 02008 (prism) showz1 %9MS510-3 02009 2600 2600 moveto 300 /Times-ISOL1 FS (Spektrum & Maske) showde %0MS510-3 03000 (spectrum & mask) showen %1MS510-3 03001 (espectro y m\341scara) showes %3MS510-3 03003 (spectre & masque) showfr %2MS510-3 03002 (Spettro e maschera) showit %4MS510-3 03004 (spektrum & sjablon) showno %5MS510-3 03005 (spectre & masque) showpt %6MS510-3 03006 (spectrum & mask) showx1 %7MS510-3 03007 (spectrum & mask) showy1 %8MS510-3 03008 (spectrum & mask) showz1 %9MS510-3 03009 4100 850 moveto 300 /Times-ISOL1 FS (Schirm) showde %0MS510-3 04000 (screen) showen %1MS510-3 04001 (pantalla) showes %3MS510-3 04003 (\351cran) showfr %2MS510-3 04002 (schermo) showit %4MS510-3 04004 (skjerm) showno %5MS510-3 04005 (\351cran) showpt %6MS510-3 04006 (screen) showx1 %7MS510-3 04007 (screen) showy1 %8MS510-3 04008 (screen) showz1 %9MS510-3 04009 3050 2150 moveto 300 /Times-ISOL1 FS (optische Infeld\255) showde %0MS510-3 05000 (optical central) showen %1MS510-3 05001 (campo central) showes %3MS510-3 05003 (m\351lange) showfr %2MS510-3 05002 (Miscela ottica) showit %4MS510-3 05004 (optisk innfelt\255) showno %5MS510-3 05005 (m\351lange) showpt %6MS510-3 05006 (optical central) showx1 %7MS510-3 05007 (optical central) showy1 %8MS510-3 05008 (optical central) showz1 %9MS510-3 05009 3350 1850 moveto 300 /Times-ISOL1 FS (Mischung) showde %0MS510-3 06000 (field mixture) showen %1MS510-3 06001 () showes %3MS510-3 06003 (optique central) showfr %2MS510-3 06002 (del campo) showit %4MS510-3 06004 (blanding) showno %5MS510-3 06005 (optique central) showpt %6MS510-3 06006 (field mixture) showx1 %7MS510-3 06007 (field mixture) showy1 %8MS510-3 06008 (field mixture) showz1 %9MS510-3 06009 3850 1550 moveto 300 /Times-ISOL1 FS () showde %0MS510-3 07000 () showen %1MS510-3 07001 () showes %3MS510-3 07003 () showfr %2MS510-3 07002 (centrale) showit %4MS510-3 07004 () showno %5MS510-3 07005 () showpt %6MS510-3 07006 () showx1 %7MS510-3 07007 () showy1 %8MS510-3 07008 () showz1 %9MS510-3 07009 50 2700 moveto -27 rotate 300 /Times-ISOL1 FS (wei\337er Umfeldstrahl) showde %0MS510-3 08000 (white background ray) showen %1MS510-3 08001 (haz del campo circundante blanco) showes %3MS510-3 08003 (blanc entoure rayon) showfr %2MS510-3 08002 280 /Times-ISOL1 FS (Raggio bianco della zona circostante) showit %4MS510-3 08004 300 /Times-ISOL1 FS (hvit omfeltstr\345le) showno %5MS510-3 08005 (blanc entoure rayon) showpt %6MS510-3 08006 (white background ray) showx1 %7MS510-3 08007 (white background ray) showy1 %8MS510-3 08008 (white background ray) showz1 %9MS510-3 08009 27 rotate -200 0 translate 100 100 translate 240 /Times-ISOL1 FS -80 1900 moveto () showde %0MS510-3 09000 () showen %1MS510-3 09001 (vista) showes %3MS510-3 09003 (perception) showfr %2MS510-3 09002 220 /Times-ISOL1 FS (Visualizzazione) showit %4MS510-3 09004 240 /Times-ISOL1 FS () showno %5MS510-3 09005 (perception) showpt %6MS510-3 09006 () showx1 %7MS510-3 09007 () showy1 %8MS510-3 09008 () showz1 %9MS510-3 09009 -80 1650 moveto (Sehsituation) showde %0MS510-3 10000 (viewed screen) showen %1MS510-3 10001 (de la pantalla) showes %3MS510-3 10003 (visuelle) showfr %2MS510-3 10002 220 /Times-ISOL1 FS (dello schermo) showit %4MS510-3 10004 240 /Times-ISOL1 FS (synssituasjon) showno %5MS510-3 10005 (visuelle) showpt %6MS510-3 10006 (viewed screen) showx1 %7MS510-3 10007 (viewed screen) showy1 %8MS510-3 10008 (viewed screen) showz1 %9MS510-3 10009 0.0 0.0 0.0 0.0 setcmyk_olvcolor 800 800 800 0 360 arc fill 0.0 0.0 0.0 1.0 setcmyk_olvcolor 800 800 800 0 360 arc stroke 0.0 1.0 1.0 0.0 setcmyk_olvcolor 800 0800 200 0 360 arc fill 1300 0800 200 0 360 arc fill 650 350 moveto (2) show 1250 350 moveto (1) show 1550 235 moveto 240 /Times-ISOL1 FS (1: Farbmuster) showde %0MS510-3 11000 (1: Colour sample) showen %1MS510-3 11001 (1: muestra de color) showes %3MS510-3 11003 (1: \351chantillon de couleur) showfr %2MS510-3 11002 (1: il colore compione) showit %4MS510-3 11004 (1: fargepr\370ve) showno %5MS510-3 11005 (1: \351chantillon de couleur) showpt %6MS510-3 11006 (1: Colour sample) showx1 %7MS510-3 11007 (1: Colour sample) showy1 %8MS510-3 11008 (1: Colour sample) showz1 %9MS510-3 11009 ( CIE Nr. 9) showde %0MS510-3 12000 ( CIE no. 9) showen %1MS510-3 12001 ( CIE no. 9) showes %3MS510-3 12003 ( CIE no 9) showfr %2MS510-3 12002 ( CIE n. 9) showit %4MS510-3 12004 ( CIE nr. 9) showno %5MS510-3 12005 ( CIE no 9) showpt %6MS510-3 12006 ( CIE no. 9) showx1 %7MS510-3 12007 ( CIE no. 9) showy1 %8MS510-3 12008 ( CIE no. 9) showz1 %9MS510-3 12009 1550 005 moveto (2: optisch gemischtes Farbmuster) showde %0MS510-3 13000 (2: optical mixture of colour sample) showen %1MS510-3 13001 (2: muestra de color por mezcla \363ptica) showes %3MS510-3 13003 (2: m\351lange optique d'\351chantillon) showfr %2MS510-3 13002 (2: miscela ottica di colore) showit %4MS510-3 13004 (2: optisk blanding av fargepr\370ve) showno %5MS510-3 13005 (2: m\351lange optique d'\351chantillon) showpt %6MS510-3 13006 (2: optical mixture of colour sample) showx1 %7MS510-3 13007 (2: optical mixture of colour sample) showy1 %8MS510-3 13008 (2: optical mixture of colour sample) showz1 %9MS510-3 13009 -20 -20 translate showpage grestore %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 86 MM 108 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 14 %line 369 %!PS-Adobe-3.0 EPSF-3.0 MS510-4 %%BoundingBox: 70 83 226 206 %START PDFDE011.EPS /pdfmark04 where {pop} {userdict /pdfmark04 /cleartomark load put} ifelse /languagelevel where {pop languagelevel} {1} ifelse 2 lt { userdict (<<) cvn ([) cvn load put userdict (>>) cvn (]) cvn load put} if [/Title (PostScript pictures: farbe.li.tu-berlin.de/MS51/MS51.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:2019080112000) /ModDate (D:20190801112000) /DOCINFO pdfmark04 [ /View [ /FitB ] /DOCVIEW pdfmark04 %END PDFDE011 %SETCMYK_OLV.PS /setcmyk_olvcolor %transfer cmyk to olv {/ncolor exch def /ycolor exch def /mcolor exch def /ccolor exch def ncolor 0 eq {1 ccolor sub 1 mcolor sub 1 ycolor sub setrgbcolor } {ccolor 0 eq mcolor 0 eq and ycolor 0 eq and {%only black n 1 ncolor sub dup dup setrgbcolor } {%cmy and black n 1 ccolor sub 1 ncolor sub mul 1 mcolor sub 1 ncolor sub mul 1 ycolor sub 1 ncolor sub mul setrgbcolor } ifelse } ifelse } bind def % !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 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave %LANINDL2 START 20000505 /lanind 1 def /lantex [(G) (E) (S) (F) (I) (J) (M)] def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind eq {show} {pop} ifelse} bind def /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 /showno {5 lanind eq {show} {pop} ifelse} bind def /showpt {6 lanind eq {show} {pop} ifelse} bind def /showx1 {7 lanind eq {show} {pop} ifelse} bind def /showy1 {8 lanind eq {show} {pop} ifelse} bind def /showz1 {9 lanind eq {show} {pop} ifelse} bind def /lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def /lanindd laninddf def} {/lanind1 3 def /lanind2 3 def} ifelse /colormf where {pop /colorm1 colormf def /colorm2 colormf def /colormd colormdf def} {/colorm1 0 def} ifelse /deintpf where {pop /deintp1 deintpf def /deintp2 deintpf def /deintpd deintpdf def} {/deintp1 0 def} ifelse /xcolorf where {pop /xcolor1 xcolorf def /xcolor2 xcolorf def /xcolord xcolordf def} {/xcolor1 3 def} ifelse /xchartf where {pop /xchart1 xchartf def /xchart2 xchartf def /xchartd xchartdf def /xchartm xchart2f xchart1f sub 1 add def} {/xchart1 0 def /xchartm 1 def} ifelse /xchart3f where {pop /xchart3 xchart3f def} {/xchart3 0 def} ifelse /xchart4f where {pop /xchart4 xchart4f def} {/xchart4 0 def} ifelse /pchartf where {pop /pchart1 pchartf def /pchart2 pchartf def /pchartd pchartdf def} {/pchart1 3 def} ifelse /colsepf where {pop /colsep1 colsepf def /colsep2 colsepf def /colsepd colsepdf def} {/colsep1 0 def} ifelse /pmetamf where {pop /pmetam1 pmetamf def /pmetam2 pmetamf def /pmetamd pmetamdf def} {/pmetam1 0 def} ifelse %either defaul values for xchart=0 or values for xchart=1 /lanind lanind1 def % /colorm colorm1 def % /deintp deintp1 def % /xcolor xcolor1 def % /xchart xchart1 def % /pchart pchart1 def % /colsep colsep1 def % /pmetam pmetam1 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 %always independent of intended output 5 /Times-ISOL1 FS /cvishow {cvi 6 string cvs show} def 75 85 moveto lanind cvishow (-) show colorm cvishow deintp cvishow xcolor cvishow xchart cvishow pchart cvishow colsep cvishow (-L) show pmetam cvishow gsave %LANINDL2 END 5 /Times-ISOL1 FS 180 85 moveto (MS510-4) show xchart 0 eq {(N) show} {deintp colorm 2 mul add cvishow} ifelse (, B2_38) show % ( B8310_1, M8120-4, B2_38, N=2_38) show %! Aus pprozspe.com mit MULY=1500 und FERN, D65, Kurve Nr. 1 72 90 translate 0.01 MM 0.01 MM scale %d2:[rr.b4f]bausz8y.eps 15 setlinewidth 0.0 0.0 0.5 0.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath fill 0.0 0.0 0.0 1.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath stroke 600 400 translate 20 setlinewidth 0 0 moveto 340 12 mul 0 rlineto stroke 0 0 moveto 0 3000 rlineto stroke 0 2 moveto 120 6 240 21 360 65 curveto 480 201 600 425 720 522 curveto 840 504 960 436 1080 293 curveto 1200 143 1320 48 1440 7 curveto 1560 13 1680 94 1800 248 curveto 1920 435 2040 650 2160 891 curveto 2280 1143 2400 1374 2520 1539 curveto 2640 1593 2760 1504 2880 1281 curveto 3000 963 3120 671 3240 425 curveto 3360 247 3480 131 3600 70 curveto 3720 34 3840 17 3960 8 curveto 4080 4 4200 2 4320 1 curveto stroke 0 0 moveto 120 0 240 0 360 1 curveto 480 6 600 17 720 34 curveto 840 57 960 90 1080 136 curveto 1200 208 1320 312 1440 484 curveto 1560 754 1680 1065 1800 1293 curveto 1920 1431 2040 1492 2160 1492 curveto 2280 1428 2400 1305 2520 1135 curveto 2640 946 2760 754 2880 571 curveto 3000 397 3120 262 3240 160 curveto 3360 91 3480 48 3600 25 curveto 3720 12 3840 6 3960 3 curveto 4080 1 4200 0 4320 0 curveto stroke 0 9 moveto 120 30 240 101 360 311 curveto 480 969 600 2080 720 2622 curveto 840 2660 960 2505 1080 1932 curveto 1200 1220 1320 698 1440 408 curveto 1560 237 1680 117 1800 63 curveto 1920 30 2040 13 2160 5 curveto 2280 3 2400 2 2520 1 curveto 2640 1 2760 0 2880 0 curveto 3000 0 3120 0 3240 0 curveto 3360 0 3480 0 3600 0 curveto 3720 0 3840 0 3960 0 curveto 4080 0 4200 0 4320 0 curveto stroke 300 /Times-ISOL1 FS %! 100 lambda-Einheiten = 1200 Skalen-Einheiten 240 50 moveto 0 -100 rlineto stroke 1440 50 moveto 0 -100 rlineto stroke 2640 50 moveto 0 -100 rlineto stroke 3840 50 moveto 0 -100 rlineto stroke 20 -300 moveto (400) show 1220 -300 moveto (500) show 2420 -300 moveto (600) show 3620 -300 moveto (700) show %! 100 S-Einheiten = 2000 Skalen-Einheiten -50 0 moveto 100 0 rlineto stroke -50 750 moveto 100 0 rlineto stroke -50 1500 moveto 100 0 rlineto stroke -50 2250 moveto 100 0 rlineto stroke -50 3000 moveto 100 0 rlineto stroke -500 -80 moveto (0,0) show -500 670 moveto (0,5) show -500 1420 moveto (1,0) show -500 2170 moveto (1,5) show -500 2920 moveto (2,0) show -525 3250 moveto 350 /Times-ISOL1 FS (Normspektralwerte,) showde %0MS510-4 00000 (tristimulus values,) showen %1MS510-4 00001 (tristimulus valora,) showes %3MS510-4 00003 (tristimulus estime,) showfr %2MS510-4 00002 (valori tristimulo,) showit %4MS510-4 00004 (tristimulusverdier,) showno %5MS510-4 00005 (tristimulus estime,) showpt %6MS510-4 00006 (tristimulus values,) showx1 %7MS510-4 00007 (tristimulus values,) showy1 %8MS510-4 00008 (tristimulus values,) showz1 %9MS510-4 00009 350 /Symbol FS 175 175 rmoveto (-) show -175 -175 rmoveto 350 /TimesI-ISOL1 FS (x) show 350 /Symbol FS ((l)) show 350 /Times-ISOL1 FS (,) show 350 /Symbol FS 175 175 rmoveto (-) show -175 -175 rmoveto 350 /TimesI-ISOL1 FS (y) show 350 /Symbol FS ((l)) show 350 /Times-ISOL1 FS (,) show 350 /Symbol FS 175 175 rmoveto (-) show -175 -175 rmoveto 350 /TimesI-ISOL1 FS (z) show 350 /Symbol FS ((l)) show 300 2750 moveto 350 /Times-ISOL1 FS (Normierung:) showde %0MS510-4 01000 (normalization:) showen %1MS510-4 01001 (normalizaci\363n:) showes %3MS510-4 01003 (normalisation:) showfr %2MS510-4 01002 (normalizzazione:) showit %4MS510-4 01004 (normering:) showno %5MS510-4 01005 (normalisation:) showpt %6MS510-4 01006 (normalization:) showx1 %7MS510-4 01007 (normalization:) showy1 %8MS510-4 01008 (normalization:) showz1 %9MS510-4 01009 350 /Symbol FS 175 175 rmoveto (-) show -175 -175 rmoveto 350 /TimesI-ISOL1 FS (y) show 300 /Times-ISOL1 FS 0 -150 rmoveto (max) show 0 150 rmoveto 350 /Symbol FS ((l)) show 350 /Times-ISOL1 FS ( = 1) show 300 /Times-ISOL1 FS 3300 900 moveto (Wellen\255) showde %0MS510-4 02000 (wave\255) showen %1MS510-4 02001 (longitud) showes %3MS510-4 02003 (longueur) showfr %2MS510-4 02002 (lunghezza) showit %4MS510-4 02004 (b\370lge\255) showno %5MS510-4 02005 (longueur) showpt %6MS510-4 02006 (wave\255) showx1 %7MS510-4 02007 (wave\255) showy1 %8MS510-4 02008 (wave\255) showz1 %9MS510-4 02009 3300 550 moveto (l\344nge) showde %0MS510-4 03000 (length) showen %1MS510-4 03001 (de onda) showes %3MS510-4 03003 (d'onde) showfr %2MS510-4 03002 (d'onda) showit %4MS510-4 03004 (lengde) showno %5MS510-4 03005 (d'onde) showpt %6MS510-4 03006 (length) showx1 %7MS510-4 03007 (length) showy1 %8MS510-4 03008 (length) showz1 %9MS510-4 03009 3600 200 moveto 300 /Symbol FS (l) show 300 /Times-ISOL1 FS (/nm) show 2500 1700 moveto 200 /Symbol FS 150 150 rmoveto (-) show -150 -150 rmoveto 300 /TimesI-ISOL1 FS (x) show 300 /Symbol FS ((l)) show 1700 1600 moveto 300 /Symbol FS 150 150 rmoveto (-) show -150 -150 rmoveto 300 /TimesI-ISOL1 FS (y) show 300 /Symbol FS ((l)) show 1000 2200 moveto 300 /Symbol FS 150 150 rmoveto (-) show -150 -150 rmoveto 300 /TimesI-ISOL1 FS (z) show 300 /Symbol FS ((l)) show showpage grestore %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 28 MM 064 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 15 %line 379 %!PS-Adobe-3.0 EPSF-3.0 MS510-5 %%BoundingBox: 70 83 226 206 %START PDFDE011.EPS /pdfmark05 where {pop} {userdict /pdfmark05 /cleartomark load put} ifelse /languagelevel where {pop languagelevel} {1} ifelse 2 lt { userdict (<<) cvn ([) cvn load put userdict (>>) cvn (]) cvn load put} if [/Title (PostScript pictures: farbe.li.tu-berlin.de/MS51/MS51.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:2019080112000) /ModDate (D:20190801112000) /DOCINFO pdfmark05 [ /View [ /FitB ] /DOCVIEW pdfmark05 %END PDFDE011 %SETCMYK_OLV.PS /setcmyk_olvcolor %transfer cmyk to olv {/ncolor exch def /ycolor exch def /mcolor exch def /ccolor exch def ncolor 0 eq {1 ccolor sub 1 mcolor sub 1 ycolor sub setrgbcolor } {ccolor 0 eq mcolor 0 eq and ycolor 0 eq and {%only black n 1 ncolor sub dup dup setrgbcolor } {%cmy and black n 1 ccolor sub 1 ncolor sub mul 1 mcolor sub 1 ncolor sub mul 1 ycolor sub 1 ncolor sub mul setrgbcolor } ifelse } ifelse } bind def % !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 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave %LANINDL2 START 20000505 /lanind 1 def /lantex [(G) (E) (S) (F) (I) (J) (M)] def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind eq {show} {pop} ifelse} bind def /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 /showno {5 lanind eq {show} {pop} ifelse} bind def /showpt {6 lanind eq {show} {pop} ifelse} bind def /showx1 {7 lanind eq {show} {pop} ifelse} bind def /showy1 {8 lanind eq {show} {pop} ifelse} bind def /showz1 {9 lanind eq {show} {pop} ifelse} bind def /lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def /lanindd laninddf def} {/lanind1 3 def /lanind2 3 def} ifelse /colormf where {pop /colorm1 colormf def /colorm2 colormf def /colormd colormdf def} {/colorm1 0 def} ifelse /deintpf where {pop /deintp1 deintpf def /deintp2 deintpf def /deintpd deintpdf def} {/deintp1 0 def} ifelse /xcolorf where {pop /xcolor1 xcolorf def /xcolor2 xcolorf def /xcolord xcolordf def} {/xcolor1 3 def} ifelse /xchartf where {pop /xchart1 xchartf def /xchart2 xchartf def /xchartd xchartdf def /xchartm xchart2f xchart1f sub 1 add def} {/xchart1 0 def /xchartm 1 def} ifelse /xchart3f where {pop /xchart3 xchart3f def} {/xchart3 0 def} ifelse /xchart4f where {pop /xchart4 xchart4f def} {/xchart4 0 def} ifelse /pchartf where {pop /pchart1 pchartf def /pchart2 pchartf def /pchartd pchartdf def} {/pchart1 3 def} ifelse /colsepf where {pop /colsep1 colsepf def /colsep2 colsepf def /colsepd colsepdf def} {/colsep1 0 def} ifelse /pmetamf where {pop /pmetam1 pmetamf def /pmetam2 pmetamf def /pmetamd pmetamdf def} {/pmetam1 0 def} ifelse %either defaul values for xchart=0 or values for xchart=1 /lanind lanind1 def % /colorm colorm1 def % /deintp deintp1 def % /xcolor xcolor1 def % /xchart xchart1 def % /pchart pchart1 def % /colsep colsep1 def % /pmetam pmetam1 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 %always independent of intended output 5 /Times-ISOL1 FS /cvishow {cvi 6 string cvs show} def 75 85 moveto lanind cvishow (-) show colorm cvishow deintp cvishow xcolor cvishow xchart cvishow pchart cvishow colsep cvishow (-L) show pmetam cvishow gsave %LANINDL2 END 5 /Times-ISOL1 FS 180 85 moveto (MS510-5) show xchart 0 eq {(N) show} {deintp colorm 2 mul add cvishow} ifelse (, B2_39) show % ( B8310_2, M8120-5, B2_39, N=2_39) show 72 90 translate 0.01 MM 0.01 MM scale %d2:[rr.b4f]bausz8y.eps 15 setlinewidth 0.0 0.0 0.5 0.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath fill 0.0 0.0 0.0 1.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath stroke 600 400 translate 0 0 moveto 4000 0 rlineto stroke 0 0 moveto 0 3200 rlineto stroke %! 100 S-Einheiten = 2000 Skalen-Einheiten 300 /Times-ISOL1 FS 0 -50 moveto 0 100 rlineto stroke 800 -50 moveto 0 100 rlineto stroke 1600 -50 moveto 0 100 rlineto stroke 2400 -50 moveto 0 100 rlineto stroke 3200 -50 moveto 0 100 rlineto stroke 4000 -50 moveto 0 100 rlineto stroke -100 -300 moveto (0,0) show 700 -300 moveto (0,2) show 1500 -300 moveto (0,4) show 2300 -300 moveto (0,6) show 3100 -300 moveto (0,8) show 3900 -300 moveto (1,0) show %! 100 S-Einheiten = 2000 Skalen-Einheiten -50 0 moveto 100 0 rlineto stroke -50 800 moveto 100 0 rlineto stroke -50 1600 moveto 100 0 rlineto stroke -50 2400 moveto 100 0 rlineto stroke -50 3200 moveto 100 0 rlineto stroke -450 -80 moveto (0,0) show -450 720 moveto (0,2) show -450 1520 moveto (0,4) show -450 2320 moveto (0,6) show -450 3120 moveto (0,8) show 350 /TimesI-ISOL1 FS -300 2800 moveto (y) show 350 /TimesI-ISOL1 FS 4200 150 moveto (x) show 300 /TimesI-ISOL1 FS 2600 150 moveto (CIE 1931) show 350 /Times-ISOL1 FS 0850 3200 moveto (Normfarbtafel) showde %0MS510-5 00000 (chromaticity diagram) showen %1MS510-5 00001 (diagrama de cromaticidad) showes %3MS510-5 00003 (diagramme de chromaticit\351) showfr %2MS510-5 00002 (diagramma cromaticit\340) showit %4MS510-5 00004 (kromatisitetsdiagram) showno %5MS510-5 00005 (diagramme de chromaticit\351) showpt %6MS510-5 00006 (chromaticity diagram) showx1 %7MS510-5 00007 (chromaticity diagram) showy1 %8MS510-5 00008 (chromaticity diagram) showz1 %9MS510-5 00009 2300 2800 moveto (2\260\255Beobachter) showde %0MS510-5 01000 (2\260\255 observer) showen %1MS510-5 01001 (observador de 2\260) showes %3MS510-5 01003 (2\260\255 observateur) showfr %2MS510-5 01002 (osservatore 2\260\255) showit %4MS510-5 01004 (2\260\255 observat\370r) showno %5MS510-5 01005 (2\260\255 observateur) showpt %6MS510-5 01006 (2\260\255 observer) showx1 %7MS510-5 01007 (2\260\255 observer) showy1 %8MS510-5 01008 (2\260\255 observer) showz1 %9MS510-5 01009 -600 -400 translate %1000 02 **************************************** %ANF PROZSPEP.FOR: MULYA= 4000 BEO=02 xy-Norm-Farbtafel IXY0: 600 400 600 400 translate 693 19 moveto %400 693 19 692 19 690 19 curveto 688 19 685 20 681 23 curveto %425 675 27 667 34 657 43 curveto 644 55 626 70 603 90 curveto %455 575 118 542 159 496 231 curveto 438 347 365 530 274 802 curveto %485 181 1179 93 1650 32 2153 curveto 15 2619 55 3000 155 3248 curveto %515 297 3335 456 3304 618 3223 curveto 771 3126 918 3017 1063 2897 curveto %545 1206 2769 1349 2635 1492 2497 curveto 1634 2358 1776 2218 1915 2080 curveto %575 2049 1946 2179 1817 2300 1696 curveto 2411 1585 2508 1489 2592 1405 curveto 2663 1336 2720 1278 2765 1233 curveto 2802 1197 2831 1168 2856 1143 curveto 2876 1123 2892 1107 2903 1096 curveto 2913 1086 2919 1080 2924 1075 curveto 2927 1072 2930 1069 2933 1066 curveto 2936 1063 2937 1062 2938 1061 curveto 2938 1061 2939 1060 2744 971 curveto 2261 748 2040 643 1908 582 curveto 1819 541 1758 512 1708 490 curveto 1660 468 1612 445 1558 420 curveto 1495 391 1419 356 1320 309 curveto 1184 247 986 155 693 19 curveto stroke 0.0 0.0 0.0 0.0 setcmyk_olvcolor 693 19 30 0 360 arc fill % 400 681 23 30 0 360 arc fill % 425 626 70 30 0 360 arc fill % 450 438 347 30 0 360 arc fill % 475 32 2153 30 0 360 arc fill % 500 456 3304 30 0 360 arc fill % 525 1206 2769 30 0 360 arc fill % 550 1915 2080 30 0 360 arc fill % 575 2508 1489 30 0 360 arc fill % 600 2802 1197 30 0 360 arc fill % 625 2903 1096 30 0 360 arc fill % 650 2930 1069 30 0 360 arc fill % 675 2938 1061 30 0 360 arc fill % 700 2261 748 30 0 360 arc fill %500c 1708 490 30 0 360 arc fill %525c 1419 356 30 0 360 arc fill %550c 0.0 0.0 0.0 1.0 setcmyk_olvcolor 693 19 30 0 360 arc stroke % 400 681 23 30 0 360 arc stroke % 425 626 70 30 0 360 arc stroke % 450 438 347 30 0 360 arc stroke % 475 32 2153 30 0 360 arc stroke % 500 456 3304 30 0 360 arc stroke % 525 1206 2769 30 0 360 arc stroke % 550 1915 2080 30 0 360 arc stroke % 575 2508 1489 30 0 360 arc stroke % 600 2802 1197 30 0 360 arc stroke % 625 2903 1096 30 0 360 arc stroke % 650 2930 1069 30 0 360 arc stroke % 675 2938 1061 30 0 360 arc stroke % 700 2261 748 30 0 360 arc stroke %500c 1708 490 30 0 360 arc stroke %525c 1419 356 30 0 360 arc stroke %550c 1250 1316 30 0 360 arc fill %D65 0.0 0.0 0.0 1.0 setcmyk_olvcolor 250 /TimesI-ISOL1 FS 693 375 sub 19 250 sub moveto (400) show % 681 600 sub 23 100 sub moveto (425) show % 626 450 sub 70 100 sub moveto (450) show 438 400 sub 347 225 sub moveto (475) show 32 450 sub 2153 100 sub moveto (500) show 456 150 sub 3304 070 add moveto (525) show 1206 100 add 2769 moveto (550) show 1915 100 add 2080 moveto (575) show 2508 100 add 1489 moveto (600) show 2802 100 add 1197 moveto (625) show % 2903 100 add 1096 moveto (650) show % 2930 100 add 1069 moveto (675) show 2938 100 add 1061 100 sub moveto (700) show 2261 100 add 748 200 sub moveto (500c) show 1708 100 add 490 200 sub moveto (525c) show 1419 356 250 sub moveto (550c) show 1250 600 sub 1316 200 sub moveto (D65 ) show newpath 93 1650 30 0 360 arc fill %495 93 450 sub 1650 100 add moveto (495) show newpath % 1634 2358 30 0 360 arc fill %565 % 1634 100 add 2358 moveto (565) show % 1492 2497 30 0 360 arc fill %560 % 1492 100 add 2497 moveto (560) show 1690 2274 30 0 360 arc fill %567 1690 50 add 2274 50 add moveto (567) show newpath [100] 0 setdash %500 - 500c 32 2153 moveto %500 2261 748 lineto stroke %500c %525 - 525c 456 3304 moveto %525 1708 490 lineto stroke %550 - 550c 1206 2769 moveto %550 1419 356 lineto stroke %550c %400 693 19 moveto %400 % 1492 2497 lineto stroke %560 % 1634 2358 lineto stroke %565 % 1776 2218 lineto stroke %570 1690 2274 lineto stroke %567 %475 - 575 438 347 moveto %475 1915 2080 lineto stroke %575 %495 -700 93 1650 moveto %495 2938 1061 lineto stroke %700 1333 1333 30 0 360 arc fill %E 1333 100 add 1333 000 sub moveto (E ) show -600 -400 translate %ENDE: 1 showpage grestore %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 86 MM 064 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 16 %line 389 %!PS-Adobe-3.0 EPSF-3.0 MS510-6 %%BoundingBox: 70 83 226 206 %START PDFDE011.EPS /pdfmark06 where {pop} {userdict /pdfmark06 /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/MS51/MS51.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:2019080112000) /ModDate (D:20190801112000) /DOCINFO pdfmark06 [ /View [ /FitB ] /DOCVIEW pdfmark06 %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 % !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 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def /A4quer {595 0 translate 90 rotate} def %%EndProlog gsave %LANINDL2 START 20000505 /lanind 1 def /lantex [(G) (E) (S) (F) (I) (J) (M)] def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind eq {show} {pop} ifelse} bind def /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 /showno {5 lanind eq {show} {pop} ifelse} bind def /showpt {6 lanind eq {show} {pop} ifelse} bind def /showx1 {7 lanind eq {show} {pop} ifelse} bind def /showy1 {8 lanind eq {show} {pop} ifelse} bind def /showz1 {9 lanind eq {show} {pop} ifelse} bind def /lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def /lanindd laninddf def} {/lanind1 3 def /lanind2 3 def} ifelse /colormf where {pop /colorm1 colormf def /colorm2 colormf def /colormd colormdf def} {/colorm1 0 def} ifelse /deintpf where {pop /deintp1 deintpf def /deintp2 deintpf def /deintpd deintpdf def} {/deintp1 0 def} ifelse /xcolorf where {pop /xcolor1 xcolorf def /xcolor2 xcolorf def /xcolord xcolordf def} {/xcolor1 3 def} ifelse /xchartf where {pop /xchart1 xchartf def /xchart2 xchartf def /xchartd xchartdf def /xchartm xchart2f xchart1f sub 1 add def} {/xchart1 0 def /xchartm 1 def} ifelse /xchart3f where {pop /xchart3 xchart3f def} {/xchart3 0 def} ifelse /xchart4f where {pop /xchart4 xchart4f def} {/xchart4 0 def} ifelse /pchartf where {pop /pchart1 pchartf def /pchart2 pchartf def /pchartd pchartdf def} {/pchart1 3 def} ifelse /colsepf where {pop /colsep1 colsepf def /colsep2 colsepf def /colsepd colsepdf def} {/colsep1 0 def} ifelse /pmetamf where {pop /pmetam1 pmetamf def /pmetam2 pmetamf def /pmetamd pmetamdf def} {/pmetam1 0 def} ifelse %either defaul values for xchart=0 or values for xchart=1 /lanind lanind1 def % /colorm colorm1 def % /deintp deintp1 def % /xcolor xcolor1 def % /xchart xchart1 def % /pchart pchart1 def % /colsep colsep1 def % /pmetam pmetam1 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 %always independent of intended output 5 /Times-ISOL1 FS /cvishow {cvi 6 string cvs show} def 75 85 moveto lanind cvishow (-) show colorm cvishow deintp cvishow xcolor cvishow xchart cvishow pchart cvishow colsep cvishow (-L) show pmetam cvishow gsave %LANINDL2 END 5 /Times-ISOL1 FS 180 85 moveto (MS510-6) show xchart 0 eq {(N) show} {deintp colorm 2 mul add cvishow} ifelse (, B2_40) show % ( B8331_5, M8120-6, B2_40, N=2_40) show %! Aus pprozspe.com mit MULY=2000 und FERN, D65, Kurve Nr. 1 72 90 translate 0.01 MM 0.01 MM scale %d2:[rr.b4f]bausz8y.eps 15 setlinewidth 0.0 0.0 0.5 0.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath fill 0.0 0.0 0.0 1.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath stroke 20 setlinewidth 500 400 translate 0 0 moveto 4000 0 rlineto stroke 0 0 moveto 0 3200 rlineto stroke 696 19 moveto 695 19 693 19 690 19 curveto 685 20 675 27 657 43 curveto 626 70 575 118 496 231 curveto 365 530 181 1179 32 2153 curveto 55 3000 297 3335 618 3223 curveto 918 3017 1206 2769 1492 2497 curveto 1776 2218 2049 1946 2300 1696 curveto 2508 1489 2663 1336 2765 1233 curveto 2831 1168 2876 1123 2903 1096 curveto 2919 1080 2927 1072 2933 1066 curveto 2937 1062 2938 1061 2938 1061 curveto 2938 1061 2938 1061 2938 1061 curveto stroke 693 19 40 0 360 arc stroke 626 70 40 0 360 arc stroke 32 2153 40 0 360 arc stroke 1206 2769 40 0 360 arc stroke 2508 1489 40 0 360 arc stroke 2903 1096 40 0 360 arc stroke 2938 1061 40 0 360 arc stroke newpath 2938 1061 moveto 696 13 lineto stroke %!Purpurgerade 300 /Times-ISOL1 FS 693 650 sub 19 50 add moveto (400) show 32 100 add 2153 100 sub moveto (500) show 1206 100 sub 2769 200 add moveto (550) show 2508 100 add 1489 moveto (600) show 2938 100 add 1061 100 sub moveto (700) show %! Programm FANxyp: Normfarbwertanteile fŸr PostScript %! Berechnet d2:[rr.p6f]fanxys.for,MULY:2000 COD: 1MIEOLV 1779 1963 moveto %! 2325 1294 lineto %! 680 542 lineto %! 756 1798 lineto %! stroke 1 setgray 1779 1963 40 0 360 arc fill 2325 1294 40 0 360 arc fill 680 542 40 0 360 arc fill 756 1798 40 0 360 arc fill 0.0 0.0 0.0 1.0 setcmyk_olvcolor 1779 1963 40 0 360 arc stroke 2325 1294 40 0 360 arc stroke 680 542 40 0 360 arc stroke 756 1798 40 0 360 arc stroke %! Berechnet d2:[rr.p6f]fanxys.for,MULY:2000 COD: 2MIECMY 1250 1316 moveto 1779 1963 lineto stroke 1250 1316 moveto 2325 1294 lineto stroke 1250 1316 moveto 680 542 lineto stroke 1250 1316 moveto 756 1798 lineto stroke stroke 1 setgray 1250 1316 40 0 360 arc fill 0.0 0.0 0.0 1.0 setcmyk_olvcolor 1250 1316 40 0 360 arc stroke %! 100 S-Einheiten = 2000 Skalen-Einheiten 300 /Times-ISOL1 FS 0 -50 moveto 0 100 rlineto stroke 800 -50 moveto 0 100 rlineto stroke 1600 -50 moveto 0 100 rlineto stroke 2400 -50 moveto 0 100 rlineto stroke 3200 -50 moveto 0 100 rlineto stroke 4000 -50 moveto 0 100 rlineto stroke -80 -300 moveto (0,0) show 720 -300 moveto (0,2) show 1520 -300 moveto (0,4) show 2320 -300 moveto (0,6) show 3120 -300 moveto (0,8) show 3920 -300 moveto (1,0) show %! 100 S-Einheiten = 2000 Skalen-Einheiten -50 0 moveto 100 0 rlineto stroke -50 800 moveto 100 0 rlineto stroke -50 1600 moveto 100 0 rlineto stroke -50 2400 moveto 100 0 rlineto stroke -50 3200 moveto 100 0 rlineto stroke -450 -80 moveto (0,0) show -450 720 moveto (0,2) show -450 1520 moveto (0,4) show -450 2320 moveto (0,6) show -450 3120 moveto (0,8) show 350 /TimesI-ISOL1 FS -300 2700 moveto (y) show 3600 100 moveto (x) show 350 /Times-ISOL1 FS 1700 3200 moveto (Elementarfarben) showde %0MS510-6 00000 (elementary colors) showen %1MS510-6 00001 (colores elementales) showes %3MS510-6 00003 (couleurs \351l\351mentaires) showfr %2MS510-6 00002 (colori elementari di) showit %4MS510-6 00004 (element\346rfargene) showno %5MS510-6 00005 (couleurs \351l\351mentaires) showpt %6MS510-6 00006 (elementary colors) showx1 %7MS510-6 00007 (elementary colors) showy1 %8MS510-6 00008 (elementary colors) showz1 %9MS510-6 00009 1700 2800 moveto (von ) showde %0MS510-6 01000 (of ) showen %1MS510-6 01001 (de ) showes %3MS510-6 01003 (de ) showfr %2MS510-6 01002 () showit %4MS510-6 01004 (til ) showno %5MS510-6 01005 (de ) showpt %6MS510-6 01006 (of ) showx1 %7MS510-6 01007 (of ) showy1 %8MS510-6 01008 (of ) showz1 %9MS510-6 01009 350 /TimesI-ISOL1 FS (Miescher) show 350 /Times-ISOL1 FS ( in) showde %0MS510-6 02000 ( in) showen %1MS510-6 02001 ( en es\255) showes %3MS510-6 02003 ( en dia\255) showfr %2MS510-6 02002 ( nel diagram\255) showit %4MS510-6 02004 ( i kroma\255) showno %5MS510-6 02005 ( en dia\255) showpt %6MS510-6 02006 ( in) showx1 %7MS510-6 02007 ( in) showy1 %8MS510-6 02008 ( in) showz1 %9MS510-6 02009 1800 2400 moveto (Normfarbtafel) showde %0MS510-6 03000 (chromaticity diagram) showen %1MS510-6 03001 (quema de chromaticity) showes %3MS510-6 03003 (gramme chromaticit\351) showfr %2MS510-6 03002 (ma di cromaticit\340) showit %4MS510-6 03004 (tisitetsdiagrammet) showno %5MS510-6 03005 (gramme chromaticit\351) showpt %6MS510-6 03006 (chromaticity diagram) showx1 %7MS510-6 03007 (chromaticity diagram) showy1 %8MS510-6 03008 (chromaticity diagram) showz1 %9MS510-6 03009 /ishowe {280 /TimesI-ISOL1 FS -20 -60 rmoveto (e) show 0 60 rmoveto 350 /TimesI-ISOL1 FS} def 350 /TimesI-ISOL1 FS 1250 1316 400 sub moveto (D65) show 1779 400 sub 1963 moveto (Y) show ishowe 2325 100 add 1294 200 sub moveto (R) show ishowe 680 100 add 542 200 sub moveto (B) show ishowe 756 400 sub 1798 200 sub moveto (G) show ishowe showpage grestore %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 28 MM 020 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 17 %line 399 %!PS-Adobe-3.0 EPSF-3.0 MS510-7 %%BoundingBox: 70 83 226 206 %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/MS51/MS51.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:2019080112000) /ModDate (D:20190801112000) /DOCINFO pdfmark07 [ /View [ /FitB ] /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 % !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 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave %LANINDL2 START 20000505 /lanind 1 def /lantex [(G) (E) (S) (F) (I) (J) (M)] def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind eq {show} {pop} ifelse} bind def /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 /showno {5 lanind eq {show} {pop} ifelse} bind def /showpt {6 lanind eq {show} {pop} ifelse} bind def /showx1 {7 lanind eq {show} {pop} ifelse} bind def /showy1 {8 lanind eq {show} {pop} ifelse} bind def /showz1 {9 lanind eq {show} {pop} ifelse} bind def /lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def /lanindd laninddf def} {/lanind1 3 def /lanind2 3 def} ifelse /colormf where {pop /colorm1 colormf def /colorm2 colormf def /colormd colormdf def} {/colorm1 0 def} ifelse /deintpf where {pop /deintp1 deintpf def /deintp2 deintpf def /deintpd deintpdf def} {/deintp1 0 def} ifelse /xcolorf where {pop /xcolor1 xcolorf def /xcolor2 xcolorf def /xcolord xcolordf def} {/xcolor1 3 def} ifelse /xchartf where {pop /xchart1 xchartf def /xchart2 xchartf def /xchartd xchartdf def /xchartm xchart2f xchart1f sub 1 add def} {/xchart1 0 def /xchartm 1 def} ifelse /xchart3f where {pop /xchart3 xchart3f def} {/xchart3 0 def} ifelse /xchart4f where {pop /xchart4 xchart4f def} {/xchart4 0 def} ifelse /pchartf where {pop /pchart1 pchartf def /pchart2 pchartf def /pchartd pchartdf def} {/pchart1 3 def} ifelse /colsepf where {pop /colsep1 colsepf def /colsep2 colsepf def /colsepd colsepdf def} {/colsep1 0 def} ifelse /pmetamf where {pop /pmetam1 pmetamf def /pmetam2 pmetamf def /pmetamd pmetamdf def} {/pmetam1 0 def} ifelse %either defaul values for xchart=0 or values for xchart=1 /lanind lanind1 def % /colorm colorm1 def % /deintp deintp1 def % /xcolor xcolor1 def % /xchart xchart1 def % /pchart pchart1 def % /colsep colsep1 def % /pmetam pmetam1 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 %always independent of intended output 5 /Times-ISOL1 FS /cvishow {cvi 6 string cvs show} def 75 85 moveto lanind cvishow (-) show colorm cvishow deintp cvishow xcolor cvishow xchart cvishow pchart cvishow colsep cvishow (-L) show pmetam cvishow gsave %LANINDL2 END 5 /Times-ISOL1 FS 180 85 moveto (MS510-7) show xchart 0 eq {(N) show} {deintp colorm 2 mul add cvishow} ifelse (, B2_59) show % ( B8321_5, M8120-7, B2_59, N=2_59) show 72 90 translate 0.01 MM 0.01 MM scale %d2:[rr.b4f]bausz8y.eps 15 setlinewidth 0.0 0.0 0.5 0.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath fill 0.0 0.0 0.0 1.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath stroke 600 400 translate 15 setlinewidth 0 0 moveto 340 11.5 mul 0 rlineto stroke 0 0 moveto 0 3000 rlineto stroke %! REM(I)*1500 0 333 moveto 120 381 240 381 360 348 curveto 480 324 600 312 720 315 curveto 840 330 960 369 1080 444 curveto 1200 576 1320 756 1440 974 curveto 1560 1068 1680 1038 1800 942 curveto 1920 813 2040 681 2160 564 curveto 2280 459 2400 375 2520 318 curveto 2640 288 2760 270 2880 255 curveto 3000 240 3120 234 3240 234 curveto 3360 243 3480 264 3600 306 curveto 3720 375 3840 483 3960 609 curveto 4080 726 4200 810 4320 876 curveto stroke %recheckform Rem 0.08*3 und 0.27*3 l1=470, l2=570nm 0 240 moveto %380nm 1080 240 lineto %470nm 1080 810 lineto %470nm 2280 810 lineto %570nm 2280 240 lineto %570nm 4320 240 lineto %720nm stroke 300 /Times-ISOL1 FS %! 100 lambda-Einheiten = 1200 Skalen-Einheiten 240 50 moveto 0 -100 rlineto stroke 1440 50 moveto 0 -100 rlineto stroke 2640 50 moveto 0 -100 rlineto stroke 3840 50 moveto 0 -100 rlineto stroke 20 -300 moveto (400) show 1220 -300 moveto (500) show 2420 -300 moveto (600) show 3620 -300 moveto (700) show %! 100 S-Einheiten = 2000 Skalen-Einheiten -50 0 moveto 100 0 rlineto stroke -50 600 moveto 100 0 rlineto stroke -50 1200 moveto 100 0 rlineto stroke -50 1800 moveto 100 0 rlineto stroke -50 2400 moveto 100 0 rlineto stroke -50 3000 moveto 100 0 rlineto stroke -500 -80 moveto (0,0) show -500 520 moveto (0,2) show -500 1120 moveto (0,4) show -500 1720 moveto (0,6) show -500 2320 moveto (0,8) show -500 2920 moveto (1,0) show -500 3300 moveto 350 /Times-ISOL1 FS (spektraler Reflexionsfaktor) showde %0MS510-7 00000 (spectral reflection factor) showen %1MS510-7 00001 (factor de reflexi\363n espectral) showes %3MS510-7 00003 (facteur de r\351flexion spectrale) showfr %2MS510-7 00002 (fattore di riflessione spettrale) showit %4MS510-7 00004 (spektral refleksjonsfaktor) showno %5MS510-7 00005 (facteur de r\351flexion spectrale) showpt %6MS510-7 00006 (spectral reflection factor) showx1 %7MS510-7 00007 (spectral reflection factor) showy1 %8MS510-7 00008 (spectral reflection factor) showz1 %9MS510-7 00009 350 /TimesI-ISOL1 FS ( R) show 350 /Symbol FS ((l)) show 4050 -050 moveto 300 /Symbol FS (l) show 300 /Times-ISOL1 FS (/nm) show 0900 1900 moveto 300 /Times-ISOL1 FS (CIE\255Testfarbe Nr. 11) showde %0MS510-7 01000 (CIE\255test color no. 11) showen %1MS510-7 01001 (color de prueba CIE no. 11) showes %3MS510-7 01003 (CIE\255test couleur no 11) showfr %2MS510-7 01002 (campione di colore n. 11 CIE) showit %4MS510-7 01004 (CIE\255testfarge nr. 11) showno %5MS510-7 01005 (CIE\255test couleur no 11) showpt %6MS510-7 01006 (CIE\255test color no. 11) showx1 %7MS510-7 01007 (CIE\255test color no. 11) showy1 %8MS510-7 01008 (CIE\255test color no. 11) showz1 %9MS510-7 01009 0900 1600 moveto ( und ) showde %0MS510-7 02000 ( and ) showen %1MS510-7 02001 ( y ) showes %3MS510-7 02003 () showfr %2MS510-7 02002 () showit %4MS510-7 02004 ( og ) showno %5MS510-7 02005 () showpt %6MS510-7 02006 ( and ) showx1 %7MS510-7 02007 ( and ) showy1 %8MS510-7 02008 ( and ) showz1 %9MS510-7 02009 (metamere Farben) showde %0MS510-7 03000 (metameric color) showen %1MS510-7 03001 (un color met\341mero) showes %3MS510-7 03003 (couleurs m\351tam\351res) showfr %2MS510-7 03002 (e colore metameric) showit %4MS510-7 03004 (metamer farge) showno %5MS510-7 03005 (couleurs m\351tam\351res) showpt %6MS510-7 03006 (metameric color) showx1 %7MS510-7 03007 (metameric color) showy1 %8MS510-7 03008 (metameric color) showz1 %9MS510-7 03009 ( f\374r) showde %0MS510-7 04000 ( for) showen %1MS510-7 04001 ( para) showes %3MS510-7 04003 ( pour) showfr %2MS510-7 04002 ( per) showit %4MS510-7 04004 ( for) showno %5MS510-7 04005 ( pour) showpt %6MS510-7 04006 ( for) showx1 %7MS510-7 04007 ( for) showy1 %8MS510-7 04008 ( for) showz1 %9MS510-7 04009 300 /TimesI-ISOL1 FS ( D65 ) show %vertikal arrows 500 0 moveto 0 3000 rlineto stroke 500 3000 moveto -40 -160 rlineto 80 0 rlineto closepath fill 500 0000 moveto -40 -160 rlineto 80 0 rlineto closepath fill 500 0240 moveto -40 160 rlineto 80 0 rlineto closepath fill 500 0810 moveto -40 -160 rlineto 80 0 rlineto closepath fill 500 0810 moveto -40 160 rlineto 80 0 rlineto closepath fill 300 /TimesI-ISOL1 FS 550 060 moveto (w) show 550 480 moveto (c) show 550 1800 moveto (n) show 300 /Symbol FS 1120 100 moveto (l) show 240 /Times-ISOL1 FS 0 -60 rmoveto (1) show 0 60 rmoveto 300 /Symbol FS 2100 100 moveto (l) show 240 /Times-ISOL1 FS 0 -60 rmoveto (2) show 0 60 rmoveto showpage grestore %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 86 MM 020 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 18 %line 409 %!PS-Adobe-3.0 EPSF-3.0 MS510-8 %%BoundingBox: 70 83 226 206 %START PDFDE011.EPS /pdfmark08 where {pop} {userdict /pdfmark08 /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/MS51/MS51.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:2019080112000) /ModDate (D:20190801112000) /DOCINFO pdfmark08 [ /View [ /FitB ] /DOCVIEW pdfmark08 %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 % !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 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave %LANINDL2 START 20000505 /lanind 1 def /lantex [(G) (E) (S) (F) (I) (J) (M)] def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind eq {show} {pop} ifelse} bind def /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 /showno {5 lanind eq {show} {pop} ifelse} bind def /showpt {6 lanind eq {show} {pop} ifelse} bind def /showx1 {7 lanind eq {show} {pop} ifelse} bind def /showy1 {8 lanind eq {show} {pop} ifelse} bind def /showz1 {9 lanind eq {show} {pop} ifelse} bind def /lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def /lanindd laninddf def} {/lanind1 3 def /lanind2 3 def} ifelse /colormf where {pop /colorm1 colormf def /colorm2 colormf def /colormd colormdf def} {/colorm1 0 def} ifelse /deintpf where {pop /deintp1 deintpf def /deintp2 deintpf def /deintpd deintpdf def} {/deintp1 0 def} ifelse /xcolorf where {pop /xcolor1 xcolorf def /xcolor2 xcolorf def /xcolord xcolordf def} {/xcolor1 3 def} ifelse /xchartf where {pop /xchart1 xchartf def /xchart2 xchartf def /xchartd xchartdf def /xchartm xchart2f xchart1f sub 1 add def} {/xchart1 0 def /xchartm 1 def} ifelse /xchart3f where {pop /xchart3 xchart3f def} {/xchart3 0 def} ifelse /xchart4f where {pop /xchart4 xchart4f def} {/xchart4 0 def} ifelse /pchartf where {pop /pchart1 pchartf def /pchart2 pchartf def /pchartd pchartdf def} {/pchart1 3 def} ifelse /colsepf where {pop /colsep1 colsepf def /colsep2 colsepf def /colsepd colsepdf def} {/colsep1 0 def} ifelse /pmetamf where {pop /pmetam1 pmetamf def /pmetam2 pmetamf def /pmetamd pmetamdf def} {/pmetam1 0 def} ifelse %either defaul values for xchart=0 or values for xchart=1 /lanind lanind1 def % /colorm colorm1 def % /deintp deintp1 def % /xcolor xcolor1 def % /xchart xchart1 def % /pchart pchart1 def % /colsep colsep1 def % /pmetam pmetam1 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 %always independent of intended output 5 /Times-ISOL1 FS /cvishow {cvi 6 string cvs show} def 75 85 moveto lanind cvishow (-) show colorm cvishow deintp cvishow xcolor cvishow xchart cvishow pchart cvishow colsep cvishow (-L) show pmetam cvishow gsave %LANINDL2 END 5 /Times-ISOL1 FS 180 85 moveto (MS510-8) show xchart 0 eq {(N) show} {deintp colorm 2 mul add cvishow} ifelse (, B3_02) show % ( B8310_1, M8120-8, B3_02, N=3_02) show %! Aus pprozspe.com mit MULY=1500 und FERN, D65, Kurve Nr. 1 72 90 translate 0.01 MM 0.01 MM scale %d2:[rr.b4f]bausz8y.eps 15 setlinewidth 0.0 0.0 0.5 0.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath fill 0.0 0.0 0.0 1.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath stroke 600 400 translate 20 setlinewidth 0 0 moveto 340 12 mul 0 rlineto stroke 0 0 moveto 0 3000 rlineto stroke 0 2 moveto 120 6 240 21 360 65 curveto 480 201 600 425 720 522 curveto 840 504 960 436 1080 293 curveto 1200 143 1320 48 1440 7 curveto 1560 13 1680 94 1800 248 curveto 1920 435 2040 650 2160 891 curveto 2280 1143 2400 1374 2520 1539 curveto 2640 1593 2760 1504 2880 1281 curveto 3000 963 3120 671 3240 425 curveto 3360 247 3480 131 3600 70 curveto 3720 34 3840 17 3960 8 curveto 4080 4 4200 2 4320 1 curveto stroke 0 0 moveto 120 0 240 0 360 1 curveto 480 6 600 17 720 34 curveto 840 57 960 90 1080 136 curveto 1200 208 1320 312 1440 484 curveto 1560 754 1680 1065 1800 1293 curveto 1920 1431 2040 1492 2160 1492 curveto 2280 1428 2400 1305 2520 1135 curveto 2640 946 2760 754 2880 571 curveto 3000 397 3120 262 3240 160 curveto 3360 91 3480 48 3600 25 curveto 3720 12 3840 6 3960 3 curveto 4080 1 4200 0 4320 0 curveto stroke 0 9 moveto 120 30 240 101 360 311 curveto 480 969 600 2080 720 2622 curveto 840 2660 960 2505 1080 1932 curveto 1200 1220 1320 698 1440 408 curveto 1560 237 1680 117 1800 63 curveto 1920 30 2040 13 2160 5 curveto 2280 3 2400 2 2520 1 curveto 2640 1 2760 0 2880 0 curveto 3000 0 3120 0 3240 0 curveto 3360 0 3480 0 3600 0 curveto 3720 0 3840 0 3960 0 curveto 4080 0 4200 0 4320 0 curveto stroke 300 /Times-ISOL1 FS %! 100 lambda-Einheiten = 1200 Skalen-Einheiten 240 50 moveto 0 -100 rlineto stroke 1440 50 moveto 0 -100 rlineto stroke 2640 50 moveto 0 -100 rlineto stroke 3840 50 moveto 0 -100 rlineto stroke 20 -300 moveto (400) show 1220 -300 moveto (500) show 2420 -300 moveto (600) show 3620 -300 moveto (700) show %! 100 S-Einheiten = 2000 Skalen-Einheiten -50 0 moveto 100 0 rlineto stroke -50 750 moveto 100 0 rlineto stroke -50 1500 moveto 100 0 rlineto stroke -50 2250 moveto 100 0 rlineto stroke -50 3000 moveto 100 0 rlineto stroke -500 -80 moveto (0,0) show -500 670 moveto (0,5) show -500 1420 moveto (1,0) show -500 2170 moveto (1,5) show -500 2920 moveto (2,0) show -525 3250 moveto 350 /Times-ISOL1 FS (Normspektralwerte,) showde %0MS510-8 00000 (tristimulus values,) showen %1MS510-8 00001 (tristimulus valora,) showes %3MS510-8 00003 (tristimulus estime,) showfr %2MS510-8 00002 (valori tristimulo,) showit %4MS510-8 00004 (tristimulusverdier,) showno %5MS510-8 00005 (tristimulus estime,) showpt %6MS510-8 00006 (tristimulus values,) showx1 %7MS510-8 00007 (tristimulus values,) showy1 %8MS510-8 00008 (tristimulus values,) showz1 %9MS510-8 00009 350 /Symbol FS 175 175 rmoveto (-) show -175 -175 rmoveto 350 /TimesI-ISOL1 FS (x) show 350 /Symbol FS ((l)) show 350 /Times-ISOL1 FS (,) show 350 /Symbol FS 175 175 rmoveto (-) show -175 -175 rmoveto 350 /TimesI-ISOL1 FS (y) show 350 /Symbol FS ((l)) show 350 /Times-ISOL1 FS (,) show 350 /Symbol FS 175 175 rmoveto (-) show -175 -175 rmoveto 350 /TimesI-ISOL1 FS (z) show 350 /Symbol FS ((l)) show 300 2750 moveto 350 /Times-ISOL1 FS (Normierung:) showde %0MS510-8 01000 (normalization:) showen %1MS510-8 01001 (normalizaci\363n:) showes %3MS510-8 01003 (normalisation:) showfr %2MS510-8 01002 (normalizzazione:) showit %4MS510-8 01004 (normering:) showno %5MS510-8 01005 (normalisation:) showpt %6MS510-8 01006 (normalization:) showx1 %7MS510-8 01007 (normalization:) showy1 %8MS510-8 01008 (normalization:) showz1 %9MS510-8 01009 350 /Symbol FS 175 175 rmoveto (-) show -175 -175 rmoveto 350 /TimesI-ISOL1 FS (y) show 300 /Times-ISOL1 FS 0 -150 rmoveto (max) show 0 150 rmoveto 350 /Symbol FS ((l)) show 350 /Times-ISOL1 FS ( = 1) show 300 /Times-ISOL1 FS 300 /Times-ISOL1 FS 3300 900 moveto (Wellen\255) showde %0MS510-8 02000 (wave\255) showen %1MS510-8 02001 (longitud) showes %3MS510-8 02003 (longueur) showfr %2MS510-8 02002 (lunghezza) showit %4MS510-8 02004 (b\370lge\255) showno %5MS510-8 02005 (longueur) showpt %6MS510-8 02006 (wave\255) showx1 %7MS510-8 02007 (wave\255) showy1 %8MS510-8 02008 (wave\255) showz1 %9MS510-8 02009 3300 550 moveto (l\344nge) showde %0MS510-8 03000 (length) showen %1MS510-8 03001 (de onda) showes %3MS510-8 03003 (d'onde) showfr %2MS510-8 03002 (d'onda) showit %4MS510-8 03004 (lengde) showno %5MS510-8 03005 (d'onde) showpt %6MS510-8 03006 (length) showx1 %7MS510-8 03007 (length) showy1 %8MS510-8 03008 (length) showz1 %9MS510-8 03009 3600 200 moveto 300 /Symbol FS (l) show 300 /Times-ISOL1 FS (/nm) show 2500 1700 moveto 200 /Symbol FS 150 150 rmoveto (-) show -150 -150 rmoveto 300 /TimesI-ISOL1 FS (x) show 300 /Symbol FS ((l)) show 1700 1600 moveto 300 /Symbol FS 150 150 rmoveto (-) show -150 -150 rmoveto 300 /TimesI-ISOL1 FS (y) show 300 /Symbol FS ((l)) show 1000 2200 moveto 300 /Symbol FS 150 150 rmoveto (-) show -150 -150 rmoveto 300 /TimesI-ISOL1 FS (z) show 300 /Symbol FS ((l)) show showpage grestore %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 197 MM translate 10 /Times-ISOL1 FS 1 1 scale -77 -91 translate %%BeginDocument: Bild 12 %line 419 %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 152 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 21 %line 429 %!PS-Adobe-3.0 EPSF-3.0 MS511-1 %%BoundingBox: 70 83 226 206 %START PDFDE011.EPS /pdfmark11 where {pop} {userdict /pdfmark11 /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/MS51/MS51.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:2019080112000) /ModDate (D:20190801112000) /DOCINFO pdfmark11 [ /View [ /FitB ] /DOCVIEW pdfmark11 %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 % !AUSTAUSCH Times-Roman -> Times-Roman-ISOLatin1 /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 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave %LANINDL2 START 20000505 /lanind 1 def /lantex [(G) (E) (S) (F) (I) (J) (M)] def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind eq {show} {pop} ifelse} bind def /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 /showno {5 lanind eq {show} {pop} ifelse} bind def /showpt {6 lanind eq {show} {pop} ifelse} bind def /showx1 {7 lanind eq {show} {pop} ifelse} bind def /showy1 {8 lanind eq {show} {pop} ifelse} bind def /showz1 {9 lanind eq {show} {pop} ifelse} bind def /lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def /lanindd laninddf def} {/lanind1 3 def /lanind2 3 def} ifelse /colormf where {pop /colorm1 colormf def /colorm2 colormf def /colormd colormdf def} {/colorm1 0 def} ifelse /deintpf where {pop /deintp1 deintpf def /deintp2 deintpf def /deintpd deintpdf def} {/deintp1 0 def} ifelse /xcolorf where {pop /xcolor1 xcolorf def /xcolor2 xcolorf def /xcolord xcolordf def} {/xcolor1 3 def} ifelse /xchartf where {pop /xchart1 xchartf def /xchart2 xchartf def /xchartd xchartdf def /xchartm xchart2f xchart1f sub 1 add def} {/xchart1 0 def /xchartm 1 def} ifelse /xchart3f where {pop /xchart3 xchart3f def} {/xchart3 0 def} ifelse /xchart4f where {pop /xchart4 xchart4f def} {/xchart4 0 def} ifelse /pchartf where {pop /pchart1 pchartf def /pchart2 pchartf def /pchartd pchartdf def} {/pchart1 3 def} ifelse /colsepf where {pop /colsep1 colsepf def /colsep2 colsepf def /colsepd colsepdf def} {/colsep1 0 def} ifelse /pmetamf where {pop /pmetam1 pmetamf def /pmetam2 pmetamf def /pmetamd pmetamdf def} {/pmetam1 0 def} ifelse %either defaul values for xchart=0 or values for xchart=1 /lanind lanind1 def % /colorm colorm1 def % /deintp deintp1 def % /xcolor xcolor1 def % /xchart xchart1 def % /pchart pchart1 def % /colsep colsep1 def % /pmetam pmetam1 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 %always independent of intended output 5 /Times-ISOL1 FS /cvishow {cvi 6 string cvs show} def 75 85 moveto lanind cvishow (-) show colorm cvishow deintp cvishow xcolor cvishow xchart cvishow pchart cvishow colsep cvishow (-L) show pmetam cvishow gsave %LANINDL2 END 5 /Times-ISOL1 FS 180 85 moveto (MS511-1) show xchart 0 eq {(N) show} {deintp colorm 2 mul add cvishow} ifelse (, B3_03) show % ( B8310_2, M8121-1, B3_03, N=3_03) show 72 90 translate 0.01 MM 0.01 MM scale %d2:[rr.b4f]bausz8y.eps 15 setlinewidth 0.0 0.0 0.5 0.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath fill 0.0 0.0 0.0 1.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath stroke 600 400 translate 0 0 moveto 4000 0 rlineto stroke 0 0 moveto 0 3200 rlineto stroke %! 100 S-Einheiten = 2000 Skalen-Einheiten 300 /Times-ISOL1 FS 0 -50 moveto 0 100 rlineto stroke 800 -50 moveto 0 100 rlineto stroke 1600 -50 moveto 0 100 rlineto stroke 2400 -50 moveto 0 100 rlineto stroke 3200 -50 moveto 0 100 rlineto stroke 4000 -50 moveto 0 100 rlineto stroke -100 -300 moveto (0,0) show 700 -300 moveto (0,2) show 1500 -300 moveto (0,4) show 2300 -300 moveto (0,6) show 3100 -300 moveto (0,8) show 3900 -300 moveto (1,0) show %! 100 S-Einheiten = 2000 Skalen-Einheiten -50 0 moveto 100 0 rlineto stroke -50 800 moveto 100 0 rlineto stroke -50 1600 moveto 100 0 rlineto stroke -50 2400 moveto 100 0 rlineto stroke -50 3200 moveto 100 0 rlineto stroke -450 -80 moveto (0,0) show -450 720 moveto (0,2) show -450 1520 moveto (0,4) show -450 2320 moveto (0,6) show -450 3120 moveto (0,8) show 350 /TimesI-ISOL1 FS -300 2800 moveto (y) show 350 /TimesI-ISOL1 FS 4200 150 moveto (x) show 300 /TimesI-ISOL1 FS 2600 150 moveto (CIE 1931) show 350 /Times-ISOL1 FS 0850 3200 moveto (Normfarbtafel) showde %0MS511-1 00000 (chromaticity diagram) showen %1MS511-1 00001 (esquema de chromaticity) showes %3MS511-1 00003 (diagramme de chromaticit\351) showfr %2MS511-1 00002 (diagramma di cromaticit\340) showit %4MS511-1 00004 (kromatisitetsdiagram) showno %5MS511-1 00005 (diagramme de chromaticit\351) showpt %6MS511-1 00006 (chromaticity diagram) showx1 %7MS511-1 00007 (chromaticity diagram) showy1 %8MS511-1 00008 (chromaticity diagram) showz1 %9MS511-1 00009 2100 2800 moveto (2\260\255Beobachter) showde %0MS511-1 01000 (2\260\255 observer) showen %1MS511-1 01001 (observador 2\260\255) showes %3MS511-1 01003 (2\260\255 observateur) showfr %2MS511-1 01002 (2\260\255 l'osservatore) showit %4MS511-1 01004 (2\260\255 observat\370r) showno %5MS511-1 01005 (2\260\255 observateur) showpt %6MS511-1 01006 (2\260\255 observer) showx1 %7MS511-1 01007 (2\260\255 observer) showy1 %8MS511-1 01008 (2\260\255 observer) showz1 %9MS511-1 01009 -600 -400 translate %1000 02 **************************************** %ANF PROZSPEP.FOR: MULYA= 4000 BEO=02 xy-Norm-Farbtafel IXY0: 600 400 600 400 translate 693 19 moveto 693 19 692 19 690 19 curveto 688 19 685 20 681 23 curveto %425 675 27 667 34 657 43 curveto 644 55 626 70 603 90 curveto %455 575 118 542 159 496 231 curveto 438 347 365 530 274 802 curveto %485 181 1179 93 1650 32 2153 curveto 15 2619 55 3000 155 3248 curveto %515 297 3335 456 3304 618 3223 curveto 771 3126 918 3017 1063 2897 curveto %545 1206 2769 1349 2635 1492 2497 curveto 1634 2358 1776 2218 1915 2080 curveto %575 2049 1946 2179 1817 2300 1696 curveto 2411 1585 2508 1489 2592 1405 curveto 2663 1336 2720 1278 2765 1233 curveto 2802 1197 2831 1168 2856 1143 curveto 2876 1123 2892 1107 2903 1096 curveto 2913 1086 2919 1080 2924 1075 curveto 2927 1072 2930 1069 2933 1066 curveto 2936 1063 2937 1062 2938 1061 curveto 2938 1061 2939 1060 2744 971 curveto 2261 748 2040 643 1908 582 curveto 1819 541 1758 512 1708 490 curveto 1660 468 1612 445 1558 420 curveto 1495 391 1419 356 1320 309 curveto 1184 247 986 155 693 19 curveto stroke 0.0 0.0 0.0 0.0 setcmyk_olvcolor 693 19 30 0 360 arc fill % 400 681 23 30 0 360 arc fill % 425 626 70 30 0 360 arc fill % 450 438 347 30 0 360 arc fill % 475 32 2153 30 0 360 arc fill % 500 456 3304 30 0 360 arc fill % 525 1206 2769 30 0 360 arc fill % 550 1915 2080 30 0 360 arc fill % 575 2508 1489 30 0 360 arc fill % 600 2802 1197 30 0 360 arc fill % 625 2903 1096 30 0 360 arc fill % 650 2930 1069 30 0 360 arc fill % 675 2938 1061 30 0 360 arc fill % 700 2261 748 30 0 360 arc fill %500c 1708 490 30 0 360 arc fill %525c 1419 356 30 0 360 arc fill %550c 0.0 0.0 0.0 1.0 setcmyk_olvcolor 693 19 30 0 360 arc stroke % 400 681 23 30 0 360 arc stroke % 425 626 70 30 0 360 arc stroke % 450 438 347 30 0 360 arc stroke % 475 32 2153 30 0 360 arc stroke % 500 456 3304 30 0 360 arc stroke % 525 1206 2769 30 0 360 arc stroke % 550 1915 2080 30 0 360 arc stroke % 575 2508 1489 30 0 360 arc stroke % 600 2802 1197 30 0 360 arc stroke % 625 2903 1096 30 0 360 arc stroke % 650 2930 1069 30 0 360 arc stroke % 675 2938 1061 30 0 360 arc stroke % 700 2261 748 30 0 360 arc stroke %500c 1708 490 30 0 360 arc stroke %525c 1419 356 30 0 360 arc stroke %550c 1250 1316 30 0 360 arc fill %D65 0.0 0.0 0.0 1.0 setcmyk_olvcolor 250 /TimesI-ISOL1 FS 693 375 sub 19 250 sub moveto (400) show % 681 600 sub 23 100 sub moveto (425) show % 626 450 sub 70 100 sub moveto (450) show 438 400 sub 347 225 sub moveto (475) show 32 450 sub 2153 100 sub moveto (500) show 456 150 sub 3304 070 add moveto (525) show 1206 100 add 2769 moveto (550) show 1915 100 add 2080 moveto (575) show 2508 100 add 1489 moveto (600) show 2802 100 add 1197 moveto (625) show % 2903 100 add 1096 moveto (650) show % 2930 100 add 1069 moveto (675) show 2938 100 add 1061 100 sub moveto (700) show 2261 100 add 748 200 sub moveto (500c) show 1708 100 add 490 200 sub moveto (525c) show 1419 356 250 sub moveto (550c) show 1250 600 sub 1316 200 sub moveto (D65 ) show 438 347 moveto % 475 1915 2080 lineto stroke %575 % 693 19 moveto % 400 % 1634 2358 lineto stroke %565 % 1634 2358 30 0 360 arc stroke %565 % 1634 100 add 2358 moveto (565) show /XIE 0.3 def %567 %565, 570: 1634 2358 1776 2218 /x0 1634 def /y0 2358 def /x1 1776 def /y1 2218 def /xm x1 x0 sub XIE mul x0 add def /ym y1 y0 sub XIE mul y0 add def xm ym moveto %567 693 19 lineto stroke %400 xm ym 30 0 360 arc stroke %567 xm 100 add ym moveto (567) show % 93 1650 moveto %495 % 2938 1061 lineto stroke %700 % 93 100 add 1650 moveto (495) show /XIE 0.60 def %593 %590,595: xy0,xy1 181 1179 93 1650 /x0 181 def /y0 1179 def /x1 93 def /y1 1650 def /xm x1 x0 sub XIE mul x0 add def /ym y1 y0 sub XIE mul y0 add def xm ym moveto %493 2938 1061 lineto stroke %700 xm ym 30 0 360 arc stroke %493 xm 100 add ym moveto (493) show [100] 0 setdash %500 - 500c 32 2153 moveto %500 2261 748 lineto stroke %500c %525 - 525c 456 3304 moveto %525 1708 490 lineto stroke %550 - 550c 1206 2769 moveto %550 1419 356 lineto stroke %550c 1333 1333 30 0 360 arc fill %E 1333 100 add 1333 000 sub moveto (E ) show -600 -400 translate %ENDE: 1 showpage grestore %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 219 MM 152 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 22 %line 439 %!PS-Adobe-3.0 EPSF-3.0 MS511-2 %%BoundingBox: 70 83 226 206 %START PDFDE011.EPS /pdfmark12 where {pop} {userdict /pdfmark12 /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/MS51/MS51.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:2019080112000) /ModDate (D:20190801112000) /DOCINFO pdfmark12 [ /View [ /FitB ] /DOCVIEW pdfmark12 %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 % !AUSTAUSCH Times-Roman -> Times-Roman-ISOLatin1 /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 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave %LANINDL2 START 20000505 /lanind 1 def /lantex [(G) (E) (S) (F) (I) (J) (M)] def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind eq {show} {pop} ifelse} bind def /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 /showno {5 lanind eq {show} {pop} ifelse} bind def /showpt {6 lanind eq {show} {pop} ifelse} bind def /showx1 {7 lanind eq {show} {pop} ifelse} bind def /showy1 {8 lanind eq {show} {pop} ifelse} bind def /showz1 {9 lanind eq {show} {pop} ifelse} bind def /lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def /lanindd laninddf def} {/lanind1 3 def /lanind2 3 def} ifelse /colormf where {pop /colorm1 colormf def /colorm2 colormf def /colormd colormdf def} {/colorm1 0 def} ifelse /deintpf where {pop /deintp1 deintpf def /deintp2 deintpf def /deintpd deintpdf def} {/deintp1 0 def} ifelse /xcolorf where {pop /xcolor1 xcolorf def /xcolor2 xcolorf def /xcolord xcolordf def} {/xcolor1 3 def} ifelse /xchartf where {pop /xchart1 xchartf def /xchart2 xchartf def /xchartd xchartdf def /xchartm xchart2f xchart1f sub 1 add def} {/xchart1 0 def /xchartm 1 def} ifelse /xchart3f where {pop /xchart3 xchart3f def} {/xchart3 0 def} ifelse /xchart4f where {pop /xchart4 xchart4f def} {/xchart4 0 def} ifelse /pchartf where {pop /pchart1 pchartf def /pchart2 pchartf def /pchartd pchartdf def} {/pchart1 3 def} ifelse /colsepf where {pop /colsep1 colsepf def /colsep2 colsepf def /colsepd colsepdf def} {/colsep1 0 def} ifelse /pmetamf where {pop /pmetam1 pmetamf def /pmetam2 pmetamf def /pmetamd pmetamdf def} {/pmetam1 0 def} ifelse %either defaul values for xchart=0 or values for xchart=1 /lanind lanind1 def % /colorm colorm1 def % /deintp deintp1 def % /xcolor xcolor1 def % /xchart xchart1 def % /pchart pchart1 def % /colsep colsep1 def % /pmetam pmetam1 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 %always independent of intended output 5 /Times-ISOL1 FS /cvishow {cvi 6 string cvs show} def 75 85 moveto lanind cvishow (-) show colorm cvishow deintp cvishow xcolor cvishow xchart cvishow pchart cvishow colsep cvishow (-L) show pmetam cvishow gsave %LANINDL2 END 5 /Times-ISOL1 FS 180 85 moveto (MS511-2) show xchart 0 eq {(N) show} {deintp colorm 2 mul add cvishow} ifelse (, B3_04) show % ( B8310_3, M8121-2, B3_04, N=3_04) show %! Aus pprozspe.com mit MULY=1500 und FERN, D65, Kurve Nr. 1 72 90 translate 0.01 MM 0.01 MM scale %d2:[rr.b4f]bausz8y.eps 15 setlinewidth 0.0 0.0 0.5 0.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath fill 0.0 0.0 0.0 1.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath stroke 600 400 translate 20 setlinewidth 0 0 moveto 340 12 mul 0 rlineto stroke 0 0 moveto 0 3000 rlineto stroke 0 0 moveto 120 3 240 28 360 127 curveto 480 306 600 472 720 575 curveto 840 556 960 453 1080 293 curveto 1200 120 1320 24 1440 5 curveto 1560 56 1680 176 1800 354 curveto 1920 565 2040 794 2160 1057 curveto 2280 1318 2400 1521 2520 1677 curveto 2640 1685 2760 1545 2880 1284 curveto 3000 971 3120 647 3240 402 curveto 3360 228 3480 121 3600 61 curveto 3720 29 3840 14 3960 6 curveto 4080 3 4200 1 4320 0 curveto stroke 0 0 moveto 120 0 240 3 360 13 curveto 480 32 600 58 720 93 curveto 840 134 960 192 1080 277 curveto 1200 380 1320 508 1440 691 curveto 1560 910 1680 1142 1800 1312 curveto 1920 1443 2040 1487 2160 1495 curveto 2280 1433 2400 1303 2520 1166 curveto 2640 987 2760 792 2880 597 curveto 3000 425 3120 269 3240 161 curveto 3360 90 3480 47 3600 23 curveto 3720 11 3840 5 3960 2 curveto 4080 1 4200 0 4320 0 curveto stroke 0 1 moveto 120 15 240 129 360 584 curveto 480 1458 600 2330 720 2950 curveto 840 2992 960 2618 1080 1976 curveto 1200 1158 1320 622 1440 327 curveto 1560 167 1680 91 1800 45 curveto 1920 20 2040 5 2160 0 curveto 2280 0 2400 0 2520 0 curveto 2640 0 2760 0 2880 0 curveto 3000 0 3120 0 3240 0 curveto 3360 0 3480 0 3600 0 curveto 3720 0 3840 0 3960 0 curveto 4080 0 4200 0 4320 0 curveto stroke 300 /Times-ISOL1 FS %! 100 lambda-Einheiten = 1200 Skalen-Einheiten 240 50 moveto 0 -100 rlineto stroke 1440 50 moveto 0 -100 rlineto stroke 2640 50 moveto 0 -100 rlineto stroke 3840 50 moveto 0 -100 rlineto stroke 20 -300 moveto (400) show 1220 -300 moveto (500) show 2420 -300 moveto (600) show 3620 -300 moveto (700) show %! 100 S-Einheiten = 2000 Skalen-Einheiten -50 0 moveto 100 0 rlineto stroke -50 750 moveto 100 0 rlineto stroke -50 1500 moveto 100 0 rlineto stroke -50 2250 moveto 100 0 rlineto stroke -50 3000 moveto 100 0 rlineto stroke -500 -80 moveto (0,0) show -500 670 moveto (0,5) show -500 1420 moveto (1,0) show -500 2170 moveto (1,5) show -500 2920 moveto (2,0) show -500 3225 moveto 350 /Times-ISOL1 FS (Normspektralwerte,) showde %0MS511-2 00000 (tristimulus values,) showen %1MS511-2 00001 (tristimulus valora,) showes %3MS511-2 00003 (tristimulus estime,) showfr %2MS511-2 00002 (valori tristimulo,) showit %4MS511-2 00004 (tristimulusverdier,) showno %5MS511-2 00005 (tristimulus estime,) showpt %6MS511-2 00006 (tristimulus values,) showx1 %7MS511-2 00007 (tristimulus values,) showy1 %8MS511-2 00008 (tristimulus values,) showz1 %9MS511-2 00009 350 /Symbol FS 175 175 rmoveto (-) show -175 -175 rmoveto 350 /TimesI-ISOL1 FS (x) show 300 /Times-ISOL1 FS 0 -150 rmoveto (10) show 0 150 rmoveto 350 /Symbol FS ((l)) show 350 /Times-ISOL1 FS (,) show 350 /Symbol FS 175 175 rmoveto (-) show -175 -175 rmoveto 350 /TimesI-ISOL1 FS (y) show 300 /Times-ISOL1 FS 0 -150 rmoveto (10) show 0 150 rmoveto 350 /Symbol FS ((l)) show 350 /Times-ISOL1 FS (,) show 2800 2700 moveto 350 /Symbol FS 175 175 rmoveto (-) show -175 -175 rmoveto 350 /TimesI-ISOL1 FS (z) show 300 /Times-ISOL1 FS 0 -150 rmoveto (10) show 0 150 rmoveto 350 /Symbol FS ((l)) show %1500 2700 moveto %350 /Times-ISOL1 FS %(Norm. max.) show %350 /Symbol FS %175 175 rmoveto %(-) show %-175 -175 rmoveto %350 /TimesI-ISOL1 FS %(y) show %300 /Times-ISOL1 FS %0 -150 rmoveto %(10) show %0 150 rmoveto %350 /Symbol FS %((l)) show %350 /Times-ISOL1 FS %(=1) show 300 /Times-ISOL1 FS 3300 900 moveto (Wellen\255) showde %0MS511-2 01000 (wave\255) showen %1MS511-2 01001 (longitud) showes %3MS511-2 01003 (longueur) showfr %2MS511-2 01002 (lunghezza) showit %4MS511-2 01004 (b\370lge\255) showno %5MS511-2 01005 (longueur) showpt %6MS511-2 01006 (wave\255) showx1 %7MS511-2 01007 (wave\255) showy1 %8MS511-2 01008 (wave\255) showz1 %9MS511-2 01009 3300 550 moveto (l\344nge) showde %0MS511-2 02000 (length) showen %1MS511-2 02001 (de onda) showes %3MS511-2 02003 (d'onde) showfr %2MS511-2 02002 (d'onda) showit %4MS511-2 02004 (lengde) showno %5MS511-2 02005 (d'onde) showpt %6MS511-2 02006 (length) showx1 %7MS511-2 02007 (length) showy1 %8MS511-2 02008 (length) showz1 %9MS511-2 02009 3600 200 moveto 300 /Symbol FS (l) show 300 /Times-ISOL1 FS (/nm) show 2500 1700 moveto 300 /Symbol FS 150 150 rmoveto (-) show -150 -150 rmoveto 300 /TimesI-ISOL1 FS (x) show 200 /Times-ISOL1 FS 0 -150 rmoveto (10) show 0 150 rmoveto 300 /Symbol FS ((l)) show 1500 1650 moveto 300 /Symbol FS 150 150 rmoveto (-) show -150 -150 rmoveto 300 /TimesI-ISOL1 FS (y) show 200 /Times-ISOL1 FS 0 -150 rmoveto (10) show 0 150 rmoveto 300 /Symbol FS ((l)) show 1000 2300 moveto 300 /Symbol FS 150 150 rmoveto (-) show -150 -150 rmoveto 300 /TimesI-ISOL1 FS (z) show 200 /Times-ISOL1 FS 0 -150 rmoveto (10) show 0 150 rmoveto 300 /Symbol FS ((l)) show showpage grestore %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 108 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 23 %line 449 %!PS-Adobe-3.0 EPSF-3.0 MS511-3 %%BoundingBox: 70 83 226 206 %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/MS51/MS51.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:2019080112000) /ModDate (D:20190801112000) /DOCINFO pdfmark13 [ /View [ /FitB ] /DOCVIEW pdfmark13 %END PDFDE011 %SETCMYK_OLV.PS /setcmyk_olvcolor %transfer cmyk to olv {/ncolor exch def /ycolor exch def /mcolor exch def /ccolor exch def ncolor 0 eq {1 ccolor sub 1 mcolor sub 1 ycolor sub setrgbcolor } {ccolor 0 eq mcolor 0 eq and ycolor 0 eq and {%only black n 1 ncolor sub dup dup setrgbcolor } {%cmy and black n 1 ccolor sub 1 ncolor sub mul 1 mcolor sub 1 ncolor sub mul 1 ycolor sub 1 ncolor sub mul setrgbcolor } ifelse } ifelse } bind def % !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 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave %LANINDL2 START 20000505 /lanind 1 def /lantex [(G) (E) (S) (F) (I) (J) (M)] def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind eq {show} {pop} ifelse} bind def /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 /showno {5 lanind eq {show} {pop} ifelse} bind def /showpt {6 lanind eq {show} {pop} ifelse} bind def /showx1 {7 lanind eq {show} {pop} ifelse} bind def /showy1 {8 lanind eq {show} {pop} ifelse} bind def /showz1 {9 lanind eq {show} {pop} ifelse} bind def /lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def /lanindd laninddf def} {/lanind1 3 def /lanind2 3 def} ifelse /colormf where {pop /colorm1 colormf def /colorm2 colormf def /colormd colormdf def} {/colorm1 0 def} ifelse /deintpf where {pop /deintp1 deintpf def /deintp2 deintpf def /deintpd deintpdf def} {/deintp1 0 def} ifelse /xcolorf where {pop /xcolor1 xcolorf def /xcolor2 xcolorf def /xcolord xcolordf def} {/xcolor1 3 def} ifelse /xchartf where {pop /xchart1 xchartf def /xchart2 xchartf def /xchartd xchartdf def /xchartm xchart2f xchart1f sub 1 add def} {/xchart1 0 def /xchartm 1 def} ifelse /xchart3f where {pop /xchart3 xchart3f def} {/xchart3 0 def} ifelse /xchart4f where {pop /xchart4 xchart4f def} {/xchart4 0 def} ifelse /pchartf where {pop /pchart1 pchartf def /pchart2 pchartf def /pchartd pchartdf def} {/pchart1 3 def} ifelse /colsepf where {pop /colsep1 colsepf def /colsep2 colsepf def /colsepd colsepdf def} {/colsep1 0 def} ifelse /pmetamf where {pop /pmetam1 pmetamf def /pmetam2 pmetamf def /pmetamd pmetamdf def} {/pmetam1 0 def} ifelse %either defaul values for xchart=0 or values for xchart=1 /lanind lanind1 def % /colorm colorm1 def % /deintp deintp1 def % /xcolor xcolor1 def % /xchart xchart1 def % /pchart pchart1 def % /colsep colsep1 def % /pmetam pmetam1 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 %always independent of intended output 5 /Times-ISOL1 FS /cvishow {cvi 6 string cvs show} def 75 85 moveto lanind cvishow (-) show colorm cvishow deintp cvishow xcolor cvishow xchart cvishow pchart cvishow colsep cvishow (-L) show pmetam cvishow gsave %LANINDL2 END 5 /Times-ISOL1 FS 180 85 moveto (MS511-3) show xchart 0 eq {(N) show} {deintp colorm 2 mul add cvishow} ifelse (, B3_05) show % ( B8310_4, M8121-3, B3_05, N=3-05) show 72 90 translate 0.01 MM 0.01 MM scale %d2:[rr.b4f]bausz8y.eps 15 setlinewidth 0.0 0.0 0.5 0.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath fill 0.0 0.0 0.0 1.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath stroke 600 400 translate 0 0 moveto 4000 0 rlineto stroke 0 0 moveto 0 3200 rlineto stroke %! 100 S-Einheiten = 2000 Skalen-Einheiten 300 /Times-ISOL1 FS 0 -50 moveto 0 100 rlineto stroke 800 -50 moveto 0 100 rlineto stroke 1600 -50 moveto 0 100 rlineto stroke 2400 -50 moveto 0 100 rlineto stroke 3200 -50 moveto 0 100 rlineto stroke 4000 -50 moveto 0 100 rlineto stroke -100 -300 moveto (0,0) show 700 -300 moveto (0,2) show 1500 -300 moveto (0,4) show 2300 -300 moveto (0,6) show 3100 -300 moveto (0,8) show 3900 -300 moveto (1,0) show %! 100 S-Einheiten = 2000 Skalen-Einheiten -50 0 moveto 100 0 rlineto stroke -50 800 moveto 100 0 rlineto stroke -50 1600 moveto 100 0 rlineto stroke -50 2400 moveto 100 0 rlineto stroke -50 3200 moveto 100 0 rlineto stroke -450 -80 moveto (0,0) show -450 720 moveto (0,2) show -450 1520 moveto (0,4) show -450 2320 moveto (0,6) show -450 3120 moveto (0,8) show 350 /TimesI-ISOL1 FS -500 2000 moveto (y) show 300 /Times-ISOL1 FS -20 -125 rmoveto (10) show 20 125 rmoveto 350 /TimesI-ISOL1 FS 4100 150 moveto (x) show 300 /Times-ISOL1 FS 000 -125 rmoveto (10) show 000 125 rmoveto 300 /TimesI-ISOL1 FS 2600 150 moveto (CIE 1964) show 350 /Times-ISOL1 FS 0850 3200 moveto (Normfarbtafel) showde %0MS511-3 00000 (chromaticity diagram) showen %1MS511-3 00001 (esquema de chromaticity) showes %3MS511-3 00003 (diagramme de chromaticit\351) showfr %2MS511-3 00002 (diagramma di cromaticit\340) showit %4MS511-3 00004 (kromatisitetsdiagram) showno %5MS511-3 00005 (diagramme de chromaticit\351) showpt %6MS511-3 00006 (chromaticity diagram) showx1 %7MS511-3 00007 (chromaticity diagram) showy1 %8MS511-3 00008 (chromaticity diagram) showz1 %9MS511-3 00009 2100 2800 moveto (10\260\255Beobachter) showde %0MS511-3 01000 (10\260\255 observer) showen %1MS511-3 01001 (observador 10\260\255) showes %3MS511-3 01003 (10\260\255 observateur) showfr %2MS511-3 01002 (10\260\255 l'osservatore) showit %4MS511-3 01004 (10\260\255 observat\370r) showno %5MS511-3 01005 (10\260\255 observateur) showpt %6MS511-3 01006 (10\260\255 observer) showx1 %7MS511-3 01007 (10\260\255 observer) showy1 %8MS511-3 01008 (10\260\255 observer) showz1 %9MS511-3 01009 -600 -400 translate %1000 10 **************************************** %ANF PROZSPEP.FOR: MULYA= 4000 BEO=10 xy-Norm-Farbtafel IXY0: 600 400 600 400 translate 713 74 moveto 713 74 708 73 701 72 curveto 692 71 682 71 671 74 curveto %425 660 81 648 89 636 102 curveto 621 120 604 145 583 180 curveto %455 555 235 518 311 460 436 curveto 382 636 291 917 180 1310 curveto %485 83 1760 29 2250 22 2698 curveto 87 3010 198 3209 340 3267 curveto %515 500 3240 665 3168 828 3065 curveto 974 2959 1114 2845 1252 2725 curveto %545 1389 2600 1524 2472 1656 2343 curveto 1787 2212 1916 2083 2038 1961 curveto %575 2154 1845 2261 1738 2359 1640 curveto 2446 1553 2522 1477 2588 1411 curveto 2644 1355 2692 1307 2730 1269 curveto 2759 1240 2781 1218 2804 1195 curveto 2823 1176 2841 1158 2855 1144 curveto 2862 1137 2867 1132 2871 1128 curveto 2874 1125 2877 1122 2879 1120 curveto 2879 1120 2880 1119 2881 1118 curveto 2883 1116 2881 1118 2144 762 curveto 1964 676 1858 626 1783 589 curveto 1727 564 1679 540 1630 516 curveto 1578 491 1525 464 1463 435 curveto 1387 399 1290 352 1158 288 curveto 969 197 672 55 713 74 curveto stroke 1 setgray 713 74 30 0 360 arc fill % 400 671 74 30 0 360 arc fill % 425 604 145 30 0 360 arc fill % 450 382 636 30 0 360 arc fill % 475 22 2698 30 0 360 arc fill % 500 665 3168 30 0 360 arc fill % 525 1389 2600 30 0 360 arc fill % 550 2038 1961 30 0 360 arc fill % 575 2522 1477 30 0 360 arc fill % 600 2759 1240 30 0 360 arc fill % 625 2855 1144 30 0 360 arc fill % 650 2877 1122 30 0 360 arc fill % 675 2883 1116 30 0 360 arc fill % 700 1964 676 30 0 360 arc fill %500c 1630 516 30 0 360 arc fill %525c 1290 352 30 0 360 arc fill %550c 0.0 0.0 0.0 1.0 setcmyk_olvcolor 713 74 30 0 360 arc stroke % 400 671 74 30 0 360 arc stroke % 425 604 145 30 0 360 arc stroke % 450 382 636 30 0 360 arc stroke % 475 22 2698 30 0 360 arc stroke % 500 665 3168 30 0 360 arc stroke % 525 1389 2600 30 0 360 arc stroke % 550 2038 1961 30 0 360 arc stroke % 575 2522 1477 30 0 360 arc stroke % 600 2759 1240 30 0 360 arc stroke % 625 2855 1144 30 0 360 arc stroke % 650 2877 1122 30 0 360 arc stroke % 675 2883 1116 30 0 360 arc stroke % 700 1964 676 30 0 360 arc stroke %500c 1630 516 30 0 360 arc stroke %525c 1290 352 30 0 360 arc stroke %550c 1255 1324 30 0 360 arc fill %D65 0.0 0.0 0.0 1.0 setcmyk_olvcolor 250 /TimesI-ISOL1 FS 713 400 sub 74 300 sub moveto (400) show % 671 600 sub 74 100 sub moveto (425) show 604 450 sub 145 100 sub moveto (450) show 382 375 sub 636 225 sub moveto (475) show 22 450 sub 2698 50 sub moveto (500) show 665 200 sub 3168 150 add moveto (525) show 1389 50 add 2600 moveto (550) show 2038 50 add 1961 moveto (575) show 2522 50 add 1477 moveto (600) show 2759 50 add 1240 moveto (625) show % 2855 200 sub 1144 100 add moveto (650) show % 2877 200 sub 1122 100 add moveto (675) show 2883 100 add 1116 100 sub moveto (700) show 1964 100 add 676 150 sub moveto (500c) show 1630 100 add 516 200 sub moveto (525c) show 1290 50 add 352 250 sub moveto (550c) show 1255 600 sub 1324 150 sub moveto (D65 ) show 382 636 moveto % 475 2038 1961 lineto stroke %575 % 713 74 moveto % 400 % 1656 2343 lineto stroke %560 % 1634 2358 30 0 360 arc stroke %565 % 1634 100 add 2358 moveto (565) show /XIE 0.2 def %561 %560, 565: 1656 2343 1787 2212 /x0 1656 def /y0 2343 def /x1 1787 def /y1 2212 def /xm x1 x0 sub XIE mul x0 add def /ym y1 y0 sub XIE mul y0 add def xm ym moveto %561 713 74 lineto stroke %400 xm ym 30 0 360 arc stroke %561 xm 100 add ym moveto (561) show % 180 1310 moveto %485 % 2938 1061 lineto stroke %700 % 180 100 add 1310 moveto (485) show /XIE 0.40 def %485 %485,490: xy0,xy1 180 1310 83 1760 /x0 180 def /y0 1310 def /x1 83 def /y1 1760 def /xm x1 x0 sub XIE mul x0 add def /ym y1 y0 sub XIE mul y0 add def xm ym moveto %4487 2883 1116 lineto stroke %700 xm ym 30 0 360 arc stroke %487 xm 100 add ym moveto (487) show % 22 2698 30 0 360 arc stroke % 500 % 665 3168 30 0 360 arc stroke % 525 % 1389 2600 30 0 360 arc stroke % 550 % 1964 676 30 0 360 arc stroke %500c % 1630 516 30 0 360 arc stroke %525c % 1290 352 30 0 360 arc stroke %550c [100] 0 setdash %500 - 500c 22 2698 moveto %500 1964 676 lineto stroke %500c %525 - 525c 665 3168 moveto %525 1630 516 lineto stroke %550 - 550c 1389 2600 moveto %550 1290 352 lineto stroke %550c 1333 1333 30 0 360 arc fill %E 1333 100 add 1333 000 sub moveto (E ) show -600 -400 translate %ENDE: 1 showpage grestore %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 219 MM 108 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 24 %line 459 %!PS-Adobe-3.0 EPSF-3.0 MS511-4 %%BoundingBox: 70 83 226 206 %START PDFDE011.EPS /pdfmark14 where {pop} {userdict /pdfmark14 /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/MS51/MS51.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:2019080112000) /ModDate (D:20190801112000) /DOCINFO pdfmark14 [ /View [ /FitB ] /DOCVIEW pdfmark14 %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 % !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 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave %LANINDL2 START 20000505 /lanind 1 def /lantex [(G) (E) (S) (F) (I) (J) (M)] def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind eq {show} {pop} ifelse} bind def /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 /showno {5 lanind eq {show} {pop} ifelse} bind def /showpt {6 lanind eq {show} {pop} ifelse} bind def /showx1 {7 lanind eq {show} {pop} ifelse} bind def /showy1 {8 lanind eq {show} {pop} ifelse} bind def /showz1 {9 lanind eq {show} {pop} ifelse} bind def /lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def /lanindd laninddf def} {/lanind1 3 def /lanind2 3 def} ifelse /colormf where {pop /colorm1 colormf def /colorm2 colormf def /colormd colormdf def} {/colorm1 0 def} ifelse /deintpf where {pop /deintp1 deintpf def /deintp2 deintpf def /deintpd deintpdf def} {/deintp1 0 def} ifelse /xcolorf where {pop /xcolor1 xcolorf def /xcolor2 xcolorf def /xcolord xcolordf def} {/xcolor1 3 def} ifelse /xchartf where {pop /xchart1 xchartf def /xchart2 xchartf def /xchartd xchartdf def /xchartm xchart2f xchart1f sub 1 add def} {/xchart1 0 def /xchartm 1 def} ifelse /xchart3f where {pop /xchart3 xchart3f def} {/xchart3 0 def} ifelse /xchart4f where {pop /xchart4 xchart4f def} {/xchart4 0 def} ifelse /pchartf where {pop /pchart1 pchartf def /pchart2 pchartf def /pchartd pchartdf def} {/pchart1 3 def} ifelse /colsepf where {pop /colsep1 colsepf def /colsep2 colsepf def /colsepd colsepdf def} {/colsep1 0 def} ifelse /pmetamf where {pop /pmetam1 pmetamf def /pmetam2 pmetamf def /pmetamd pmetamdf def} {/pmetam1 0 def} ifelse %either defaul values for xchart=0 or values for xchart=1 /lanind lanind1 def % /colorm colorm1 def % /deintp deintp1 def % /xcolor xcolor1 def % /xchart xchart1 def % /pchart pchart1 def % /colsep colsep1 def % /pmetam pmetam1 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 %always independent of intended output 5 /Times-ISOL1 FS /cvishow {cvi 6 string cvs show} def 75 85 moveto lanind cvishow (-) show colorm cvishow deintp cvishow xcolor cvishow xchart cvishow pchart cvishow colsep cvishow (-L) show pmetam cvishow gsave %LANINDL2 END 5 /Times-ISOL1 FS 180 85 moveto (MS511-4) show xchart 0 eq {(N) show} {deintp colorm 2 mul add cvishow} ifelse (, B3_06) show % ( B8311_3, M8121-4, B3_06, N=3_06) show 72 90 translate 0.01 MM 0.01 MM scale %d2:[rr.b4f]bausz8y.eps 15 setlinewidth 0.0 0.0 0.5 0.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath fill 0.0 0.0 0.0 1.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath stroke 600 400 translate 20 setlinewidth 0 0 moveto 340 12 mul 0 rlineto stroke 0 0 moveto 0 3000 rlineto stroke 0 640 moveto %!380nm 120 760 240 1200 360 1360 curveto %!390-410nm 480 1420 600 1340 720 1700 curveto %!420 840 1940 960 2000 1080 1980 curveto %!450 1200 2040 1320 1960 1440 2000 curveto %!480 1560 2000 1680 1980 1800 2080 curveto %!510 1920 2040 2040 2040 2160 2000 curveto %!540 2280 1940 2400 1940 2520 1820 curveto %!570 2640 1880 2760 1900 2880 1880 curveto %!600 3000 1800 3120 1840 3240 1760 curveto %!630 3360 1800 3480 1860 3600 1780 curveto %!660 3720 1580 3840 1640 3960 1680 curveto %!690 4080 1400 lineto %! 4080 1400 4200 1580 4320 1680 curveto %!720-740nm stroke 0 980 moveto 120 1080 240 1640 360 1820 curveto 480 1860 600 1720 720 2080 curveto 840 2340 960 2340 1080 2280 curveto 1200 2300 1320 2160 1440 2180 curveto 1560 2140 1680 2080 1800 2140 curveto 1920 2080 2040 2080 2160 2000 curveto 2280 1920 2400 1900 2520 1760 curveto 2640 1800 2760 1780 2880 1740 curveto 3000 1660 3120 1660 3240 1600 curveto 3360 1600 3480 1640 3600 1560 curveto 3720 1380 3840 1420 3960 1480 curveto %! 4080 1220 4200 1380 4320 1500 curveto 4080 1220 lineto stroke 0 1320 moveto 120 1380 240 2020 360 2220 curveto 480 2240 600 2060 720 2420 curveto 840 2660 960 2640 1080 2540 curveto 1200 2520 1320 2340 1440 2320 curveto 1560 2260 1680 2160 1800 2200 curveto 1920 2120 2040 2080 2160 2000 curveto 2280 1900 2400 1880 2520 1720 curveto 2640 1740 2760 1720 2880 1660 curveto 3000 1560 3120 1560 3240 1480 curveto 3360 1480 3480 1500 3600 1420 curveto 3720 1260 3840 1300 3960 1360 curveto %! 4080 1120 4200 1280 4320 1380 curveto 4080 1120 lineto stroke 300 /Times-ISOL1 FS %! 100 lambda-Einheiten = 1200 Skalen-Einheiten 240 50 moveto 0 -100 rlineto stroke 1440 50 moveto 0 -100 rlineto stroke 2640 50 moveto 0 -100 rlineto stroke 3840 50 moveto 0 -100 rlineto stroke 20 -300 moveto (400) show 1220 -300 moveto (500) show 2420 -300 moveto (600) show 3620 -300 moveto (700) show %! 100 S-Einheiten = 2000 Skalen-Einheiten -50 0 moveto 100 0 rlineto stroke -50 1000 moveto 100 0 rlineto stroke -50 2000 moveto 100 0 rlineto stroke -50 3000 moveto 100 0 rlineto stroke -550 -80 moveto ( 0) show -550 920 moveto ( 50) show -550 1920 moveto (100) show -550 2920 moveto (150) show -500 3275 moveto 350 /Times-ISOL1 FS (relative Strahlung) showde %0MS511-4 00000 (relative radiation) showen %1MS511-4 00001 (radiaci\363n relativa) showes %3MS511-4 00003 (rayonnement relatif) showfr %2MS511-4 00002 (radiazione relativa) showit %4MS511-4 00004 (relativ str\345ling) showno %5MS511-4 00005 (rayonnement relatif) showpt %6MS511-4 00006 (relative radiation) showx1 %7MS511-4 00007 (relative radiation) showy1 %8MS511-4 00008 (relative radiation) showz1 %9MS511-4 00009 350 /TimesI-ISOL1 FS ( S) show 350 /Symbol FS ((l)) show 500 2875 moveto 350 /Times-ISOL1 FS (CIE\255Tageslichtphasen) showde %0MS511-4 01000 (CIE\255daylight illuminants) showen %1MS511-4 01001 (CIE\255daylight iluminante) showes %3MS511-4 01003 (CIE\255illuminants de jour) showfr %2MS511-4 01002 (CIE\255daylight illuminante) showit %4MS511-4 01004 (CIE\255dagslyskilder) showno %5MS511-4 01005 (CIE\255illuminants de jour) showpt %6MS511-4 01006 (CIE\255daylight illuminants) showx1 %7MS511-4 01007 (CIE\255daylight illuminants) showy1 %8MS511-4 01008 (CIE\255daylight illuminants) showz1 %9MS511-4 01009 1900 125 moveto 300 /Times-ISOL1 FS (Wellenl\344nge ) showde %0MS511-4 02000 (wavelength ) showen %1MS511-4 02001 (longitud de onda) showes %3MS511-4 02003 (longueur d'onde ) showfr %2MS511-4 02002 (lunghezza d'onda ) showit %4MS511-4 02004 (b\370lgelengde ) showno %5MS511-4 02005 (longueur d'onde ) showpt %6MS511-4 02006 (wavelength ) showx1 %7MS511-4 02007 (wavelength ) showy1 %8MS511-4 02008 (wavelength ) showz1 %9MS511-4 02009 300 /Symbol FS (l) show 300 /Times-ISOL1 FS (/nm) show 300 /TimesI-ISOL1 FS 4150 1600 moveto (D55) show 4150 1300 moveto (D65) show 4150 1000 moveto (D75) show 100 2400 moveto (D75) show 300 800 moveto (D55) show showpage grestore %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 064 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 25 %line 469 %!PS-Adobe-3.0 EPSF-3.0 MS511-5 %%BoundingBox: 70 83 226 206 %START PDFDE011.EPS /pdfmark15 where {pop} {userdict /pdfmark15 /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/MS51/MS51.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:2019080112000) /ModDate (D:20190801112000) /DOCINFO pdfmark15 [ /View [ /FitB ] /DOCVIEW pdfmark15 %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 % !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 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave %LANINDL2 START 20000505 /lanind 1 def /lantex [(G) (E) (S) (F) (I) (J) (M)] def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind eq {show} {pop} ifelse} bind def /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 /showno {5 lanind eq {show} {pop} ifelse} bind def /showpt {6 lanind eq {show} {pop} ifelse} bind def /showx1 {7 lanind eq {show} {pop} ifelse} bind def /showy1 {8 lanind eq {show} {pop} ifelse} bind def /showz1 {9 lanind eq {show} {pop} ifelse} bind def /lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def /lanindd laninddf def} {/lanind1 3 def /lanind2 3 def} ifelse /colormf where {pop /colorm1 colormf def /colorm2 colormf def /colormd colormdf def} {/colorm1 0 def} ifelse /deintpf where {pop /deintp1 deintpf def /deintp2 deintpf def /deintpd deintpdf def} {/deintp1 0 def} ifelse /xcolorf where {pop /xcolor1 xcolorf def /xcolor2 xcolorf def /xcolord xcolordf def} {/xcolor1 3 def} ifelse /xchartf where {pop /xchart1 xchartf def /xchart2 xchartf def /xchartd xchartdf def /xchartm xchart2f xchart1f sub 1 add def} {/xchart1 0 def /xchartm 1 def} ifelse /xchart3f where {pop /xchart3 xchart3f def} {/xchart3 0 def} ifelse /xchart4f where {pop /xchart4 xchart4f def} {/xchart4 0 def} ifelse /pchartf where {pop /pchart1 pchartf def /pchart2 pchartf def /pchartd pchartdf def} {/pchart1 3 def} ifelse /colsepf where {pop /colsep1 colsepf def /colsep2 colsepf def /colsepd colsepdf def} {/colsep1 0 def} ifelse /pmetamf where {pop /pmetam1 pmetamf def /pmetam2 pmetamf def /pmetamd pmetamdf def} {/pmetam1 0 def} ifelse %either defaul values for xchart=0 or values for xchart=1 /lanind lanind1 def % /colorm colorm1 def % /deintp deintp1 def % /xcolor xcolor1 def % /xchart xchart1 def % /pchart pchart1 def % /colsep colsep1 def % /pmetam pmetam1 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 %always independent of intended output 5 /Times-ISOL1 FS /cvishow {cvi 6 string cvs show} def 75 85 moveto lanind cvishow (-) show colorm cvishow deintp cvishow xcolor cvishow xchart cvishow pchart cvishow colsep cvishow (-L) show pmetam cvishow gsave %LANINDL2 END 5 /Times-ISOL1 FS 180 85 moveto (MS511-5) show xchart 0 eq {(N) show} {deintp colorm 2 mul add cvishow} ifelse (, B3_07) show % ( B8311_4, M8121-5, B3_07, N=3_07) show 72 90 translate 0.01 MM 0.01 MM scale %d2:[rr.b4f]bausz8y.eps 15 setlinewidth 0.0 0.0 0.5 0.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath fill 0.0 0.0 0.0 1.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath stroke 600 400 translate 20 setlinewidth 0 0 moveto 340 12 mul 0 rlineto stroke 0 0 moveto 0 3000 rlineto stroke 0 660 moveto 120 740 240 820 360 900 curveto 480 980 600 1060 720 1140 curveto 840 1240 960 1320 1080 1400 curveto 1200 1480 1320 1540 1440 1620 curveto 1560 1680 1680 1760 1800 1820 curveto 1920 1880 2040 1940 2160 2000 curveto 2280 2040 2400 2080 2520 2120 curveto 2640 2160 2760 2200 2880 2240 curveto 3000 2260 3120 2280 3240 2300 curveto 3360 2320 3480 2340 3600 2360 curveto 3720 2360 3840 2360 3960 2380 curveto 4080 2380 4200 2380 4320 2380 curveto stroke 0 1800 moveto 120 1860 240 1900 360 1960 curveto 480 2000 600 2020 720 2040 curveto 840 2060 960 2080 1080 2080 curveto 1200 2100 1320 2100 1440 2080 curveto 1560 2080 1680 2060 1800 2060 curveto 1920 2040 2040 2020 2160 2000 curveto 2280 1960 2400 1940 2520 1920 curveto 2640 1880 2760 1860 2880 1820 curveto 3000 1800 3120 1760 3240 1720 curveto 3360 1700 3480 1660 3600 1620 curveto 3720 1600 3840 1560 3960 1540 curveto 4080 1500 4200 1460 4320 1440 curveto stroke 0 2920 moveto 120 2900 240 2880 360 2840 curveto 480 2800 600 2760 720 2700 curveto 840 2660 960 2600 1080 2540 curveto 1200 2480 1320 2420 1440 2360 curveto 1560 2300 1680 2240 1800 2180 curveto 1920 2100 2040 2040 2160 2000 curveto 2280 1940 2400 1880 2520 1820 curveto 2640 1760 2760 1700 2880 1660 curveto 3000 1600 3120 1560 3240 1500 curveto 3360 1460 3480 1420 3600 1360 curveto 3720 1320 3840 1280 3960 1240 curveto 4080 1200 4200 1160 4320 1140 curveto stroke 300 /Times-ISOL1 FS %! 100 lambda-Einheiten = 1200 Skalen-Einheiten 240 50 moveto 0 -100 rlineto stroke 1440 50 moveto 0 -100 rlineto stroke 2640 50 moveto 0 -100 rlineto stroke 3840 50 moveto 0 -100 rlineto stroke 20 -300 moveto (400) show 1220 -300 moveto (500) show 2420 -300 moveto (600) show 3620 -300 moveto (700) show %! 100 S-Einheiten = 2000 Skalen-Einheiten -50 0 moveto 100 0 rlineto stroke -50 1000 moveto 100 0 rlineto stroke -50 2000 moveto 100 0 rlineto stroke -50 3000 moveto 100 0 rlineto stroke -550 -80 moveto ( 0) show -550 920 moveto ( 50) show -550 1920 moveto (100) show -550 2920 moveto (150) show -550 3275 moveto 350 /Times-ISOL1 FS (relative Strahlung) showde %0MS511-5 00000 (relative radiation) showen %1MS511-5 00001 (radiaci\363n relativa) showes %3MS511-5 00003 (rayonnement relatif) showfr %2MS511-5 00002 (radiazione relativa) showit %4MS511-5 00004 (relativ str\345ling) showno %5MS511-5 00005 (rayonnement relatif) showpt %6MS511-5 00006 (relative radiation) showx1 %7MS511-5 00007 (relative radiation) showy1 %8MS511-5 00008 (relative radiation) showz1 %9MS511-5 00009 350 /TimesI-ISOL1 FS ( S) show 350 /Symbol FS ((l)) show 350 /Times-ISOL1 FS ( nach ) showde %0MS511-5 01000 ( by ) showen %1MS511-5 01001 ( por ) showes %3MS511-5 01003 ( par ) showfr %2MS511-5 01002 ( da ) showit %4MS511-5 01004 ( etter ) showno %5MS511-5 01005 ( par ) showpt %6MS511-5 01006 ( by ) showx1 %7MS511-5 01007 ( by ) showy1 %8MS511-5 01008 ( by ) showz1 %9MS511-5 01009 350 /TimesI-ISOL1 FS (Planck) show 300 /Times-ISOL1 FS 1400 125 moveto (Wellenl\344nge ) showde %0MS511-5 02000 (wavelength ) showen %1MS511-5 02001 (la longitud de onda) showes %3MS511-5 02003 (longueur d'onde ) showfr %2MS511-5 02002 (lunghezza d'onda ) showit %4MS511-5 02004 (b\370lgelengde ) showno %5MS511-5 02005 (longueur d'onde ) showpt %6MS511-5 02006 (wavelength ) showx1 %7MS511-5 02007 (wavelength ) showy1 %8MS511-5 02008 (wavelength ) showz1 %9MS511-5 02009 300 /Symbol FS (l) show 300 /Times-ISOL1 FS (/nm) show 3800 2500 moveto (4000 K) show 3800 1650 moveto (6000 K) show 3800 800 moveto (8000 K) show 1000 2700 moveto (8000 K) show 100 2200 moveto (6000 K) show 500 750 moveto (4000 K) show showpage grestore %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 219 MM 064 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 26 %line 479 %!PS-Adobe-3.0 EPSF-3.0 MS511-6 %%BoundingBox: 70 83 226 206 %START PDFDE011.EPS /pdfmark16 where {pop} {userdict /pdfmark16 /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/MS51/MS51.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:2019080112000) /ModDate (D:20190801112000) /DOCINFO pdfmark16 [ /View [ /FitB ] /DOCVIEW pdfmark16 %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 % !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 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave %LANINDL2 START 20000505 /lanind 1 def /lantex [(G) (E) (S) (F) (I) (J) (M)] def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind eq {show} {pop} ifelse} bind def /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 /showno {5 lanind eq {show} {pop} ifelse} bind def /showpt {6 lanind eq {show} {pop} ifelse} bind def /showx1 {7 lanind eq {show} {pop} ifelse} bind def /showy1 {8 lanind eq {show} {pop} ifelse} bind def /showz1 {9 lanind eq {show} {pop} ifelse} bind def /lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def /lanindd laninddf def} {/lanind1 3 def /lanind2 3 def} ifelse /colormf where {pop /colorm1 colormf def /colorm2 colormf def /colormd colormdf def} {/colorm1 0 def} ifelse /deintpf where {pop /deintp1 deintpf def /deintp2 deintpf def /deintpd deintpdf def} {/deintp1 0 def} ifelse /xcolorf where {pop /xcolor1 xcolorf def /xcolor2 xcolorf def /xcolord xcolordf def} {/xcolor1 3 def} ifelse /xchartf where {pop /xchart1 xchartf def /xchart2 xchartf def /xchartd xchartdf def /xchartm xchart2f xchart1f sub 1 add def} {/xchart1 0 def /xchartm 1 def} ifelse /xchart3f where {pop /xchart3 xchart3f def} {/xchart3 0 def} ifelse /xchart4f where {pop /xchart4 xchart4f def} {/xchart4 0 def} ifelse /pchartf where {pop /pchart1 pchartf def /pchart2 pchartf def /pchartd pchartdf def} {/pchart1 3 def} ifelse /colsepf where {pop /colsep1 colsepf def /colsep2 colsepf def /colsepd colsepdf def} {/colsep1 0 def} ifelse /pmetamf where {pop /pmetam1 pmetamf def /pmetam2 pmetamf def /pmetamd pmetamdf def} {/pmetam1 0 def} ifelse %either defaul values for xchart=0 or values for xchart=1 /lanind lanind1 def % /colorm colorm1 def % /deintp deintp1 def % /xcolor xcolor1 def % /xchart xchart1 def % /pchart pchart1 def % /colsep colsep1 def % /pmetam pmetam1 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 %always independent of intended output 5 /Times-ISOL1 FS /cvishow {cvi 6 string cvs show} def 75 85 moveto lanind cvishow (-) show colorm cvishow deintp cvishow xcolor cvishow xchart cvishow pchart cvishow colsep cvishow (-L) show pmetam cvishow gsave %LANINDL2 END 5 /Times-ISOL1 FS 180 85 moveto (MS511-6) show xchart 0 eq {(N) show} {deintp colorm 2 mul add cvishow} ifelse (, B3_08) show % ( B8311_2, M8121-6, B3_08, N=3_08) show 72 90 translate 0.01 MM 0.01 MM scale %d2:[rr.b4f]bausz8y.eps 15 setlinewidth 0.0 0.0 0.5 0.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath fill 0.0 0.0 0.0 1.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath stroke 600 400 translate 20 setlinewidth 0 0 moveto 340 12 mul 0 rlineto stroke 0 0 moveto 0 3000 rlineto stroke 0 735 moveto 120 810 240 1230 360 1365 curveto 480 1395 600 1290 720 1560 curveto 840 1755 960 1755 1080 1710 curveto 1200 1725 1320 1620 1440 1635 curveto 1560 1605 1680 1560 1800 1605 curveto 1920 1560 2040 1560 2160 1500 curveto 2280 1440 2400 1425 2520 1320 curveto 2640 1350 2760 1335 2880 1305 curveto 3000 1245 3120 1245 3240 1200 curveto 3360 1200 3480 1230 3600 1170 curveto 3720 1035 3840 1065 3960 1110 curveto 4080 915 4200 1035 4320 1125 curveto stroke 0 135 moveto 120 180 240 210 360 255 curveto 480 315 600 360 720 420 curveto 840 495 960 555 1080 630 curveto 1200 720 1320 795 1440 885 curveto 1560 990 1680 1080 1800 1185 curveto 1920 1275 2040 1380 2160 1500 curveto 2280 1605 2400 1710 2520 1815 curveto 2640 1935 2760 2040 2880 2145 curveto 3000 2250 3120 2355 3240 2460 curveto 3360 2565 3480 2670 3600 2775 curveto 3720 2865 3840 2970 3960 3060 curveto 4080 3150 lineto %! 4200 3240 4320 3315 curveto stroke 300 /Times-ISOL1 FS %! 100 lambda-Einheiten = 1200 Skalen-Einheiten 240 50 moveto 0 -100 rlineto stroke 1440 50 moveto 0 -100 rlineto stroke 2640 50 moveto 0 -100 rlineto stroke 3840 50 moveto 0 -100 rlineto stroke 20 -300 moveto (400) show 1220 -300 moveto (500) show 2420 -300 moveto (600) show 3620 -300 moveto (700) show %! 100 S-Einheiten = 2000 Skalen-Einheiten -50 0 moveto 100 0 rlineto stroke -50 750 moveto 100 0 rlineto stroke -50 1500 moveto 100 0 rlineto stroke -50 2250 moveto 100 0 rlineto stroke -50 3000 moveto 100 0 rlineto stroke -550 -80 moveto ( 0) show -550 670 moveto ( 50) show -550 1420 moveto (100) show -550 2170 moveto (150) show -550 2920 moveto (200) show 350 /Times-ISOL1 FS -550 3275 moveto (relative Strahlung) showde %0MS511-6 00000 (relative radiation) showen %1MS511-6 00001 (radiaci\363n relativa) showes %3MS511-6 00003 (rayonnement relatif) showfr %2MS511-6 00002 (distribuzione spettrale relativa) showit %4MS511-6 00004 (relativ str\345ling) showno %5MS511-6 00005 (rayonnement relatif) showpt %6MS511-6 00006 (relative radiation) showx1 %7MS511-6 00007 (relative radiation) showy1 %8MS511-6 00008 (relative radiation) showz1 %9MS511-6 00009 300 2925 moveto () showde %0MS511-6 01000 () showen %1MS511-6 01001 () showes %3MS511-6 01003 () showfr %2MS511-6 01002 (della radiazione) showit %4MS511-6 01004 () showno %5MS511-6 01005 () showpt %6MS511-6 01006 () showx1 %7MS511-6 01007 () showy1 %8MS511-6 01008 () showz1 %9MS511-6 01009 350 /TimesI-ISOL1 FS ( S) show 350 /Symbol FS ((l)) show 350 /Times-ISOL1 FS 300 2525 moveto (Normlichtarten) showde %0MS511-6 02000 (standard illuminants) showen %1MS511-6 02001 (iluminantes est\341ndar) showes %3MS511-6 02003 (illuminants standard) showfr %2MS511-6 02002 (illuminanti standard) showit %4MS511-6 02004 (standard lyskilder) showno %5MS511-6 02005 (illuminants standard) showpt %6MS511-6 02006 (standard illuminants) showx1 %7MS511-6 02007 (standard illuminants) showy1 %8MS511-6 02008 (standard illuminants) showz1 %9MS511-6 02009 1400 150 moveto 300 /Times-ISOL1 FS (Wellenl\344nge ) showde %0MS511-6 03000 (wavelength ) showen %1MS511-6 03001 (longitud de onda ) showes %3MS511-6 03003 (longueur d'onde ) showfr %2MS511-6 03002 (lunghezza d'onda ) showit %4MS511-6 03004 (b\370lgelengde ) showno %5MS511-6 03005 (longueur d'onde ) showpt %6MS511-6 03006 (wavelength ) showx1 %7MS511-6 03007 (wavelength ) showy1 %8MS511-6 03008 (wavelength ) showz1 %9MS511-6 03009 300 /Symbol FS (l) show 300 /Times-ISOL1 FS (/nm) show 3000 2000 moveto 300 /TimesI-ISOL1 FS (A) show 300 /Times-ISOL1 FS ( = P 2856 K) show 2600 600 moveto 300 /TimesI-ISOL1 FS (D65) show 300 /Times-ISOL1 FS ( = D 6504 K) show showpage grestore %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 020 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 27 %line 489 %!PS-Adobe-3.0 EPSF-3.0 MS511-7 %%BoundingBox: 70 83 226 206 %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/MS51/MS51.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:2019080112000) /ModDate (D:20190801112000) /DOCINFO pdfmark17 [ /View [ /FitB ] /DOCVIEW pdfmark17 %END PDFDE011 %SETCMYK_OLV.PS /setcmyk_olvcolor %transfer cmyk to olv {/ncolor exch def /ycolor exch def /mcolor exch def /ccolor exch def ncolor 0 eq {1 ccolor sub 1 mcolor sub 1 ycolor sub setrgbcolor } {ccolor 0 eq mcolor 0 eq and ycolor 0 eq and {%only black n 1 ncolor sub dup dup setrgbcolor } {%cmy and black n 1 ccolor sub 1 ncolor sub mul 1 mcolor sub 1 ncolor sub mul 1 ycolor sub 1 ncolor sub mul setrgbcolor } ifelse } ifelse } bind def % !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 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave %LANINDL2 START 20000505 /lanind 1 def /lantex [(G) (E) (S) (F) (I) (J) (M)] def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind eq {show} {pop} ifelse} bind def /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 /showno {5 lanind eq {show} {pop} ifelse} bind def /showpt {6 lanind eq {show} {pop} ifelse} bind def /showx1 {7 lanind eq {show} {pop} ifelse} bind def /showy1 {8 lanind eq {show} {pop} ifelse} bind def /showz1 {9 lanind eq {show} {pop} ifelse} bind def /lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def /lanindd laninddf def} {/lanind1 3 def /lanind2 3 def} ifelse /colormf where {pop /colorm1 colormf def /colorm2 colormf def /colormd colormdf def} {/colorm1 0 def} ifelse /deintpf where {pop /deintp1 deintpf def /deintp2 deintpf def /deintpd deintpdf def} {/deintp1 0 def} ifelse /xcolorf where {pop /xcolor1 xcolorf def /xcolor2 xcolorf def /xcolord xcolordf def} {/xcolor1 3 def} ifelse /xchartf where {pop /xchart1 xchartf def /xchart2 xchartf def /xchartd xchartdf def /xchartm xchart2f xchart1f sub 1 add def} {/xchart1 0 def /xchartm 1 def} ifelse /xchart3f where {pop /xchart3 xchart3f def} {/xchart3 0 def} ifelse /xchart4f where {pop /xchart4 xchart4f def} {/xchart4 0 def} ifelse /pchartf where {pop /pchart1 pchartf def /pchart2 pchartf def /pchartd pchartdf def} {/pchart1 3 def} ifelse /colsepf where {pop /colsep1 colsepf def /colsep2 colsepf def /colsepd colsepdf def} {/colsep1 0 def} ifelse /pmetamf where {pop /pmetam1 pmetamf def /pmetam2 pmetamf def /pmetamd pmetamdf def} {/pmetam1 0 def} ifelse %either defaul values for xchart=0 or values for xchart=1 /lanind lanind1 def % /colorm colorm1 def % /deintp deintp1 def % /xcolor xcolor1 def % /xchart xchart1 def % /pchart pchart1 def % /colsep colsep1 def % /pmetam pmetam1 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 %always independent of intended output 5 /Times-ISOL1 FS /cvishow {cvi 6 string cvs show} def 75 85 moveto lanind cvishow (-) show colorm cvishow deintp cvishow xcolor cvishow xchart cvishow pchart cvishow colsep cvishow (-L) show pmetam cvishow gsave %LANINDL2 END 5 /Times-ISOL1 FS 180 85 moveto (MS511-7) show xchart 0 eq {(N) show} {deintp colorm 2 mul add cvishow} ifelse (, B3_09_1) show % ( B8310_5, M8121-7, B3_09_1, N=3_09_1) show 72 90 translate 0.01 MM 0.01 MM scale %d2:[rr.b4f]bausz8y.eps 15 setlinewidth 0.0 0.0 0.5 0.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath fill 0.0 0.0 0.0 1.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath stroke 600 400 translate 15 setlinewidth 0 0 moveto 340 12 mul 0 rlineto stroke 0 0 moveto 0 3000 rlineto stroke 0 135 moveto 120 180 240 210 360 255 curveto 480 315 600 360 720 420 curveto 840 495 960 555 1080 630 curveto 1200 720 1320 795 1440 885 curveto 1560 990 1680 1080 1800 1185 curveto 1920 1275 2040 1380 2160 1500 curveto 2280 1605 2400 1710 2520 1815 curveto 2640 1935 2760 2040 2880 2145 curveto 3000 2250 3120 2355 3240 2460 curveto 3360 2565 3480 2670 3600 2775 curveto 3720 2865 3840 2970 3960 3060 curveto 4080 3150 4200 3240 4320 3315 curveto stroke 300 /Times-ISOL1 FS %! 100 lambda-Einheiten = 1200 Skalen-Einheiten 240 50 moveto 0 -100 rlineto stroke 1440 50 moveto 0 -100 rlineto stroke 2640 50 moveto 0 -100 rlineto stroke 3840 50 moveto 0 -100 rlineto stroke 20 -300 moveto (400) show 1220 -300 moveto (500) show 2420 -300 moveto (600) show 3620 -300 moveto (700) show %! 100 S-Einheiten = 2000 Skalen-Einheiten -50 0 moveto 100 0 rlineto stroke -50 750 moveto 100 0 rlineto stroke -50 1500 moveto 100 0 rlineto stroke -50 2250 moveto 100 0 rlineto stroke -50 3000 moveto 100 0 rlineto stroke -500 -80 moveto (0,0) show -500 670 moveto (0,5) show -500 1420 moveto (1,0) show -500 2170 moveto (1,5) show -500 2920 moveto (2,0) show -500 3300 moveto 350 /Times-ISOL1 FS (relative Strahlung) showde %0MS511-7 00000 (relative radiation) showen %1MS511-7 00001 (radiaci\363n relativa) showes %3MS511-7 00003 (rayonnement relatif) showfr %2MS511-7 00002 (radiazione relativa) showit %4MS511-7 00004 (relativ str\345ling) showno %5MS511-7 00005 (rayonnement relatif) showpt %6MS511-7 00006 (relative radiation) showx1 %7MS511-7 00007 (relative radiation) showy1 %8MS511-7 00008 (relative radiation) showz1 %9MS511-7 00009 350 /TimesI-ISOL1 FS ( S) show 250 /Times-ISOL1 FS 0 -125 rmoveto (A) show 0 125 rmoveto 350 /Symbol FS ((l)) show 300 /Times-ISOL1 FS 1400 150 moveto (Wellenl\344nge ) showde %0MS511-7 01000 (wavelength ) showen %1MS511-7 01001 (la longitud de onda) showes %3MS511-7 01003 (longueur d'onde ) showfr %2MS511-7 01002 (lunghezza d'onda ) showit %4MS511-7 01004 (b\370lgelengde ) showno %5MS511-7 01005 (longueur d'onde ) showpt %6MS511-7 01006 (wavelength ) showx1 %7MS511-7 01007 (wavelength ) showy1 %8MS511-7 01008 (wavelength ) showz1 %9MS511-7 01009 300 /Symbol FS (l) show 300 /Times-ISOL1 FS (/nm) show 2900 1900 moveto 300 /TimesI-ISOL1 FS (A) show 300 /Times-ISOL1 FS ( = P 2856 K) show showpage grestore %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 219 MM 020 MM translate 12 /Times-ISOL1 FS -9 MM -7 MM moveto ( ) show 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 28 %line 499 %!PS-Adobe-3.0 EPSF-3.0 MS511-8 %%BoundingBox: 70 83 226 206 %START PDFDE011.EPS /pdfmark18 where {pop} {userdict /pdfmark18 /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/MS51/MS51.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:2019080112000) /ModDate (D:20190801112000) /DOCINFO pdfmark18 [ /View [ /FitB ] /DOCVIEW pdfmark18 %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 % !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 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave %LANINDL2 START 20000505 /lanind 1 def /lantex [(G) (E) (S) (F) (I) (J) (M)] def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind eq {show} {pop} ifelse} bind def /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 /showno {5 lanind eq {show} {pop} ifelse} bind def /showpt {6 lanind eq {show} {pop} ifelse} bind def /showx1 {7 lanind eq {show} {pop} ifelse} bind def /showy1 {8 lanind eq {show} {pop} ifelse} bind def /showz1 {9 lanind eq {show} {pop} ifelse} bind def /lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def /lanindd laninddf def} {/lanind1 3 def /lanind2 3 def} ifelse /colormf where {pop /colorm1 colormf def /colorm2 colormf def /colormd colormdf def} {/colorm1 0 def} ifelse /deintpf where {pop /deintp1 deintpf def /deintp2 deintpf def /deintpd deintpdf def} {/deintp1 0 def} ifelse /xcolorf where {pop /xcolor1 xcolorf def /xcolor2 xcolorf def /xcolord xcolordf def} {/xcolor1 3 def} ifelse /xchartf where {pop /xchart1 xchartf def /xchart2 xchartf def /xchartd xchartdf def /xchartm xchart2f xchart1f sub 1 add def} {/xchart1 0 def /xchartm 1 def} ifelse /xchart3f where {pop /xchart3 xchart3f def} {/xchart3 0 def} ifelse /xchart4f where {pop /xchart4 xchart4f def} {/xchart4 0 def} ifelse /pchartf where {pop /pchart1 pchartf def /pchart2 pchartf def /pchartd pchartdf def} {/pchart1 3 def} ifelse /colsepf where {pop /colsep1 colsepf def /colsep2 colsepf def /colsepd colsepdf def} {/colsep1 0 def} ifelse /pmetamf where {pop /pmetam1 pmetamf def /pmetam2 pmetamf def /pmetamd pmetamdf def} {/pmetam1 0 def} ifelse %either defaul values for xchart=0 or values for xchart=1 /lanind lanind1 def % /colorm colorm1 def % /deintp deintp1 def % /xcolor xcolor1 def % /xchart xchart1 def % /pchart pchart1 def % /colsep colsep1 def % /pmetam pmetam1 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 %always independent of intended output 5 /Times-ISOL1 FS /cvishow {cvi 6 string cvs show} def 75 85 moveto lanind cvishow (-) show colorm cvishow deintp cvishow xcolor cvishow xchart cvishow pchart cvishow colsep cvishow (-L) show pmetam cvishow gsave %LANINDL2 END 5 /Times-ISOL1 FS 180 85 moveto (MS511-8) show xchart 0 eq {(N) show} {deintp colorm 2 mul add cvishow} ifelse (, B3_09_2) show % ( B8310_6, M8121-8, B3_09_2, N=3_09_2) show 72 90 translate 0.01 MM 0.01 MM scale %d2:[rr.b4f]bausz8y.eps 15 setlinewidth 0.0 0.0 0.5 0.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath fill 0.0 0.0 0.0 1.0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath stroke 600 400 translate 15 setlinewidth 0 0 moveto 340 12 mul 0 rlineto stroke 0 0 moveto 0 3000 rlineto stroke %! REM(I)*1500 0 333 moveto 120 381 240 381 360 348 curveto 480 324 600 312 720 315 curveto 840 330 960 369 1080 444 curveto 1200 576 1320 756 1440 974 curveto 1560 1068 1680 1038 1800 942 curveto 1920 813 2040 681 2160 564 curveto 2280 459 2400 375 2520 318 curveto 2640 288 2760 270 2880 255 curveto 3000 240 3120 234 3240 234 curveto 3360 243 3480 264 3600 306 curveto 3720 375 3840 483 3960 609 curveto 4080 726 4200 810 4320 876 curveto stroke 300 /Times-ISOL1 FS %! 100 lambda-Einheiten = 1200 Skalen-Einheiten 240 50 moveto 0 -100 rlineto stroke 1440 50 moveto 0 -100 rlineto stroke 2640 50 moveto 0 -100 rlineto stroke 3840 50 moveto 0 -100 rlineto stroke 20 -300 moveto (400) show 1220 -300 moveto (500) show 2420 -300 moveto (600) show 3620 -300 moveto (700) show %! 100 S-Einheiten = 2000 Skalen-Einheiten -50 0 moveto 100 0 rlineto stroke -50 600 moveto 100 0 rlineto stroke -50 1200 moveto 100 0 rlineto stroke -50 1800 moveto 100 0 rlineto stroke -50 2400 moveto 100 0 rlineto stroke -50 3000 moveto 100 0 rlineto stroke -500 -80 moveto (0,0) show -500 520 moveto (0,2) show -500 1120 moveto (0,4) show -500 1720 moveto (0,6) show -500 2320 moveto (0,8) show -500 2920 moveto (1,0) show -500 3300 moveto 350 /Times-ISOL1 FS (spektraler Reflexionsfaktor) showde %0MS511-8 00000 (spectral reflection factor) showen %1MS511-8 00001 (el factor espectral de reflejo) showes %3MS511-8 00003 (facteur de r\351flexion spectrale) showfr %2MS511-8 00002 (fattore di riflessione spettrale) showit %4MS511-8 00004 (spektral refleksjonsfaktor) showno %5MS511-8 00005 (facteur de r\351flexion spectrale) showpt %6MS511-8 00006 (spectral reflection factor) showx1 %7MS511-8 00007 (spectral reflection factor) showy1 %8MS511-8 00008 (spectral reflection factor) showz1 %9MS511-8 00009 350 /TimesI-ISOL1 FS ( R) show 350 /Symbol FS ((l)) show 3900 150 moveto 300 /Symbol FS (l) show 300 /Times-ISOL1 FS (/nm) show 0900 1900 moveto 300 /Times-ISOL1 FS (CIE\255Testfarbe Nr. 11) showde %0MS511-8 01000 (CIE\255test color no. 11) showen %1MS511-8 01001 (color de prueba CIE no. 11) showes %3MS511-8 01003 (CIE\255test couleur no 11) showfr %2MS511-8 01002 (CIE campione di colore n 11) showit %4MS511-8 01004 (CIE\255testfarge nr. 11) showno %5MS511-8 01005 (CIE\255test couleur no 11) showpt %6MS511-8 01006 (CIE\255test color no. 11) showx1 %7MS511-8 01007 (CIE\255test color no. 11) showy1 %8MS511-8 01008 (CIE\255test color no. 11) showz1 %9MS511-8 01009 showpage grestore %%Trailer %%EndDocument EndEPSF grestore gsave } if %xchart<=xchart3P0 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 /showfr {2 lanind eq {show} {pop} ifelse} bind def /showes {3 lanind eq {show} {pop} ifelse} bind def /showit {4 lanind eq {show} {pop} ifelse} bind def /showno {5 lanind eq {show} {pop} ifelse} bind def /showpt {6 lanind eq {show} {pop} ifelse} bind def /showx1 {7 lanind eq {show} {pop} ifelse} bind def /showy1 {8 lanind eq {show} {pop} ifelse} bind def /showz1 {9 lanind eq {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 %xchart 0 eq {%beg if xchart=0 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 /xlu 017 MM def /ylu 017 MM def /xro 279 MM def /yro 193 MM def /xlo 017 MM def /ylo 193 MM def /xru 279 MM def /yru 017 MM def xlu 8 MM sub ylu moveto 16 MM 0 rlineto stroke xlu ylu 8 MM sub moveto 0 16 MM rlineto stroke xro 8 MM add yro moveto -16 MM 0 rlineto stroke xro yro 8 MM add moveto 0 -16 MM rlineto stroke xru 8 MM sub yru moveto 16 MM 0 rlineto stroke xru yru 8 MM sub moveto 0 16 MM rlineto stroke xlo 8 MM add ylo moveto -16 MM 0 rlineto stroke xlo ylo 8 MM add moveto 0 -16 MM rlineto stroke 1 2 7 {/i exch def %Zentrierkreise xlu ylu i MM 0 360 arc stroke xro yro i MM 0 360 arc stroke xru yru i MM 0 360 arc stroke xlo ylo i MM 0 360 arc stroke } for %i 12 4 16 {/i exch def /i0 i def %i=0,16 %0 4 16 {/i exch def /i0 i def %i=0,16 /i1 i0 1 add def /i2 i0 2 add def /i3 i0 3 add def i 16 eq {0.30 MM setlinewidth} {0.15 MM setlinewidth} ifelse 0 setgray x i0 get MM y i0 get MM moveto x i1 get MM y i1 get MM lineto x i2 get MM y i2 get MM lineto x i3 get MM y i3 get MM lineto x i0 get MM y i0 get MM lineto stroke i 16 eq {6 /Times-ISOL1 FS /x00 67 def /xdif 32 def /y0o 202.3 def /y0u 6.3 def /x0l 6.1 def /x0r 288 def /y00 22 def /ydif 32 def x00 xdif 0 mul add MM y0o MM moveto (V) show x00 xdif 0 mul add MM y0u MM moveto (C) show x00 xdif 1 mul add MM y0o MM moveto (L) show x00 xdif 1 mul add MM y0u MM moveto (M) show x00 xdif 2 mul add MM y0o MM moveto (O) show x00 xdif 2 mul add MM y0u MM moveto (Y) show x00 xdif 3 mul add MM y0o MM moveto (Y) show x00 xdif 3 mul add MM y0u MM moveto (O) show x00 xdif 4 mul add MM y0o MM moveto (M) show x00 xdif 4 mul add MM y0u MM moveto (L) show x00 xdif 5 mul add MM y0o MM moveto (C) show x00 xdif 5 mul add MM y0u MM moveto (V) show x0l MM y00 ydif 0 mul add MM moveto (V) show x0r MM y00 ydif 0 mul add MM moveto (C) show x0l MM y00 ydif 1 mul add MM moveto (L) show x0r MM y00 ydif 1 mul add MM moveto (M) show x0l MM y00 ydif 2 mul add MM moveto (O) show x0r MM y00 ydif 2 mul add MM moveto (Y) show x0l MM y00 ydif 3 mul add MM moveto (Y) show x0r MM y00 ydif 3 mul add MM moveto (O) show x0l MM y00 ydif 4 mul add MM moveto (M) show x0r MM y00 ydif 4 mul add MM moveto (L) show x0l MM y00 ydif 5 mul add MM moveto (C) show x0r MM y00 ydif 5 mul add MM moveto (V) show } if } for %i=0,16 0 1 10 {/j0 exch def /j1 j0 1 add def %j0 j0 0 eq {tzccmy0* setcmykcolor} if j0 1 eq {0 setgray} if j0 2 eq {tzmcmy0* setcmykcolor} if j0 3 eq {0 setgray} if j0 4 eq {tzycmy0* setcmykcolor} if j0 5 eq {0 setgray} if j0 6 eq {tzrcmy0* setcmykcolor} if j0 7 eq {0 setgray} if j0 8 eq {tzgcmy0* setcmykcolor} if j0 9 eq {0 setgray} if j0 10 eq {tzbcmy0* 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 colorm 0 eq deintp 0 eq and {/Txx (d) def /Fxx (d) def} if %3D=0, de=0 colorm 0 eq deintp 1 eq and {/Txx (e) def /Fxx (e) def} if %3D=0, de=1 colorm 1 eq deintp 0 eq and {/Txx (dd) def /Fxx (d) def} if %3D=1, de=0 colorm 1 eq deintp 1 eq and {/Txx (de) def /Fxx (e) def} if %3D=1, de=1 xchart 0 eq {/Txx (-) def /Fxx (-) def} if /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 /xchart3P0 xchart3 0 add def 0 setgray 12TIN 61 MM 13 MM moveto (TUB\255Pr\374fvorlage MS51) showde %0MS51X-Y 00100 (TUB\255test chart MS51) showen %1MS51X-Y 00101 (Gr\341fico TUB\255MS51) showes %3MS51X-Y 00103 (Graphique TUB\255MS51) showfr %2MS51X-Y 00102 (Grafico TUB\255MS51) showit %4MS51X-Y 00104 (TUB\255testplansje MS51) showno %5MS51X-Y 00105 (TUB\255test chart MS51) showpt %6MS51X-Y 00106 (TUB\255test chart MS51) showx1 %7MS51X-Y 00107 (TUB\255test chart MS51) showy1 %8MS51X-Y 00108 (TUB\255test chart MS51) showz1 %9MS51X-Y 00109 (; Computergrafik und Farbmetrik) showde %0MS51X-Y 01100 (; Computer graphics and colorimetry) showen %1MS51X-Y 01101 (; la gr\341fica de Ordenador y colorimetry) showes %3MS51X-Y 01103 (; les infographies et colorim\351trie) showfr %2MS51X-Y 01102 (; Grafica computerizzata e colorimetria) showit %4MS51X-Y 01104 (; Computergrafikk og fargemetrikk) showno %5MS51X-Y 01105 (; Computer graphics and colorimetry) showpt %6MS51X-Y 01106 (; Computer graphics and colorimetry) showx1 %7MS51X-Y 01107 (; Computer graphics and colorimetry) showy1 %8MS51X-Y 01108 (; Computer graphics and colorimetry) showz1 %9MS51X-Y 01109 61 MM 09 MM moveto 12TIN xchart xchart3P0 le {%xchart<=xchart3P0 (Bildserie ) showde %0MS51X-Y 02100 (Image series ) showen %1MS51X-Y 02101 (Imagine la serie ) showes %3MS51X-Y 02103 (Collection d'image ) showfr %2MS51X-Y 02102 (Serie di immagini ) showit %4MS51X-Y 02104 (Bildeserie ) showno %5MS51X-Y 02105 (Image series ) showpt %6MS51X-Y 02106 (Image series ) showx1 %7MS51X-Y 02107 (Image series ) showy1 %8MS51X-Y 02108 (Image series ) showz1 %9MS51X-Y 02109 (MS51) show }%xchart<=xchart3P0 {%xchart>xchart3P0 (Farben und Farbdifferenz ) showde %0MS51X-Y 03100 (Colors and color difference ) showen %1MS51X-Y 03101 (Colores y diferencia en color ) showes %3MS51X-Y 03103 (Les couleurs et diff\351rences de couleur ) showfr %2MS51X-Y 03102 (I colori e colora la differenza ) showit %4MS51X-Y 03104 (Farger og fargedifferanse ) showno %5MS51X-Y 03105 (Colors and color difference ) showpt %6MS51X-Y 03106 (Colors and color difference ) showx1 %7MS51X-Y 03107 (Colors and color difference ) showy1 %8MS51X-Y 03108 (Colors and color difference ) showz1 %9MS51X-Y 03109 12TII colorm 0 eq {%3D=0 (DE*' ) show }%3D=0 {%3D=1 (DE'* ) show } ifelse %3D=1 } ifelse %xchart>xchart3P0 12TIN (, 3D=) show colorm cvishow (, de=) show deintp cvishow xchart 1 ge {%xchart>=1 12TII %MK00_49 % colorm 0 eq {(, sRGB) show} % {(, sRGB*) show % } ifelse %MK50_99 pchart 0 eq {(, L-cmyn6) show} if pchart 2 eq {(, P-cmyn6) show} if pchart 4 eq {(, A-cmyn6) show} if pchart 6 eq {(, L-cmy0) show} if pchart 8 eq {(, P-cmy0) show} if colorm 1 eq {(*) show} if } if %xchart>=1 xchart 1 ge {%xchart>=1 7 /Times-ISOL1 FS 172 MM 16 MM moveto /FILEDATA_RX0F_IOF where {pop FILEDATA_RX0F_IOF show} if } if %xchart>=1 12TIN 172 MM 12.5 MM moveto (Eingabe: ) showde %0MS51X-Y 04100 (input: ) showen %1MS51X-Y 04101 (entrada: ) showes %3MS51X-Y 04103 (entr\351e : ) showfr %2MS51X-Y 04102 (Input: ) showit %4MS51X-Y 04104 (input: ) showno %5MS51X-Y 04105 (input: ) showpt %6MS51X-Y 04106 (input: ) showx1 %7MS51X-Y 04107 (input: ) showy1 %8MS51X-Y 04108 (input: ) showz1 %9MS51X-Y 04109 12TII (rgb/cmyk -> ) show xchart xchart3 lt {(rgb/cmyk) show} if xchart xchart3 ge {%xchart>=xchart3 (rgb) show 10 /Times-ISOL1 FS 0 -2 rmoveto Txx show 0 2 rmoveto 12TIN } if %xchart>=xchart3 12TIN 172 MM 9 MM moveto (Ausgabe: ) showde %0MS51X-Y 05100 (output: ) showen %1MS51X-Y 05101 (salida: ) showes %3MS51X-Y 05103 (sortie : ) showfr %2MS51X-Y 05102 (Output: ) showit %4MS51X-Y 05104 (output: ) showno %5MS51X-Y 05105 (output: ) showpt %6MS51X-Y 05106 (output: ) showx1 %7MS51X-Y 05107 (output: ) showy1 %8MS51X-Y 05108 (output: ) showz1 %9MS51X-Y 05109 %colorm=0,1! 12TIN xchart 0 eq {%xchart=0,#0 12TIN (keine \334nderung) showde %0MS51X-Y 06100 (no change) showen %1MS51X-Y 06101 (ning\372n cambio) showes %3MS51X-Y 06103 (aucun changement) showfr %2MS51X-Y 06102 (nessun cambiamento) showit %4MS51X-Y 06104 (ingen endring) showno %5MS51X-Y 06105 (no change) showpt %6MS51X-Y 06106 (no change) showx1 %7MS51X-Y 06107 (no change) showy1 %8MS51X-Y 06108 (no change) showz1 %9MS51X-Y 06109 }%xchart=0 {%xchart#0 12TIN colorm 0 eq {%colorm=0 (Transfer nach ) showde %0MS51X-Y 07100 (transfer to ) showen %1MS51X-Y 07101 (transfiera a ) showes %3MS51X-Y 07103 (transf\351rer \340 ) showfr %2MS51X-Y 07102 (trasferire a ) showit %4MS51X-Y 07104 (overf\370ring til ) showno %5MS51X-Y 07105 (transfer to ) showpt %6MS51X-Y 07106 (transfer to ) showx1 %7MS51X-Y 07107 (transfer to ) showy1 %8MS51X-Y 07108 (transfer to ) showz1 %9MS51X-Y 07109 }%colorm=0 {%colorm=1 (3D\255Linearisierung ) showde %0MS51X-Y 08100 (3D\255linearization to ) showen %1MS51X-Y 08101 (3D\255linealizaci\363n a ) showes %3MS51X-Y 08103 (lin\351arisation 3D selon ) showfr %2MS51X-Y 08102 (linearizzazione 3D a ) showit %4MS51X-Y 08104 (3D\255linearisering ) showno %5MS51X-Y 08105 (3D\255linearization to ) showpt %6MS51X-Y 08106 (3D\255linearization to ) showx1 %7MS51X-Y 08107 (3D\255linearization to ) showy1 %8MS51X-Y 08108 (3D\255linearization to ) showz1 %9MS51X-Y 08109 } 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 62 MM 198.5 MM moveto 12TRN (http://farbe.li.tu-berlin.de/MS51/MS51L) show 12TIN (0) show LSC$ show LEX$ show 12TIN %1 setgray %start white and unvisible (; ) show xchart 0 eq { (Start\255Ausgabe) showde %0MS51X-Y 09100 (start output) showen %1MS51X-Y 09101 (comience salida) showes %3MS51X-Y 09103 (sortie de production) showfr %2MS51X-Y 09102 (inizio dell'output) showit %4MS51X-Y 09104 (start output) showno %5MS51X-Y 09105 (start output) showpt %6MS51X-Y 09106 (start output) showx1 %7MS51X-Y 09107 (start output) showy1 %8MS51X-Y 09108 (start output) showz1 %9MS51X-Y 09109 } if LSC$ (C) eq { (Start\255Ausgabe) showde %0MS51X-Y 10100 (start output) showen %1MS51X-Y 10101 (comience salida) showes %3MS51X-Y 10103 (sortie de production) showfr %2MS51X-Y 10102 (inizio dell'output) showit %4MS51X-Y 10104 (start output) showno %5MS51X-Y 10105 (start output) showpt %6MS51X-Y 10106 (start output) showx1 %7MS51X-Y 10107 (start output) showy1 %8MS51X-Y 10108 (start output) showz1 %9MS51X-Y 10109 } if xchart 1 ge {%xchart>=1 colorm 0 eq {%colorm=0,1 (Transfer Ausgabe) showde %0MS51X-Y 11100 (transfer output) showen %1MS51X-Y 11101 (salida de transferencia) showes %3MS51X-Y 11103 (sortie de transfert) showfr %2MS51X-Y 11102 (Output di trasferimento) showit %4MS51X-Y 11104 (overf\370ringsoutput) showno %5MS51X-Y 11105 (transfer output) showpt %6MS51X-Y 11106 (transfer output) showx1 %7MS51X-Y 11107 (transfer output) showy1 %8MS51X-Y 11108 (transfer output) showz1 %9MS51X-Y 11109 }%colorm=0 {%colorm=1 (3D\255Linearisierung) showde %0MS51X-Y 12100 (3D\255linearization) showen %1MS51X-Y 12101 (3D\255linealizaci\363n) showes %3MS51X-Y 12103 (lin\351arisation 3D) showfr %2MS51X-Y 12102 (linearizzzazione 3D) showit %4MS51X-Y 12104 (3D\255linerisering) showno %5MS51X-Y 12105 (3D\255linearization) showpt %6MS51X-Y 12106 (3D\255linearization) showx1 %7MS51X-Y 12107 (3D\255linearization) showy1 %8MS51X-Y 12108 (3D\255linearization) showz1 %9MS51X-Y 12109 } 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 %0MS51X-Y 13100 (N: no 3D\255linearization (OL) ) showen %1MS51X-Y 13101 (N: ninguna 3D\255linealizaci\363n (OL) ) showes %3MS51X-Y 13103 (N: aucune lin\351arisation 3D (OL) ) showfr %2MS51X-Y 13102 (N: nessuna linearizzazione 3D (OL) ) showit %4MS51X-Y 13104 (N: ingen 3D\255linearisering (OL) ) showno %5MS51X-Y 13105 (N: no 3D\255linearization (OL) ) showpt %6MS51X-Y 13106 (N: no 3D\255linearization (OL) ) showx1 %7MS51X-Y 13107 (N: no 3D\255linearization (OL) ) showy1 %8MS51X-Y 13108 (N: no 3D\255linearization (OL) ) showz1 %9MS51X-Y 13109 (in Datei (F) oder PS\255Startup (S)) showde %0MS51X-Y 14100 (in file (F) or PS\255startup (S)) showen %1MS51X-Y 14101 (en archivo (F) o PS\255startup (S)) showes %3MS51X-Y 14103 (dans fichier (F) ou PS\255startup (S)) showfr %2MS51X-Y 14102 (nel file (F) o PS\255startup (S)) showit %4MS51X-Y 14104 (i fil (F) eller PS\255startup (S)) showno %5MS51X-Y 14105 (in file (F) or PS\255startup (S)) showpt %6MS51X-Y 14106 (in file (F) or PS\255startup (S)) showx1 %7MS51X-Y 14107 (in file (F) or PS\255startup (S)) showy1 %8MS51X-Y 14108 (in file (F) or PS\255startup (S)) showz1 %9MS51X-Y 14109 } {LSC$ show (: ) show (3D\255Linearisierung) showde %0MS51X-Y 15100 (3D\255linearization) showen %1MS51X-Y 15101 (3D\255linealizaci\363n) showes %3MS51X-Y 15103 (lin\351arisation 3D) showfr %2MS51X-Y 15102 (linearizzzazione 3D) showit %4MS51X-Y 15104 (3D\255linearisering) showno %5MS51X-Y 15105 (3D\255linearization) showpt %6MS51X-Y 15106 (3D\255linearization) showx1 %7MS51X-Y 15107 (3D\255linearization) showy1 %8MS51X-Y 15108 (3D\255linearization) showz1 %9MS51X-Y 15109 ( MS51/MS51L) show LSS$ show LSX$ show (0) show LSC$ show LEY$ show } ifelse LSC$ (F) eq { ( in Datei (F)) showde %0MS51X-Y 16100 ( in file (F)) showen %1MS51X-Y 16101 ( en archivo (F)) showes %3MS51X-Y 16103 ( dans fichier (F)) showfr %2MS51X-Y 16102 ( nel file (F)) showit %4MS51X-Y 16104 ( i fil (F)) showno %5MS51X-Y 16105 ( in file (F)) showpt %6MS51X-Y 16106 ( in file (F)) showx1 %7MS51X-Y 16107 ( in file (F)) showy1 %8MS51X-Y 16108 ( in file (F)) showz1 %9MS51X-Y 16109 } if LSC$ (S) eq { ( im Distiller Startup (S) Directory) showde %0MS51X-Y 17100 ( in Distiller Startup (S) Directory) showen %1MS51X-Y 17101 ( en el Distiller Startup (S) Directory) showes %3MS51X-Y 17103 ( dans le Distiller Startup (S) Directory) showfr %2MS51X-Y 17102 ( nel Distiller Startup (S) Directory) showit %4MS51X-Y 17104 ( i Distiller Startup (S) Directory) showno %5MS51X-Y 17105 ( in Distiller Startup (S) Directory) showpt %6MS51X-Y 17106 ( in Distiller Startup (S) Directory) showx1 %7MS51X-Y 17107 ( in Distiller Startup (S) Directory) showy1 %8MS51X-Y 17108 ( in Distiller Startup (S) Directory) showz1 %9MS51X-Y 17109 } if LSC$ (D) eq { ( in PS\255Device (D)) showde %0MS51X-Y 18100 ( in PS\255device (D)) showen %1MS51X-Y 18101 ( en el PS\255device (D)) showes %3MS51X-Y 18103 ( dans l'appareil PS (D)) showfr %2MS51X-Y 18102 ( nel PS\255dispositivo (D)) showit %4MS51X-Y 18104 ( i PS\255apparat (D)) showno %5MS51X-Y 18105 ( in PS\255device (D)) showpt %6MS51X-Y 18106 ( in PS\255device (D)) showx1 %7MS51X-Y 18107 ( in PS\255device (D)) showy1 %8MS51X-Y 18108 ( in PS\255device (D)) showz1 %9MS51X-Y 18109 } if LSC$ (T) eq { ( im Distiller Startup (S) Directory) showde %0MS51X-Y 19100 ( in Distiller Startup (S) Directory) showen %1MS51X-Y 19101 ( en el Distiller Startup (S) Directory) showes %3MS51X-Y 19103 ( dans le Distiller Startup (S) Directory) showfr %2MS51X-Y 19102 ( nel Distiller Startup (S) Directory) showit %4MS51X-Y 19104 ( i Distiller Startup (S) Directory) showno %5MS51X-Y 19105 ( in Distiller Startup (S) Directory) showpt %6MS51X-Y 19106 ( in Distiller Startup (S) Directory) showx1 %7MS51X-Y 19107 ( in Distiller Startup (S) Directory) showy1 %8MS51X-Y 19108 ( in Distiller Startup (S) Directory) showz1 %9MS51X-Y 19109 } if LSC$ (E) eq { ( in PS\255Device (D)) showde %0MS51X-Y 20100 ( in PS\255device (D)) showen %1MS51X-Y 20101 ( en el PS\255device (D)) showes %3MS51X-Y 20103 ( dans l'appareil PS (D)) showfr %2MS51X-Y 20102 ( nel PS\255dispositivo (D)) showit %4MS51X-Y 20104 ( i PS\255apparat (D)) showno %5MS51X-Y 20105 ( in PS\255device (D)) showpt %6MS51X-Y 20106 ( in PS\255device (D)) showx1 %7MS51X-Y 20107 ( in PS\255device (D)) showy1 %8MS51X-Y 20108 ( in PS\255device (D)) showz1 %9MS51X-Y 20109 } if %0 setgray %end white and unvisible (, Seite ) showde %0MS51X-Y 21100 (, page ) showen %1MS51X-Y 21101 (, p\341gina ) showes %3MS51X-Y 21103 (, p\341ge ) showfr %2MS51X-Y 21102 (, pagine ) showit %4MS51X-Y 21104 (, side ) showno %5MS51X-Y 21105 (, page ) showpt %6MS51X-Y 21106 (, page ) showx1 %7MS51X-Y 21107 (, page ) showy1 %8MS51X-Y 21108 (, page ) showz1 %9MS51X-Y 21109 xchart 1 add cvishow (/) show xchartm cvishow 16 MM 185 MM moveto -90 rotate (Siehe \344hnliche Dateien: ) showde %0MS51X-Y 22100 (see similar files: ) showen %1MS51X-Y 22101 (vea archivos semejantes: ) showes %3MS51X-Y 22103 (voir fichiers similaires: ) showfr %2MS51X-Y 22102 (vedi file simili: ) showit %4MS51X-Y 22104 (se lignende filer: ) showno %5MS51X-Y 22105 (see similar files: ) showpt %6MS51X-Y 22106 (see similar files: ) showx1 %7MS51X-Y 22107 (see similar files: ) showy1 %8MS51X-Y 22108 (see similar files: ) showz1 %9MS51X-Y 22109 12TRN (http://farbe.li.tu-berlin.de/MS51/MS51.HTM) show 12TIN %(0) show %LSC$ show LEX$ show 90 rotate 12 MM 185 MM moveto -90 rotate %(Technische Information: ) showde %0MS51X-Y 23100 %(technical information: ) showen %1MS51X-Y 23101 %(informaci\363n t\351cnica: ) showes %3MS51X-Y 23103 %(informations techniques: ) showfr %2MS51X-Y 23102 %(informazioni tecniche: ) showit %4MS51X-Y 23104 %(teknisk informasjon: ) showno %5MS51X-Y 23105 %(technical information: ) showpt %6MS51X-Y 23106 %(technical information: ) showx1 %7MS51X-Y 23107 %(technical information: ) showy1 %8MS51X-Y 23108 %(technical information: ) showz1 %9MS51X-Y 23109 12TIN (http://130.149.60.45/~farbmetrik) show 12TIN ( oder ) showde %0MS51X-Y 24100 ( or ) showen %1MS51X-Y 24101 ( o ) showes %3MS51X-Y 24103 ( ou ) showfr %2MS51X-Y 24102 ( o ) showit %4MS51X-Y 24104 ( eller ) showno %5MS51X-Y 24105 ( or ) showpt %6MS51X-Y 24106 ( or ) showx1 %7MS51X-Y 24107 ( or ) showy1 %8MS51X-Y 24108 ( or ) showz1 %9MS51X-Y 24109 12TRN (http://farbe.li.tu-berlin.de) show 12TIN 90 rotate 281 MM 185 MM moveto -90 rotate (TUB\255Registrierung: 20190801\255MS51/MS51L) showde %0MS51X-Y 25100 (TUB registration: 20190801\255MS51/MS51L) showen %1MS51X-Y 25101 (TUB matr\355cula: 20190801\255MS51/MS51L) showes %3MS51X-Y 25103 (TUB enregistrement: 20190801\255MS51/MS51L) showfr %2MS51X-Y 25102 (iscrizione TUB: 20190801\255MS51/MS51L) showit %4MS51X-Y 25104 (TUB registrering: 20190801\255MS51/MS51L) showno %5MS51X-Y 25105 (TUB registration: 20190801\255MS51/MS51L) showpt %6MS51X-Y 25106 (TUB registration: 20190801\255MS51/MS51L) showx1 %7MS51X-Y 25107 (TUB registration: 20190801\255MS51/MS51L) showy1 %8MS51X-Y 25108 (TUB registration: 20190801\255MS51/MS51L) showz1 %9MS51X-Y 25109 (0) show LSC$ show LEX$ show 90 rotate 281 MM 74 MM moveto -90 rotate (TUB\255Material: Code=rha4ta) showde %0MS51X-Y 26100 (TUB material: code=rha4ta) showen %1MS51X-Y 26101 (TUB material: code=rha4ta) showes %3MS51X-Y 26103 (TUB mat\351riel: code=rha4ta) showfr %2MS51X-Y 26102 (TUB materiale: code=rha4ta) showit %4MS51X-Y 26104 (TUB materiell: code=rha4ta) showno %5MS51X-Y 26105 (TUB material: code=rha4ta) showpt %6MS51X-Y 26106 (TUB material: code=rha4ta) showx1 %7MS51X-Y 26107 (TUB material: code=rha4ta) showy1 %8MS51X-Y 26108 (TUB material: code=rha4ta) showz1 %9MS51X-Y 26109 90 rotate 277 MM 185 MM moveto -90 rotate /cvishow {cvi 6 string cvs show} def /cvsshow1 {10 mul cvi 0.1 mul 7 string cvs show} def ( Anwendung f\374r Messung ) showde %0MS51X-Y 27100 ( application for measurement ) showen %1MS51X-Y 27101 ( aplicaci\363n para la medida ) showes %3MS51X-Y 27103 ( application pour la mesure ) showfr %2MS51X-Y 27102 ( Applicatione per la misura dell'output ) showit %4MS51X-Y 27104 ( anvendelse for m\345ling ) showno %5MS51X-Y 27105 ( application for measurement ) showpt %6MS51X-Y 27106 ( application for measurement ) showx1 %7MS51X-Y 27107 ( application for measurement ) showy1 %8MS51X-Y 27108 ( application for measurement ) showz1 %9MS51X-Y 27109 xchart5f 0 eq {%xchart5f=0 (von Display-Ausgabe) showde %0MS51X-Y 28100 (of display output) showen %1MS51X-Y 28101 (de display output) showes %3MS51X-Y 28103 (de sortie sur \350cran) showfr %2MS51X-Y 28102 (su display) showit %4MS51X-Y 28104 (av display output) showno %5MS51X-Y 28105 (of display output) showpt %6MS51X-Y 28106 (of display output) showx1 %7MS51X-Y 28107 (of display output) showy1 %8MS51X-Y 28108 (of display output) showz1 %9MS51X-Y 28109 } if %xchart5f=0 xchart5f 1 eq xchart5f 2 eq or {%xchart5f=1,2 (von Offsetdruck\255Ausgabe) showde %0MS51X-Y 29100 (of offset print output) showen %1MS51X-Y 29101 (salida en la impressi\363n offset) showes %3MS51X-Y 29103 (des sorties sur offset) showfr %2MS51X-Y 29102 (output nella stampa di offset) showit %4MS51X-Y 29104 (av offsettrykkoutput) showno %5MS51X-Y 29105 (of offset print output) showpt %6MS51X-Y 29106 (of offset print output) showx1 %7MS51X-Y 29107 (of offset print output) showy1 %8MS51X-Y 29108 (of offset print output) showz1 %9MS51X-Y 29109 } if %xchart5f=1,2 xchart5f 3 eq {%xchart5f=3 (von Laserdrucker\255Ausgabe) showde %0MS51X-Y 30100 (of laser printer output) showen %1MS51X-Y 30101 (salida de impresora l\341ser) showes %3MS51X-Y 30103 (des sorties sur imprimante laser) showfr %2MS51X-Y 30102 (output della stampante laser) showit %4MS51X-Y 30104 (av laserprinter output) showno %5MS51X-Y 30105 (of laser printer output) showpt %6MS51X-Y 30106 (of laser printer output) showx1 %7MS51X-Y 30107 (of laser printer output) showy1 %8MS51X-Y 30108 (of laser printer output) showz1 %9MS51X-Y 30109 } if %xchart5f=3 xchart 1 ge {%xchart>=1 xchart5f 0 eq {%xchart5f=0 (, keine Separation) showde %0MS51X-Y 31100 (, no separation) showen %1MS51X-Y 31101 (, ninguna separaci\363n) showes %3MS51X-Y 31103 (, aucune s\351paration) showfr %2MS51X-Y 31102 (, nessuna separazione) showit %4MS51X-Y 31104 (, ingen separasjon) showno %5MS51X-Y 31105 (, no separation) showpt %6MS51X-Y 31106 (, no separation) showx1 %7MS51X-Y 31107 (, no separation) showy1 %8MS51X-Y 31108 (, no separation) showz1 %9MS51X-Y 31109 } if %chart5f=0 xchart5f 1 ge {%xchart5f>=1 (, Separation) showde %0MS51X-Y 32100 (, separation) showen %1MS51X-Y 32101 (, separaci\363n) showes %3MS51X-Y 32103 (, s\351paration) showfr %2MS51X-Y 32102 (, separazione) showit %4MS51X-Y 32104 (, separasjon) showno %5MS51X-Y 32105 (, separation) showpt %6MS51X-Y 32106 (, separation) showx1 %7MS51X-Y 32107 (, separation) showy1 %8MS51X-Y 32108 (, separation) showz1 %9MS51X-Y 32109 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 xchart 1 le {%xchart<=1 /ypapert 5 array def %/ypapert [(S) (D) (C) (E) (F)] def /ypapert [(A) (B) (L) (G) (P)] def 0 0 0 0 setcmykcolor /i0 14 def /i1 i0 1 add def /i2 i0 2 add def /i3 i0 3 add def x i0 get MM 18 MM sub y i0 get MM 04 MM sub moveto 17 MM 0 rlineto 0 4.5 MM rlineto -17 MM 0 rlineto closepath fill x i0 get MM 17.5 MM sub y i0 get MM 3 MM sub moveto 0 1 1 0 setcmykcolor 4.5 MM /Times-ISOL1 FS (MS51) show 3.5 MM /Times-ISOL1 FS xchart 0 eq {(S0) show} {colorm cvishow deintp cvishow} ifelse ypapert ypaper get show } if %xchart<=1 grestore gsave %********************************************************** xchart xchart3P0 gt {%BEG xchart>xchart3P0 /n00 xchart3P0 1 add def %special tables start at page 6 /n01 n00 1 add def %1080-rgb-tables start at page 8 /n02 n00 2 add def xchart n00 eq {/n1 0 def /n2 57 def} if xchart n01 eq {/n1 0 def /n2 53 def} if xchart n02 ge {/n1 xchart n02 sub 81 mul def /n2 n1 80 add def n2 1079 ge {/n2 1079 def} if } if 72 56 translate 0.01 MM dup scale 0 0 0 setrgbcolor %0 0 moveto 24600 0 rlineto 0 17220 rlineto % -24600 0 rlineto closepath stroke 180 /Times-ISOL1 FS 0 0 0 setrgbcolor 7000 -180 moveto (MS510-7N, ) show lanind 0 eq {(Seite ) show} if lanind 1 ge {(page ) show} if xchart 1 add cvishow (/) show xchartm cvishow (-F) show %pmetam cvishow /prog_rgb_dyF_LAB*'dyF {%BEG prog_rgb_dyF_LAB*'dyF /R01000 r_dyF 1000 mul def /G01000 g_dyF 1000 mul def /B01000 b_dyF 1000 mul def R01000 0.04045 le %equations of IEC 61966-2-1:2003 {/RsRGB R01000 12.92 div def} {/RsRGB R01000 0.001 mul 0.055 add 1.055 div 2.4 exp def} ifelse G01000 0.04045 le {/GsRGB G01000 12.92 div def} {/GsRGB G01000 0.001 mul 0.055 add 1.055 div 2.4 exp def} ifelse B01000 0.04045 le {/BsRGB B01000 12.92 div def} {/BsRGB B01000 0.001 mul 0.055 add 1.055 div 2.4 exp def} ifelse /X*'dyF 0.4124 RsRGB mul 0.3576 GsRGB mul add 0.1805 BsRGB mul add 88.59 mul def /Y*'dyF 0.2126 RsRGB mul 0.7152 GsRGB mul add 0.0722 BsRGB mul add 88.59 mul def /Z*'dyF 0.0193 RsRGB mul 0.1192 GsRGB mul add 0.9505 BsRGB mul add 88.59 mul def % achromatic (D65) colours /XLWD65100 95.04 def /YLWD65100 100.00 def /ZLWD65100 108.88 def /XQ X*'dyF XLWD65100 div def /YQ Y*'dyF YLWD65100 div def /ZQ Z*'dyF ZLWD65100 div def XQ 0 lt {/XQ 0.00000001 def} if YQ 0 lt {/YQ 0.00000001 def} if ZQ 0 lt {/ZQ 0.00000001 def} if /L*'dyF YQ 0.008856 lt {903.3 YQ mul} {YQ 0.33333333 exp 116 mul 16 sub} ifelse def /a*'dyF XQ 0.008856 lt {7.787 XQ mul 16 116 div add} {XQ 0.33333333 exp} ifelse YQ 0.008856 lt {7.787 YQ mul 16 116 div add} {YQ 0.33333333 exp} ifelse sub 500 mul def /b*'dyF YQ 0.008856 lt {7.787 YQ mul 16 116 div add} {YQ 0.33333333 exp} ifelse ZQ 0.008856 lt {7.787 ZQ mul 16 116 div add} {ZQ 0.33333333 exp} ifelse sub 200 mul def /C*'dyF a*'dyF dup mul b*'dyF dup mul add 0.0001 add sqrt def /h*'dyF b*'dyF a*'dyF 0.0001 add atan def } bind def %END prog_rgb_dyF_LAB*'dyF %******************************************************** /prog_rgb'*dyF_LAB'*dyF {%BEG prog_rgb'*dyF_LAB'*dyF /R01000 r'*dyF 1000 mul def /G01000 g'*dyF 1000 mul def /B01000 b'*dyF 1000 mul def R01000 0.04045 le %equations of IEC 61966-2-1:2003 {/RsRGB R01000 12.92 div def} {/RsRGB R01000 0.001 mul 0.055 add 1.055 div 2.4 exp def} ifelse G01000 0.04045 le {/GsRGB G01000 12.92 div def} {/GsRGB G01000 0.001 mul 0.055 add 1.055 div 2.4 exp def} ifelse B01000 0.04045 le {/BsRGB B01000 12.92 div def} {/BsRGB B01000 0.001 mul 0.055 add 1.055 div 2.4 exp def} ifelse /X'*dyF 0.4124 RsRGB mul 0.3576 GsRGB mul add 0.1805 BsRGB mul add 88.59 mul def /Y'*dyF 0.2126 RsRGB mul 0.7152 GsRGB mul add 0.0722 BsRGB mul add 88.59 mul def /Z'*dyF 0.0193 RsRGB mul 0.1192 GsRGB mul add 0.9505 BsRGB mul add 88.59 mul def % achromatic (D65) colours /XLWD65100 95.04 def /YLWD65100 100.00 def /ZLWD65100 108.88 def /XQ X'*dyF XLWD65100 div def /YQ Y'*dyF YLWD65100 div def /ZQ Z'*dyF ZLWD65100 div def XQ 0 lt {/XQ 0.00000001 def} if YQ 0 lt {/YQ 0.00000001 def} if ZQ 0 lt {/ZQ 0.00000001 def} if /L'*dyF YQ 0.008856 lt {903.3 YQ mul} {YQ 0.33333333 exp 116 mul 16 sub} ifelse def /A'*dyF XQ 0.008856 lt {7.787 XQ mul 16 116 div add} {XQ 0.33333333 exp} ifelse YQ 0.008856 lt {7.787 YQ mul 16 116 div add} {YQ 0.33333333 exp} ifelse sub 500 mul def /B'*dyF YQ 0.008856 lt {7.787 YQ mul 16 116 div add} {YQ 0.33333333 exp} ifelse ZQ 0.008856 lt {7.787 ZQ mul 16 116 div add} {ZQ 0.33333333 exp} ifelse sub 200 mul def /C'*dyF A'*dyF dup mul B'*dyF dup mul add 0.0001 add sqrt def /h'*dyF B'*dyF A'*dyF 0.0001 add atan def } bind def %END prog_rgb'*dyF_LAB'*dyF %************************************************************* /fakt 1.0 def /fakt2 0.74 def %0.2 /iyt 250 fakt2 mul def %text size /iyd 277 fakt2 mul def %line difference /ixs0 00 fakt2 mul def /ixs1 -10 fakt2 mul def /ixs2 10 fakt2 mul def /iys1 -25 fakt2 mul def /iys2 25 fakt2 mul def /iys3 35 fakt2 mul def /iys4 -35 fakt2 mul def /iytie iyt 50 fakt2 mul sub def /nshow {iyt /Times-ISOL1 FS show} def /kshow {iyt /TimesI-ISOL1 FS show} def /bshow {iyt /TimesB-ISOL1 FS show} def /jshow {iyt /TimesBI-ISOL1 FS show} def /sshow {iyt /Symbol FS show} def /nishow {ixs1 iys1 rmoveto iytie /Times-ISOL1 FS show ixs2 iys2 rmoveto} def /nishow0 { 00 iys1 rmoveto iytie /Times-ISOL1 FS show 00 iys2 rmoveto} def /neshow {ixs1 iys3 rmoveto iytie /Times-ISOL1 FS show ixs2 iys4 rmoveto} def /neshow0 { 00 iys3 rmoveto iytie /Times-ISOL1 FS show 00 iys4 rmoveto} def /ishow {ixs1 iys1 rmoveto iytie /TimesB-ISOL1 FS show ixs2 iys2 rmoveto} def /ishow0 { 00 iys1 rmoveto iytie /TimesB-ISOL1 FS show 00 iys2 rmoveto} def /eshow { 00 iys3 rmoveto iytie /TimesB-ISOL1 FS show 00 iys4 rmoveto} def 0 0 0 setrgbcolor /imaxym 17220 def /iymax 16700 def /imaxy0 17000 def colorm 0 eq deintp 0 eq and {/Txx (d) def} if %3D=0, de=0 colorm 0 eq deintp 1 eq and {/Txx (e) def} if %3D=0, de=1 colorm 1 eq deintp 0 eq and {/Txx (d*) def} if %3D=1, de=0 colorm 1 eq deintp 1 eq and {/Txx (e*) def} if %3D=1, de=1 xchart 0 eq {/Txx (-) def} if /RGB58M1_F 174 array def %58x3=174 /RGB58M1_F [%rgb data of 48+1 step colour circle + 9 step gray series = 58 1.000 0.000 0.000 %00 R00Y %R 1.000 0.125 0.000 %01 R13Y 1.000 0.250 0.000 %02 R25Y 1.000 0.375 0.000 %03 R38Y 1.000 0.500 0.000 %04 R50Y 1.000 0.625 0.000 %05 R63Y 1.000 0.750 0.000 %06 R75Y 1.000 0.875 0.000 %07 R88Y 1.000 1.000 0.000 %08 Y00G %Y 0.875 1.000 0.000 %09 Y13G 0.750 1.000 0.000 %10 Y25G 0.625 1.000 0.000 %11 Y38G 0.500 1.000 0.000 %12 Y50G 0.375 1.000 0.000 %13 Y63G 0.250 1.000 0.000 %14 Y75G 0.125 1.000 0.000 %15 Y88G 0.000 1.000 0.000 %16 G00C %G 0.000 1.000 0.125 %17 G13C 0.000 1.000 0.250 %18 G25C 0.000 1.000 0.375 %19 G38C 0.000 1.000 0.500 %20 G50C 0.000 1.000 0.625 %21 G63C 0.000 1.000 0.750 %22 G75C 0.000 1.000 0.875 %23 G88C 0.000 1.000 1.000 %24 C00B %C 0.000 0.875 1.000 %25 C13B 0.000 0.750 1.000 %26 C25B 0.000 0.625 1.000 %27 C38B 0.000 0.500 1.000 %28 C50B 0.000 0.375 1.000 %29 C63B 0.000 0.250 1.000 %30 C75B 0.000 0.125 1.000 %31 C88B 0.000 0.000 1.000 %32 B00M %B 0.125 0.000 1.000 %33 B13M 0.250 0.000 1.000 %34 B25M 0.375 0.000 1.000 %35 B38M 0.500 0.000 1.000 %36 B50M 0.625 0.000 1.000 %37 B63M 0.750 0.000 1.000 %38 B75M 0.875 0.000 1.000 %39 B88M 1.000 0.000 1.000 %40 M00R %M 1.000 0.000 0.875 %41 M13R 1.000 0.000 0.750 %42 M25R 1.000 0.000 0.625 %43 M38R 1.000 0.000 0.500 %44 M50R 1.000 0.000 0.375 %45 M63R 1.000 0.000 0.250 %46 M75R 1.000 0.000 0.125 %47 M88R 1.000 0.000 0.000 %48 R00Y %R 0.000 0.000 0.000 %49 N00Wd %ncolors 0.125 0.125 0.125 %50 N13Wd 0.250 0.250 0.250 %51 N25Md 0.375 0.375 0.375 %52 N38Wd 0.500 0.500 0.500 %53 N50Wd 0.625 0.625 0.625 %54 N63Wd 0.750 0.750 0.750 %55 N75Wd 0.875 0.875 0.875 %56 N88Wd 1.000 1.000 1.000 %57 W00Nd = W ] def /RGB58M1t_F 58 array def %48+1 step colour circle and 9 step grey steps = 58 /RGB58M1t_F [%high chromatic series: %relative hue h*, brillance i*, and chroma c* %range 0 ... 100 (R00Y_100_100) (R13Y_100_100) (R25Y_100_100) (R38Y_100_100) (R50Y_100_100) (R63Y_100_100) (R75Y_100_100) (R88Y_100_100) (Y00G_100_100) (Y13G_100_100) (Y25G_100_100) (Y38G_100_100) (Y50G_100_100) (Y63G_100_100) (Y75G_100_100) (Y88G_100_100) (G00C_100_100) (G13C_100_100) (G25C_100_100) (G38C_100_100) (G50C_100_100) (G63C_100_100) (G75C_100_100) (G88C_100_100) (C00B_100_100) (C13B_100_100) (C25B_100_100) (C38B_100_100) (C50B_100_100) (C63B_100_100) (C75B_100_100) (C88B_100_100) (B00M_100_100) (B13M_100_100) (B25M_100_100) (B38M_100_100) (B50M_100_100) (B63M_100_100) (B75M_100_100) (B88M_100_100) (M00R_100_100) (M13R_100_100) (M25R_100_100) (M38R_100_100) (M50R_100_100) (M63R_100_100) (M75R_100_100) (M88R_100_100) (R00Y_100_100) %gray series (NW_000) (NW_013) (NW_025) (NW_038) (NW_050) (NW_063) (NW_075) (NW_088) (NW_100) ] def /RGB54CR_F 162 array def %54x3=162 /RGB54CR_F [%54 colours of colour rendering (CR) test chart 1.000 0.000 0.000 %01 R00Yd %RGB54CR 1.000 0.250 0.000 %02 R25Yd 1.000 0.500 0.000 %03 R50Yd 1.000 0.750 0.000 %04 R75Yd 1.000 1.000 0.000 %05 Y00Gd 0.750 1.000 0.000 %06 Y25Gd 0.500 1.000 0.000 %07 Y50Gd 0.250 1.000 0.000 %08 Y75Gd 0.000 1.000 0.000 %09 G00Bd = 10 0.000 1.000 0.000 %10 G00Bd 0.000 1.000 0.500 %11 G25Bd 0.000 1.000 1.000 %12 G50Bd 0.000 0.500 1.000 %13 G75Bd 0.000 0.000 1.000 %14 B00Rd 0.500 0.000 1.000 %15 B25Rd 1.000 0.000 1.000 %16 B50Rd 1.000 0.000 0.500 %17 B75Rd 1.000 0.000 0.000 %18 R00Yd = 01 1.000 0.500 0.500 %19 R00Yd %lcolors 1.000 0.750 0.500 %20 R50Yd 1.000 1.000 0.500 %21 Y00Gd 0.750 1.000 0.500 %22 Y50Gd 0.500 1.000 0.500 %23 G00Bd 0.500 1.000 1.000 %24 G50Bd 0.500 0.500 1.000 %25 B00Rd 1.000 0.500 1.000 %26 B50Rd 1.000 0.500 0.500 %27 R00Yd = 19 0.750 0.250 0.250 %28 R00Yd %zcolors 0.750 0.500 0.250 %29 R50Yd 0.750 0.750 0.250 %30 Y00Gd 0.500 0.750 0.250 %31 Y50Gd 0.250 0.750 0.250 %32 G00Bd 0.250 0.750 0.750 %33 G50Bd 0.250 0.250 0.750 %34 B00Rd 0.750 0.250 0.750 %35 B50Rd 0.750 0.250 0.250 %36 R00Yd = 28 0.500 0.000 0.000 %37 R00Yd %dcolors 0.500 0.250 0.000 %38 R50Yd 0.500 0.500 0.000 %38 Y00Gd 0.250 0.500 0.000 %40 Y50Gd 0.000 0.500 0.000 %41 G00Bd 0.000 0.500 0.500 %42 G50Bd 0.000 0.000 0.500 %43 B00Rd 0.500 0.000 0.500 %44 B50Rd 0.500 0.000 0.000 %45 R00Yd = 37 0.000 0.000 0.000 %46 N00Wd %ncolors 0.125 0.125 0.125 %47 N13Wd 0.250 0.250 0.250 %48 N25Md 0.375 0.375 0.375 %49 N38Wd 0.500 0.500 0.500 %50 N50Wd 0.625 0.625 0.625 %51 N63Wd 0.750 0.750 0.750 %52 N75Wd 0.875 0.875 0.875 %53 N88Wd 1.000 1.000 1.000 %54 W00Nd = W ] def %54 colours of colour rendering test chart /RGB54CRt_F 54 array def /RGB54CRt_F [%high chromatic series: %relative hue h*, brillance i*, and chroma c*, range 0 ... 100 (R00Y_100_100) (R25Y_100_100) (R50Y_100_100) (R75Y_100_100) (Y00G_100_100) (Y25G_100_100) (Y50G_100_100) (Y75G_100_100) (G00B_100_100) (G00B_100_100) (G25B_100_100) (G50B_100_100) (G75B_100_100) (B00M_100_100) (B25R_100_100) (B50R_100_100) (B75R_100_100) (R00Y_100_100) %whitetish series (R00Y_100_050) (R50Y_100_050) (Y00G_100_050) (Y50G_100_050) (G00B_100_050) (G50B_100_050) (B00R_100_050) (B50R_100_050) (R00Y_100_050) %grayish series (R00Y_075_050) (R50Y_075_050) (Y00G_075_050) (Y50G_075_050) (G00B_075_050) (G50B_075_050) (B00R_075_050) (B50R_075_050) (R00Y_075_050) %blackish series (R00Y_050_050) (R50Y_050_050) (Y00G_050_050) (Y50G_050_050) (G00B_050_050) (G50B_050_050) (B00R_050_050) (B50R_050_050) (R00Y_050_050) %gray series (NW_000) (NW_013) (NW_025) (NW_038) (NW_050) (NW_063) (NW_075) (NW_088) (NW_100) ] def /jCRi 54 array def /jCRi %jCRi [ 648 %R00Y_100_100 1.00 0.00 0.00 01 %chromatic 16 step hue 666 %R25Y_100_100 1.00 0.25 0.00 02 684 %R50Y_100_100 1.00 0.50 0.00 03 702 %R75Y_100_100 1.00 0.75 0.00 04 720 %Y00G_100_100 1.00 1.00 0.00 05 558 %Y25G_100_100 0.75 1.00 0.00 06 396 %Y50G_100_100 0.50 1.00 0.00 07 234 %Y75G_100_100 0.25 1.00 0.00 08 072 %G00B_100_100 0.00 1.00 0.00 09=10 072 %G00B_100_100 0.00 1.00 0.00 10 %chromatic 16 step hue 076 %G25B_100_100 0.00 1.00 0.50 11 080 %G50B_100_100 0.00 1.00 1.00 12 044 %G75B_100_100 0.00 0.50 1.00 13 008 %B00R_100_100 0.00 0.00 1.00 14 332 %B25R_100_100 0.50 0.00 1.00 15 656 %B50R_100_100 1.00 0.00 1.00 16 652 %B75R_100_100 1.00 0.00 0.50 17 648 %R00Y_100_100 1.00 0.00 0.00 18=01 688 %R00Y_100_050 1.00 0.50 0.50 19 %whitish 8 step hue 706 %R50Y_100_050 1.00 0.75 0.50 20 724 %Y00G_100_050 1.00 1.00 0.50 21 562 %Y50G_100_050 0.75 1.00 0.50 22 400 %G00B_100_050 0.50 1.00 0.50 23 404 %G50B_100_050 0.50 1.00 1.00 24 368 %B00R_100_050 0.50 0.50 1.00 25 692 %B50R_100_050 1.00 0.50 1.00 26 688 %R00Y_100_050 1.00 0.50 0.50 27=19 506 %R00Y_075_050 0.75 0.25 0.25 28 %greyish 8 step hue 524 %R50Y_075_050 0.75 0.50 0.25 29 542 %Y00G_075_050 0.75 0.75 0.25 30 380 %Y50G_075_050 0.50 0.75 0.25 31 218 %G00B_075_050 0.25 0.75 0.25 32 222 %G50B_075_050 0.25 0.75 0.75 33 186 %B00R_075_050 0.25 0.25 0.75 34 510 %B50R_075_050 0.75 0.25 0.75 35 506 %R00Y_075_050 0.75 0.25 0.25 36=28 324 %R00Y_050_050 0.50 0.00 0.00 37 %blackish 8 step hue 342 %R50Y_050_050 0.50 0.25 0.00 38 360 %Y00G_050_050 0.50 0.50 0.00 39 198 %Y50G_050_050 0.25 0.50 0.00 40 036 %G00B_050_050 0.00 0.50 0.00 41 040 %G50B_050_050 0.00 0.50 0.50 42 004 %B00R_050_050 0.00 0.00 0.50 43 328 %B50R_050_050 0.50 0.00 0.50 44 324 %R00Y_050_050 0.50 0.00 0.00 45=37 000 %NW_000 0.000 0.000 0.000 46 %grey 9 steps 091 %NW_013 0.125 0.125 0.125 47 182 %NW_025 0.250 0.250 0.250 48 273 %NW_038 0.375 0.375 0.375 49 364 %NW_050 0.500 0.500 0.500 50 455 %NW_063 0.625 0.625 0.625 51 546 %NW_075 0.750 0.750 0.750 52 637 %NW_088 0.875 0.875 0.875 53 728 %NW_100 1.000 1.000 1.000 54 ] def %END jCRi /SUMDE*' 0 def /SUMDE'* 0 def n1 1 n2 {/n exch def %n=n1,n2 /n30 n 3 mul def /n31 n30 1 add def /n32 n30 2 add def xchart n00 eq {%48+1=49 step colour circle + 9 gray steps=58 steps /hcolort RGB58M1t_F n get def RGB58M1_F n30 get %real RGB58M1_F n31 get RGB58M1_F n32 get } if %48 step colour circle xchart n01 eq {%45 colour rendering (CR) + 9 grey steps = 54 steps /hcolort RGB54CRt_F n get def RGB54CR_F n30 get %real RGB54CR_F n31 get RGB54CR_F n32 get } if %54 colour rendering colours xchart n02 ge {%1080 standard colours /hcolort n cvi 6 string cvs def RGB0_F n30 get 1000 div RGB0_F n31 get 1000 div RGB0_F n32 get 1000 div } if %1080 standard colours setrgbcolor %default to create data %setrgbcolor calculates data for output in "FF_LM_de_setrgbcolor_F" %3D=0 calculates: rgb_dyF, rgb*dyF, LAB*dyF, ,cmyk*dyF and more %3D=1 calculates: rgb_dyF, rgb*dyF, LAB*dyF', rgb'*dyF, cmyk*dyF and more /r_xF r_dyF def /g_xF g_dyF def /b_xF b_dyF def /i_xF i_dyF def /c_xF c_dyF def /t_xF t_dyF def /r*xF r*dyF def /g*xF g*dyF def /b*xF b*dyF def /LAB*LxF LAB*LdyF def /LAB*axF LAB*adyF def /LAB*bxF LAB*bdyF def /LAB*CxF LAB*adyF dup mul LAB*bdyF dup mul add 0.0001 add sqrt def /LAB*hxF LAB*bdyF LAB*adyF 0.0001 add atan def colorm 0 eq {%3D=0 %prog_rgb_dyF_LAB*'dyF uses rgb_dyF by default %calculates output data according to IEC 61966-2-1 prog_rgb_dyF_LAB*'dyF /LAB*'LxF L*'dyF def /LAB*'axF A*'dyF def /LAB*'bxF B*'dyF def /LAB*'CxF C*'dyF def /LAB*'hxF h*'dyF def /DE*' LAB*'LxF LAB*LxF sub dup mul LAB*'axF LAB*axF sub dup mul add LAB*'bxF LAB*bxF sub dup mul add 0.0001 add sqrt def /SUMDE*' SUMDE*' DE*' add def } if %3D=0 colorm 1 eq {%3D=1 /r'*xF r'*dyF def /g'*xF g'*dyF def /b'*xF b'*dyF def %calculates output data according to IEC 61966-2-1 prog_rgb'*dyF_LAB'*dyF /LAB'*LxF L'*dyF def /LAB'*axF A'*dyF def /LAB'*bxF B'*dyF def /LAB'*CxF C'*dyF def /LAB'*hxF h'*dyF def /DE'* LAB'*LxF LAB*LxF sub dup mul LAB'*axF LAB*axF sub dup mul add LAB'*bxF LAB*bxF sub dup mul add 0.0001 add sqrt def /SUMDE'* SUMDE'* DE'* add def } if %3D=1 /hsi_xF hsiF def % /c4*F c4*Fa def % /m4*F m4*Fa def % /y4*F y4*Fa def % /n4*F n4*Fa def /r*xM r*dyM def /g*xM g*dyM def /b*xM b*dyM def /LAB*LxM LAB*LdyM def /LAB*axM LAB*adyM def /LAB*bxM LAB*bdyM def /LAB*CxM LAB*adyM dup mul LAB*bdyM dup mul add 0.0001 add sqrt def /LAB*hxM LAB*bdyM LAB*adyM 0.0001 add atan def /hsi_xM hsiM def 0 setgray xchart n00 eq {/nx n 8 idiv def n 49 ge {/nx nx 1 add def} if n 56 ge {/nx nx 1 sub def} if } if xchart n01 eq {/nx n 9 idiv def} if xchart n02 ge {/nx 0 def} if /iydn iymax n n1 sub nx add iyd mul sub def n n1 eq {%n=n1 00050 imaxy0 moveto (n) jshow xchart n00 eq {(/j) show} if xchart n01 eq {(/j) show} if xchart n02 eq {(=j) show} if 00700 imaxy0 moveto (HIC*) bshow (F) ishow0 Txx ishow0 02300 imaxy0 moveto (rgb) jshow (_F) ishow0 Txx ishow0 04200 imaxy0 moveto (ict) jshow (_F) ishow0 Txx ishow0 06100 imaxy0 moveto (h) jshow (si_F,) ishow0 Txx ishow0 06700 imaxym moveto 0 imaxym neg rlineto stroke 06800 imaxy0 moveto (rgb*) jshow (F) ishow0 Txx ishow0 08700 imaxy0 moveto (LabCh*) jshow (F) ishow0 Txx ishow0 12100 imaxym moveto 0 imaxym neg rlineto stroke colorm 0 eq {%3D=1 12200 imaxy0 moveto (rgb*') jshow (F) ishow0 Txx ishow0 14100 imaxy0 moveto (LabCh*') jshow (F) ishow0 Txx ishow0 17600 imaxy0 moveto (DE*') jshow (F) ishow0 Txx ishow0 } if %3D=0 colorm 1 eq {%3D=1 12200 imaxy0 moveto (rgb'*) jshow (F) ishow0 Txx ishow0 14100 imaxy0 moveto (LabCh'*) jshow (F) ishow0 Txx ishow0 17600 imaxy0 moveto (DE'*) jshow (F) ishow0 Txx ishow0 } if %3D=1 % 15100 imaxy0 moveto (cmyn*) jshow (sep,) ishow0 % (F) ishow0 Txx ishow0 18300 imaxy0 moveto (h) jshow (siM,) ishow0 Txx ishow0 18900 imaxym moveto 0 imaxym neg rlineto stroke 19000 imaxy0 moveto (rgb*) jshow (M) ishow0 Txx ishow0 20900 imaxy0 moveto (LabCh*) jshow (M) ishow0 Txx ishow0 () nshow } if %n=n1 00050 iydn moveto n cvishow xchart n00 eq {%xchart=n00 n 48 le {%n<=48 (/) show M1jx n get cvishow }%n<=48 {%n>48 (/) show jCRi n 4 sub get cvishow } ifelse } if %xchart=n00 xchart n01 eq {(/) show jCRi n get cvishow} if 00700 iydn moveto hcolort show Txx ishow0 () nshow 02300 iydn moveto r_xF cvsshow3 02900 iydn moveto g_xF cvsshow3 03500 iydn moveto b_xF cvsshow3 04200 iydn moveto i_xF cvsshow3 04800 iydn moveto c_xF cvsshow3 05400 iydn moveto t_xF cvsshow3 06100 iydn moveto hsi_xF cvishow 06800 iydn moveto r*xF cvsshow3 07400 iydn moveto g*xF cvsshow3 08000 iydn moveto b*xF cvsshow3 08700 iydn moveto LAB*LxF cvsshow1 09400 iydn moveto LAB*axF cvsshow1 10100 iydn moveto LAB*bxF cvsshow1 10800 iydn moveto LAB*CxF cvsshow1 11500 iydn moveto LAB*hxF cvsshow1 colorm 0 eq {%3D=0 12200 iydn moveto r_xF cvsshow3 12800 iydn moveto g_xF cvsshow3 13400 iydn moveto b_xF cvsshow3 14100 iydn moveto LAB*'LxF cvsshow1 14800 iydn moveto LAB*'axF cvsshow1 15500 iydn moveto LAB*'bxF cvsshow1 16200 iydn moveto LAB*'CxF cvsshow1 16900 iydn moveto LAB*'hxF cvsshow1 17600 iydn moveto DE*' cvsshow1 } if %3D=0 colorm 1 eq {%3D=1 12200 iydn moveto r'*xF cvsshow3 12800 iydn moveto g'*xF cvsshow3 13400 iydn moveto b'*xF cvsshow3 14100 iydn moveto LAB'*LxF cvsshow1 14800 iydn moveto LAB'*axF cvsshow1 15500 iydn moveto LAB'*bxF cvsshow1 16200 iydn moveto LAB'*CxF cvsshow1 16900 iydn moveto LAB'*hxF cvsshow1 17600 iydn moveto DE'* cvsshow1 } if %3D=1 18300 iydn moveto hsi_xM cvishow 19000 iydn moveto r*xM cvsshow3 19600 iydn moveto g*xM cvsshow3 20200 iydn moveto b*xM cvsshow3 20900 iydn moveto LAB*LxM cvsshow1 21600 iydn moveto LAB*axM cvsshow1 22300 iydn moveto LAB*bxM cvsshow1 23000 iydn moveto LAB*CxM cvsshow1 23700 iydn moveto LAB*hxM cvsshow1 } for %n=n1,n2 n2 57 eq n2 53 eq or n2 80 ge n2 1079 lt and or n2 1079 eq or {%n2=57,53,80,161,...,1052,1079 /iydn iymax n 1 add n1 sub nx add iyd mul sub def 12500 iydn moveto lanind 1 eq {(Mean color difference of this page:) bshow} if lanind 0 eq {(Mitttlere Farbdifferenz dieser Seite: ) bshow} if 16600 iydn moveto (delta ) bshow colorm 0 eq {(E*' =) jshow} {(E'* =) jshow} ifelse () bshow colorm 0 eq {%3D=0 17600 iydn moveto SUMDE*' n2 n1 sub 1 add div cvsshow1 }%3D=0 {%3D=1 17600 iydn moveto SUMDE'* n2 n1 sub 1 add div cvsshow1 } ifelse %3D=1 } if %n2=57,53,80,161, ...,1052,1079 } if %END xchart>xchart3P0 %************************************************************* %%Trailer %%EndDocument EndEPSF grestore gsave showpage grestore %} for %colsep=0,1 %} for %pchart=0,0 } for %xchart=0,1 %} for %xcolor=3,3 } for %de=0,1 } for %3D=0,1 %} for %lanind=0,0 %%Trailer