%!PS-Adobe-3.0 EPSF-3.0 MF980-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/MF98/MF98.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 /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 %%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 /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 /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 (MF980-4) show xchart 0 eq {(N) show} {deintp colorm 2 mul add cvishow} ifelse 72 90 translate 0.01 MM 0.01 MM scale 15 setlinewidth 0 0 0.5 0 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath fill 0 0 0 1 setcmyk_olvcolor 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath stroke 0 0 moveto 5333 0 rlineto 0 4000 rlineto -5333 0 rlineto closepath clip 800 3200 translate 0 400 moveto 4000 0 rlineto stroke 0 400 moveto 0 -2100 rlineto stroke %! 100 S-Einheiten = 2000 Skalen-Einheiten 300 /Times-ISOL1 FS 400 350 moveto 0 100 rlineto stroke 1200 350 moveto 0 100 rlineto stroke 2000 350 moveto 0 100 rlineto stroke 2800 350 moveto 0 100 rlineto stroke 3600 350 moveto 0 100 rlineto stroke 100 500 moveto (0,06) show 900 500 moveto (0,12) show 1700 500 moveto (0,18) show 2500 500 moveto (0,24) show 3300 500 moveto (0,30) 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 -775 -100 moveto ( 0,00) show -775 -900 moveto (-0,06) show -775 -1700 moveto (-0,12) show % -775 -2500 moveto (-0,18) show 350 /TimesI-ISOL1 FS -580 -1300 moveto (b') show 350 /TimesI-ISOL1 FS 4100 250 moveto (a') show -800 -3200 translate %1000 02 01 16 01 .00 .0020 ******************** %ANF PROZSPEP3.FOR: MULYA=13333 BEO=02 CIELAB 1976 IXY0: 400 3200 400 3200 translate 9657 -6202 moveto 9657 -6202 9666 -6212 9642 -6203 curveto 9610 -6190 9426 -6080 9018 -5830 curveto 8481 -5499 7863 -5120 7227 -4729 curveto 6628 -4367 6041 -4019 5490 -3698 curveto 4943 -3383 4391 -3065 3769 -2701 curveto 3156 -2344 2578 -2012 2043 -1717 curveto 1565 -1460 1123 -1239 723 -1054 curveto 527 -898 772 -759 1060 -634 curveto 1304 -535 1510 -464 1685 -408 curveto 1832 -356 1965 -309 2091 -267 curveto 2214 -230 2337 -200 2460 -176 curveto 2585 -157 2712 -145 2841 -139 curveto 2972 -138 3103 -133 3233 -126 curveto 3359 -126 3475 -120 3582 -113 curveto 3676 -98 3756 -91 3823 -88 curveto 3878 -75 3924 -64 3963 -57 curveto 3995 -54 4022 -46 4042 0 curveto 4057 0 4069 0 4077 0 curveto 4083 0 4088 0 4093 0 curveto 4097 0 4100 0 4101 0 curveto 4102 0 4103 0 4129 -740 curveto 4224 -1226 4290 -1417 4338 -1533 curveto 4374 -1614 4405 -1674 4427 -1723 curveto 4454 -1771 4486 -1825 4520 -1884 curveto 4565 -1958 4630 -2056 4736 -2200 curveto 4923 -2435 5407 -2946 9625 -6181 curveto stroke 0 0 0 0 setcmyk_olvcolor 9657 -6202 30 0 360 arc fill % 400 9018 -5830 30 0 360 arc fill % 425 6041 -4019 30 0 360 arc fill % 450 3156 -2344 30 0 360 arc fill % 475 723 -1054 30 0 360 arc fill % 500 1510 -464 30 0 360 arc fill % 525 2214 -230 30 0 360 arc fill % 550 2841 -139 30 0 360 arc fill % 575 3475 -120 30 0 360 arc fill % 600 3878 -75 30 0 360 arc fill % 625 4042 0 30 0 360 arc fill % 650 4088 0 30 0 360 arc fill % 675 4102 0 30 0 360 arc fill % 700 4224 -1226 30 0 360 arc fill %500c 4427 -1723 30 0 360 arc fill %525c 4630 -2056 30 0 360 arc fill %550c 0 0 0 1 setcmyk_olvcolor 9657 -6202 30 0 360 arc stroke % 400 9018 -5830 30 0 360 arc stroke % 425 6041 -4019 30 0 360 arc stroke % 450 3156 -2344 30 0 360 arc stroke % 475 723 -1054 30 0 360 arc stroke % 500 1510 -464 30 0 360 arc stroke % 525 2214 -230 30 0 360 arc stroke % 550 2841 -139 30 0 360 arc stroke % 575 3475 -120 30 0 360 arc stroke % 600 3878 -75 30 0 360 arc stroke % 625 4042 0 30 0 360 arc stroke % 650 4088 0 30 0 360 arc stroke % 675 4102 0 30 0 360 arc stroke % 700 4224 -1226 30 0 360 arc stroke %500c 4427 -1723 30 0 360 arc stroke %525c 4630 -2056 30 0 360 arc stroke %550c 2872 -1148 30 0 360 arc fill %D65 0 0 0 1 setcmyk_olvcolor 250 /TimesI-ISOL1 FS % 9657 500 sub -6202 100 sub moveto (400) show % 9018 500 sub -5830 100 sub moveto (425) show % 6041 500 sub -4019 100 sub moveto (450) show 3156 500 sub -2344 200 sub moveto (475) show 723 300 sub -1054 300 sub moveto (500) show 1510 200 sub -464 150 add moveto (525) show 2214 200 sub -230 100 add moveto (550) show 2841 200 sub -139 100 add moveto (575) show 3475 200 sub -120 100 add moveto (600) show % 3878 200 sub -75 100 add moveto (625) show % 4042 200 sub 0 100 add moveto (650) show % 4088 200 sub 0 100 add moveto (675) show 4102 050 add 0 100 sub moveto (700) show 4224 050 add -1226 000 sub moveto (500c) show 4427 010 sub -1723 100 add moveto (525c) show % 4630 100 add -2056 100 sub moveto (550c) show 2872 100 add -1148 100 sub moveto %(D65 ) show -400 -3200 translate %ENDE: 3 %1000 02 19 01 16 01 00 NE JA JA 02 ******************** % 19 01 01 F39E258.DAT ELEMENTARFARBEN für 8290/1 %ANF FANxyal3: MULYA=13333 BEO=02 CIELAB 1976 IXY0: 400 3200 2 5.0PB 400 3200 translate 2952 -1521 moveto 2952 -1521 3042 -1854 3188 -2160 curveto stroke 0 0 0 0 setcmyk_olvcolor 2952 -1521 40 0 360 arc fill 3042 -1854 40 0 360 arc fill 0 0 0 1 setcmyk_olvcolor 2952 -1521 40 0 360 arc stroke 3042 -1854 40 0 360 arc stroke 3188 -2160 40 0 360 arc fill -400 -3200 translate %ANF FANxyal3: MULYA=13333 BEO=02 CIELAB 1976 IXY0: 400 3200 8 5.0G 400 3200 translate 2577 -1083 moveto 2577 -1083 2208 -1014 1733 -971 curveto 1048 -954 1048 -954 1048 -954 curveto stroke 0 0 0 0 setcmyk_olvcolor 2577 -1083 40 0 360 arc fill 0 0 0 1 setcmyk_olvcolor 2577 -1083 40 0 360 arc stroke 2208 -1014 40 0 360 arc fill 1733 -971 40 0 360 arc fill 1048 -954 40 0 360 arc fill -400 -3200 translate %ANF FANxyal3: MULYA=13333 BEO=02 CIELAB 1976 IXY0: 400 3200 12 5.0Y 400 3200 translate 2914 -645 moveto 2914 -645 2914 -645 2914 -645 curveto stroke 0 0 0 0 setcmyk_olvcolor 0 0 0 1 setcmyk_olvcolor 2914 -645 40 0 360 arc fill -400 -3200 translate %ANF FANxyal3: MULYA=13333 BEO=02 CIELAB 1976 IXY0: 400 3200 16 5.0R 400 3200 translate 3252 -1085 moveto 3252 -1085 3577 -1007 3914 -967 curveto stroke 0 0 0 0 setcmyk_olvcolor 3252 -1085 40 0 360 arc fill 3577 -1007 40 0 360 arc fill 0 0 0 1 setcmyk_olvcolor 3252 -1085 40 0 360 arc stroke 3577 -1007 40 0 360 arc stroke 3914 -967 40 0 360 arc fill -400 -3200 translate %ANF FANxyal3: MULYA=13333 BEO=02 CIELAB 1976 IXY0: 400 3200 21 C 400 3200 translate 2902 -1180 moveto 2902 -1180 2902 -1180 2902 -1180 curveto stroke 0 0 0 0 setcmyk_olvcolor 2902 -1180 40 0 360 arc fill 0 0 0 1 setcmyk_olvcolor 2902 -1180 40 0 360 arc stroke -400 -3200 translate %ANF FANxyal3: MULYA=13333 BEO=02 CIELAB 1976 IXY0: 400 3200 2 5.0PB 400 3200 translate 2912 -1340 moveto 2912 -1340 2928 -1507 2952 -1670 curveto 2994 -1843 2994 -1843 2994 -1843 curveto stroke 0 0 0 0 setcmyk_olvcolor 2912 -1340 40 0 360 arc fill 2928 -1507 40 0 360 arc fill 2952 -1670 40 0 360 arc fill 0 0 0 1 setcmyk_olvcolor 2912 -1340 40 0 360 arc stroke 2928 -1507 40 0 360 arc stroke 2952 -1670 40 0 360 arc stroke 2994 -1843 40 0 360 arc fill -400 -3200 translate %ANF FANxyal3: MULYA=13333 BEO=02 CIELAB 1976 IXY0: 400 3200 8 5.0G 400 3200 translate 2692 -1106 moveto 2692 -1106 2479 -1046 2254 -1003 curveto 2039 -975 1834 -958 1616 -945 curveto 1370 -937 1370 -937 1370 -937 curveto stroke 0 0 0 0 setcmyk_olvcolor 2692 -1106 40 0 360 arc fill 2479 -1046 40 0 360 arc fill 0 0 0 1 setcmyk_olvcolor 2692 -1106 40 0 360 arc stroke 2479 -1046 40 0 360 arc stroke 2254 -1003 40 0 360 arc fill 2039 -975 40 0 360 arc fill 1834 -958 40 0 360 arc fill 1616 -945 40 0 360 arc fill 1370 -937 40 0 360 arc fill -400 -3200 translate %ANF FANxyal3: MULYA=13333 BEO=02 CIELAB 1976 IXY0: 400 3200 12 5.0Y 400 3200 translate 2889 -884 moveto 2889 -884 2897 -600 2904 -238 curveto stroke 0 0 0 0 setcmyk_olvcolor 2889 -884 40 0 360 arc fill 2897 -600 40 0 360 arc fill 0 0 0 1 setcmyk_olvcolor 2889 -884 40 0 360 arc stroke 2897 -600 40 0 360 arc stroke 2904 -238 40 0 360 arc fill -400 -3200 translate %ANF FANxyal3: MULYA=13333 BEO=02 CIELAB 1976 IXY0: 400 3200 16 5.0R 400 3200 translate 3070 -1095 moveto 3070 -1095 3238 -1002 3407 -911 curveto 3564 -827 3721 -746 3721 -746 curveto stroke 0 0 0 0 setcmyk_olvcolor 3070 -1095 40 0 360 arc fill 3238 -1002 40 0 360 arc fill 3407 -911 40 0 360 arc fill 0 0 0 1 setcmyk_olvcolor 3070 -1095 40 0 360 arc stroke 3238 -1002 40 0 360 arc stroke 3407 -911 40 0 360 arc stroke 3564 -827 40 0 360 arc fill 3721 -746 40 0 360 arc fill -400 -3200 translate %ANF FANxyal3: MULYA=13333 BEO=02 CIELAB 1976 IXY0: 400 3200 21 C 400 3200 translate 2902 -1180 moveto 2902 -1180 2902 -1180 2902 -1180 curveto stroke 0 0 0 0 setcmyk_olvcolor 2902 -1180 40 0 360 arc fill 0 0 0 1 setcmyk_olvcolor 2902 -1180 40 0 360 arc stroke -400 -3200 translate %ANF FANxyal3: MULYA=13333 BEO=02 CIELAB 1976 IXY0: 400 3200 2 5.0PB 400 3200 translate 2899 -1283 moveto 2899 -1283 2899 -1283 2899 -1283 curveto stroke 0 0 0 0 setcmyk_olvcolor 2899 -1283 40 0 360 arc fill 0 0 0 1 setcmyk_olvcolor 2899 -1283 40 0 360 arc stroke -400 -3200 translate %ANF FANxyal3: MULYA=13333 BEO=02 CIELAB 1976 IXY0: 400 3200 8 5.0G 400 3200 translate 2745 -1119 moveto 2745 -1119 2599 -1071 2455 -1033 curveto 2315 -1002 2164 -979 2164 -979 curveto stroke 0 0 0 0 setcmyk_olvcolor 2745 -1119 40 0 360 arc fill 0 0 0 1 setcmyk_olvcolor 2745 -1119 40 0 360 arc stroke 2599 -1071 40 0 360 arc fill 2455 -1033 40 0 360 arc fill 2315 -1002 40 0 360 arc fill 2164 -979 40 0 360 arc fill -400 -3200 translate %ANF FANxyal3: MULYA=13333 BEO=02 CIELAB 1976 IXY0: 400 3200 12 5.0Y 400 3200 translate 2875 -972 moveto 2875 -972 2871 -775 2874 -573 curveto 2877 -379 2877 -379 2877 -379 curveto stroke 0 0 0 0 setcmyk_olvcolor 2875 -972 40 0 360 arc fill 2871 -775 40 0 360 arc fill 2874 -573 40 0 360 arc fill 0 0 0 1 setcmyk_olvcolor 2875 -972 40 0 360 arc stroke 2871 -775 40 0 360 arc stroke 2874 -573 40 0 360 arc stroke 2877 -379 40 0 360 arc fill -400 -3200 translate %ANF FANxyal3: MULYA=13333 BEO=02 CIELAB 1976 IXY0: 400 3200 16 5.0R 400 3200 translate 3005 -1121 moveto 3005 -1121 3126 -1053 3126 -1053 curveto stroke 0 0 0 0 setcmyk_olvcolor 3005 -1121 40 0 360 arc fill 0 0 0 1 setcmyk_olvcolor 3005 -1121 40 0 360 arc stroke 3126 -1053 40 0 360 arc fill -400 -3200 translate %ANF FANxyal3: MULYA=13333 BEO=02 CIELAB 1976 IXY0: 400 3200 21 C 400 3200 translate 2902 -1180 moveto 2902 -1180 2902 -1180 2902 -1180 curveto stroke 0 0 0 0 setcmyk_olvcolor 2902 -1180 40 0 360 arc fill 0 0 0 1 setcmyk_olvcolor 2902 -1180 40 0 360 arc stroke -400 -3200 translate %ANF FANxyal3: MULYA=13333 BEO=02 CIELAB 1976 IXY0: 400 3200 22 R 400 3200 translate 3573 -812 moveto 3573 -812 3573 -812 3573 -812 curveto stroke 1 0 0 setrgbcolor 3573 -812 80 0 360 arc fill 0 0 0 1 setcmyk_olvcolor 3573 -812 80 0 360 arc stroke -400 -3200 translate %ANF FANxyal3: MULYA=13333 BEO=02 CIELAB 1976 IXY0: 400 3200 23 Y 400 3200 translate 2851 -657 moveto 2851 -657 2851 -657 2851 -657 curveto stroke 1 1 0 setrgbcolor 2851 -657 80 0 360 arc fill 0 0 0 1 setcmyk_olvcolor 2851 -657 80 0 360 arc stroke -400 -3200 translate %ANF FANxyal3: MULYA=13333 BEO=02 CIELAB 1976 IXY0: 400 3200 24 G 400 3200 translate 2458 -1015 moveto 2458 -1015 2458 -1015 2458 -1015 curveto stroke 0 1 0 setrgbcolor 2458 -1015 80 0 360 arc fill 0 0 0 1 setcmyk_olvcolor 2458 -1015 80 0 360 arc stroke -400 -3200 translate %ANF FANxyal3: MULYA=13333 BEO=02 CIELAB 1976 IXY0: 400 3200 25 B 400 3200 translate 2889 -1812 moveto 2889 -1812 2889 -1812 2889 -1812 curveto stroke 0 0 1 setrgbcolor 2889 -1812 80 0 360 arc fill 0 0 0 1 setcmyk_olvcolor 2889 -1812 80 0 360 arc stroke -400 -3200 translate 400 3200 translate 2872 -1148 80 0 360 arc fill -400 -3200 translate %ENDE: 3 %END-48 %END-47 %Platz für Text 800 3200 translate 0 0 0 0 setcmyk_olvcolor -700 -3100 moveto 2450 0 rlineto 0 1300 rlineto -2450 0 rlineto closepath fill 0 0 0 1 setcmyk_olvcolor -700 -3100 moveto 2450 0 rlineto 0 1300 rlineto -2450 0 rlineto closepath stroke 300 /TimesI-ISOL1 FS -650 -2050 moveto (Munsell V=2,5,8) show 250 /TimesI-ISOL1 FS -650 -2350 moveto 20 0 (a') ashow 250 /Times-ISOL1 FS 20 0 (=0,2191[) ashow 250 /TimesI-ISOL1 FS 20 0 (x/y) ashow 250 /Times-ISOL1 FS 20 0 (]) ashow 200 /Times-ISOL1 FS 0 120 rmoveto 20 0 (1/3) ashow 0 -120 rmoveto 250 /TimesI-ISOL1 FS -650 -2700 moveto 20 0 (b') ashow 250 /Times-ISOL1 FS 20 0 (=-0,08376[) ashow 250 /TimesI-ISOL1 FS 20 0 (z/y) ashow 250 /Times-ISOL1 FS 20 0 (]) ashow 200 /Times-ISOL1 FS 0 120 rmoveto 20 0 (1/3) ashow 0 -120 rmoveto 300 /TimesI-ISOL1 FS -650 -3050 moveto (CIELAB 1976) show -800 -3200 translate %Platz ACHTUNG Kurvenüberschreibung 0 0 0 1 setcmyk_olvcolor /xm 3200 def /ym 2000 def 250 /Times-ISOL1 FS xm 1000 add ym 300 add moveto (5R) show xm 150 add ym 700 add moveto (5Y) show xm 1000 sub ym 000 sub moveto (5G) show xm 400 add ym 900 sub moveto (5PB) show xm ym moveto (x) show 1 0 0 setrgbcolor xm 450 add ym 520 add moveto (CIE) show (09) show xm 700 sub ym 550 add moveto (CIE) show (10) show xm 700 sub ym 300 add moveto (CIE) show (11) show xm 600 sub ym 500 sub moveto (CIE) show (12) show grestore showpage %%Trailer