%!PS-Adobe-3.0 EPSF-3.0 NE010-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: NE010-6, B8331_5, M8120-6, B2_40) /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 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 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 (NE010-6, 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 000 add 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 %! 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 1800 3200 moveto (Elementarfarben) showde %08120-6 1 (elementary colors) showen %18120-6 1 (Colores elementales) showes %28120-6 1 (elementary colors) showfr %38120-6 1 (elementary colors) showit %48120-6 1 (elementary colors) showjp %58120-6 1 1800 2800 moveto (von ) showde %08120-6 2 (of ) showen %18120-6 2 (de ) showes %28120-6 2 (of ) showfr %38120-6 2 (of ) showit %48120-6 2 (of ) showjp %58120-6 2 350 /TimesI-ISOL1 FS (Miescher) show 350 /Times-ISOL1 FS ( in) showde %08120-6 3 ( in) showen %18120-6 3 ( en) showes %28120-6 3 ( in) showfr %38120-6 3 ( in) showit %48120-6 3 ( in) showjp %58120-6 3 1800 2400 moveto (Normfarbtafel) showde %08120-6 4 (chromaticity diagram) showen %18120-6 4 (diagrama crom\341tico) showes %28120-6 4 (chromaticity diagram) showfr %38120-6 4 (chromaticity diagram) showit %48120-6 4 (chromaticity diagram) showjp %58120-6 4 350 /TimesI-ISOL1 FS 1250 1316 400 sub moveto (D65) show 1779 250 sub 1963 moveto (J) show 2325 100 add 1294 200 sub moveto (R) show 680 100 add 542 200 sub moveto (B) show 756 400 sub 1798 200 sub moveto (G) show showpage grestore } for %output with langind end %%Trailer