%!PS-Adobe-3.0 EPSF-3.0 ME401-3 %%BoundingBox: 70 83 226 206 %old BoundingBox: 72 90 225 205 %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: ME401-3) /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1) /Subject (goto: http://www.ps.bam.de or http://130.149.60.445/~farbmetrik) /Keywords (image reproduction, colour devices) /Creator (klaus.richter@me.com) /CreationDate (D:2010110112000) /ModDate (D:2010110112000) /DOCINFO pdfmark13 [ /View [ /FitB ] /DOCVIEW pdfmark13 %END PDFDE011 /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 /A4quer {595 0 translate 90 rotate} 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 {2 lanind eq {show} {pop} ifelse} bind def /showfr {3 lanind eq {show} {pop} ifelse} bind def /showit {4 lanind eq {show} {pop} ifelse} bind def /showjp {5 lanind eq {show} {pop} ifelse} bind def /showm {6 lanind eq {show} {pop} ifelse} bind def /popde {0 lanind ne {pop} if} bind def /popen {1 lanind ne {pop} if} bind def /popes {2 lanind ne {pop} if} bind def /popfr {3 lanind ne {pop} if} bind def /popit {4 lanind ne {pop} if} bind def /popjp {5 lanind ne {pop} if} bind def /popm {6 lanind ne {pop} if} bind def /popxde {/n exch def 0 lanind ne {n {pop} repeat} if} bind def /popxen {/n exch def 1 lanind ne {n {pop} repeat} if} bind def /popxes {/n exch def 2 lanind ne {n {pop} repeat} if} bind def /popxfr {/n exch def 3 lanind ne {n {pop} repeat} if} bind def /popxit {/n exch def 4 lanind ne {n {pop} repeat} if} bind def /popxjp {/n exch def 5 lanind ne {n {pop} repeat} if} bind def /popxm {/n exch def 6 lanind ne {n {pop} repeat} if} bind def /lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def} {/lanind1 1 def /lanind2 1 def} ifelse lanind1 1 lanind2 {/lanind exch def %output showpage gsave %LANINDL2 END 5 /Times-ISOL1 FS 180 85 moveto (ME401-3, B9_5) show % ( B8331_3, M8551-3, B9_5, N=10_5) 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 /ausz 8 def 15 setlinewidth 0.0 0.0 0.5 0.0 setcmykcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath fill 0.0 0.0 0.0 1.0 setcmykcolor 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 100 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 aus krdaxy um 4505: %! 4567 individuell modifiziert 1160 2400 moveto 2560 1320 lineto 600 240 lineto 1160 2400 lineto stroke 1 setgray 1160 2400 40 0 360 arc fill 2560 1320 40 0 360 arc fill 600 240 40 0 360 arc fill 1160 2400 40 0 360 arc fill 0 setgray 1160 2400 40 0 360 arc stroke 2560 1320 40 0 360 arc stroke 600 240 40 0 360 arc stroke 1160 2400 40 0 360 arc stroke %! Berechnet d2:[rr.p6f]fanxys.for,MULY:2000 COD: 2D65-FO 1250 1316 moveto stroke 1 setgray 1250 1316 40 0 360 arc fill 0 setgray 1250 1316 40 0 360 arc stroke %! Berechnet d2:[rr.p6f]fanxys.for,MULY:2000 COD: 3TF-D65 1511 1364 moveto 1542 1620 lineto 1488 1894 lineto 1148 1696 lineto 1039 1282 lineto 974 1029 lineto 1150 1054 lineto 1316 1096 lineto 1511 1364 lineto 1511 1364 lineto stroke 0 setgray 1511 1364 40 0 360 arc fill 1542 1620 40 0 360 arc fill 1488 1894 40 0 360 arc fill 1148 1696 40 0 360 arc fill 1039 1282 40 0 360 arc fill 974 1029 40 0 360 arc fill 1150 1054 40 0 360 arc fill 1316 1096 40 0 360 arc fill 1511 1364 40 0 360 arc fill 0 setgray 1511 1364 40 0 360 arc stroke 1542 1620 40 0 360 arc stroke 1488 1894 40 0 360 arc stroke 1148 1696 40 0 360 arc stroke 1039 1282 40 0 360 arc stroke 974 1029 40 0 360 arc stroke 1150 1054 40 0 360 arc stroke 1316 1096 40 0 360 arc stroke 1511 1364 40 0 360 arc stroke %! Berechnet d2:[rr.p6f]fanxys.for,MULY:2000 COD: 4TF-D65 2277 1244 moveto stroke 1 setgray 2277 1244 40 0 360 arc fill 0 setgray 2277 1244 40 0 360 arc stroke %! Berechnet d2:[rr.p6f]fanxys.for,MULY:2000 COD: 5TF-D65 1743 1874 moveto stroke 1 setgray 1743 1874 40 0 360 arc fill 0 setgray 1743 1874 40 0 360 arc stroke %! Berechnet d2:[rr.p6f]fanxys.for,MULY:2000 COD: 6TF-D65 1015 1703 moveto stroke 1 setgray 1015 1703 40 0 360 arc fill 0 setgray 1015 1703 40 0 360 arc stroke %! Berechnet d2:[rr.p6f]fanxys.for,MULY:2000 COD: 7TF-D65 620 640 moveto stroke 1 setgray 620 640 40 0 360 arc fill 0 setgray 620 640 40 0 360 arc stroke %! Berechnet d2:[rr.p6f]fanxys.for,MULY:2000 COD: 8TF-D65 1497 1452 moveto stroke 1 setgray 1497 1452 40 0 360 arc fill 0 setgray 1497 1452 40 0 360 arc stroke %! Berechnet d2:[rr.p6f]fanxys.for,MULY:2000 COD: 9TF-D65 1412 1772 moveto stroke 1 setgray 1412 1772 40 0 360 arc fill 0 setgray 1412 1772 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 2200 3200 moveto (CIE\255Testfarben) showde %08551-3 1 (CIE\255test colors) showen %18551-3 1 (CIE\255Test\255color) showes %28551-3 1 (CIE\255test colors) showfr %38551-3 1 (CIE\255test colors) showit %48551-3 1 (CIE\255test colors) showjp %58551-3 1 2200 2800 moveto (und Fernseh\255) showde %08551-3 2 (and television) showen %18551-3 2 (y color televisi\363n) showes %28551-3 2 (and television) showfr %38551-3 2 (and television) showit %48551-3 2 (and television) showjp %58551-3 2 2200 2400 moveto (Grundfarben in) showde %08551-3 3 (colors in chroma\255) showen %18551-3 3 (en el Diagrama) showes %28551-3 3 (colors in chroma\255) showfr %38551-3 3 (colors in chroma\255) showit %58551-3 3 (colors in chroma\255) showjp %18551-3 3 2200 2000 moveto (Normfarbtafel) showde %08551-3 4 (ticity diagram) showen %08551-3 4 (crom\341tico) showes %28551-3 4 (ticity diagram) showfr %38551-3 4 (ticity diagram) showit %48551-3 4 (ticity diagram) showjp %58551-3 4 350 /TimesI-ISOL1 FS 2500 1000 moveto (O) show 850 2350 moveto (L) show 350 600 moveto (V) show showpage grestore } for %output with langind end %%Trailer