%!PS-Adobe-3.0 EPSF-3.0 OE420-7N.EPS %%BoundingBox: 70 82 785 580 %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: http://130.149.60.45/~farbmetrik/OE42/) /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1) /Subject (goto: http://www.ps.bam.de or http://130.149.60.45/~farbmetrik) /Keywords (image reproduction, colour devices, colour vision) /Creator (klaus.richter@mac.com) /CreationDate (D:2011030112000) /ModDate (D:2011030112000) /DOCINFO pdfmark07 [ /View [ /FitB ] /DOCVIEW pdfmark07 %END PDFDE011 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def /str {8 string } bind def /languagelevel where {pop languagelevel} {1} ifelse /PSL12 exch def /dictende {counttomark 2 idiv dup dict begin {def} repeat pop currentdict end} bind def /Times-Roman findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /Times-ISOL1 exch definefont pop /Times-Italic findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /TimesI-ISOL1 exch definefont pop /Times-Bold findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /TimesB-ISOL1 exch definefont pop /Times-BoldItalic findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /TimesBI-ISOL1 exch definefont pop /TS {200 /Times-ISOL1 FS} bind def /TK {250 /Times-ISOL1 FS} bind def /TM {300 /Times-ISOL1 FS} bind def /TG {350 /Times-ISOL1 FS} bind def /TIS {200 /TimesI-ISOL1 FS} bind def /TIK {250 /TimesI-ISOL1 FS} bind def /TIM {300 /TimesI-ISOL1 FS} bind def /TIG {350 /TimesI-ISOL1 FS} bind def /TBS {200 /TimesB-ISOL1 FS} bind def /TBK {250 /TimesB-ISOL1 FS} bind def /TBM {300 /TimesB-ISOL1 FS} bind def /TBG {350 /TimesB-ISOL1 FS} bind def /TBIS {200 /TimesBI-ISOL1 FS} bind def /TBIK {250 /TimesBI-ISOL1 FS} bind def /TBIM {300 /TimesBI-ISOL1 FS} bind def /TBIG {350 /TimesBI-ISOL1 FS} bind def /FileDaten (LECD monitor 1, anti glossy, no separation, D65) def /FileDatde (LECD\255Monitor 1, wenig Glanz, keine Separation, D65) def /xyYA 7560 array def %1080x7 /xyYA [ %produced with the settings of the LED-LCD (LECD) monitor; full white used %FILE LMT_1080_100828_1.TXT %no. r g b x y Y. Apple low glossy display. measurement 1 1 0.00000 0.00000 0.00000 0.3097 0.3049 45.10E-01 2 0.00000 0.00000 0.12549 0.1955 0.1229 6.00E+00 3 0.00000 0.00000 0.25098 0.1711 0.0840 8.03E+00 4 0.00000 0.00000 0.37647 0.1619 0.0697 1.08E+01 5 0.00000 0.00000 0.50196 0.1569 0.0627 1.39E+01 6 0.00000 0.00000 0.62353 0.1545 0.0604 1.65E+01 7 0.00000 0.00000 0.74902 0.1528 0.0584 1.93E+01 8 0.00000 0.00000 0.87451 0.1510 0.0573 2.45E+01 9 0.00000 0.00000 1.00000 0.1494 0.0566 3.13E+01 10 0.00000 0.12549 0.00000 0.2985 0.5380 25.76E+00 11 0.00000 0.12549 0.12549 0.2352 0.3339 27.47E+00 12 0.00000 0.12549 0.25098 0.2028 0.2291 29.58E+00 13 0.00000 0.12549 0.37647 0.1854 0.1721 3.25E+01 14 0.00000 0.12549 0.50196 0.1748 0.1392 3.56E+01 15 0.00000 0.12549 0.62353 0.1698 0.1242 3.81E+01 16 0.00000 0.12549 0.74902 0.1660 0.1125 4.10E+01 17 0.00000 0.12549 0.87451 0.1616 0.1001 4.62E+01 18 0.00000 0.12549 1.00000 0.1578 0.0906 5.32E+01 19 0.00000 0.25098 0.00000 0.2971 0.5810 48.04E+00 20 0.00000 0.25098 0.12549 0.2532 0.4257 49.98E+00 21 0.00000 0.25098 0.25098 0.2227 0.3173 52.18E+00 22 0.00000 0.25098 0.37647 0.2026 0.2459 5.51E+01 23 0.00000 0.25098 0.50196 0.1896 0.2002 5.83E+01 24 0.00000 0.25098 0.62353 0.1831 0.1778 6.09E+01 25 0.00000 0.25098 0.74902 0.1775 0.1595 6.38E+01 26 0.00000 0.25098 0.87451 0.1709 0.1390 6.91E+01 27 0.00000 0.25098 1.00000 0.1657 0.1225 7.63E+01 28 0.00000 0.37647 0.00000 0.2975 0.6013 76.76E+00 29 0.00000 0.37647 0.12549 0.2658 0.4850 78.95E+00 30 0.00000 0.37647 0.25098 0.2391 0.3870 81.25E+00 31 0.00000 0.37647 0.37647 0.2190 0.3123 8.43E+01 32 0.00000 0.37647 0.50196 0.2042 0.2596 8.75E+01 33 0.00000 0.37647 0.62353 0.1966 0.2319 9.00E+01 34 0.00000 0.37647 0.74902 0.1900 0.2086 9.30E+01 35 0.00000 0.37647 0.87451 0.1819 0.1811 9.84E+01 36 0.00000 0.37647 1.00000 0.1749 0.1582 10.59E+01 37 0.00000 0.50196 0.00000 0.2986 0.6088 9.93E+01 38 0.00000 0.50196 0.12549 0.2725 0.5118 10.16E+01 39 0.00000 0.50196 0.25098 0.2483 0.4233 10.40E+01 40 0.00000 0.50196 0.37647 0.2286 0.3501 10.69E+01 41 0.00000 0.50196 0.50196 0.2136 0.2958 11.02E+01 42 0.00000 0.50196 0.62353 0.2053 0.2662 11.28E+01 43 0.00000 0.50196 0.74902 0.1982 0.2403 11.57E+01 44 0.00000 0.50196 0.87451 0.1891 0.2093 12.12E+01 45 0.00000 0.50196 1.00000 0.1814 0.1826 12.88E+01 46 0.00000 0.62353 0.00000 0.2997 0.6137 12.04E+01 47 0.00000 0.62353 0.12549 0.2768 0.5300 12.29E+01 48 0.00000 0.62353 0.25098 0.2547 0.4489 12.53E+01 49 0.00000 0.62353 0.37647 0.2359 0.3785 12.82E+01 50 0.00000 0.62353 0.50196 0.2209 0.3241 13.16E+01 51 0.00000 0.62353 0.62353 0.2125 0.2932 13.41E+01 52 0.00000 0.62353 0.74902 0.2050 0.2663 13.72E+01 53 0.00000 0.62353 0.87451 0.1954 0.2326 14.25E+01 54 0.00000 0.62353 1.00000 0.1870 0.2034 15.03E+01 55 0.00000 0.74902 0.00000 0.3006 0.6185 15.35E+01 56 0.00000 0.74902 0.12549 0.2820 0.5496 15.61E+01 57 0.00000 0.74902 0.25098 0.2629 0.4784 15.85E+01 58 0.00000 0.74902 0.37647 0.2453 0.4129 16.14E+01 59 0.00000 0.74902 0.50196 0.2306 0.3595 16.48E+01 60 0.00000 0.74902 0.62353 0.2221 0.3284 16.74E+01 61 0.00000 0.74902 0.74902 0.2143 0.3003 17.04E+01 62 0.00000 0.74902 0.87451 0.2040 0.2645 17.59E+01 63 0.00000 0.74902 1.00000 0.1948 0.2320 18.36E+01 64 0.00000 0.87451 0.00000 0.3029 0.6223 20.22E+01 65 0.00000 0.87451 0.12549 0.2880 0.5680 20.47E+01 66 0.00000 0.87451 0.25098 0.2716 0.5077 20.71E+01 67 0.00000 0.87451 0.37647 0.2557 0.4493 21.00E+01 68 0.00000 0.87451 0.50196 0.2418 0.3989 21.33E+01 69 0.00000 0.87451 0.62353 0.2334 0.3684 21.59E+01 70 0.00000 0.87451 0.74902 0.2255 0.3400 21.89E+01 71 0.00000 0.87451 0.87451 0.2149 0.3026 22.43E+01 72 0.00000 0.87451 1.00000 0.2049 0.2674 23.20E+01 73 0.00000 1.00000 0.00000 0.3051 0.6255 26.47E+01 74 0.00000 1.00000 0.12549 0.2930 0.5823 26.63E+01 75 0.00000 1.00000 0.25098 0.2795 0.5320 26.82E+01 76 0.00000 1.00000 0.37647 0.2653 0.4809 27.10E+01 77 0.00000 1.00000 0.50196 0.2527 0.4346 27.40E+01 78 0.00000 1.00000 0.62353 0.2445 0.4057 27.65E+01 79 0.00000 1.00000 0.74902 0.2367 0.3781 27.95E+01 80 0.00000 1.00000 0.87451 0.2260 0.3402 28.45E+01 81 0.00000 1.00000 1.00000 0.2154 0.3032 29.14E+01 82 0.12549 0.00000 0.00000 0.5234 0.3247 12.74E+00 83 0.12549 0.00000 0.12549 0.3467 0.1931 14.25E+00 84 0.12549 0.00000 0.25098 0.2680 0.1345 16.31E+00 85 0.12549 0.00000 0.37647 0.2280 0.1052 1.91E+01 86 0.12549 0.00000 0.50196 0.2055 0.0895 2.23E+01 87 0.12549 0.00000 0.62353 0.1953 0.0825 2.48E+01 88 0.12549 0.00000 0.74902 0.1869 0.0774 2.77E+01 89 0.12549 0.00000 0.87451 0.1779 0.0721 3.28E+01 90 0.12549 0.00000 1.00000 0.1707 0.0686 3.96E+01 91 0.12549 0.12549 0.00000 0.4192 0.4693 34.11E+00 92 0.12549 0.12549 0.12549 0.3310 0.3331 35.84E+00 93 0.12549 0.12549 0.25098 0.2743 0.2447 37.98E+00 94 0.12549 0.12549 0.37647 0.2384 0.1897 4.09E+01 95 0.12549 0.12549 0.50196 0.2164 0.1557 4.41E+01 96 0.12549 0.12549 0.62353 0.2053 0.1393 4.66E+01 97 0.12549 0.12549 0.74902 0.1965 0.1261 4.95E+01 98 0.12549 0.12549 0.87451 0.1863 0.1118 5.47E+01 99 0.12549 0.12549 1.00000 0.1778 0.1007 6.16E+01 100 0.12549 0.25098 0.00000 0.3793 0.5245 56.45E+00 101 0.12549 0.25098 0.12549 0.3223 0.4088 58.42E+00 102 0.12549 0.25098 0.25098 0.2783 0.3181 60.65E+00 103 0.12549 0.25098 0.37647 0.2467 0.2531 6.36E+01 104 0.12549 0.25098 0.50196 0.2252 0.2095 6.68E+01 105 0.12549 0.25098 0.62353 0.2143 0.1873 6.94E+01 106 0.12549 0.25098 0.74902 0.2049 0.1691 7.24E+01 107 0.12549 0.25098 0.87451 0.1937 0.1480 7.77E+01 108 0.12549 0.25098 1.00000 0.1845 0.1307 8.47E+01 109 0.12549 0.37647 0.00000 0.3554 0.5581 85.21E+00 110 0.12549 0.37647 0.12549 0.3167 0.4642 87.43E+00 111 0.12549 0.37647 0.25098 0.2823 0.3799 89.77E+00 112 0.12549 0.37647 0.37647 0.2548 0.3127 9.29E+01 113 0.12549 0.37647 0.50196 0.2346 0.2634 9.61E+01 114 0.12549 0.37647 0.62353 0.2233 0.2373 9.88E+01 115 0.12549 0.37647 0.74902 0.2139 0.2145 10.17E+01 116 0.12549 0.37647 0.87451 0.2022 0.1873 10.70E+01 117 0.12549 0.37647 1.00000 0.1921 0.1647 11.44E+01 118 0.12549 0.50196 0.00000 0.3456 0.5731 10.78E+01 119 0.12549 0.50196 0.12549 0.3143 0.4920 11.02E+01 120 0.12549 0.50196 0.25098 0.2851 0.4137 11.26E+01 121 0.12549 0.50196 0.37647 0.2598 0.3473 11.55E+01 122 0.12549 0.50196 0.50196 0.2404 0.2966 11.88E+01 123 0.12549 0.50196 0.62353 0.2296 0.2686 12.14E+01 124 0.12549 0.50196 0.74902 0.2200 0.2442 12.45E+01 125 0.12549 0.50196 0.87451 0.2081 0.2140 12.99E+01 126 0.12549 0.50196 1.00000 0.1975 0.1880 13.73E+01 127 0.12549 0.62353 0.00000 0.3394 0.5825 12.89E+01 128 0.12549 0.62353 0.12549 0.3131 0.5105 13.14E+01 129 0.12549 0.62353 0.25098 0.2870 0.4382 13.39E+01 130 0.12549 0.62353 0.37647 0.2639 0.3737 13.68E+01 131 0.12549 0.62353 0.50196 0.2453 0.3230 14.02E+01 132 0.12549 0.62353 0.62353 0.2347 0.2940 14.28E+01 133 0.12549 0.62353 0.74902 0.2252 0.2684 14.59E+01 134 0.12549 0.62353 0.87451 0.2131 0.2362 15.13E+01 135 0.12549 0.62353 1.00000 0.2023 0.2079 15.89E+01 136 0.12549 0.74902 0.00000 0.3330 0.5925 16.21E+01 137 0.12549 0.74902 0.12549 0.3118 0.5316 16.47E+01 138 0.12549 0.74902 0.25098 0.2897 0.4669 16.71E+01 139 0.12549 0.74902 0.37647 0.2691 0.4065 17.01E+01 140 0.12549 0.74902 0.50196 0.2519 0.3566 17.34E+01 141 0.12549 0.74902 0.62353 0.2416 0.3273 17.61E+01 142 0.12549 0.74902 0.74902 0.2324 0.3006 17.91E+01 143 0.12549 0.74902 0.87451 0.2201 0.2664 18.46E+01 144 0.12549 0.74902 1.00000 0.2089 0.2353 19.22E+01 145 0.12549 0.87451 0.00000 0.3277 0.6021 21.09E+01 146 0.12549 0.87451 0.12549 0.3115 0.5523 21.33E+01 147 0.12549 0.87451 0.25098 0.2932 0.4967 21.58E+01 148 0.12549 0.87451 0.37647 0.2753 0.4420 21.87E+01 149 0.12549 0.87451 0.50196 0.2598 0.3945 22.20E+01 150 0.12549 0.87451 0.62353 0.2501 0.3655 22.46E+01 151 0.12549 0.87451 0.74902 0.2412 0.3386 22.77E+01 152 0.12549 0.87451 0.87451 0.2290 0.3030 23.31E+01 153 0.12549 0.87451 1.00000 0.2176 0.2694 24.06E+01 154 0.12549 1.00000 0.00000 0.3246 0.6092 27.33E+01 155 0.12549 1.00000 0.12549 0.3119 0.5686 27.47E+01 156 0.12549 1.00000 0.25098 0.2970 0.5216 27.68E+01 157 0.12549 1.00000 0.37647 0.2815 0.4731 27.95E+01 158 0.12549 1.00000 0.50196 0.2675 0.4292 28.27E+01 159 0.12549 1.00000 0.62353 0.2586 0.4016 28.52E+01 160 0.12549 1.00000 0.74902 0.2502 0.3752 28.81E+01 161 0.12549 1.00000 0.87451 0.2383 0.3392 29.32E+01 162 0.12549 1.00000 1.00000 0.2266 0.3041 30.00E+01 163 0.25098 0.00000 0.00000 0.5690 0.3289 19.93E+00 164 0.25098 0.00000 0.12549 0.4151 0.2251 21.44E+00 165 0.25098 0.00000 0.25098 0.3253 0.1646 23.52E+00 166 0.25098 0.00000 0.37647 0.2724 0.1298 2.64E+01 167 0.25098 0.00000 0.50196 0.2405 0.1088 2.95E+01 168 0.25098 0.00000 0.62353 0.2255 0.0993 3.20E+01 169 0.25098 0.00000 0.74902 0.2131 0.0918 3.49E+01 170 0.25098 0.00000 0.87451 0.1992 0.0841 4.01E+01 171 0.25098 0.00000 1.00000 0.1880 0.0780 4.67E+01 172 0.25098 0.12549 0.00000 0.4728 0.4389 41.39E+00 173 0.25098 0.12549 0.12549 0.3846 0.3335 43.13E+00 174 0.25098 0.12549 0.25098 0.3203 0.2556 45.28E+00 175 0.25098 0.12549 0.37647 0.2764 0.2028 4.82E+01 176 0.25098 0.12549 0.50196 0.2474 0.1682 5.14E+01 177 0.25098 0.12549 0.62353 0.2325 0.1510 5.39E+01 178 0.25098 0.12549 0.74902 0.2202 0.1372 5.69E+01 179 0.25098 0.12549 0.87451 0.2061 0.1212 6.20E+01 180 0.25098 0.12549 1.00000 0.1941 0.1089 6.90E+01 181 0.25098 0.25098 0.00000 0.4251 0.4930 63.75E+00 182 0.25098 0.25098 0.12549 0.3658 0.3990 65.73E+00 183 0.25098 0.25098 0.25098 0.3164 0.3197 67.98E+00 184 0.25098 0.25098 0.37647 0.2789 0.2595 7.10E+01 185 0.25098 0.25098 0.50196 0.2525 0.2173 7.42E+01 186 0.25098 0.25098 0.62353 0.2385 0.1955 7.68E+01 187 0.25098 0.25098 0.74902 0.2264 0.1769 7.97E+01 188 0.25098 0.25098 0.87451 0.2119 0.1553 8.50E+01 189 0.25098 0.25098 1.00000 0.1997 0.1375 9.21E+01 190 0.25098 0.37647 0.00000 0.3930 0.5303 9.27E+01 191 0.25098 0.37647 0.12549 0.3519 0.4506 9.49E+01 192 0.25098 0.37647 0.25098 0.3135 0.3761 9.73E+01 193 0.25098 0.37647 0.37647 0.2817 0.3140 10.02E+01 194 0.25098 0.37647 0.50196 0.2580 0.2673 10.35E+01 195 0.25098 0.37647 0.62353 0.2446 0.2419 10.61E+01 196 0.25098 0.37647 0.74902 0.2332 0.2197 10.91E+01 197 0.25098 0.37647 0.87451 0.2188 0.1927 11.44E+01 198 0.25098 0.37647 1.00000 0.2062 0.1699 12.17E+01 199 0.25098 0.50196 0.00000 0.3776 0.5481 11.51E+01 200 0.25098 0.50196 0.12549 0.3442 0.4779 11.76E+01 201 0.25098 0.50196 0.25098 0.3122 0.4076 12.00E+01 202 0.25098 0.50196 0.37647 0.2840 0.3463 12.29E+01 203 0.25098 0.50196 0.50196 0.2618 0.2984 12.62E+01 204 0.25098 0.50196 0.62353 0.2491 0.2714 12.88E+01 205 0.25098 0.50196 0.74902 0.2376 0.2476 13.18E+01 206 0.25098 0.50196 0.87451 0.2235 0.2181 13.72E+01 207 0.25098 0.50196 1.00000 0.2108 0.1923 14.47E+01 208 0.25098 0.62353 0.00000 0.3673 0.5604 13.64E+01 209 0.25098 0.62353 0.12549 0.3395 0.4970 13.89E+01 210 0.25098 0.62353 0.25098 0.3113 0.4312 14.13E+01 211 0.25098 0.62353 0.37647 0.2855 0.3713 14.42E+01 212 0.25098 0.62353 0.50196 0.2647 0.3234 14.76E+01 213 0.25098 0.62353 0.62353 0.2527 0.2956 15.02E+01 214 0.25098 0.62353 0.74902 0.2417 0.2708 15.33E+01 215 0.25098 0.62353 0.87451 0.2276 0.2392 15.86E+01 216 0.25098 0.62353 1.00000 0.2148 0.2115 16.63E+01 217 0.25098 0.74902 0.00000 0.3565 0.5738 16.95E+01 218 0.25098 0.74902 0.12549 0.3343 0.5188 17.21E+01 219 0.25098 0.74902 0.25098 0.3105 0.4592 17.45E+01 220 0.25098 0.74902 0.37647 0.2881 0.4027 17.75E+01 221 0.25098 0.74902 0.50196 0.2690 0.3554 18.09E+01 222 0.25098 0.74902 0.62353 0.2577 0.3274 18.36E+01 223 0.25098 0.74902 0.74902 0.2472 0.3016 18.66E+01 224 0.25098 0.74902 0.87451 0.2334 0.2682 19.19E+01 225 0.25098 0.74902 1.00000 0.2206 0.2380 19.96E+01 226 0.25098 0.87451 0.00000 0.3469 0.5864 21.82E+01 227 0.25098 0.87451 0.12549 0.3298 0.5404 22.07E+01 228 0.25098 0.87451 0.25098 0.3105 0.4887 22.32E+01 229 0.25098 0.87451 0.37647 0.2913 0.4371 22.61E+01 230 0.25098 0.87451 0.50196 0.2743 0.3920 22.95E+01 231 0.25098 0.87451 0.62353 0.2640 0.3642 23.21E+01 232 0.25098 0.87451 0.74902 0.2541 0.3383 23.51E+01 233 0.25098 0.87451 0.87451 0.2407 0.3037 24.05E+01 234 0.25098 0.87451 1.00000 0.2280 0.2711 24.81E+01 235 0.25098 1.00000 0.00000 0.3401 0.5963 28.07E+01 236 0.25098 1.00000 0.12549 0.3269 0.5584 28.22E+01 237 0.25098 1.00000 0.25098 0.3112 0.5138 28.42E+01 238 0.25098 1.00000 0.37647 0.2949 0.4678 28.70E+01 239 0.25098 1.00000 0.50196 0.2800 0.4258 29.02E+01 240 0.25098 1.00000 0.62353 0.2704 0.3993 29.27E+01 241 0.25098 1.00000 0.74902 0.2613 0.3739 29.56E+01 242 0.25098 1.00000 0.87451 0.2486 0.3389 30.07E+01 243 0.25098 1.00000 1.00000 0.2359 0.3048 30.75E+01 244 0.37647 0.00000 0.00000 0.5902 0.3307 26.72E+00 245 0.37647 0.00000 0.12549 0.4566 0.2444 28.24E+00 246 0.37647 0.00000 0.25098 0.3658 0.1858 30.33E+00 247 0.37647 0.00000 0.37647 0.3068 0.1483 3.32E+01 248 0.37647 0.00000 0.50196 0.2692 0.1245 3.63E+01 249 0.37647 0.00000 0.62353 0.2506 0.1133 3.89E+01 250 0.37647 0.00000 0.74902 0.2353 0.1043 4.18E+01 251 0.37647 0.00000 0.87451 0.2176 0.0943 4.69E+01 252 0.37647 0.00000 1.00000 0.2032 0.0864 5.35E+01 253 0.37647 0.12549 0.00000 0.5050 0.4206 48.27E+00 254 0.37647 0.12549 0.12549 0.4213 0.3337 50.02E+00 255 0.37647 0.12549 0.25098 0.3546 0.2638 52.18E+00 256 0.37647 0.12549 0.37647 0.3061 0.2134 5.52E+01 257 0.37647 0.12549 0.50196 0.2727 0.1786 5.83E+01 258 0.37647 0.12549 0.62353 0.2553 0.1611 6.09E+01 259 0.37647 0.12549 0.74902 0.2406 0.1465 6.38E+01 260 0.37647 0.12549 0.87451 0.2232 0.1296 6.90E+01 261 0.37647 0.12549 1.00000 0.2086 0.1160 7.59E+01 262 0.37647 0.25098 0.00000 0.4563 0.4717 70.67E+00 263 0.37647 0.25098 0.12549 0.3976 0.3920 72.64E+00 264 0.37647 0.25098 0.25098 0.3459 0.3210 74.91E+00 265 0.37647 0.25098 0.37647 0.3049 0.2649 7.80E+01 266 0.37647 0.25098 0.50196 0.2750 0.2239 8.11E+01 267 0.37647 0.25098 0.62353 0.2589 0.2024 8.38E+01 268 0.37647 0.25098 0.74902 0.2450 0.1839 8.67E+01 269 0.37647 0.25098 0.87451 0.2279 0.1619 9.20E+01 270 0.37647 0.25098 1.00000 0.2133 0.1435 9.91E+01 271 0.37647 0.37647 0.00000 0.4197 0.5102 9.97E+01 272 0.37647 0.37647 0.12549 0.3785 0.4407 10.19E+01 273 0.37647 0.37647 0.25098 0.3381 0.3732 10.43E+01 274 0.37647 0.37647 0.37647 0.3041 0.3153 10.72E+01 275 0.37647 0.37647 0.50196 0.2778 0.2705 11.04E+01 276 0.37647 0.37647 0.62353 0.2629 0.2458 11.30E+01 277 0.37647 0.37647 0.74902 0.2498 0.2243 11.61E+01 278 0.37647 0.37647 0.87451 0.2334 0.1976 12.14E+01 279 0.37647 0.37647 1.00000 0.2187 0.1746 12.87E+01 280 0.37647 0.50196 0.00000 0.4020 0.5295 12.21E+01 281 0.37647 0.50196 0.12549 0.3682 0.4668 12.45E+01 282 0.37647 0.50196 0.25098 0.3345 0.4027 12.69E+01 283 0.37647 0.50196 0.37647 0.3040 0.3455 12.98E+01 284 0.37647 0.50196 0.50196 0.2797 0.3000 13.32E+01 285 0.37647 0.50196 0.62353 0.2657 0.2740 13.58E+01 286 0.37647 0.50196 0.74902 0.2531 0.2509 13.89E+01 287 0.37647 0.50196 0.87451 0.2370 0.2218 14.43E+01 288 0.37647 0.50196 1.00000 0.2226 0.1962 15.17E+01 289 0.37647 0.62353 0.00000 0.3897 0.5432 14.33E+01 290 0.37647 0.62353 0.12549 0.3611 0.4857 14.58E+01 291 0.37647 0.62353 0.25098 0.3314 0.4253 14.82E+01 292 0.37647 0.62353 0.37647 0.3041 0.3693 15.12E+01 293 0.37647 0.62353 0.50196 0.2814 0.3237 15.46E+01 294 0.37647 0.62353 0.62353 0.2683 0.2970 15.72E+01 295 0.37647 0.62353 0.74902 0.2561 0.2728 16.02E+01 296 0.37647 0.62353 0.87451 0.2404 0.2423 16.57E+01 297 0.37647 0.62353 1.00000 0.2261 0.2146 17.32E+01 298 0.37647 0.74902 0.00000 0.3759 0.5582 17.64E+01 299 0.37647 0.74902 0.12549 0.3529 0.5081 17.91E+01 300 0.37647 0.74902 0.25098 0.3283 0.4527 18.15E+01 301 0.37647 0.74902 0.37647 0.3043 0.3994 18.44E+01 302 0.37647 0.74902 0.50196 0.2839 0.3545 18.79E+01 303 0.37647 0.74902 0.62353 0.2716 0.3275 19.05E+01 304 0.37647 0.74902 0.74902 0.2602 0.3026 19.35E+01 305 0.37647 0.74902 0.87451 0.2451 0.2702 19.90E+01 306 0.37647 0.74902 1.00000 0.2309 0.2404 20.66E+01 307 0.37647 0.87451 0.00000 0.3630 0.5733 22.52E+01 308 0.37647 0.87451 0.12549 0.3452 0.5308 22.77E+01 309 0.37647 0.87451 0.25098 0.3252 0.4819 23.01E+01 310 0.37647 0.87451 0.37647 0.3050 0.4330 23.31E+01 311 0.37647 0.87451 0.50196 0.2872 0.3899 23.65E+01 312 0.37647 0.87451 0.62353 0.2761 0.3633 23.91E+01 313 0.37647 0.87451 0.74902 0.2656 0.3380 24.21E+01 314 0.37647 0.87451 0.87451 0.2513 0.3044 24.75E+01 315 0.37647 0.87451 1.00000 0.2374 0.2726 25.51E+01 316 0.37647 1.00000 0.00000 0.3533 0.5854 28.76E+01 317 0.37647 1.00000 0.12549 0.3395 0.5495 28.92E+01 318 0.37647 1.00000 0.25098 0.3235 0.5072 29.13E+01 319 0.37647 1.00000 0.37647 0.3066 0.4633 29.39E+01 320 0.37647 1.00000 0.50196 0.2909 0.4230 29.72E+01 321 0.37647 1.00000 0.62353 0.2809 0.3974 29.96E+01 322 0.37647 1.00000 0.74902 0.2713 0.3728 30.26E+01 323 0.37647 1.00000 0.87451 0.2578 0.3388 30.77E+01 324 0.37647 1.00000 1.00000 0.2445 0.3054 31.44E+01 325 0.50196 0.00000 0.00000 0.6010 0.3317 32.27E+00 326 0.50196 0.00000 0.12549 0.4812 0.2558 33.79E+00 327 0.50196 0.00000 0.25098 0.3921 0.1995 35.89E+00 328 0.50196 0.00000 0.37647 0.3303 0.1612 3.88E+01 329 0.50196 0.00000 0.50196 0.2898 0.1358 4.19E+01 330 0.50196 0.00000 0.62353 0.2690 0.1234 4.44E+01 331 0.50196 0.00000 0.74902 0.2520 0.1133 4.73E+01 332 0.50196 0.00000 0.87451 0.2317 0.1019 5.24E+01 333 0.50196 0.00000 1.00000 0.2149 0.0930 5.91E+01 334 0.50196 0.12549 0.00000 0.5238 0.4100 53.88E+00 335 0.50196 0.12549 0.12549 0.4444 0.3340 55.64E+00 336 0.50196 0.12549 0.25098 0.3777 0.2694 57.80E+00 337 0.50196 0.12549 0.37647 0.3272 0.2204 6.07E+01 338 0.50196 0.12549 0.50196 0.2909 0.1864 6.40E+01 339 0.50196 0.12549 0.62353 0.2720 0.1684 6.65E+01 340 0.50196 0.12549 0.74902 0.2559 0.1533 6.94E+01 341 0.50196 0.12549 0.87451 0.2363 0.1358 7.46E+01 342 0.50196 0.12549 1.00000 0.2197 0.1215 8.15E+01 343 0.50196 0.25098 0.00000 0.4761 0.4581 76.30E+00 344 0.50196 0.25098 0.12549 0.4186 0.3874 78.28E+00 345 0.50196 0.25098 0.25098 0.3663 0.3219 80.55E+00 346 0.50196 0.25098 0.37647 0.3238 0.2686 8.36E+01 347 0.50196 0.25098 0.50196 0.2916 0.2288 8.68E+01 348 0.50196 0.25098 0.62353 0.2741 0.2075 8.94E+01 349 0.50196 0.25098 0.74902 0.2587 0.1891 9.24E+01 350 0.50196 0.25098 0.87451 0.2401 0.1666 9.75E+01 351 0.50196 0.25098 1.00000 0.2236 0.1480 10.47E+01 352 0.50196 0.37647 0.00000 0.4387 0.4962 10.53E+01 353 0.50196 0.37647 0.12549 0.3969 0.4336 10.75E+01 354 0.50196 0.37647 0.25098 0.3558 0.3710 11.00E+01 355 0.50196 0.37647 0.37647 0.3204 0.3160 11.28E+01 356 0.50196 0.37647 0.50196 0.2925 0.2730 11.61E+01 357 0.50196 0.37647 0.62353 0.2766 0.2489 11.87E+01 358 0.50196 0.37647 0.74902 0.2623 0.2277 12.18E+01 359 0.50196 0.37647 0.87451 0.2443 0.2013 12.71E+01 360 0.50196 0.37647 1.00000 0.2284 0.1782 13.44E+01 361 0.50196 0.50196 0.00000 0.4188 0.5166 12.78E+01 362 0.50196 0.50196 0.12549 0.3850 0.4591 13.02E+01 363 0.50196 0.50196 0.25098 0.3505 0.3993 13.26E+01 364 0.50196 0.50196 0.37647 0.3187 0.3452 13.56E+01 365 0.50196 0.50196 0.50196 0.2933 0.3013 13.89E+01 366 0.50196 0.50196 0.62353 0.2783 0.2760 14.15E+01 367 0.50196 0.50196 0.74902 0.2648 0.2534 14.46E+01 368 0.50196 0.50196 0.87451 0.2475 0.2246 14.99E+01 369 0.50196 0.50196 1.00000 0.2317 0.1992 15.74E+01 370 0.50196 0.62353 0.00000 0.4054 0.5308 14.90E+01 371 0.50196 0.62353 0.12549 0.3764 0.4776 15.15E+01 372 0.50196 0.62353 0.25098 0.3460 0.4212 15.40E+01 373 0.50196 0.62353 0.37647 0.3176 0.3681 15.69E+01 374 0.50196 0.62353 0.50196 0.2941 0.3240 16.03E+01 375 0.50196 0.62353 0.62353 0.2800 0.2981 16.29E+01 376 0.50196 0.62353 0.74902 0.2671 0.2746 16.59E+01 377 0.50196 0.62353 0.87451 0.2503 0.2443 17.13E+01 378 0.50196 0.62353 1.00000 0.2348 0.2172 17.90E+01 379 0.50196 0.74902 0.00000 0.3900 0.5472 18.21E+01 380 0.50196 0.74902 0.12549 0.3665 0.5000 18.47E+01 381 0.50196 0.74902 0.25098 0.3412 0.4480 18.72E+01 382 0.50196 0.74902 0.37647 0.3165 0.3973 19.02E+01 383 0.50196 0.74902 0.50196 0.2952 0.3537 19.35E+01 384 0.50196 0.74902 0.62353 0.2824 0.3276 19.62E+01 385 0.50196 0.74902 0.74902 0.2702 0.3034 19.93E+01 386 0.50196 0.74902 0.87451 0.2542 0.2715 20.46E+01 387 0.50196 0.74902 1.00000 0.2390 0.2422 21.23E+01 388 0.50196 0.87451 0.00000 0.3750 0.5637 23.09E+01 389 0.50196 0.87451 0.12549 0.3569 0.5232 23.34E+01 390 0.50196 0.87451 0.25098 0.3364 0.4767 23.58E+01 391 0.50196 0.87451 0.37647 0.3156 0.4300 23.88E+01 392 0.50196 0.87451 0.50196 0.2971 0.3882 24.21E+01 393 0.50196 0.87451 0.62353 0.2854 0.3624 24.48E+01 394 0.50196 0.87451 0.74902 0.2744 0.3379 24.78E+01 395 0.50196 0.87451 0.87451 0.2593 0.3050 25.32E+01 396 0.50196 0.87451 1.00000 0.2448 0.2737 26.08E+01 397 0.50196 1.00000 0.00000 0.3634 0.5770 29.33E+01 398 0.50196 1.00000 0.12549 0.3494 0.5429 29.49E+01 399 0.50196 1.00000 0.25098 0.3330 0.5023 29.70E+01 400 0.50196 1.00000 0.37647 0.3155 0.4599 29.97E+01 401 0.50196 1.00000 0.50196 0.2994 0.4208 30.29E+01 402 0.50196 1.00000 0.62353 0.2891 0.3959 30.54E+01 403 0.50196 1.00000 0.74902 0.2790 0.3718 30.82E+01 404 0.50196 1.00000 0.87451 0.2651 0.3387 31.34E+01 405 0.50196 1.00000 1.00000 0.2511 0.3058 32.01E+01 406 0.62353 0.00000 0.00000 0.6093 0.3325 38.17E+00 407 0.62353 0.00000 0.12549 0.5015 0.2652 39.70E+00 408 0.62353 0.00000 0.25098 0.4153 0.2116 41.81E+00 409 0.62353 0.00000 0.37647 0.3524 0.1729 4.47E+01 410 0.62353 0.00000 0.50196 0.3093 0.1465 4.78E+01 411 0.62353 0.00000 0.62353 0.2868 0.1332 5.03E+01 412 0.62353 0.00000 0.74902 0.2681 0.1222 5.32E+01 413 0.62353 0.00000 0.87451 0.2456 0.1098 5.84E+01 414 0.62353 0.00000 1.00000 0.2268 0.0995 6.50E+01 415 0.62353 0.12549 0.00000 0.5393 0.4014 59.83E+00 416 0.62353 0.12549 0.12549 0.4645 0.3341 61.59E+00 417 0.62353 0.12549 0.25098 0.3987 0.2744 63.77E+00 418 0.62353 0.12549 0.37647 0.3467 0.2274 6.67E+01 419 0.62353 0.12549 0.50196 0.3088 0.1934 6.99E+01 420 0.62353 0.12549 0.62353 0.2883 0.1754 7.24E+01 421 0.62353 0.12549 0.74902 0.2710 0.1600 7.53E+01 422 0.62353 0.12549 0.87451 0.2493 0.1421 8.06E+01 423 0.62353 0.12549 1.00000 0.2309 0.1269 8.74E+01 424 0.62353 0.25098 0.00000 0.4935 0.4464 8.24E+01 425 0.62353 0.25098 0.12549 0.4378 0.3833 8.44E+01 426 0.62353 0.25098 0.25098 0.3852 0.3230 8.67E+01 427 0.62353 0.25098 0.37647 0.3413 0.2721 8.96E+01 428 0.62353 0.25098 0.50196 0.3077 0.2336 9.28E+01 429 0.62353 0.25098 0.62353 0.2889 0.2125 9.54E+01 430 0.62353 0.25098 0.74902 0.2727 0.1941 9.83E+01 431 0.62353 0.25098 0.87451 0.2523 0.1717 10.36E+01 432 0.62353 0.25098 1.00000 0.2342 0.1526 11.06E+01 433 0.62353 0.37647 0.00000 0.4552 0.4839 11.13E+01 434 0.62353 0.37647 0.12549 0.4139 0.4271 11.36E+01 435 0.62353 0.37647 0.25098 0.3729 0.3688 11.59E+01 436 0.62353 0.37647 0.37647 0.3363 0.3168 11.88E+01 437 0.62353 0.37647 0.50196 0.3069 0.2755 12.21E+01 438 0.62353 0.37647 0.62353 0.2901 0.2519 12.47E+01 439 0.62353 0.37647 0.74902 0.2748 0.2310 12.77E+01 440 0.62353 0.37647 0.87451 0.2556 0.2048 13.30E+01 441 0.62353 0.37647 1.00000 0.2382 0.1819 14.04E+01 442 0.62353 0.50196 0.00000 0.4349 0.5043 13.37E+01 443 0.62353 0.50196 0.12549 0.4011 0.4516 13.61E+01 444 0.62353 0.50196 0.25098 0.3658 0.3961 13.86E+01 445 0.62353 0.50196 0.37647 0.3334 0.3446 14.15E+01 446 0.62353 0.50196 0.50196 0.3065 0.3025 14.49E+01 447 0.62353 0.50196 0.62353 0.2909 0.2777 14.74E+01 448 0.62353 0.50196 0.74902 0.2766 0.2557 15.05E+01 449 0.62353 0.50196 0.87451 0.2581 0.2275 15.59E+01 450 0.62353 0.50196 1.00000 0.2410 0.2023 16.34E+01 451 0.62353 0.62353 0.00000 0.4203 0.5191 15.50E+01 452 0.62353 0.62353 0.12549 0.3913 0.4701 15.74E+01 453 0.62353 0.62353 0.25098 0.3603 0.4172 15.99E+01 454 0.62353 0.62353 0.37647 0.3311 0.3666 16.29E+01 455 0.62353 0.62353 0.50196 0.3063 0.3243 16.62E+01 456 0.62353 0.62353 0.62353 0.2916 0.2993 16.89E+01 457 0.62353 0.62353 0.74902 0.2780 0.2763 17.19E+01 458 0.62353 0.62353 0.87451 0.2602 0.2467 17.74E+01 459 0.62353 0.62353 1.00000 0.2437 0.2197 18.49E+01 460 0.62353 0.74902 0.00000 0.4035 0.5364 18.81E+01 461 0.62353 0.74902 0.12549 0.3796 0.4925 19.07E+01 462 0.62353 0.74902 0.25098 0.3540 0.4432 19.32E+01 463 0.62353 0.74902 0.37647 0.3286 0.3949 19.61E+01 464 0.62353 0.74902 0.50196 0.3064 0.3531 19.96E+01 465 0.62353 0.74902 0.62353 0.2930 0.3278 20.22E+01 466 0.62353 0.74902 0.74902 0.2803 0.3042 20.53E+01 467 0.62353 0.74902 0.87451 0.2634 0.2730 21.07E+01 468 0.62353 0.74902 1.00000 0.2473 0.2441 21.83E+01 469 0.62353 0.87451 0.00000 0.3867 0.5542 23.69E+01 470 0.62353 0.87451 0.12549 0.3682 0.5161 23.94E+01 471 0.62353 0.87451 0.25098 0.3475 0.4718 24.18E+01 472 0.62353 0.87451 0.37647 0.3261 0.4269 24.48E+01 473 0.62353 0.87451 0.50196 0.3069 0.3867 24.81E+01 474 0.62353 0.87451 0.62353 0.2948 0.3616 25.08E+01 475 0.62353 0.87451 0.74902 0.2834 0.3378 25.38E+01 476 0.62353 0.87451 0.87451 0.2676 0.3056 25.92E+01 477 0.62353 0.87451 1.00000 0.2523 0.2749 26.68E+01 478 0.62353 1.00000 0.00000 0.3732 0.5690 29.94E+01 479 0.62353 1.00000 0.12549 0.3591 0.5363 30.09E+01 480 0.62353 1.00000 0.25098 0.3424 0.4973 30.30E+01 481 0.62353 1.00000 0.37647 0.3246 0.4564 30.57E+01 482 0.62353 1.00000 0.50196 0.3079 0.4187 30.89E+01 483 0.62353 1.00000 0.62353 0.2973 0.3944 31.14E+01 484 0.62353 1.00000 0.74902 0.2870 0.3710 31.43E+01 485 0.62353 1.00000 0.87451 0.2725 0.3385 31.94E+01 486 0.62353 1.00000 1.00000 0.2579 0.3063 32.61E+01 487 0.74902 0.00000 0.00000 0.6186 0.3334 47.84E+00 488 0.74902 0.00000 0.12549 0.5262 0.2767 49.38E+00 489 0.74902 0.00000 0.25098 0.4458 0.2278 5.17E+01 490 0.74902 0.00000 0.37647 0.3829 0.1890 5.43E+01 491 0.74902 0.00000 0.50196 0.3372 0.1618 5.75E+01 492 0.74902 0.00000 0.62353 0.3129 0.1475 6.00E+01 493 0.74902 0.00000 0.74902 0.2920 0.1354 6.29E+01 494 0.74902 0.00000 0.87451 0.2666 0.1213 6.80E+01 495 0.74902 0.00000 1.00000 0.2449 0.1095 7.47E+01 496 0.74902 0.12549 0.00000 0.5584 0.3911 6.97E+01 497 0.74902 0.12549 0.12549 0.4902 0.3347 7.15E+01 498 0.74902 0.12549 0.25098 0.4270 0.2813 7.36E+01 499 0.74902 0.12549 0.37647 0.3742 0.2370 7.64E+01 500 0.74902 0.12549 0.50196 0.3343 0.2039 7.96E+01 501 0.74902 0.12549 0.62353 0.3121 0.1859 8.22E+01 502 0.74902 0.12549 0.74902 0.2927 0.1705 8.52E+01 503 0.74902 0.12549 0.87451 0.2689 0.1514 9.03E+01 504 0.74902 0.12549 1.00000 0.2480 0.1353 9.71E+01 505 0.74902 0.25098 0.00000 0.5152 0.4319 9.22E+01 506 0.74902 0.25098 0.12549 0.4631 0.3776 9.41E+01 507 0.74902 0.25098 0.25098 0.4116 0.3241 9.64E+01 508 0.74902 0.25098 0.37647 0.3665 0.2771 9.93E+01 509 0.74902 0.25098 0.50196 0.3312 0.2405 10.26E+01 510 0.74902 0.25098 0.62353 0.3112 0.2198 10.51E+01 511 0.74902 0.25098 0.74902 0.2932 0.2017 10.81E+01 512 0.74902 0.25098 0.87451 0.2706 0.1792 11.33E+01 513 0.74902 0.25098 1.00000 0.2504 0.1597 12.04E+01 514 0.74902 0.37647 0.00000 0.4772 0.4679 12.11E+01 515 0.74902 0.37647 0.12549 0.4376 0.4180 12.33E+01 516 0.74902 0.37647 0.25098 0.3967 0.3659 12.56E+01 517 0.74902 0.37647 0.37647 0.3587 0.3182 12.86E+01 518 0.74902 0.37647 0.50196 0.3282 0.2791 13.19E+01 519 0.74902 0.37647 0.62353 0.3101 0.2565 13.45E+01 520 0.74902 0.37647 0.74902 0.2938 0.2362 13.75E+01 521 0.74902 0.37647 0.87451 0.2725 0.2105 14.29E+01 522 0.74902 0.37647 1.00000 0.2533 0.1875 15.02E+01 523 0.74902 0.50196 0.00000 0.4565 0.4881 14.35E+01 524 0.74902 0.50196 0.12549 0.4231 0.4416 14.59E+01 525 0.74902 0.50196 0.25098 0.3880 0.3914 14.83E+01 526 0.74902 0.50196 0.37647 0.3543 0.3440 15.13E+01 527 0.74902 0.50196 0.50196 0.3263 0.3043 15.47E+01 528 0.74902 0.50196 0.62353 0.3097 0.2808 15.73E+01 529 0.74902 0.50196 0.74902 0.2943 0.2595 16.04E+01 530 0.74902 0.50196 0.87451 0.2740 0.2319 16.57E+01 531 0.74902 0.50196 1.00000 0.2554 0.2069 17.31E+01 532 0.74902 0.62353 0.00000 0.4411 0.5031 16.47E+01 533 0.74902 0.62353 0.12549 0.4122 0.4595 16.72E+01 534 0.74902 0.62353 0.25098 0.3810 0.4113 16.97E+01 535 0.74902 0.62353 0.37647 0.3507 0.3647 17.27E+01 536 0.74902 0.62353 0.50196 0.3250 0.3248 17.60E+01 537 0.74902 0.62353 0.62353 0.3092 0.3010 17.87E+01 538 0.74902 0.62353 0.74902 0.2948 0.2788 18.17E+01 539 0.74902 0.62353 0.87451 0.2755 0.2501 18.72E+01 540 0.74902 0.62353 1.00000 0.2573 0.2236 19.47E+01 541 0.74902 0.74902 0.00000 0.4226 0.5213 19.79E+01 542 0.74902 0.74902 0.12549 0.3990 0.4816 20.05E+01 543 0.74902 0.74902 0.25098 0.3727 0.4366 20.30E+01 544 0.74902 0.74902 0.37647 0.3465 0.3916 20.60E+01 545 0.74902 0.74902 0.50196 0.3234 0.3521 20.93E+01 546 0.74902 0.74902 0.62353 0.3091 0.3280 21.20E+01 547 0.74902 0.74902 0.74902 0.2956 0.3054 21.51E+01 548 0.74902 0.74902 0.87451 0.2775 0.2752 22.05E+01 549 0.74902 0.74902 1.00000 0.2601 0.2470 22.81E+01 550 0.74902 0.87451 0.00000 0.4036 0.5405 24.67E+01 551 0.74902 0.87451 0.12549 0.3851 0.5055 24.91E+01 552 0.74902 0.87451 0.25098 0.3639 0.4645 25.16E+01 553 0.74902 0.87451 0.37647 0.3419 0.4225 25.46E+01 554 0.74902 0.87451 0.50196 0.3218 0.3844 25.80E+01 555 0.74902 0.87451 0.62353 0.3093 0.3604 26.06E+01 556 0.74902 0.87451 0.74902 0.2971 0.3376 26.36E+01 557 0.74902 0.87451 0.87451 0.2804 0.3065 26.90E+01 558 0.74902 0.87451 1.00000 0.2640 0.2766 27.65E+01 559 0.74902 1.00000 0.00000 0.3881 0.5567 30.91E+01 560 0.74902 1.00000 0.12549 0.3737 0.5264 31.06E+01 561 0.74902 1.00000 0.25098 0.3565 0.4900 31.28E+01 562 0.74902 1.00000 0.37647 0.3382 0.4514 31.55E+01 563 0.74902 1.00000 0.50196 0.3210 0.4154 31.87E+01 564 0.74902 1.00000 0.62353 0.3100 0.3922 32.11E+01 565 0.74902 1.00000 0.74902 0.2990 0.3698 32.41E+01 566 0.74902 1.00000 0.87451 0.2839 0.3383 32.92E+01 567 0.74902 1.00000 1.00000 0.2684 0.3072 33.59E+01 568 0.87451 0.00000 0.00000 0.6269 0.3344 6.14E+01 569 0.87451 0.00000 0.12549 0.5499 0.2877 6.29E+01 570 0.87451 0.00000 0.25098 0.4768 0.2436 6.50E+01 571 0.87451 0.00000 0.37647 0.4155 0.2068 6.77E+01 572 0.87451 0.00000 0.50196 0.3689 0.1793 7.09E+01 573 0.87451 0.00000 0.62353 0.3431 0.1642 7.34E+01 574 0.87451 0.00000 0.74902 0.3205 0.1512 7.63E+01 575 0.87451 0.00000 0.87451 0.2923 0.1354 8.14E+01 576 0.87451 0.00000 1.00000 0.2675 0.1220 8.81E+01 577 0.87451 0.12549 0.00000 0.5760 0.3813 8.30E+01 578 0.87451 0.12549 0.12549 0.5162 0.3349 8.48E+01 579 0.87451 0.12549 0.25098 0.4569 0.2887 8.70E+01 580 0.87451 0.12549 0.37647 0.4047 0.2477 8.97E+01 581 0.87451 0.12549 0.50196 0.3635 0.2160 9.30E+01 582 0.87451 0.12549 0.62353 0.3403 0.1981 9.55E+01 583 0.87451 0.12549 0.74902 0.3194 0.1825 9.85E+01 584 0.87451 0.12549 0.87451 0.2930 0.1628 10.36E+01 585 0.87451 0.12549 1.00000 0.2693 0.1458 11.04E+01 586 0.87451 0.25098 0.00000 0.5372 0.4170 10.55E+01 587 0.87451 0.25098 0.12549 0.4894 0.3720 10.74E+01 588 0.87451 0.25098 0.25098 0.4402 0.3254 10.97E+01 589 0.87451 0.25098 0.37647 0.3952 0.2827 11.25E+01 590 0.87451 0.25098 0.50196 0.3585 0.2485 11.59E+01 591 0.87451 0.25098 0.62353 0.3373 0.2285 11.84E+01 592 0.87451 0.25098 0.74902 0.3179 0.2108 12.14E+01 593 0.87451 0.25098 0.87451 0.2931 0.1884 12.67E+01 594 0.87451 0.25098 1.00000 0.2705 0.1685 13.37E+01 595 0.87451 0.37647 0.00000 0.5012 0.4506 13.44E+01 596 0.87451 0.37647 0.12549 0.4634 0.4084 13.66E+01 597 0.87451 0.37647 0.25098 0.4233 0.3627 13.90E+01 598 0.87451 0.37647 0.37647 0.3851 0.3196 14.19E+01 599 0.87451 0.37647 0.50196 0.3532 0.2834 14.52E+01 600 0.87451 0.37647 0.62353 0.3343 0.2619 14.78E+01 601 0.87451 0.37647 0.74902 0.3167 0.2424 15.08E+01 602 0.87451 0.37647 0.87451 0.2937 0.2172 15.61E+01 603 0.87451 0.37647 1.00000 0.2723 0.1946 16.35E+01 604 0.87451 0.50196 0.00000 0.4801 0.4702 15.69E+01 605 0.87451 0.50196 0.12549 0.4480 0.4304 15.93E+01 606 0.87451 0.50196 0.25098 0.4131 0.3861 16.17E+01 607 0.87451 0.50196 0.37647 0.3790 0.3431 16.46E+01 608 0.87451 0.50196 0.50196 0.3500 0.3064 16.80E+01 609 0.87451 0.50196 0.62353 0.3323 0.2843 17.06E+01 610 0.87451 0.50196 0.74902 0.3159 0.2639 17.37E+01 611 0.87451 0.50196 0.87451 0.2939 0.2372 17.90E+01 612 0.87451 0.50196 1.00000 0.2735 0.2127 18.64E+01 613 0.87451 0.62353 0.00000 0.4642 0.4854 17.81E+01 614 0.87451 0.62353 0.12549 0.4362 0.4473 18.05E+01 615 0.87451 0.62353 0.25098 0.4050 0.4046 18.30E+01 616 0.87451 0.62353 0.37647 0.3742 0.3623 18.60E+01 617 0.87451 0.62353 0.50196 0.3474 0.3254 18.94E+01 618 0.87451 0.62353 0.62353 0.3308 0.3030 19.21E+01 619 0.87451 0.62353 0.74902 0.3154 0.2820 19.51E+01 620 0.87451 0.62353 0.87451 0.2944 0.2543 20.05E+01 621 0.87451 0.62353 1.00000 0.2746 0.2285 20.80E+01 622 0.87451 0.74902 0.00000 0.4448 0.5039 21.12E+01 623 0.87451 0.74902 0.12549 0.4212 0.4691 21.38E+01 624 0.87451 0.74902 0.25098 0.3947 0.4286 21.63E+01 625 0.87451 0.74902 0.37647 0.3678 0.3876 21.94E+01 626 0.87451 0.74902 0.50196 0.3439 0.3510 22.27E+01 627 0.87451 0.74902 0.62353 0.3290 0.3282 22.53E+01 628 0.87451 0.74902 0.74902 0.3146 0.3070 22.85E+01 629 0.87451 0.74902 0.87451 0.2952 0.2781 23.39E+01 630 0.87451 0.74902 1.00000 0.2764 0.2508 24.15E+01 631 0.87451 0.87451 0.00000 0.4238 0.5242 26.00E+01 632 0.87451 0.87451 0.12549 0.4053 0.4930 26.25E+01 633 0.87451 0.87451 0.25098 0.3836 0.4557 26.49E+01 634 0.87451 0.87451 0.37647 0.3610 0.4170 26.80E+01 635 0.87451 0.87451 0.50196 0.3403 0.3815 27.13E+01 636 0.87451 0.87451 0.62353 0.3270 0.3591 27.40E+01 637 0.87451 0.87451 0.74902 0.3143 0.3374 27.69E+01 638 0.87451 0.87451 0.87451 0.2964 0.3078 28.24E+01 639 0.87451 0.87451 1.00000 0.2789 0.2789 28.99E+01 640 0.87451 1.00000 0.00000 0.4059 0.5423 32.23E+01 641 0.87451 1.00000 0.12549 0.3913 0.5144 32.39E+01 642 0.87451 1.00000 0.25098 0.3737 0.4810 32.61E+01 643 0.87451 1.00000 0.37647 0.3551 0.4450 32.87E+01 644 0.87451 1.00000 0.50196 0.3373 0.4113 33.20E+01 645 0.87451 1.00000 0.62353 0.3257 0.3895 33.45E+01 646 0.87451 1.00000 0.74902 0.3144 0.3681 33.73E+01 647 0.87451 1.00000 0.87451 0.2982 0.3383 34.26E+01 648 0.87451 1.00000 1.00000 0.2819 0.3082 34.92E+01 649 1.00000 0.00000 0.00000 0.6340 0.3345 7.86E+01 650 1.00000 0.00000 0.12549 0.5703 0.2964 8.01E+01 651 1.00000 0.00000 0.25098 0.5055 0.2581 8.23E+01 652 1.00000 0.00000 0.37647 0.4476 0.2237 8.50E+01 653 1.00000 0.00000 0.50196 0.4014 0.1965 8.81E+01 654 1.00000 0.00000 0.62353 0.3749 0.1813 9.07E+01 655 1.00000 0.00000 0.74902 0.3510 0.1678 9.36E+01 656 1.00000 0.00000 0.87451 0.3208 0.1508 9.86E+01 657 1.00000 0.00000 1.00000 0.2935 0.1361 10.52E+01 658 1.00000 0.12549 0.00000 0.5915 0.3727 10.00E+01 659 1.00000 0.12549 0.12549 0.5398 0.3344 10.16E+01 660 1.00000 0.12549 0.25098 0.4853 0.2947 10.39E+01 661 1.00000 0.12549 0.37647 0.4350 0.2576 10.66E+01 662 1.00000 0.12549 0.50196 0.3939 0.2278 10.99E+01 663 1.00000 0.12549 0.62353 0.3696 0.2104 11.24E+01 664 1.00000 0.12549 0.74902 0.3477 0.1950 11.54E+01 665 1.00000 0.12549 0.87451 0.3193 0.1751 12.05E+01 666 1.00000 0.12549 1.00000 0.2935 0.1576 12.73E+01 667 1.00000 0.25098 0.00000 0.5575 0.4036 12.24E+01 668 1.00000 0.25098 0.12549 0.5140 0.3666 12.44E+01 669 1.00000 0.25098 0.25098 0.4679 0.3262 12.66E+01 670 1.00000 0.25098 0.37647 0.4239 0.2879 12.94E+01 671 1.00000 0.25098 0.50196 0.3870 0.2562 13.28E+01 672 1.00000 0.25098 0.62353 0.3650 0.2373 13.53E+01 673 1.00000 0.25098 0.74902 0.3448 0.2203 13.83E+01 674 1.00000 0.25098 0.87451 0.3182 0.1982 14.35E+01 675 1.00000 0.25098 1.00000 0.2936 0.1784 15.05E+01 676 1.00000 0.37647 0.00000 0.5241 0.4340 15.12E+01 677 1.00000 0.37647 0.12549 0.4886 0.3987 15.35E+01 678 1.00000 0.37647 0.25098 0.4499 0.3593 15.59E+01 679 1.00000 0.37647 0.37647 0.4122 0.3203 15.87E+01 680 1.00000 0.37647 0.50196 0.3797 0.2873 16.21E+01 681 1.00000 0.37647 0.62353 0.3599 0.2674 16.48E+01 682 1.00000 0.37647 0.74902 0.3414 0.2488 16.77E+01 683 1.00000 0.37647 0.87451 0.3170 0.2246 17.30E+01 684 1.00000 0.37647 1.00000 0.2939 0.2024 18.02E+01 685 1.00000 0.50196 0.00000 0.5035 0.4527 17.37E+01 686 1.00000 0.50196 0.12549 0.4726 0.4189 17.61E+01 687 1.00000 0.50196 0.25098 0.4386 0.3802 17.85E+01 688 1.00000 0.50196 0.37647 0.4048 0.3417 18.15E+01 689 1.00000 0.50196 0.50196 0.3750 0.3082 18.49E+01 690 1.00000 0.50196 0.62353 0.3566 0.2876 18.75E+01 691 1.00000 0.50196 0.74902 0.3395 0.2685 19.05E+01 692 1.00000 0.50196 0.87451 0.3163 0.2430 19.59E+01 693 1.00000 0.50196 1.00000 0.2942 0.2194 20.32E+01 694 1.00000 0.62353 0.00000 0.4875 0.4674 19.49E+01 695 1.00000 0.62353 0.12549 0.4603 0.4350 19.74E+01 696 1.00000 0.62353 0.25098 0.4295 0.3973 19.99E+01 697 1.00000 0.62353 0.37647 0.3988 0.3593 20.28E+01 698 1.00000 0.62353 0.50196 0.3711 0.3257 20.63E+01 699 1.00000 0.62353 0.62353 0.3541 0.3047 20.89E+01 700 1.00000 0.62353 0.74902 0.3379 0.2850 21.19E+01 701 1.00000 0.62353 0.87451 0.3157 0.2588 21.73E+01 702 1.00000 0.62353 1.00000 0.2944 0.2341 22.48E+01 703 1.00000 0.74902 0.00000 0.4675 0.4860 22.79E+01 704 1.00000 0.74902 0.12549 0.4443 0.4557 23.06E+01 705 1.00000 0.74902 0.25098 0.4180 0.4197 23.30E+01 706 1.00000 0.74902 0.37647 0.3908 0.3827 23.61E+01 707 1.00000 0.74902 0.50196 0.3662 0.3493 23.95E+01 708 1.00000 0.74902 0.62353 0.3506 0.3282 24.22E+01 709 1.00000 0.74902 0.74902 0.3357 0.3082 24.53E+01 710 1.00000 0.74902 0.87451 0.3151 0.2809 25.06E+01 711 1.00000 0.74902 1.00000 0.2951 0.2549 25.81E+01 712 1.00000 0.87451 0.00000 0.4452 0.5071 27.67E+01 713 1.00000 0.87451 0.12549 0.4268 0.4793 27.91E+01 714 1.00000 0.87451 0.25098 0.4048 0.4459 28.16E+01 715 1.00000 0.87451 0.37647 0.3818 0.4105 28.46E+01 716 1.00000 0.87451 0.50196 0.3605 0.3779 28.80E+01 717 1.00000 0.87451 0.62353 0.3468 0.3569 29.06E+01 718 1.00000 0.87451 0.74902 0.3334 0.3367 29.36E+01 719 1.00000 0.87451 0.87451 0.3147 0.3088 29.90E+01 720 1.00000 0.87451 1.00000 0.2961 0.2816 30.65E+01 721 1.00000 1.00000 0.00000 0.4251 0.5266 33.88E+01 722 1.00000 1.00000 0.12549 0.4105 0.5014 34.03E+01 723 1.00000 1.00000 0.25098 0.3928 0.4707 34.24E+01 724 1.00000 1.00000 0.37647 0.3735 0.4376 34.52E+01 725 1.00000 1.00000 0.50196 0.3553 0.4062 34.83E+01 726 1.00000 1.00000 0.62353 0.3432 0.3859 35.09E+01 727 1.00000 1.00000 0.74902 0.3314 0.3659 35.38E+01 728 1.00000 1.00000 0.87451 0.3145 0.3377 35.89E+01 729 1.00000 1.00000 1.00000 0.2974 0.3093 36.55E+01 730 1.00000 1.00000 1.00000 0.2974 0.3093 36.54E+01 731 0.87451 1.00000 1.00000 0.2819 0.3082 34.92E+01 732 0.74902 1.00000 1.00000 0.2684 0.3071 33.59E+01 733 0.62353 1.00000 1.00000 0.2579 0.3063 32.62E+01 734 0.50196 1.00000 1.00000 0.2511 0.3058 32.02E+01 735 0.37647 1.00000 1.00000 0.2444 0.3053 31.45E+01 736 0.25098 1.00000 1.00000 0.2360 0.3047 30.75E+01 737 0.12549 1.00000 1.00000 0.2266 0.3040 30.01E+01 738 0.00000 1.00000 1.00000 0.2155 0.3031 29.15E+01 739 1.00000 0.87451 0.87451 0.3147 0.3088 29.90E+01 740 0.87451 0.87451 0.87451 0.2965 0.3078 28.24E+01 741 0.74902 0.87451 0.87451 0.2803 0.3066 26.90E+01 742 0.62353 0.87451 0.87451 0.2676 0.3056 25.93E+01 743 0.50196 0.87451 0.87451 0.2593 0.3050 25.33E+01 744 0.37647 0.87451 0.87451 0.2512 0.3044 24.76E+01 745 0.25098 0.87451 0.87451 0.2406 0.3037 24.07E+01 746 0.12549 0.87451 0.87451 0.2290 0.3029 23.32E+01 747 0.00000 0.87451 0.87451 0.2150 0.3025 22.44E+01 748 1.00000 0.74902 0.74902 0.3357 0.3082 24.52E+01 749 0.87451 0.74902 0.74902 0.3147 0.3070 22.85E+01 750 0.74902 0.74902 0.74902 0.2956 0.3054 21.51E+01 751 0.62353 0.74902 0.74902 0.2804 0.3041 20.53E+01 752 0.50196 0.74902 0.74902 0.2702 0.3033 19.93E+01 753 0.37647 0.74902 0.74902 0.2602 0.3027 19.37E+01 754 0.25098 0.74902 0.74902 0.2472 0.3016 18.67E+01 755 0.12549 0.74902 0.74902 0.2324 0.3006 17.93E+01 756 0.00000 0.74902 0.74902 0.2143 0.3002 17.05E+01 757 1.00000 0.62353 0.62353 0.3541 0.3046 20.88E+01 758 0.87451 0.62353 0.62353 0.3308 0.3029 19.20E+01 759 0.74902 0.62353 0.62353 0.3093 0.3009 17.87E+01 760 0.62353 0.62353 0.62353 0.2916 0.2992 16.90E+01 761 0.50196 0.62353 0.62353 0.2799 0.2982 16.31E+01 762 0.37647 0.62353 0.62353 0.2682 0.2969 15.73E+01 763 0.25098 0.62353 0.62353 0.2526 0.2955 15.03E+01 764 0.12549 0.62353 0.62353 0.2347 0.2940 14.29E+01 765 0.00000 0.62353 0.62353 0.2124 0.2932 13.43E+01 766 1.00000 0.50196 0.50196 0.3750 0.3081 18.48E+01 767 0.87451 0.50196 0.50196 0.3499 0.3063 16.80E+01 768 0.74902 0.50196 0.50196 0.3263 0.3041 15.47E+01 769 0.62353 0.50196 0.50196 0.3066 0.3024 14.50E+01 770 0.50196 0.50196 0.50196 0.2932 0.3010 13.89E+01 771 0.37647 0.50196 0.50196 0.2797 0.3000 13.33E+01 772 0.25098 0.50196 0.50196 0.2616 0.2984 12.64E+01 773 0.12549 0.50196 0.50196 0.2403 0.2967 11.90E+01 774 0.00000 0.50196 0.50196 0.2135 0.2957 11.04E+01 775 1.00000 0.37647 0.37647 0.4121 0.3204 15.87E+01 776 0.87451 0.37647 0.37647 0.3852 0.3195 14.19E+01 777 0.74902 0.37647 0.37647 0.3588 0.3180 12.86E+01 778 0.62353 0.37647 0.37647 0.3362 0.3167 11.89E+01 779 0.50196 0.37647 0.37647 0.3204 0.3159 11.29E+01 780 0.37647 0.37647 0.37647 0.3042 0.3150 10.73E+01 781 0.25098 0.37647 0.37647 0.2817 0.3138 10.04E+01 782 0.12549 0.37647 0.37647 0.2548 0.3126 9.30E+01 783 0.00000 0.37647 0.37647 0.2186 0.3122 8.44E+01 784 1.00000 0.25098 0.25098 0.4678 0.3261 12.66E+01 785 0.87451 0.25098 0.25098 0.4398 0.3254 10.98E+01 786 0.74902 0.25098 0.25098 0.4115 0.3242 9.65E+01 787 0.62353 0.25098 0.25098 0.3853 0.3228 8.67E+01 788 0.50196 0.25098 0.25098 0.3664 0.3222 8.08E+01 789 0.37647 0.25098 0.25098 0.3458 0.3209 75.00E+00 790 0.25098 0.25098 0.25098 0.3163 0.3196 68.11E+00 791 0.12549 0.25098 0.25098 0.2782 0.3180 60.79E+00 792 0.00000 0.25098 0.25098 0.2227 0.3172 52.32E+00 793 1.00000 0.12549 0.12549 0.5395 0.3345 10.17E+01 794 0.87451 0.12549 0.12549 0.5162 0.3349 8.48E+01 795 0.74902 0.12549 0.12549 0.4902 0.3347 7.15E+01 796 0.62353 0.12549 0.12549 0.4644 0.3341 61.63E+00 797 0.50196 0.12549 0.12549 0.4443 0.3339 55.69E+00 798 0.37647 0.12549 0.12549 0.4211 0.3337 50.09E+00 799 0.25098 0.12549 0.12549 0.3846 0.3334 43.22E+00 800 0.12549 0.12549 0.12549 0.3310 0.3331 35.94E+00 801 0.00000 0.12549 0.12549 0.2352 0.3339 27.55E+00 802 1.00000 0.00000 0.00000 0.6340 0.3345 7.86E+01 803 0.87451 0.00000 0.00000 0.6272 0.3341 6.13E+01 804 0.74902 0.00000 0.00000 0.6187 0.3333 47.84E+00 805 0.62353 0.00000 0.00000 0.6093 0.3325 38.19E+00 806 0.50196 0.00000 0.00000 0.6010 0.3318 32.30E+00 807 0.37647 0.00000 0.00000 0.5902 0.3308 26.75E+00 808 0.25098 0.00000 0.00000 0.5691 0.3288 19.95E+00 809 0.12549 0.00000 0.00000 0.5236 0.3246 12.77E+00 810 0.00000 0.00000 0.00000 0.3097 0.3050 45.18E-01 811 1.00000 1.00000 1.00000 0.2974 0.3092 36.55E+01 812 0.87451 0.87451 1.00000 0.2788 0.2789 28.99E+01 813 0.74902 0.74902 1.00000 0.2602 0.2470 22.81E+01 814 0.62353 0.62353 1.00000 0.2437 0.2197 18.50E+01 815 0.50196 0.50196 1.00000 0.2318 0.1992 15.75E+01 816 0.37647 0.37647 1.00000 0.2187 0.1748 12.89E+01 817 0.25098 0.25098 1.00000 0.1997 0.1375 9.22E+01 818 0.12549 0.12549 1.00000 0.1780 0.1007 6.17E+01 819 0.00000 0.00000 1.00000 0.1495 0.0566 3.13E+01 820 1.00000 1.00000 0.87451 0.3144 0.3377 35.88E+01 821 0.87451 0.87451 0.87451 0.2964 0.3078 28.24E+01 822 0.74902 0.74902 0.87451 0.2774 0.2753 22.06E+01 823 0.62353 0.62353 0.87451 0.2603 0.2467 17.75E+01 824 0.50196 0.50196 0.87451 0.2475 0.2246 15.00E+01 825 0.37647 0.37647 0.87451 0.2332 0.1976 12.15E+01 826 0.25098 0.25098 0.87451 0.2119 0.1553 8.51E+01 827 0.12549 0.12549 0.87451 0.1864 0.1119 5.48E+01 828 0.00000 0.00000 0.87451 0.1509 0.0572 2.45E+01 829 1.00000 1.00000 0.74902 0.3313 0.3659 35.37E+01 830 0.87451 0.87451 0.74902 0.3142 0.3375 27.70E+01 831 0.74902 0.74902 0.74902 0.2957 0.3055 21.52E+01 832 0.62353 0.62353 0.74902 0.2780 0.2764 17.21E+01 833 0.50196 0.50196 0.74902 0.2649 0.2534 14.47E+01 834 0.37647 0.37647 0.74902 0.2498 0.2243 11.62E+01 835 0.25098 0.25098 0.74902 0.2263 0.1771 7.99E+01 836 0.12549 0.12549 0.74902 0.1965 0.1262 4.96E+01 837 0.00000 0.00000 0.74902 0.1530 0.0583 1.93E+01 838 1.00000 1.00000 0.62353 0.3431 0.3859 35.08E+01 839 0.87451 0.87451 0.62353 0.3270 0.3590 27.39E+01 840 0.74902 0.74902 0.62353 0.3090 0.3281 21.21E+01 841 0.62353 0.62353 0.62353 0.2916 0.2992 16.90E+01 842 0.50196 0.50196 0.62353 0.2784 0.2759 14.16E+01 843 0.37647 0.37647 0.62353 0.2628 0.2459 11.32E+01 844 0.25098 0.25098 0.62353 0.2382 0.1955 7.69E+01 845 0.12549 0.12549 0.62353 0.2055 0.1393 4.67E+01 846 0.00000 0.00000 0.62353 0.1545 0.0600 1.64E+01 847 1.00000 1.00000 0.50196 0.3552 0.4063 34.82E+01 848 0.87451 0.87451 0.50196 0.3403 0.3815 27.13E+01 849 0.74902 0.74902 0.50196 0.3234 0.3521 20.94E+01 850 0.62353 0.62353 0.50196 0.3063 0.3242 16.64E+01 851 0.50196 0.50196 0.50196 0.2931 0.3012 13.89E+01 852 0.37647 0.37647 0.50196 0.2777 0.2706 11.06E+01 853 0.25098 0.25098 0.50196 0.2521 0.2176 7.44E+01 854 0.12549 0.12549 0.50196 0.2163 0.1557 4.42E+01 855 0.00000 0.00000 0.50196 0.1569 0.0629 1.40E+01 856 1.00000 1.00000 0.37647 0.3734 0.4376 34.51E+01 857 0.87451 0.87451 0.37647 0.3610 0.4170 26.80E+01 858 0.74902 0.74902 0.37647 0.3464 0.3914 20.60E+01 859 0.62353 0.62353 0.37647 0.3309 0.3665 16.29E+01 860 0.50196 0.50196 0.37647 0.3187 0.3450 13.56E+01 861 0.37647 0.37647 0.37647 0.3040 0.3151 10.73E+01 862 0.25098 0.25098 0.37647 0.2787 0.2597 7.11E+01 863 0.12549 0.12549 0.37647 0.2389 0.1894 4.09E+01 864 0.00000 0.00000 0.37647 0.1616 0.0702 1.09E+01 865 1.00000 1.00000 0.25098 0.3927 0.4706 34.23E+01 866 0.87451 0.87451 0.25098 0.3836 0.4558 26.50E+01 867 0.74902 0.74902 0.25098 0.3726 0.4365 20.30E+01 868 0.62353 0.62353 0.25098 0.3604 0.4170 16.00E+01 869 0.50196 0.50196 0.25098 0.3503 0.3993 13.27E+01 870 0.37647 0.37647 0.25098 0.3381 0.3731 10.44E+01 871 0.25098 0.25098 0.25098 0.3163 0.3196 68.07E+00 872 0.12549 0.12549 0.25098 0.2742 0.2446 38.06E+00 873 0.00000 0.00000 0.25098 0.1711 0.0840 8.05E+00 874 1.00000 1.00000 0.12549 0.4104 0.5013 34.02E+01 875 0.87451 0.87451 0.12549 0.4052 0.4929 26.25E+01 876 0.74902 0.74902 0.12549 0.3990 0.4816 20.05E+01 877 0.62353 0.62353 0.12549 0.3910 0.4701 15.75E+01 878 0.50196 0.50196 0.12549 0.3850 0.4590 13.03E+01 879 0.37647 0.37647 0.12549 0.3784 0.4406 10.20E+01 880 0.25098 0.25098 0.12549 0.3657 0.3990 65.82E+00 881 0.12549 0.12549 0.12549 0.3309 0.3330 35.92E+00 882 0.00000 0.00000 0.12549 0.1955 0.1230 6.02E+00 883 1.00000 1.00000 0.00000 0.4251 0.5267 33.86E+01 884 0.87451 0.87451 0.00000 0.4240 0.5242 25.99E+01 885 0.74902 0.74902 0.00000 0.4228 0.5213 19.79E+01 886 0.62353 0.62353 0.00000 0.4204 0.5193 15.50E+01 887 0.50196 0.50196 0.00000 0.4192 0.5166 12.78E+01 888 0.37647 0.37647 0.00000 0.4202 0.5102 9.98E+01 889 0.25098 0.25098 0.00000 0.4251 0.4931 63.86E+00 890 0.12549 0.12549 0.00000 0.4192 0.4695 34.20E+00 891 0.00000 0.00000 0.00000 0.3097 0.3051 45.16E-01 892 1.00000 1.00000 1.00000 0.2974 0.3093 36.56E+01 893 1.00000 0.87451 1.00000 0.2961 0.2815 30.64E+01 894 1.00000 0.74902 1.00000 0.2951 0.2549 25.81E+01 895 1.00000 0.62353 1.00000 0.2945 0.2341 22.47E+01 896 1.00000 0.50196 1.00000 0.2941 0.2194 20.32E+01 897 1.00000 0.37647 1.00000 0.2938 0.2024 18.02E+01 898 1.00000 0.25098 1.00000 0.2936 0.1784 15.05E+01 899 1.00000 0.12549 1.00000 0.2934 0.1575 12.72E+01 900 1.00000 0.00000 1.00000 0.2935 0.1361 10.52E+01 901 0.87451 1.00000 0.87451 0.2982 0.3382 34.25E+01 902 0.87451 0.87451 0.87451 0.2964 0.3078 28.24E+01 903 0.87451 0.74902 0.87451 0.2952 0.2781 23.39E+01 904 0.87451 0.62353 0.87451 0.2944 0.2542 20.05E+01 905 0.87451 0.50196 0.87451 0.2939 0.2372 17.91E+01 906 0.87451 0.37647 0.87451 0.2936 0.2171 15.61E+01 907 0.87451 0.25098 0.87451 0.2932 0.1884 12.67E+01 908 0.87451 0.12549 0.87451 0.2929 0.1629 10.37E+01 909 0.87451 0.00000 0.87451 0.2922 0.1355 8.15E+01 910 0.74902 1.00000 0.74902 0.2991 0.3696 32.40E+01 911 0.74902 0.87451 0.74902 0.2971 0.3376 26.37E+01 912 0.74902 0.74902 0.74902 0.2957 0.3054 21.51E+01 913 0.74902 0.62353 0.74902 0.2947 0.2789 18.18E+01 914 0.74902 0.50196 0.74902 0.2942 0.2594 16.04E+01 915 0.74902 0.37647 0.74902 0.2937 0.2362 13.75E+01 916 0.74902 0.25098 0.74902 0.2931 0.2018 10.82E+01 917 0.74902 0.12549 0.74902 0.2928 0.1702 8.51E+01 918 0.74902 0.00000 0.74902 0.2920 0.1354 6.29E+01 919 0.62353 1.00000 0.62353 0.2973 0.3943 31.14E+01 920 0.62353 0.87451 0.62353 0.2949 0.3616 25.09E+01 921 0.62353 0.74902 0.62353 0.2929 0.3277 20.23E+01 922 0.62353 0.62353 0.62353 0.2916 0.2992 16.90E+01 923 0.62353 0.50196 0.62353 0.2909 0.2779 14.76E+01 924 0.62353 0.37647 0.62353 0.2901 0.2520 12.48E+01 925 0.62353 0.25098 0.62353 0.2890 0.2124 9.54E+01 926 0.62353 0.12549 0.62353 0.2882 0.1755 7.25E+01 927 0.62353 0.00000 0.62353 0.2869 0.1333 5.04E+01 928 0.50196 1.00000 0.50196 0.2994 0.4206 30.29E+01 929 0.50196 0.87451 0.50196 0.2970 0.3881 24.22E+01 930 0.50196 0.74902 0.50196 0.2952 0.3538 19.37E+01 931 0.50196 0.62353 0.50196 0.2939 0.3238 16.03E+01 932 0.50196 0.50196 0.50196 0.2932 0.3012 13.90E+01 933 0.50196 0.37647 0.50196 0.2925 0.2730 11.62E+01 934 0.50196 0.25098 0.50196 0.2915 0.2289 8.69E+01 935 0.50196 0.12549 0.50196 0.2910 0.1862 6.40E+01 936 0.50196 0.00000 0.50196 0.2894 0.1360 4.20E+01 937 0.37647 1.00000 0.37647 0.3065 0.4631 29.40E+01 938 0.37647 0.87451 0.37647 0.3050 0.4329 23.32E+01 939 0.37647 0.74902 0.37647 0.3042 0.3994 18.46E+01 940 0.37647 0.62353 0.37647 0.3037 0.3694 15.14E+01 941 0.37647 0.50196 0.37647 0.3038 0.3456 13.00E+01 942 0.37647 0.37647 0.37647 0.3040 0.3151 10.73E+01 943 0.37647 0.25098 0.37647 0.3047 0.2647 7.80E+01 944 0.37647 0.12549 0.37647 0.3059 0.2132 5.52E+01 945 0.37647 0.00000 0.37647 0.3064 0.1481 3.32E+01 946 0.25098 1.00000 0.25098 0.3110 0.5137 28.43E+01 947 0.25098 0.87451 0.25098 0.3105 0.4884 22.32E+01 948 0.25098 0.74902 0.25098 0.3106 0.4591 17.47E+01 949 0.25098 0.62353 0.25098 0.3114 0.4308 14.14E+01 950 0.25098 0.50196 0.25098 0.3119 0.4077 12.01E+01 951 0.25098 0.37647 0.25098 0.3134 0.3759 9.74E+01 952 0.25098 0.25098 0.25098 0.3163 0.3195 68.08E+00 953 0.25098 0.12549 0.25098 0.3202 0.2556 45.37E+00 954 0.25098 0.00000 0.25098 0.3252 0.1645 23.55E+00 955 0.12549 1.00000 0.12549 0.3120 0.5685 27.48E+01 956 0.12549 0.87451 0.12549 0.3114 0.5521 21.35E+01 957 0.12549 0.74902 0.12549 0.3119 0.5316 16.48E+01 958 0.12549 0.62353 0.12549 0.3129 0.5107 13.17E+01 959 0.12549 0.50196 0.12549 0.3146 0.4915 11.03E+01 960 0.12549 0.37647 0.12549 0.3167 0.4641 87.56E+00 961 0.12549 0.25098 0.12549 0.3223 0.4087 58.54E+00 962 0.12549 0.12549 0.12549 0.3310 0.3331 35.93E+00 963 0.12549 0.00000 0.12549 0.3466 0.1931 14.29E+00 964 0.00000 1.00000 0.00000 0.3051 0.6254 26.48E+01 965 0.00000 0.87451 0.00000 0.3030 0.6226 20.24E+01 966 0.00000 0.74902 0.00000 0.3010 0.6185 15.37E+01 967 0.00000 0.62353 0.00000 0.2994 0.6141 12.06E+01 968 0.00000 0.50196 0.00000 0.2984 0.6097 9.95E+01 969 0.00000 0.37647 0.00000 0.2975 0.6013 76.90E+00 970 0.00000 0.25098 0.00000 0.2972 0.5811 48.16E+00 971 0.00000 0.12549 0.00000 0.2985 0.5382 25.84E+00 972 0.00000 0.00000 0.00000 0.3097 0.3051 45.14E-01 973 0.00000 0.00000 0.00000 0.3098 0.3050 45.15E-01 974 0.12549 0.12549 0.12549 0.3310 0.3331 35.91E+00 975 0.25098 0.25098 0.25098 0.3163 0.3196 68.09E+00 976 0.37647 0.37647 0.37647 0.3042 0.3150 10.73E+01 977 0.50196 0.50196 0.50196 0.2932 0.3012 13.90E+01 978 0.62353 0.62353 0.62353 0.2916 0.2992 16.90E+01 979 0.74902 0.74902 0.74902 0.2956 0.3054 21.51E+01 980 0.87451 0.87451 0.87451 0.2965 0.3077 28.23E+01 981 1.00000 1.00000 1.00000 0.2974 0.3092 36.53E+01 982 0.00000 0.00000 0.00000 0.3098 0.3050 45.14E-01 983 0.12549 0.12549 0.12549 0.3310 0.3330 35.91E+00 984 0.25098 0.25098 0.25098 0.3163 0.3196 68.07E+00 985 0.37647 0.37647 0.37647 0.3041 0.3149 10.73E+01 986 0.50196 0.50196 0.50196 0.2932 0.3012 13.90E+01 987 0.62353 0.62353 0.62353 0.2916 0.2992 16.90E+01 988 0.74902 0.74902 0.74902 0.2956 0.3054 21.51E+01 989 0.87451 0.87451 0.87451 0.2965 0.3077 28.23E+01 990 1.00000 1.00000 1.00000 0.2973 0.3093 36.54E+01 991 0.00000 0.00000 0.00000 0.3098 0.3050 45.14E-01 992 0.12549 0.12549 0.12549 0.3309 0.3330 35.91E+00 993 0.25098 0.25098 0.25098 0.3163 0.3196 68.08E+00 994 0.37647 0.37647 0.37647 0.3041 0.3149 10.73E+01 995 0.50196 0.50196 0.50196 0.2932 0.3013 13.90E+01 996 0.62353 0.62353 0.62353 0.2917 0.2992 16.90E+01 997 0.74902 0.74902 0.74902 0.2956 0.3054 21.51E+01 998 0.87451 0.87451 0.87451 0.2965 0.3077 28.23E+01 999 1.00000 1.00000 1.00000 0.2973 0.3093 36.54E+01 1000 0.00000 0.00000 0.00000 0.3098 0.3050 45.14E-01 1001 0.12549 0.12549 0.12549 0.3310 0.3330 35.91E+00 1002 0.25098 0.25098 0.25098 0.3163 0.3196 68.08E+00 1003 0.37647 0.37647 0.37647 0.3041 0.3149 10.73E+01 1004 0.50196 0.50196 0.50196 0.2932 0.3012 13.90E+01 1005 0.62353 0.62353 0.62353 0.2916 0.2992 16.90E+01 1006 0.74902 0.74902 0.74902 0.2956 0.3054 21.51E+01 1007 0.87451 0.87451 0.87451 0.2965 0.3077 28.23E+01 1008 1.00000 1.00000 1.00000 0.2973 0.3093 36.53E+01 1009 0.00000 0.00000 0.00000 0.3097 0.3050 45.13E-01 1010 0.06667 0.06667 0.06667 0.3403 0.3353 21.42E+00 1011 0.13333 0.13333 0.13333 0.3302 0.3312 37.55E+00 1012 0.20000 0.20000 0.20000 0.3224 0.3246 54.66E+00 1013 0.26667 0.26667 0.26667 0.3141 0.3184 73.26E+00 1014 0.33333 0.33333 0.33333 0.3088 0.3159 9.33E+01 1015 0.40000 0.40000 0.40000 0.3014 0.3108 11.27E+01 1016 0.46667 0.46667 0.46667 0.2946 0.3025 13.03E+01 1017 0.53333 0.53333 0.53333 0.2924 0.3010 14.66E+01 1018 0.60000 0.60000 0.60000 0.2907 0.2996 16.25E+01 1019 0.66667 0.66667 0.66667 0.2929 0.2995 18.08E+01 1020 0.73333 0.73333 0.73333 0.2963 0.3056 20.86E+01 1021 0.80000 0.80000 0.80000 0.2958 0.3065 23.99E+01 1022 0.86667 0.86667 0.86667 0.2966 0.3070 27.64E+01 1023 0.93333 0.93333 0.93333 0.2993 0.3114 32.59E+01 1024 1.00000 1.00000 1.00000 0.2974 0.3092 36.53E+01 1025 0.00000 0.00000 0.00000 0.3098 0.3050 45.14E-01 1026 0.06667 0.06667 0.06667 0.3403 0.3354 21.43E+00 1027 0.13333 0.13333 0.13333 0.3303 0.3312 37.54E+00 1028 0.20000 0.20000 0.20000 0.3224 0.3246 54.66E+00 1029 0.26667 0.26667 0.26667 0.3141 0.3185 73.25E+00 1030 0.33333 0.33333 0.33333 0.3089 0.3161 9.33E+01 1031 0.40000 0.40000 0.40000 0.3014 0.3111 11.28E+01 1032 0.46667 0.46667 0.46667 0.2946 0.3025 13.03E+01 1033 0.53333 0.53333 0.53333 0.2925 0.3010 14.66E+01 1034 0.60000 0.60000 0.60000 0.2909 0.2995 16.24E+01 1035 0.66667 0.66667 0.66667 0.2930 0.2994 18.07E+01 1036 0.73333 0.73333 0.73333 0.2962 0.3056 20.86E+01 1037 0.80000 0.80000 0.80000 0.2958 0.3065 23.99E+01 1038 0.86667 0.86667 0.86667 0.2966 0.3070 27.64E+01 1039 0.93333 0.93333 0.93333 0.2993 0.3114 32.59E+01 1040 1.00000 1.00000 1.00000 0.2974 0.3092 36.53E+01 1041 0.00000 0.00000 0.00000 0.3098 0.3050 45.13E-01 1042 0.06667 0.06667 0.06667 0.3404 0.3354 21.42E+00 1043 0.13333 0.13333 0.13333 0.3303 0.3311 37.53E+00 1044 0.20000 0.20000 0.20000 0.3224 0.3246 54.65E+00 1045 0.26667 0.26667 0.26667 0.3141 0.3184 73.24E+00 1046 0.33333 0.33333 0.33333 0.3089 0.3161 9.33E+01 1047 0.40000 0.40000 0.40000 0.3012 0.3109 11.27E+01 1048 0.46667 0.46667 0.46667 0.2945 0.3026 13.03E+01 1049 0.53333 0.53333 0.53333 0.2925 0.3010 14.66E+01 1050 0.60000 0.60000 0.60000 0.2908 0.2996 16.25E+01 1051 0.66667 0.66667 0.66667 0.2927 0.2995 18.08E+01 1052 0.73333 0.73333 0.73333 0.2962 0.3057 20.86E+01 1053 0.80000 0.80000 0.80000 0.2958 0.3065 23.99E+01 1054 0.86667 0.86667 0.86667 0.2966 0.3070 27.64E+01 1055 0.93333 0.93333 0.93333 0.2993 0.3114 32.60E+01 1056 1.00000 1.00000 1.00000 0.2974 0.3092 36.53E+01 1057 0.00000 0.00000 0.00000 0.3097 0.3051 45.14E-01 1058 0.06667 0.06667 0.06667 0.3404 0.3354 21.42E+00 1059 0.13333 0.13333 0.13333 0.3303 0.3312 37.54E+00 1060 0.20000 0.20000 0.20000 0.3224 0.3246 54.66E+00 1061 0.26667 0.26667 0.26667 0.3141 0.3185 73.25E+00 1062 0.33333 0.33333 0.33333 0.3088 0.3159 9.33E+01 1063 0.40000 0.40000 0.40000 0.3014 0.3108 11.27E+01 1064 0.46667 0.46667 0.46667 0.2946 0.3025 13.03E+01 1065 0.53333 0.53333 0.53333 0.2925 0.3010 14.66E+01 1066 0.60000 0.60000 0.60000 0.2907 0.2996 16.25E+01 1067 0.66667 0.66667 0.66667 0.2929 0.2994 18.07E+01 1068 0.73333 0.73333 0.73333 0.2962 0.3056 20.85E+01 1069 0.80000 0.80000 0.80000 0.2958 0.3065 23.99E+01 1070 0.86667 0.86667 0.86667 0.2966 0.3070 27.64E+01 1071 0.93333 0.93333 0.93333 0.2993 0.3114 32.59E+01 1072 1.00000 1.00000 1.00000 0.2974 0.3093 36.54E+01 1073 0.00000 0.00000 0.00000 0.3098 0.3050 45.14E-01 1074 1.00000 1.00000 1.00000 0.2974 0.3093 36.56E+01 1075 1.00000 0.00000 0.00000 0.6338 0.3348 7.87E+01 1076 0.00000 1.00000 1.00000 0.2154 0.3031 29.15E+01 1077 1.00000 1.00000 0.00000 0.4251 0.5266 33.87E+01 1078 0.00000 0.00000 1.00000 0.1494 0.0567 3.14E+01 1079 0.00000 1.00000 0.00000 0.3051 0.6254 26.48E+01 1080 1.00000 0.00000 1.00000 0.2934 0.1361 10.52E+01 ] def %**************************************************************************** /Xrx089 729 array def /Yrx089 729 array def /Zrx089 729 array def /Xrx100 729 array def /Yrx100 729 array def /Zrx100 729 array def /xyY0 4320 array def /RGB0 3240 array def /xyYA_to_XYZ729 { %BEG procedure xyYA_to_XYZ729 0 1 1079 {/xchartl exch def /j00 xchartl 7 mul 0 add def /j04 j00 4 add def /j05 j00 5 add def /j06 j00 6 add def /j40 xchartl 4 mul 0 add def /j41 xchartl 4 mul 1 add def /j42 xchartl 4 mul 2 add def /j43 xchartl 4 mul 3 add def xyY0 j40 xyYA j00 get put xyY0 j41 xyYA j04 get 10000 mul put %integer xyY0 j42 xyYA j05 get 10000 mul put %integer xyY0 j43 xyYA j06 get put } for /jend 728 4 mul 3 add def %White-Measurement /fakt 100 xyY0 jend get div def /IM0 729 def /IM1 IM0 1 sub def 0 1 IM1 {/i exch def %i=0,IM1 /j30 i 4 mul 1 add def /j31 j30 1 add def /j32 j30 2 add def /SUM xyY0 j32 get xyY0 j31 get 0.0001 mul div def Xrx100 i xyY0 j30 get 0.0001 mul SUM mul fakt mul put Yrx100 i xyY0 j32 get fakt mul put Zrx100 i 1 xyY0 j30 get 0.0001 mul sub xyY0 j31 get 0.0001 mul sub SUM mul fakt mul put Xrx089 i Xrx100 i get 0.8859 mul put Yrx089 i Yrx100 i get 0.8859 mul put Zrx089 i Zrx100 i get 0.8859 mul put } for %i=0,IM1 /XLN100 Xrx100 0 get def /YLN100 Yrx100 0 get def /ZLN100 Zrx100 0 get def /XLW100 Xrx100 728 get def /YLW100 Yrx100 728 get def /ZLW100 Zrx100 728 get def /XLN089 Xrx089 0 get def /YLN089 Yrx089 0 get def /ZLN089 Zrx089 0 get def /XLW089 Xrx089 728 get def /YLW089 Yrx089 728 get def /ZLW089 Zrx089 728 get def % achromatic (D65) colours /XLWD65100 95.04 def /YLWD65100 100.00 def /ZLWD65100 108.88 def /XLN001 XLWD65100 100 div def /YLN001 YLWD65100 100 div def /ZLN001 ZLWD65100 100 div def } bind def %END procedure xyYA_to_XYZ729 %*********************************************************** /r*d50M 50 array def /r*d50M [1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %R 1.000 0.875 0.750 0.625 0.500 0.375 0.250 0.125 %J 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %G 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %C 0.000 0.125 0.250 0.375 0.500 0.625 0.750 0.875 %B 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %M 1.000 1.000 ] def /g*d50M 50 array def /g*d50M [0.000 0.125 0.250 0.375 0.500 0.625 0.750 0.875 %R 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %J 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %G 1.000 0.875 0.750 0.625 0.500 0.375 0.250 0.125 %C 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %B 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %M 0.000 0.125 ] def /b*d50M 50 array def /b*d50M [0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %R 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %J 0.000 0.125 0.250 0.375 0.500 0.625 0.750 0.875 %G 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %C 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %B 1.000 0.875 0.750 0.625 0.500 0.375 0.250 0.125 %M 0.000 0.000 ] def %/habs50M 50 array def %/habs50M [030.0 037.5 045.0 052.5 060.0 067.5 075.0 082.5 % 090.0 097.5 105.0 112.5 120.0 127.5 135.0 142.5 % 150.0 157.5 165.0 172.5 180.0 187.5 195.0 202.5 % 210.0 217.5 225.0 232.5 240.0 247.5 255.0 262.5 % 270.0 277.5 285.0 292.5 300.0 307.5 315.0 322.5 % 330.0 337.5 345.0 352.5 360.0 367.5 375.0 382.5 % 390.0 397.5 % ] def %*********************************************************** /XD65W 95.04 def /YD65W 100.00 def /ZD65W 108.88 def /XD50W 96.42 def /YD50W 100.00 def /ZD50W 82.51 def /DecodeXYZ* {dup 6 29 div ge {dup dup mul mul} {4 29 div sub 108 841 div mul} ifelse} bind def /cvishow {cvi 6 string cvs show} def /cvsshow1 {10 mul cvi 0.1 mul 7 string cvs show} def /cvsshow2 {100 mul cvi 0.01 mul 7 string cvs show} def /cvsshow3 {1000 mul cvi 0.001 mul 7 string cvs show} def /cvishowb {cvi 6 string cvs show ( ) show} def /cvsshow1b {10 mul cvi 0.1 mul 7 string cvs show ( ) show} def /cvsshow2b {100 mul cvi 0.01 mul 7 string cvs show ( ) show} def /cvsshow3b {1000 mul cvi 0.001 mul 7 string cvs show ( ) show} def /cvsshow1r {0.05 add 10 mul cvi 0.1 mul 7 string cvs show} def /cvsshow2r {0.005 add 100 mul cvi 0.01 mul 7 string cvs show} def /cvsshow3r {0.0005 add 1000 mul cvi 0.001 mul 7 string cvs show} def /cvsshow1br {0.05 add 10 mul cvi 0.1 mul 7 string cvs show ( ) show} def /cvsshow2br {0.005 add 100 mul cvi 0.01 mul 7 string cvs show ( ) show} def /cvsshow3br {0.0005 add 1000 mul cvi 0.001 mul 7 string cvs show ( ) show} def /cvi100 {100 mul cvi /xi exch def xi 0 lt {/vorz -1 def} {/vorz 1 def} ifelse /xia xi abs def vorz -1 eq {(\255) show} {(0) show} ifelse xia 0 ge xia 9 le {(0000) show} if xia 10 ge xia 99 le and {(000) show} if xia 100 ge xia 999 le and {(00) show} if xia 1000 ge xia 9999 le and {(0) show} if xia cvishow } bind def %*********************************************************** /LAB*He_Hs { %BEG procedure LAB*He_Hs /LAB*e 35 array def %7x5=35 /LAB*e[39.92 58.74 27.99 0.0 0.0 % 00_04 R CIE No.09 elementary colours in LAB, D65 81.26 -2.89 71.56 0.0 0.0 % 05_09 J CIE No.10 52.23 -42.42 13.60 0.0 0.0 % 10_14 G CIE No.11 0.0 0.0 0.0 0.0 0.0 % 15_19 Cgb 30.57 1.41 -46.47 0.0 0.0 % 20_24 B CIE No.12 0.0 0.0 0.0 0.0 0.0 % 25_29 Mbr 39.92 58.74 27.99 0.0 0.0 % 30_34 R+360 CIE No.09 elementary colours in LAB, D65 ] def 0 1 5 {/j exch def %j=0,5 j 0 eq {LAB*e 03 LAB*e 01 get dup mul LAB*e 02 get dup mul add sqrt put LAB*e 04 LAB*e 02 get LAB*e 01 get 0.0001 add atan put } if j 1 eq {LAB*e 08 LAB*e 06 get dup mul LAB*e 07 get dup mul add sqrt put LAB*e 09 LAB*e 07 get LAB*e 06 get 0.0001 add atan put } if j 2 eq {LAB*e 13 LAB*e 11 get dup mul LAB*e 12 get dup mul add sqrt put LAB*e 14 LAB*e 12 get LAB*e 11 get 0.0001 add atan put } if j 4 eq {LAB*e 23 LAB*e 21 get dup mul LAB*e 22 get dup mul add sqrt put LAB*e 24 LAB*e 22 get LAB*e 21 get 0.0001 add atan put } if } for %j=0,5 3 1 4 {/i exch def %i=3,4 30_34 R+360 LAB*e i 30 add LAB*e i get put i 4 eq {LAB*e i 30 add LAB*e i get 360 add put} if } for %i=3,4 3 2 5 {/i exch def %i=3,5,2 Cgb+Cbr i 3 eq {LAB*e 19 LAB*e 14 get LAB*e 24 get add 0.5 mul put %hab LAB*e 18 LAB*e 13 get LAB*e 23 get add 0.5 mul put %C*ab LAB*e 15 LAB*e 10 get LAB*e 20 get add 0.5 mul put %L* LAB*e 16 LAB*e 18 get LAB*e 19 get cos mul put %a* LAB*e 17 LAB*e 18 get LAB*e 19 get sin mul put %b* } if i 5 eq {LAB*e 29 LAB*e 24 get LAB*e 34 get add 0.5 mul put %hab LAB*e 28 LAB*e 23 get LAB*e 33 get add 0.5 mul put %C*ab LAB*e 25 LAB*e 20 get LAB*e 30 get add 0.5 mul put %L* LAB*e 26 LAB*e 28 get LAB*e 29 get cos mul put %a* LAB*e 27 LAB*e 28 get LAB*e 29 get sin mul put %b* } if } for %i=3,5,2 /LAB*He 7 array def 0 1 6 {/i exch def %i=0,5 LAB*He i LAB*e i 5 mul 4 add get put } for %i=0,5 /habe50M 50 array def 0 1 47 {/i exch def %i=0,47 /i8 i 8 idiv def /i8d i i8 8 mul sub def /dLAB*He LAB*He i8 1 add get LAB*He i8 get sub 8 div def habe50M i LAB*He i8 get dLAB*He i8d mul add put } for %i=0,47 habe50M 48 habe50M 0 get 360 add put habe50M 49 habe50M 1 get 360 add put /LAB*Hs 7 array def /LAB*Hs [30. 90. 150. 210. 270. 330. 390.] def /habs50M 50 array def 0 1 47 {/i exch def %i=0,47 /i8 i 8 idiv def /i8d i i8 8 mul sub def /dLAB*Hs LAB*Hs i8 1 add get LAB*Hs i8 get sub 8 div def habs50M i LAB*Hs i8 get dLAB*Hs i8d mul add put } for %i=0,47 habs50M 48 habs50M 0 get 360 add put habs50M 49 habs50M 1 get 360 add put /habs361M 361 array def 0 1 359 {/i exch def %i=0,359 habs361M i 30 i add put %range 30..390 } for %i=0,359 habs361M 360 habs361M 0 get 360 add put /habe361M 361 array def 0 1 359 {/i exch def %i=0,359 /i60 i 60 idiv def %range 0..6 /i60d i i60 60 mul sub def %range 0..59 /dLAB*He LAB*He i60 1 add get LAB*He i60 get sub 60 div def habe361M i LAB*He i60 get dLAB*He i60d mul add round cvi put %range 25..385 } for %i=0,359 habe361M 360 habe361M 0 get 360 add put } bind def %END procedure LAB*He_Hs %****************************************************************** /habs361i 361 array def /habe361i 361 array def /habd361i 361 array def /hab*sM_to_hab*eM { %BEG Procedure hab*sM_to_hab*eM %transfer from hab*s to hab*e %360 steps used for the range 0 <= hab*s <= 360 %requires /habs361i 361 array def, /habe361i 361 array def 0 1 359 {/i exch def %i=0,359 /habs i def habs361i i i put %alpha = [habs - LAB*Hs(h)]/[LAB*Hs(n+1) - LAB*Hs(n)] % = [habs - LAB*Hs(h)]/60 %habe = alpha [LAB*He(n+1) - LAB*He(n)] + LAB*He(n) i 000 ge i 029 le and {/ipan0 5 def /ipan1 6 def /habs habs 360 add def} if i 030 ge i 089 le and {/ipan0 0 def /ipan1 1 def} if i 090 ge i 149 le and {/ipan0 1 def /ipan1 2 def} if i 150 ge i 209 le and {/ipan0 2 def /ipan1 3 def} if i 210 ge i 269 le and {/ipan0 3 def /ipan1 4 def} if i 270 ge i 329 le and {/ipan0 4 def /ipan1 5 def} if i 330 ge i 359 le and {/ipan0 5 def /ipan1 6 def} if /alpha {habs LAB*Hs ipan0 get sub 60 div} bind def /habe {LAB*He ipan1 get LAB*He ipan0 get sub alpha mul LAB*He ipan0 get add} bind def habe 360 ge {/habe habe 360 sub def} if habe361i i habe round cvi put } for %i=0,359 habs361i 360 360 put habe361i 360 habe361i 0 get put } bind def %END hab*sM_to_hab*eM %****************************************************************** /r*s361Mi 361 array def /g*s361Mi 361 array def /b*s361Mi 361 array def /r*e361Mi 361 array def /g*e361Mi 361 array def /b*e361Mi 361 array def /hab*sM_to_rgb*s361Mi_rgb*e361Mi { %BEG Procedure hab*sM_to_rgb*s361Mi_rgb*e361Mi %transfer from hab*sM_to_rgb*s361Mi_rgb*e361Mi %360 steps used for the range 0 <= hab*s <= 360 %requires /habs361i 361 array def, /habe361i 361 array def 0 1 359 {/i exch def %i=0,359 i 000 ge i 029 le and {r*s361Mi i 1.00 put %Mbr_R, part 2 g*s361Mi i 0.00 put b*s361Mi i 1.00 i 30 add 60 div sub put} if i 030 ge i 089 le and {r*s361Mi i 1.00 put %R_J g*s361Mi i 0.00 i 30 sub 60 div add put b*s361Mi i 0.00 put} if i 090 ge i 149 le and {r*s361Mi i 1.00 i 90 sub 60 div sub put %J_G g*s361Mi i 1.00 put b*s361Mi i 0.00 put} if i 150 ge i 209 le and {r*s361Mi i 0.00 put %G_Cgb g*s361Mi i 1.00 put b*s361Mi i 0.00 i 150 sub 60 div add put} if i 210 ge i 269 le and {r*s361Mi i 0.00 put %Cgb_B g*s361Mi i 1.00 i 210 sub 60 div sub put b*s361Mi i 1.00 put} if i 270 ge i 329 le and {r*s361Mi i 0.00 i 270 sub 60 div add put %B_Mbr g*s361Mi i 0.00 put b*s361Mi i 1.00 put} if i 330 ge i 359 le and {r*s361Mi i 1.00 put %Mbr_R, part 1 g*s361Mi i 0.00 put b*s361Mi i 1.00 i 330 sub 60 div sub put} if } for %i=0,359 r*s361Mi 360 r*s361Mi 0 get put g*s361Mi 360 g*s361Mi 0 get put b*s361Mi 360 b*s361Mi 0 get put 0 1 360 {/i exch def %i=0,360 r*e361Mi i r*s361Mi i get put g*e361Mi i g*s361Mi i get put b*e361Mi i b*s361Mi i get put } for %i=0,359 } bind def %END hab*sM_to_rgb*s361Mi_rgb*e361Mi %****************************************************************** /XIEi 361 array def /x361i 361 array def /r*d361Mi 361 array def /g*d361Mi 361 array def /b*d361Mi 361 array def /LAB*L361Mi 361 array def /LAB*a361Mi 361 array def /LAB*b361Mi 361 array def /LAB*C361Mi 361 array def /LAB*h361Mi 361 array def /LAB*x50M_to_LAB*_rgb*x361Mi { %BEG Procedure LAB*x50M_to_LAB*_rgb*x361Mi %transfer from LAB*x50M_to_LAB*_rgb*x361Mi %360 steps used for the range 0 <= LAb*50hM <= 360 %requires /LAB*x361M 361 array def (x=L,a,b,C,h) %requires /rgb*d361Mi 361 array def %requires in addition %/LAB*x50M 50 array def (x=L,a,b,C,h) defined in LAB729a_to_LAB*x50M %/rgb*d50M 50 array def defined allways as table /hmin LAB*h50M 0 get def /hmax LAB*h50M 48 get def /hmini LAB*h50M 0 get cvi def /hmaxi LAB*h50M 48 get cvi def 0 1 360 {/i0 exch def %i=0,360 %default /i1 i0 1 add def /XIE -1 def LAB*L361Mi i0 -1 put LAB*C361Mi i0 -1 put LAB*h361Mi i0 -1 put LAB*a361Mi i0 -1 put LAB*b361Mi i0 -1 put r*d361Mi i0 -1 put g*d361Mi i0 -1 put b*d361Mi i0 -1 put XIEi i0 -1 put x361i i0 -1 put } for %i=0,360 hmini 1 hmaxi {/i0 exch def %i=40,400 0 1 48 {/ix0 exch def %ix0=0,48 /ix1 ix0 1 add def i0 LAB*h50M ix0 get sub 0 ge i0 LAB*h50M ix1 get sub 0 lt and { /im i0 def i0 360 ge {/im i0 360 sub def} if XIEi im i0 LAB*h50M ix0 get sub LAB*h50M ix1 get LAB*h50M ix0 get sub div put /XIE XIEi im get def LAB*L361Mi im LAB*L50M ix0 get LAB*L50M ix1 get LAB*L50M ix0 get sub XIE mul add put LAB*C361Mi im LAB*C50M ix0 get LAB*C50M ix1 get LAB*C50M ix0 get sub XIE mul add put LAB*h361Mi im LAB*h50M ix0 get LAB*h50M ix1 get LAB*h50M ix0 get sub XIE mul add dup 360 ge {360 sub} if put habd361i im LAB*h361Mi im get put LAB*a361Mi im LAB*C361Mi im get LAB*h361Mi im get cos mul put LAB*b361Mi im LAB*C361Mi im get LAB*h361Mi im get sin mul put r*d361Mi im r*d50M ix0 get r*d50M ix1 get r*d50M ix0 get sub XIE mul add put g*d361Mi im g*d50M ix0 get g*d50M ix1 get g*d50M ix0 get sub XIE mul add put b*d361Mi im b*d50M ix0 get b*d50M ix1 get b*d50M ix0 get sub XIE mul add put ix0 00 ge ix0 07 le and {x361i im 0 put} if ix0 08 ge ix0 15 le and {x361i im 1 put} if ix0 16 ge ix0 23 le and {x361i im 2 put} if ix0 24 ge ix0 31 le and {x361i im 3 put} if ix0 32 ge ix0 39 le and {x361i im 4 put} if ix0 40 ge ix0 47 le and {x361i im 5 put} if exit } if } for %ix0=0,48 } for %i=40,400 LAB*L361Mi 360 LAB*L361Mi 0 get put LAB*a361Mi 360 LAB*a361Mi 0 get put LAB*b361Mi 360 LAB*b361Mi 0 get put LAB*C361Mi 360 LAB*C361Mi 0 get put LAB*h361Mi 360 LAB*h361Mi 0 get 360 add put habd361i 360 LAB*h361Mi 360 get put r*d361Mi 360 r*d361Mi 0 get put g*d361Mi 360 g*d361Mi 0 get put b*d361Mi 360 b*d361Mi 0 get put XIEi 360 XIEi 0 get put x361i 360 x361i 0 get put } bind def %END LAB*x50M_to_LAB*_rgb*x361Mi %****************************************************************** /LAB*L50M 50 array def /LAB*a50M 50 array def /LAB*b50M 50 array def /LAB*C50M 50 array def /LAB*h50M 50 array def /habd50M 50 array def /LAB729a_to_LAB*x50M { %BEG Procedure LAB729a_to_LAB*x50M %transfer from LAB729a_to_LAB*x50M, %9x9x9=729 steps used for LAB729a %requires /LAB*x50M 50 array def %requires in addition /LAB729a 729 array def 0 1 5 {/xtonj exch def %xtonj=0,5 0 1 7 {/j exch def %j=0,7 /ja xtonj 8 mul j add def xtonj 0 eq {/jx 648 j 09 mul add def} if %see O00Y-O83Y, -0 xtonj 1 eq {/jx 720 j 81 mul sub def} if %see Y00L-Y83L, -81 xtonj 2 eq {/jx 072 j add def} if %see L00C-L83C, +01 xtonj 3 eq {/jx 080 j 09 mul sub def} if %see C00V-C83V, -09 xtonj 4 eq {/jx 008 j 81 mul add def} if %see V00M-V83M, -81 xtonj 5 eq {/jx 656 j sub def} if %see M00O-M83O, +01 LAB*L50M ja L729a jx get put LAB*a50M ja a729a jx get put LAB*b50M ja b729a jx get put LAB*C50M ja LAB*a50M ja get dup mul LAB*b50M ja get dup mul add sqrt put LAB*h50M ja LAB*b50M ja get LAB*a50M ja get 0.0001 add atan put xtonj 5 eq LAB*h50M ja get 90 le and {LAB*h50M ja LAB*h50M ja get 360 add put} if } for %j=0,7 } for %xtonj=0,5 LAB*L50M 48 LAB*L50M 0 get put LAB*a50M 48 LAB*a50M 0 get put LAB*b50M 48 LAB*b50M 0 get put LAB*C50M 48 LAB*C50M 0 get put LAB*h50M 48 LAB*h50M 0 get 360 add put LAB*L50M 49 LAB*L50M 1 get put LAB*a50M 49 LAB*a50M 1 get put LAB*b50M 49 LAB*b50M 1 get put LAB*C50M 49 LAB*C50M 1 get put LAB*h50M 49 LAB*h50M 1 get 360 add put 0 1 49 {/i exch def %i=0,49 habd50M i LAB*h50M i get put } for %i=0,49 %data test according to increasing hue angle and appropriate correction /xtesthuea -1 def /xtesthuei 50 array def 0 1 48 {/i exch def %i=0,49 habd50M i get habd50M i 1 add get gt {/xtesthuea xtesthuea 1 add def xtesthuei xtesthuea i put habd50M i 1 add habd50M i get put LAB*L50M i 1 add LAB*L50M i get put LAB*a50M i 1 add LAB*a50M i get put LAB*b50M i 1 add LAB*b50M i get put LAB*C50M i 1 add LAB*C50M i get put LAB*h50M i 1 add LAB*h50M i get put } if } for %i=0,49 %/LAB*Hd 7 array def %0 1 6 {/i exch def %i=0,6 % LAB*Hd i LAB*h50M i 8 mul get put % } for %i=0,6 } bind def %END LAB729a_to_LAB*x50M %************************************************************************ /Lrc089 729 array def /arc089 729 array def /brc089 729 array def /Xrc089 729 array def /Yrc089 729 array def /Zrc089 729 array def /Lra089 729 array def /ara089 729 array def /bra089 729 array def /Xra089 729 array def /Yra089 729 array def /Zra089 729 array def /Lna089 729 array def /ana089 729 array def /bna089 729 array def /Xna089 729 array def /Yna089 729 array def /Zna089 729 array def /Lla089 729 array def /ala089 729 array def /bla089 729 array def /Xla089 729 array def /Yla089 729 array def /Zla089 729 array def /X729 729 array def /Y729 729 array def /Z729 729 array def /L729 729 array def %not adapted /a729 729 array def /b729 729 array def /L729a 729 array def %adapted /a729a 729 array def /b729a 729 array def /ilf 8 array def /ilf [0.00 0.25 0.50 1.00 2.00 4.00 8.00 16.00] def /Lrefl 11 array def /Lrefl [(0%) (0%) (0%) (0%) (0,6%) (1,2%) (2,5%) (5%) (10%) (20%) (40%)] def /xcharti_XYZ_LAB729a { %BEG Procedure xcharti_LAB729a %transfer from xcharti_LAB729a, %9x9x9=729 steps used for LAB729a %requires 0<= xcharti <=10 %requires /(Lab)x089 3240 array def (x=rc,ra,na,la) %requires /(XYZ)x089 3240 array def (x=rc,ra,na,la) %requires /x729 729 array def (x=X,Y,Z) %not adapted %requires /x729 729 array def (x=L,a,b) %not adapted %requires /x729a 729 array def (x=L,a,b) %adapted xcharti 2 le {/il 0 def} {/il xcharti 3 sub def} ifelse %Reference black and factors /YrN 2.52 def /Xtref089 YrN ilf il get mul XLN001 mul def /Ytref089 YrN ilf il get mul def /Ztref089 YrN ilf il get mul ZLN001 mul def /YNil Ytref089 def /YNil001 YNil 100 div def YNil001 6 29 div 3 exp ge {/FYYn YNil001 0.3333 exp def} {/FYYn 841 108 div YNil001 mul 4 29 div add def} ifelse /L*Nil 116 FYYn mul 16 sub def /IM1 728 def 0 1 IM1 {/i exch def %i=0,IM1 Xrc089 i Xrx089 i get put Yrc089 i Yrx089 i get put Zrc089 i Zrx089 i get put /XQ Xrc089 i get XLWD65100 div def /YQ Yrc089 i get YLWD65100 div def /ZQ Zrc089 i get 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 Lrc089 i YQ 0.008856 lt {903.3 YQ mul} {YQ 0.33333333 exp 116 mul 16 sub} ifelse put arc089 i 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 put brc089 i 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 put } for %i=0,IM1 /L*N Lrc089 0 get def /A*N arc089 0 get def /B*N brc089 0 get def /L*W Lrc089 728 get def /A*W arc089 728 get def /B*W brc089 728 get def 0 1 IM1 {/i exch def %i=0,IM1 Lra089 i Lrc089 i get put /l*CIE Lrc089 i get L*N sub L*W L*N sub div def %system rel. lightn. /a*s A*W A*N sub l*CIE mul def /b*s B*W B*N sub l*CIE mul def ara089 i arc089 i get A*N sub a*s sub put bra089 i brc089 i get B*N sub b*s sub put } for %i=0,IM1 0 1 IM1 {/i exch def %i=0,IM1 /X* {Lra089 i get 16 add 116 div ara089 i get 500 div add} bind def /Y* {Lra089 i get 16 add 116 div} bind def /Z* {Lra089 i get 16 add 116 div bra089 i get 200 div sub} bind def Xra089 i X* DecodeXYZ* XLWD65100 mul put Yra089 i Y* DecodeXYZ* YLWD65100 mul put Zra089 i Z* DecodeXYZ* ZLWD65100 mul put } for %i=0,IM1 xcharti 2 ge {%xcharti>=2 %for white X data /Xwref089 Xra089 728 get def /Ywref089 Yra089 728 get def /Zwref089 Zra089 728 get def %for black X data /YrN Yra089 0 get def /Xnref089 YrN XLN001 mul def /Ynref089 YrN def /Znref089 YrN ZLN001 mul def /IM1 728 def 0 1 IM1 {/i exch def %i=1,IM1 Xna089 i Xra089 i get Xnref089 sub Xwref089 Xwref089 Xnref089 sub div mul put Yna089 i Yra089 i get Ynref089 sub Ywref089 Ywref089 Ynref089 sub div mul put Zna089 i Zra089 i get Znref089 sub Zwref089 Zwref089 Znref089 sub div mul put } for %i=1,IM1 0 1 IM1 {/i exch def %i=1,IM1 /XQ Xna089 i get XLWD65100 div def /YQ Yna089 i get YLWD65100 div def /ZQ Zna089 i get 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 Lna089 i YQ 0.008856 lt {903.3 YQ mul} {YQ 0.33333333 exp 116 mul 16 sub} ifelse put ana089 i 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 put bna089 i 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 put } for %i=1,IM1 } if %xchart>=2 xcharti 3 ge {%xchart>=3 %for white X data /Xwref089 Xra089 728 get def /Ywref089 Yra089 728 get def /Zwref089 Zra089 728 get def /kn Ywref089 Ywref089 Ytref089 sub div def 0 1 IM1 {/i exch def %i=1,IM1 Xla089 i Xna089 i get kn div Xtref089 add put Yla089 i Yna089 i get kn div Ytref089 add put Zla089 i Zna089 i get kn div Ztref089 add put } for %i=1,IM1 0 1 IM1 {/i exch def %i=1,IM1 /XQ Xla089 i get XLWD65100 div def /YQ Yla089 i get YLWD65100 div def /ZQ Zla089 i get 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 Lla089 i YQ 0.008856 lt {903.3 YQ mul} {YQ 0.33333333 exp 116 mul 16 sub} ifelse put ala089 i 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 put bla089 i 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 put } for %i=1,IM1 } if %xchart>=3 xcharti 0 eq {%xcharti=0 (1x) 0 1 IM1 {/i exch def %i=0,IM1 L729 i Lrc089 i get put a729 i arc089 i get put b729 i brc089 i get put X729 i Xrc089 i get put Y729 i Yrc089 i get put Z729 i Zrc089 i get put } for %i=0,IM1 } if %xcharti=0 (1x) xcharti 1 eq {%xcharti=1 (1x) 0 1 IM1 {/i exch def %i=0,IM1 L729 i Lra089 i get put a729 i ara089 i get put b729 i bra089 i get put X729 i Xra089 i get put Y729 i Yra089 i get put Z729 i Zra089 i get put } for %i=0,IM1 } if %xcharti=1 (1x) xcharti 2 eq {%xcharti=2 (1x) 0 1 IM1 {/i exch def %i=0,IM1 L729 i Lna089 i get put a729 i ana089 i get put b729 i bna089 i get put X729 i Xna089 i get put Y729 i Yna089 i get put Z729 i Zna089 i get put } for %i=0,IM1 } if %xcharti=2 (1x) xcharti 3 ge {%xcharti=3,4,5,6,7,8,9,10 (8x) 0 1 728 {/i exch def %i=0,IM1 L729 i Lla089 i get put a729 i ala089 i get put b729 i bla089 i get put X729 i Xla089 i get put Y729 i Yla089 i get put Z729 i Zla089 i get put } for %i=0,IM1 } if %xcharti=3,4,5,6,7,8,9,10 (8x) %Adaptation /L*Nio L729 000 get def /A*Nio a729 000 get def /B*Nio b729 000 get def /L*Wio L729 728 get def /A*Wio a729 728 get def /B*Wio b729 728 get def /A*Dio A*Wio A*Nio sub def /B*Dio B*Wio B*Nio sub def 0 1 728 {/j exch def %j=0,728 L729a j L729 j get put /l*CIE L729 j get L*Nio sub L*Wio L*Nio sub div def %system rel. lightn. /a*s A*Wio A*Nio sub l*CIE mul def /b*s B*Wio B*Nio sub l*CIE mul def a729a j a729 j get A*Nio sub a*s sub put b729a j b729 j get B*Nio sub b*s sub put } for %j=0,728 xcharti 0 eq {/Xprint 0 def /FileData (LAB*rc) def} if xcharti 1 eq {/Xprint 1 def /FileData (LAB*ra) def} if xcharti 2 eq {/Xprint 1 def /FileData (LAB*na) def} if xcharti 3 eq {/Xprint 1 def /FileData (LAB*la0) def} if xcharti 4 eq {/Xprint 1 def /FileData (LAB*la1) def} if xcharti 5 eq {/Xprint 1 def /FileData (LAB*la2) def} if xcharti 6 eq {/Xprint 1 def /FileData (LAB*la3) def} if xcharti 7 eq {/Xprint 1 def /FileData (LAB*la4) def} if xcharti 8 eq {/Xprint 1 def /FileData (LAB*la5) def} if xcharti 9 eq {/Xprint 1 def /FileData (LAB*la6) def} if xcharti 10 eq {/Xprint 1 def /FileData (LAB*la7) def} if } bind def %END xcharti_XYZ_LAB729a %*************************************************************************** /nshow {300 /Times-ISOL1 FS show} bind def /kshow {300 /TimesI-ISOL1 FS show} bind def /bshow {300 /TimesB-ISOL1 FS show} bind def /jshow {300 /TimesBI-ISOL1 FS show} bind def /sshow {300 /Symbol FS show} bind def /ishow {220 /Times-ISOL1 FS -00 -50 rmoveto show 00 50 rmoveto} bind def /eshow {220 /Times-ISOL1 FS 0 100 rmoveto show 0 -100 rmoveto} bind def %%EndProlog gsave /lanind 0 def /lantex [(G) (E) (S) (N) (I) (J) (M)] def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind eq {show} {pop} ifelse} bind def /showes {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 /lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def} {/lanind1 1 def /lanind2 1 def} ifelse /colormg where {pop /colorm1 colormg def /colorm2 colormg def} {/colorm1 0 def /colorm2 0 def} ifelse /xcolorg where {pop /xcolor1 xcolorg def /xcolor2 xcolorg def} {/xcolor1 0 def /xcolor2 0 def} ifelse /xchartg where {pop /xchart1 xchartg def /xchart2 xchartg def} {/xchart1 0 def /xchart2 0 def} ifelse /lanind lanind1 def %lanind1 1 lanind2 {/lanind exch def %output showpage /colorm colorm1 def %colorm1 1 colorm2 {/colorm exch def %output showpage /xcolor xcolor1 def %xcolor1 1 xcolor2 {/xcolor exch def %output showpage /xchart xchart1 def %xchart1 1 xchart2 {/xchart exch def %output showpage /GSS$ where {pop /LSS$ GSS$ def} {/LSS$ (1) def} ifelse /GSC$ where {pop /LSC$ GSC$ def} {/LSC$ (N) def} ifelse /GSX$ where {pop /LSX$ GSX$ def} {/LSX$ (0) def} ifelse /GSY$ where {pop /LSY$ GSY$ def} {/LSY$ (0) def} ifelse /GEX$ where {pop /LEX$ GEX$ def} {/LEX$ (P.PS./PDF) def} ifelse /GEY$ where {pop /LEY$ GEY$ def} {/LEY$ (P.DAT) def} ifelse /IMES where {pop %/IMES IMES def } {/IMES 0 def} ifelse /xchartg where {pop /xchart xchartg def} {/xchart 0 def} ifelse /xcolorg where {pop /xcolor xcolorg def} {/xcolor 1 def} ifelse /ymax 16600 def /ydel 203 def 72 90 translate 0.010 MM dup scale /TSYSIO (LECD display, non glossy) def xyYA_to_XYZ729 %0 <=xchart <=109 /xcharti xchart 10 idiv def %range 0...10 /xchartl xchart xchart 10 idiv 10 mul sub def %j=0...9 %00 1 10 {/xcharti exch def %xcharti=00,10 gsave xcharti_XYZ_LAB729a %00 1 09 {/xchartl exch def %xchartl=00,09 /xchart xchartl def gsave 1.0 setgray 20 setlinewidth 0 0 moveto 25000 0 rlineto 0 17000 rlineto -25000 0 rlineto closepath fill 0.0 setgray 0 0 moveto 25000 0 rlineto 0 17000 rlineto -25000 0 rlineto closepath stroke TK 0 setgray 200 -200 moveto (OE420-7N) show (, Page of series ) showen (, Seite der Serie ) showde xchartl 1 add xcharti 10 mul add cvishow (/110, ) show FileData show xcharti 3 ge {(, YN=) show Lrefl xcharti get show} if (, XYZnw=) show X729 000 get cvsshow1r (, ) show Y729 000 get cvsshow1r (, ) show Z729 000 get cvsshow1r (, ) show X729 728 get cvsshow1r (, ) show Y729 728 get cvsshow1r (, ) show Z729 728 get cvsshow1r (, LAB*nw=) show L729 000 get cvsshow1r (, ) show a729 000 get cvsshow1r (, ) show b729 000 get cvsshow1r (, ) show L729 728 get cvsshow1r (, ) show a729 728 get cvsshow1r (, ) show b729 728 get cvsshow1r xcharti 0 eq {(, not adapted) showen (, nicht adaptiert) showde } {(, adapted) showen (, adaptiert) showde } ifelse LAB*He_Hs LAB729a_to_LAB*x50M hab*sM_to_hab*eM hab*sM_to_rgb*s361Mi_rgb*e361Mi LAB*x50M_to_LAB*_rgb*x361Mi /habd361M 361 array def %LAB*h50M i %i=0,48 %360:48=7,5 wie interpolieren ? %360:24=15 %LAB*h50M i i=0,2,48 = 25 Werte 0 1 359 {/i exch def %i=0,359 /i15 i 15 idiv def %range 0..23 /i15d i i15 15 mul sub def %range 0..14 /dLAB*Hd LAB*h50M i15 2 mul 1 add get LAB*h50M i15 2 mul get sub 15 div def habd361M i LAB*h50M i15 2 mul get dLAB*Hd i15d mul add put % habd361M i get 360 ge {habd361M i habd361M i get 360 sub put} if } for %i=0,359 habd361M 360 habd361M 0 get 360 add put %LAB*h50M i %i=0,48 %360:48=7,5 wie interpolieren ? %360:48=7,5 %LAB*h50M i i=0,1,2,..47,48 = 49 Werte 0 1 359 {/i exch def %i=0,359 /i075 i 7.5 div def %range 0..47 /i075d i i075 7.5 mul sub def %range 0..7 /dLAB*Hd LAB*h50M i075 1 add cvi get LAB*h50M i075 cvi get sub 7.5 div def habd361M i LAB*h50M i075 cvi get dLAB*Hd i075d mul add put % habd361M i get 360 ge {habd361M i habd361M i get 360 sub put} if } for %i=0,359 habd361M 360 habd361M 0 get 360 add put TK 16500 -200 moveto %(CIELAB diagram and tables ) showen (CIELAB\255Diagramm und Tabellen ) showde %(CIELAB -> ) show (Output: ) showen (Ausgabe: ) showde FileDaten showen FileDatde showde (, page ) showen (, Seite ) showde xchartl 1 add xcharti 10 mul add cvishow (/110) show TBK /xi 000 def xi 100 add 16700 moveto (Data of Maximum color M in colorimetric system ) showen (Daten der Maximalfarbe M im Farbmetrik\255Sytem ) showde FileDaten showen FileDatde showde ( for input or output; ) showen ( f\374r Ein\255 oder Ausgabe; ) showde (Six hue angles of the 60 degree standard colours) showen (Sechs Bunttonwinkel der 60\255Grad Standardfarben) showde TBIK ( s: h) show TBS 0 -50 rmoveto (ab,s) show 0 50 rmoveto TBK ( = ) show LAB*Hs 0 get cvsshow1r (, ) show LAB*Hs 1 get cvsshow1r (, ) show LAB*Hs 2 get cvsshow1r (, ) show LAB*Hs 3 get cvsshow1r (, ) show LAB*Hs 4 get cvsshow1r (, ) show LAB*Hs 5 get cvsshow1r (; ) show xi 100 add 16400 moveto (Six hue angles of the device colours) showen (Sechs Bunttonwinkel der Ger\344tefarben) showde TBIK ( d: h) show TBS 0 -50 rmoveto (ab,d) show 0 50 rmoveto TBK ( = ) show LAB*h50M 00 get cvsshow1r (, ) show LAB*h50M 08 get cvsshow1r (, ) show LAB*h50M 16 get cvsshow1r (, ) show LAB*h50M 24 get cvsshow1r (, ) show LAB*h50M 32 get cvsshow1r (, ) show LAB*h50M 40 get cvsshow1r (; ) show (Six hue angles of the elementary colours) showen (Sechs Bunttonwinkel der Elementarfarben) showde TBIK ( e: h) show TBS 0 -50 rmoveto (ab,e) show 0 50 rmoveto TBK ( = ) show LAB*He 0 get cvsshow1r (, ) show LAB*He 1 get cvsshow1r (, ) show LAB*He 2 get cvsshow1r (, ) show LAB*He 3 get cvsshow1r (, ) show LAB*He 4 get cvsshow1r (, ) show LAB*He 5 get cvsshow1r xchartl 0 eq {%xchartl=0,>0 /ToutenN0 (Colorimetric data of Natural Colour System NCS) def /ToutdeN0 (Farbmetrische Daten des Nat\374rliches Farbsystems NCS) def /ToutenL0 (Colorimetric data of Natural Luminous System NLS) def /ToutdeL0 (Farbmetrische Daten des Nat\374rliches\255Lichtfarbensystem NLS) def 8 /Times-ISOL1 FS 72 82.5 moveto ( OE420-7N, ) show xchart 8 le {ToutdeN0 showde ToutenN0 showen} {ToutdeL0 showde ToutenL0 showen} ifelse /yhoe 8500 def /xhoe 12300 def % 0 1 2 3 4 5 /Dcol [(O=R) (Y=J) (L=G) (C=C) (V=B) (M=M) ] def /Dcolen [(Orange red) (Yellow) (Leaf green) (Cyan blue) (Violet blue) (Magenta red)] def /Dcolde [(Orangerot) (Gelb) (Laubgr\374n) (Cyanblau) (Violettblau) (Magentarot)] def /xshifd [ 2800 -4000 -5400 -5100 2700 2900 ] def /yshifd [ 2500 3700 1800 -1000 -2600 -0850 ] def /Ecol [(R) (J) (G) (C) (B) (M) ] def /Ecolen [(Red) (Yellow) (Green) (Blue green) (Blue) (Blue red)] def /Ecolde [(Rot) (Gelb) (Gr\374n) (Blaugr\374n) (Blau) (Blaurot)] def /xshife [ 2800 -3000 -5400 -5100 -3000 2900 ] def /yshife [ 2000 3700 1800 -1000 -2600 -0850 ] def /Scol [(R) (J) (G) (C) (B) (M) ] def /Scolen [(Red) (Yellow) (Green) (Blue green) (Blue) (Blue red)] def /Scolde [(Rot) (Gelb) (Gr\374n) (Blaugr\374n) (Blau) (Blaurot)] def /xshifs [ 2800 -3000 -5400 -5100 -3000 2900 ] def /yshifs [ 2000 3700 1800 -1000 -2600 -0850 ] def 2500 8200 moveto 20000 0 rlineto stroke 12500 2000 moveto 0 13000 rlineto stroke 0 1 3 {/ibild exch def %ibild=0,3 ibild 0 eq {xhoe 0.5 mul 600 sub yhoe 1.47 mul 400 sub translate} if ibild 1 eq {xhoe 1.1 mul yhoe 0.0 mul translate} if ibild 2 eq {xhoe 1.1 mul neg yhoe 0.97 mul neg translate} if ibild 3 eq {xhoe 1.1 mul yhoe 0.0 mul translate} if ibild 2 le {%ibild<=2 0 setgray -4000 0 moveto 8000 0 rlineto stroke 0 -3500 moveto 0 7500 rlineto stroke 3800 70 moveto 200 -70 rlineto -200 -70 rlineto closepath fill -70 3800 moveto 70 200 rlineto 70 -200 rlineto closepath fill /fak0 28 def /fakt 25 def 0 1 48 {/i exch def %i=0,48 LAB*a50M i get fakt mul LAB*b50M i get fakt mul moveto LAB*a50M i 1 add get fakt mul LAB*b50M i 1 add get fakt mul lineto stroke newpath r*d50M i get g*d50M i get b*d50M i get setrgbcolor LAB*a50M i get fakt mul LAB*b50M i get fakt mul 100 0 360 arc fill } for %i=0,48 0 setgray 0 8 48 {/i exch def %i=0,8,48 RJGCBMd 0 0 moveto LAB*a50M i get fak0 mul LAB*b50M i get fak0 mul rlineto stroke } for %i=0,8,48 } if %ibild<=2 ibild 0 eq {%ibild=0 %device (d) 0 setgray 0300 3900 moveto TBIK (device ) showen (Ger\344te\255) showde TBK (CIELAB) show TBIK ( \050 a*) show TBS 0 -50 rmoveto (d) show 0 50 rmoveto TBIK (, b*) show TBS 0 -50 rmoveto (d) show 0 50 rmoveto TBIK (\051) show TBK ( chroma diagram) showen (\255Diagramm) showde TBIK 3500 0150 moveto (a*) show TBS 0 -50 rmoveto (d) show 0 50 rmoveto -500 4000 moveto (b*) show TBS 0 -50 rmoveto (d) show 0 50 rmoveto 0 8 40 {/kn exch def %kn=0,8,40 0 setgray /kn8 kn 8 idiv def xshifd kn8 get yshifd kn8 get moveto TBIK Dcol kn8 get show TBS 0 -50 rmoveto (d) show 0 50 rmoveto TBK ( ) show Dcolen kn8 get showen Dcolde kn8 get showde TIK xshifd kn8 get yshifd kn8 get 350 sub moveto (LCH*) show TK -30 -50 rmoveto (d) show 0 50 rmoveto TK ( = ) show LAB*L50M kn get cvsshow1 ( ) show LAB*C50M kn get cvsshow1 ( ) show LAB*h50M kn get cvsshow1 TIK xshifd kn8 get yshifd kn8 get 700 sub moveto (LAB*) show TK -30 -50 rmoveto (d) show 0 50 rmoveto TK ( = ) show LAB*L50M kn get cvsshow1 ( ) show LAB*a50M kn get cvsshow1 ( ) show LAB*b50M kn get cvsshow1 TIK xshifd kn8 get yshifd kn8 get 1050 sub moveto (rgb*) show TK -30 -50 rmoveto (d) show 0 50 rmoveto TK ( = ) show r*d50M kn get cvsshow3 ( ) show g*d50M kn get cvsshow3 ( ) show b*d50M kn get cvsshow3 0 8 48 {/i exch def %i=0,8,48 RJGCBMe /i361d habd50M i get round cvi def i361d 360 ge {/i361d i361d 360 sub def} if % r*d361Mi i361d get g*d361Mi i361d get b*d361Mi i361d get setrgbcolor % 0 0 moveto LAB*a361Mi i361d get fak0 mul % LAB*b361Mi i361d get fak0 mul rlineto stroke 0 1 8 {/l exch def %l=0,8 newpath /alpha l 0.125 mul def /beta 1 alpha sub def 1.0 beta mul r*d361Mi i361d get alpha mul add 1.0 beta mul g*d361Mi i361d get alpha mul add 1.0 beta mul b*d361Mi i361d get alpha mul add setrgbcolor LAB*a361Mi i361d get fakt mul alpha mul LAB*b361Mi i361d get fakt mul alpha mul 100 0 360 arc fill l 0 eq {%l=0 0 setgray LAB*a361Mi i361d get fakt mul alpha mul LAB*b361Mi i361d get fakt mul alpha mul 100 0 360 arc stroke } if %l=0 } for %l=0,8 } for %i=0,8,48 } for %kn=0,8,40 } if %ibild=0 ibild 1 eq {%ibild=1 %elementary (e) 0 setgray 0300 3900 moveto TBIK (elementary ) showen (Elementar\255) showde TBK (CIELAB) show TBIK ( \050 a*) show TBS 0 -50 rmoveto (e) show 0 50 rmoveto TBIK (, b*) show TBS 0 -50 rmoveto (e) show 0 50 rmoveto TBIK (\051) show TBK ( chroma diagram) showen (\255Diagramm) showde TBIK 3500 0150 moveto (a*) show TBS 0 -50 rmoveto (e) show 0 50 rmoveto -500 4000 moveto (b*) show TBS 0 -50 rmoveto (e) show 0 50 rmoveto 0 setgray 0 8 40 {/kn exch def %kn=0,8,40 /kn8 kn 8 idiv def xshife kn8 get yshife kn8 get moveto TBIK Ecol kn8 get show TBS 0 -50 rmoveto (e) show 0 50 rmoveto TBK ( ) show Ecolen kn8 get showen Ecolde kn8 get showde /i361e habe50M kn get round cvi def i361e 360 ge {/i361e i361e 360 sub def} if TIK xshife kn8 get yshife kn8 get 350 sub moveto (LCH*) show TK -30 -50 rmoveto (e) show 0 50 rmoveto TK ( = ) show LAB*L361Mi i361e get cvsshow1 ( ) show LAB*C361Mi i361e get cvsshow1 ( ) show LAB*h361Mi i361e get cvsshow1 TIK xshife kn8 get yshife kn8 get 700 sub moveto (LAB*) show TK -30 -50 rmoveto (e) show 0 50 rmoveto TK ( = ) show LAB*L361Mi i361e get cvsshow1 ( ) show LAB*a361Mi i361e get cvsshow1 ( ) show LAB*b361Mi i361e get cvsshow1 TIK xshife kn8 get yshife kn8 get 1050 sub moveto (rgb*) show TK -30 -50 rmoveto (e) show 0 50 rmoveto TK ( = ) show r*d361Mi i361e get cvsshow3 ( ) show g*d361Mi i361e get cvsshow3 ( ) show b*d361Mi i361e get cvsshow3 } for %kn=0,8,40 0 8 48 {/i exch def %i=0,8,48 RJGCBMe /i361e habe50M i get round cvi def i361e 360 ge {/i361e i361e 360 sub def} if r*d361Mi i361e get g*d361Mi i361e get b*d361Mi i361e get setrgbcolor 0 0 moveto LAB*a361Mi i361e get fakt mul LAB*b361Mi i361e get fakt mul rlineto stroke 0 1 8 {/l exch def %l=0,8 newpath /alpha l 0.125 mul def /beta 1 alpha sub def 1.0 beta mul r*d361Mi i361e get alpha mul add 1.0 beta mul g*d361Mi i361e get alpha mul add 1.0 beta mul b*d361Mi i361e get alpha mul add setrgbcolor LAB*a361Mi i361e get fakt mul alpha mul LAB*b361Mi i361e get fakt mul alpha mul 100 0 360 arc fill } for %l=0,8 } for %i=0,8,48 } if %ibild=1 ibild 2 eq {%ibild=2 %standard (s) 0 setgray 0300 3900 moveto TBIK (standard ) showen (Standard\255) showde TBK (CIELAB) show TBIK ( \050 a*) show TBS 0 -50 rmoveto (s) show 0 50 rmoveto TBIK (, b*) show TBS 0 -50 rmoveto (s) show 0 50 rmoveto TBIK (\051) show TBK ( chroma diagram) showen (\255Diagramm) showde TBIK 3500 0150 moveto (a*) show TBS 0 -50 rmoveto (s) show 0 50 rmoveto -500 4000 moveto (b*) show TBS 0 -50 rmoveto (s) show 0 50 rmoveto 0 setgray 0 8 40 {/kn exch def %kn=0,8,40 /kn8 kn 8 idiv def xshifs kn8 get yshifs kn8 get moveto TBIK Scol kn8 get show TBS 0 -50 rmoveto (s) show 0 50 rmoveto TBK ( ) show Scolen kn8 get showen Scolde kn8 get showde /i361s habs50M kn get round cvi def i361s 360 ge {/i361s i361s 360 sub def} if TIK xshifs kn8 get yshifs kn8 get 350 sub moveto (LCH*) show TK -30 -50 rmoveto (s) show 0 50 rmoveto TK ( = ) show LAB*L361Mi i361s get cvsshow1 ( ) show LAB*C361Mi i361s get cvsshow1 ( ) show LAB*h361Mi i361s get cvsshow1 TIK xshifs kn8 get yshifs kn8 get 700 sub moveto (LAB*) show TK -30 -50 rmoveto (s) show 0 50 rmoveto TK ( = ) show LAB*L361Mi i361s get cvsshow1 ( ) show LAB*a361Mi i361s get cvsshow1 ( ) show LAB*b361Mi i361s get cvsshow1 TIK xshifs kn8 get yshifs kn8 get 1050 sub moveto (rgb*) show TK -30 -50 rmoveto (s) show 0 50 rmoveto TK ( = ) show r*d361Mi i361s get cvsshow3 ( ) show g*d361Mi i361s get cvsshow3 ( ) show b*d361Mi i361s get cvsshow3 } for %kn=0,8,40 0 8 48 {/i exch def %i=0,8,48 RJGCBMe /i361s habs50M i get round cvi def i361s 360 ge {/i361s i361s 360 sub def} if r*d361Mi i361s get g*d361Mi i361s get b*d361Mi i361s get setrgbcolor 0 0 moveto LAB*a361Mi i361s get fakt mul LAB*b361Mi i361s get fakt mul rlineto stroke 0 1 8 {/l exch def %l=0,8 newpath /alpha l 0.125 mul def /beta 1 alpha sub def 1.0 beta mul r*d361Mi i361s get alpha mul add 1.0 beta mul g*d361Mi i361s get alpha mul add 1.0 beta mul b*d361Mi i361s get alpha mul add setrgbcolor LAB*a361Mi i361s get fakt mul alpha mul LAB*b361Mi i361s get fakt mul alpha mul 100 0 360 arc fill } for %l=0,8 } for %i=0,8,48 } if %ibild=2 ibild 3 eq {%ibild=3 0 setgray -6500 3900 moveto TBK (Notes to the CIELAB chroma diagrams) showen (Anmerkung zu den CIELAB\255Buntheits\255Diagrammen) showde TBIK ( \050 a*) show TBS -30 -50 rmoveto (d) show 0 50 rmoveto TBIK (, b*) show TBS -30 -50 rmoveto (d) show 0 50 rmoveto TBIK ( \051, ) show TBIK ( \050 a*) show TBS -30 -50 rmoveto (s) show 0 50 rmoveto TBIK (, b*) show TBS -30 -50 rmoveto (s) show 0 50 rmoveto TBIK ( \051, ) show TBIK ( \050 a*) show TBS -30 -50 rmoveto (e) show 0 50 rmoveto TBIK (, b*) show TBS -30 -50 rmoveto (e) show 0 50 rmoveto TBIK ( \051) show -6500 3400 moveto TK (1. For the) showen (1. F\374r die) showde TIK ( rgb*) show TS -30 -50 rmoveto (d) show 0 50 rmoveto TK (\255input values the CIELAB data) showen (\255Eingabedaten wurden die CIELAB-Daten) showde TIK ( LCH*) show TS -30 -50 rmoveto (d) show 0 50 rmoveto TK ( and) showen ( und) showde TIK ( LAB*) show TS -30 -50 rmoveto (d) show 0 50 rmoveto TK ( have been measured.) showen ( gemessen.) showde -6500 3000 moveto TK (2. For the calculation of the standard hue angle ) showen TIK (h) show TS -30 -50 rmoveto (ab,s) show 0 50 rmoveto TK ( use for any device values) showen TIK ( rgb*) show TS -30 -50 rmoveto (d) show 0 50 rmoveto TK ( the equation:) showen -6000 2650 moveto TBIK (h) show TBS -30 -50 rmoveto (ab,s) show 0 50 rmoveto TBK ( = ) show TBIK (atan) show TBK ( [ ) show TBIK (r*) show TBS -30 -50 rmoveto (d) show 0 50 rmoveto TBIK ( cos(30)) show TBK ( + ) show TBIK (g*) show TBS -30 -50 rmoveto (d) show 0 50 rmoveto TBIK ( cos(150)) show TBK ( ] / [ ) show TBIK (r*) show TBS -30 -50 rmoveto (d) show 0 50 rmoveto TBIK ( sin(30)) show TBK ( + ) show TBIK (g*) show TBS -30 -50 rmoveto (d) show 0 50 rmoveto TBIK ( sin(150)) show TBK ( + ) show TBIK (b*) show TBS -30 -50 rmoveto (d) show 0 50 rmoveto TBIK ( sin(270)) show TBK ( ] ) show 5000 2650 moveto TK ((1)) show -6500 2200 moveto TK (3. For the 48 or 360 equally spaced standard hue angles ) showen (3. F\374r die 48 oder 360 gleichabst\344ndig gestuften Standard\255Bunttonwinkel ) showde TIK (h) show TS -30 -50 rmoveto (ab,s) show 0 50 rmoveto TK ( of the colours of maximum chroma use) showen ( der Farben von maximaler Buntheit benutze) showde -6250 1900 moveto (the seven hue angles of the 60 degree colours) showen (die sieben Bunttonwinkel der 60\Grad\255Farben) showde TIK ( s: h) show TS 0 -50 rmoveto (ab,si) show 0 50 rmoveto TK ( = ) show LAB*Hs 0 get cvsshow1r (, ) show LAB*Hs 1 get cvsshow1r (, ) show LAB*Hs 2 get cvsshow1r (, ) show LAB*Hs 3 get cvsshow1r (, ) show LAB*Hs 4 get cvsshow1r (, ) show LAB*Hs 5 get cvsshow1r (, ) show LAB*Hs 6 get cvsshow1r ( (i=0,6) ) show -6250 1600 moveto (and the equations for a 48 and 360 step hue circle: ) showen (und die Gleichungen f\374r einen 48\255 und 360\255stufigen Bunttonkreis: ) showde -6000 1250 moveto TBIK (h) show TBS 0 -50 rmoveto (48ab,sij) show 0 50 rmoveto TBK ( = ) show TBIK (h) show TBS 0 -50 rmoveto (ab,si) show 0 50 rmoveto ( + ) show TBIK (j) show TBK ( [) show TBIK (h) show TBS 0 -50 rmoveto (ab,si+1) show 0 50 rmoveto ( - ) show TBIK (h) show TBS 0 -50 rmoveto (ab,si) show 0 50 rmoveto TBK ( ] /8 \050 ) show TBIK (i) show TBK ( = 0, 1, ..., 5; ) show TBIK (j) show TBK ( = 0, 1, ..., 7\051) show 5000 1250 moveto TK ((2)) show -6000 0850 moveto TBIK (h) show TBS 0 -50 rmoveto (360ab,sij) show 0 50 rmoveto TBK ( = ) show TBIK (h) show TBS 0 -50 rmoveto (ab,si) show 0 50 rmoveto ( + ) show TBIK (j) show TBK ( [) show TBIK (h) show TBS 0 -50 rmoveto (ab,si+1) show 0 50 rmoveto ( - ) show TBIK (h) show TBS 0 -50 rmoveto (ab,si) show 0 50 rmoveto TBK ( ] /60 \050 ) show TBIK (i) show TBK ( = 0, 1, ..., 5; ) show TBIK (j) show TBK ( = 0, 1, ..., 59\051) show 5000 0850 moveto TK ((3)) show -6500 0400 moveto TK (4. For the 48 or 360 elementary hue angles ) showen (4. F\374r die 48 oder 360 Elementar\255Bunttonwinkel ) showde TIK (h) show TS -30 -50 rmoveto (ab,e) show 0 50 rmoveto TK ( of the colours of maximum chroma use) showen ( der Farben von maximaler Buntheit benutze) showde -6250 0100 moveto (the seven hue angles of the elementary colours) showen (die sieben Bunttonwinkel der Elementar\255Farben) showde TIK ( e: h) show TS 0 -50 rmoveto (ab,ei) show 0 50 rmoveto TK ( = ) show LAB*He 0 get cvsshow1r (, ) show LAB*He 1 get cvsshow1r (, ) show LAB*He 2 get cvsshow1r (, ) show LAB*He 3 get cvsshow1r (, ) show LAB*He 4 get cvsshow1r (, ) show LAB*He 5 get cvsshow1r (, ) show LAB*He 6 get cvsshow1r ( (i=0,6) ) show -6250 -200 moveto (and the equations for a 48 and 360 step elementary hue circle: ) showen (und die Gleichungen f\374r einen 48\255 und 360\255stufigen Elementar\255Bunttonkreis: ) showde -6000 -550 moveto TBIK (h) show TBS 0 -50 rmoveto (48ab,eij) show 0 50 rmoveto TBK ( = ) show TBIK (h) show TBS 0 -50 rmoveto (ab,ei) show 0 50 rmoveto ( + ) show TBIK (j) show TBK ( [) show TBIK (h) show TBS 0 -50 rmoveto (ab,ei+1) show 0 50 rmoveto ( - ) show TBIK (h) show TBS 0 -50 rmoveto (ab,ei) show 0 50 rmoveto TBK ( ] /8 \050 ) show TBIK (i) show TBK ( = 0, 1, ..., 5; ) show TBIK (j) show TBK ( = 0, 1, ..., 7\051) show 5000 -550 moveto TK ((4)) show -6000 -0950 moveto TBIK (h) show TBS 0 -50 rmoveto (360ab,eij) show 0 50 rmoveto TBK ( = ) show TBIK (h) show TBS 0 -50 rmoveto (ab,ei) show 0 50 rmoveto ( + ) show TBIK (j) show TBK ( [) show TBIK (h) show TBS 0 -50 rmoveto (ab,ei+1) show 0 50 rmoveto ( - ) show TBIK (h) show TBS 0 -50 rmoveto (ab,ei) show 0 50 rmoveto TBK ( ] /60 \050 ) show TBIK (i) show TBK ( = 0, 1, ..., 5; ) show TBIK (j) show TBK ( = 0, 1, ..., 59\051) show 5000 -950 moveto TK ((5)) show -6500 -1400 moveto TK (5. For any elementary hue angle ) showen (5. F\374r jeden Elementar\255Bunttonwinkel ) showde TIK (h) show TS -30 -50 rmoveto (ab,e) show 0 50 rmoveto TK ( there is a well defined device hue angle ) showen ( gibt es einem genau definierten Ger\344te\255Bunttonwinkel ) showde TIK (h) show TS -30 -50 rmoveto (ab,d) show 0 50 rmoveto -6250 -1700 moveto TK (see the following tables, columns 1 to 3.) showen (siehe die folgenden Tabellen, Spalten 1 bis 3.) showde -6500 -2100 moveto TK (6. The values ) showen (6. Die Werte ) showde TIK (rgb*) show TS -30 -50 rmoveto (de) show 0 50 rmoveto TK ( produce the output of the device\255independent elementary hues) showen ( erzeugen die Ausgabe der ger\344teunabh\344ngigen Elemetar\255Buntt\366ne) showde } if %ibild=3 } for %ibild=0,3 }%xchartl=0 {%xchartl>0 /x0x 0000 def /x1x 5700 def /x2x 13300 def /x01 2200 def %rgb /x02 2900 def /x03 3600 def /x04 4300 def %LabCh /x05 5000 def /x06 5700 def /x07 6400 def /x08 7100 def /x09 7700 def /x10 8400 def /x11 9100 def /xd0 0100 def /xs0 0800 def /xe0 1500 def /xd1 23050 def /xs1 23700 def /xe1 24350 def x0x x01 add 50 sub 0 moveto 0 16200 rlineto stroke x1x x01 add 50 sub 0 moveto 0 16200 rlineto stroke x2x x01 add 50 sub 0 moveto 0 16200 rlineto stroke /ymax 16100 def TBIK xd0 ymax moveto (h) show TBK -00 -80 rmoveto (ab,d) show 00 80 rmoveto TBIK xs0 ymax moveto (h) show TBK -00 -80 rmoveto (ab,s) show 00 80 rmoveto TBIK xe0 ymax moveto (h) show TBK -00 -80 rmoveto (ab,e) show 00 80 rmoveto TBIK xchartl 1 eq {%xchartl=1,>01 x0x x01 add ymax moveto (rgb*) show TBK -00 -80 rmoveto (dd50M) show 00 80 rmoveto TBIK x0x x04 add ymax moveto (LAB*) show TBK -00 -80 rmoveto (dd50Mx (x=LabCh)) show 00 80 rmoveto TBIK x1x x01 add ymax moveto (rgb*) show TBK -00 -80 rmoveto (ds50M) show 00 80 rmoveto TBIK x1x x04 add ymax moveto (LAB*) show TBK -00 -80 rmoveto (ds50Mx (x=LabCh)) show 00 80 rmoveto TBIK x1x x09 add ymax moveto (rgb*) show TBK -00 -80 rmoveto (s50M) show 00 80 rmoveto TBIK x2x x01 add ymax moveto (rgb*) show TBK -00 -80 rmoveto (de50M) show 00 80 rmoveto TBIK x2x x04 add ymax moveto (LAB*) show TBK -00 -80 rmoveto (de50Mx (x=LabCh)) show 00 80 rmoveto TBIK x2x x09 add ymax moveto (rgb*) show TBK -00 -80 rmoveto (e50M) show 00 80 rmoveto TBIK }%xchartl=1 {%xchartl>1 x0x x01 add ymax moveto (rgb*) show TBK -00 -80 rmoveto (dd361Mi) show 00 80 rmoveto TBIK x0x x04 add ymax moveto (LAB*) show TBK -00 -80 rmoveto (dd361Mix (x=LabCh)) show 00 80 rmoveto TBIK x1x x01 add ymax moveto (rgb*) show TBK -00 -80 rmoveto (ds361Mi) show 00 80 rmoveto TBIK x1x x04 add ymax moveto (LAB*) show TBK -00 -80 rmoveto (ds361Mix (x=LabCh)) show 00 80 rmoveto TBIK x1x x09 add ymax moveto (rgb*) show TBK -00 -80 rmoveto (s50M) show 00 80 rmoveto TBIK x2x x01 add ymax moveto (rgb*) show TBK -00 -80 rmoveto (de361Mi) show 00 80 rmoveto TBIK x2x x04 add ymax moveto (LAB*) show TBK -00 -80 rmoveto (de361Mix (x=LabCh)) show 00 80 rmoveto TBIK x2x x09 add ymax moveto (rgb*) show TBK -00 -80 rmoveto (e50M) show 00 80 rmoveto TBIK } ifelse %xchartl=1,>1 xd1 ymax moveto (rgb*) show TBK -100 -100 rmoveto (dd) show 100 100 rmoveto TBIK xs1 ymax moveto (rgb*) show TBK -100 -100 rmoveto (ds) show 100 100 rmoveto TBIK xe1 ymax moveto (rgb*) show TBK -100 -100 rmoveto (de) show 100 100 rmoveto TBIK /ymax 15700 def /ydel0 310 def /ydel1 345 def /ys 50 def /RJGCBMs 9 array def /RJGCBMs [( ) (R) (J) (G) (C) (C) (B) (M) (R)] def /RJGCBM 7 array def /RJGCBM [(R) (J) (G) (C) (B) (M) (R)] def xchartl 1 eq {%xchartl=01 TK 0 1 48 {/i exch def %i=0,48 /i8 i 8 idiv def /yi ymax i ydel0 mul sub i8 ydel0 0.4 mul mul sub def xd0 yi moveto habd50M i get cvsshow1r xs0 yi moveto habs50M i get cvsshow1r xe0 yi moveto habe50M i get cvsshow1r x0x x01 add yi moveto r*d50M i get cvsshow3r x0x x02 add yi moveto g*d50M i get cvsshow3r x0x x03 add yi moveto b*d50M i get cvsshow3r x0x x04 add yi moveto LAB*L50M i get cvsshow1r x0x x05 add yi moveto LAB*a50M i get cvsshow1r x0x x06 add yi moveto LAB*b50M i get cvsshow1r x0x x07 add yi moveto LAB*C50M i get cvsshow1r x0x x08 add yi moveto LAB*h50M i get cvsshow1r /i361s habs50M i get round cvi def i361s 360 ge {/i361s i361s 360 sub def} if x1x x01 add yi moveto r*d361Mi i361s get cvsshow3r x1x x02 add yi moveto g*d361Mi i361s get cvsshow3r x1x x03 add yi moveto b*d361Mi i361s get cvsshow3r x1x x04 add yi moveto LAB*L361Mi i361s get cvsshow1r x1x x05 add yi moveto LAB*a361Mi i361s get cvsshow1r x1x x06 add yi moveto LAB*b361Mi i361s get cvsshow1r x1x x07 add yi moveto LAB*C361Mi i361s get cvsshow1r x1x x08 add yi moveto LAB*h361Mi i361s get cvishow x1x x09 add yi moveto r*d50M i get cvsshow3r x1x x10 add yi moveto g*d50M i get cvsshow3r x1x x11 add yi moveto b*d50M i get cvsshow3r /i361e habe50M i get round cvi def i361e 360 ge {/i361e i361e 360 sub def} if x2x x01 add yi moveto r*d361Mi i361e get cvsshow3r x2x x02 add yi moveto g*d361Mi i361e get cvsshow3r x2x x03 add yi moveto b*d361Mi i361e get cvsshow3r x2x x04 add yi moveto LAB*L361Mi i361e get cvsshow1r x2x x05 add yi moveto LAB*a361Mi i361e get cvsshow1r x2x x06 add yi moveto LAB*b361Mi i361e get cvsshow1r x2x x07 add yi moveto LAB*C361Mi i361e get cvsshow1r x2x x08 add yi moveto LAB*h361Mi i361e get cvishow x2x x09 add yi moveto r*d50M i get cvsshow3r x2x x10 add yi moveto g*d50M i get cvsshow3r x2x x11 add yi moveto b*d50M i get cvsshow3r r*d50M i get g*d50M i get b*d50M i get setrgbcolor xd1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath fill r*d361Mi i361s get g*d361Mi i361s get b*d361Mi i361s get setrgbcolor xs1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath fill r*d361Mi i361e get g*d361Mi i361e get b*d361Mi i361e get setrgbcolor xe1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath fill 0 setgray xd1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath stroke xs1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath stroke xe1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath stroke } for %i=0,48 xtesthuea 0 ge {600 /TimesB-ISOL1 FS 8000 2100 moveto 30 rotate 0 setgray (no continues hue change of device near ) showen (keine kontinuiertliche Buntton\344nderung nahe ) showde 600 /TimesBI-ISOL1 FS (h) show 500 /TimesB-ISOL1 FS 0 -100 rmoveto (ab,d) show 0 100 rmoveto 600 /TimesB-ISOL1 FS ( = ) show 0 1 xtesthuea {/in exch def %in=0,xtesthuea LAB*h50M xtesthuei in get get cvishow in xtesthuea ne {(, ) show} if } for %in=0,xtesthuea -30 rotate 8000 1100 moveto 30 rotate (or ) showen ( oder ) showde 600 /TimesBI-ISOL1 FS (rgb*) show 500 /TimesBI-ISOL1 FS 0 -100 rmoveto (d) show 0 100 rmoveto 600 /TimesB-ISOL1 FS ( = ) show 0 1 xtesthuea {/in exch def %in=0,xtesthuea r*d50M xtesthuei in get get cvsshow3r (, ) show g*d50M xtesthuei in get get cvsshow3r (, ) show b*d50M xtesthuei in get get cvsshow3r in xtesthuea ne {(; ) show} if } for %in=0,xtesthuea -30 rotate 8000 0100 moveto 30 rotate 600 /TimesB-ISOL1 FS (appropriate correction done) showen (plausible Korrektur erfolgt) showde -30 rotate } if }%xchartl=1 {%xchartl>1 TK 0 1 45 {/i exch def %i=0,45 /ik45 xchartl 2 sub 45 mul i add def %range 0...359 /yi ymax i ydel1 mul sub def /hmini LAB*h50M 0 get cvi def /hmaxi LAB*h50M 48 get cvi def /ik45d ik45 hmini add def ik45d 360 ge {/ik45d ik45d 360 sub def} if /i361d LAB*h361Mi ik45 get round cvi def xd0 yi moveto LAB*h361Mi ik45d get cvishow xs0 yi moveto habs361M ik45 get cvishow xe0 yi moveto habe361M ik45 get cvishow x0x x01 add yi moveto r*d361Mi ik45d get cvsshow3r x0x x02 add yi moveto g*d361Mi ik45d get cvsshow3r x0x x03 add yi moveto b*d361Mi ik45d get cvsshow3r x0x x04 add yi moveto LAB*L361Mi ik45d get cvsshow1r x0x x05 add yi moveto LAB*a361Mi ik45d get cvsshow1r x0x x06 add yi moveto LAB*b361Mi ik45d get cvsshow1r x0x x07 add yi moveto LAB*C361Mi ik45d get cvsshow1r x0x x08 add yi moveto LAB*h361Mi ik45d get cvishow /i361s habs361M ik45 get def i361s 360 ge {/i361s i361s 360 sub def} if /ik45ds i361s def /ik45s ik45 30 add def ik45s 360 ge {/ik45s ik45s 360 sub def} if x1x x01 add yi moveto r*d361Mi ik45ds get cvsshow3r x1x x02 add yi moveto g*d361Mi ik45ds get cvsshow3r x1x x03 add yi moveto b*d361Mi ik45ds get cvsshow3r x1x x04 add yi moveto LAB*L361Mi ik45ds get cvsshow1r x1x x05 add yi moveto LAB*a361Mi ik45ds get cvsshow1r x1x x06 add yi moveto LAB*b361Mi ik45ds get cvsshow1r x1x x07 add yi moveto LAB*C361Mi ik45ds get cvsshow1r x1x x08 add yi moveto LAB*h361Mi ik45ds get cvishow x1x x09 add yi moveto r*s361Mi ik45s get cvsshow3r x1x x10 add yi moveto g*s361Mi ik45s get cvsshow3r x1x x11 add yi moveto b*s361Mi ik45s get cvsshow3r /i361e habe361M ik45 get def i361e 360 ge {/i361e i361e 360 sub def} if /ik45de i361e def /ik45e ik45 30 add def ik45e 360 ge {/ik45e ik45e 360 sub def} if x2x x01 add yi moveto r*d361Mi ik45de get cvsshow3r x2x x02 add yi moveto g*d361Mi ik45de get cvsshow3r x2x x03 add yi moveto b*d361Mi ik45de get cvsshow3r x2x x04 add yi moveto LAB*L361Mi ik45de get cvsshow1r x2x x05 add yi moveto LAB*a361Mi ik45de get cvsshow1r x2x x06 add yi moveto LAB*b361Mi ik45de get cvsshow1r x2x x07 add yi moveto LAB*C361Mi ik45de get cvsshow1r x2x x08 add yi moveto LAB*h361Mi ik45de get cvishow x2x x09 add yi moveto r*e361Mi ik45e get cvsshow3r x2x x10 add yi moveto g*e361Mi ik45e get cvsshow3r x2x x11 add yi moveto b*e361Mi ik45e get cvsshow3r r*e361Mi ik45e get g*e361Mi ik45e get b*e361Mi ik45e get setrgbcolor xd1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath fill r*d361Mi ik45ds get g*d361Mi ik45ds get b*d361Mi ik45ds get setrgbcolor xs1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath fill r*d361Mi ik45de get g*d361Mi ik45de get b*d361Mi ik45de get setrgbcolor xe1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath fill 0 setgray xd1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath stroke xs1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath stroke xe1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath stroke xchartl 2 eq ik45 000 eq and xchartl 3 eq ik45 060 eq and or xchartl 4 eq ik45 120 eq and or xchartl 5 eq ik45 180 eq and or xchartl 6 eq ik45 180 eq and or xchartl 7 eq ik45 240 eq and or xchartl 8 eq ik45 300 eq and or xchartl 9 eq ik45 360 eq and or {/ik 1 def} {/ik 0 def} ifelse ik 1 eq {x1x x01 add yi ydel1 0.7 mul add moveto x2x x11 add 600 add yi ydel1 0.7 mul add lineto stroke x1x x01 add yi ydel1 0.3 mul sub moveto x2x x11 add 600 add yi ydel1 0.3 mul sub lineto stroke} if ik 1 eq {TBIK x1x x11 add 320 add yi moveto RJGCBMs xchartl 1 sub get show TBS 0 -80 rmoveto (s) show 0 80 rmoveto TK TBIK x2x x11 add 320 add yi moveto RJGCBMs xchartl 1 sub get show TBS 0 -80 rmoveto (e) show 0 80 rmoveto TK} if 0 8 48 {/it exch def %it=0,8,48 LAB*h50M it get LAB*h361Mi ik45d get ge LAB*h50M it get LAB*h361Mi ik45d 1 add get lt and {x0x x01 add yi ydel1 0.3 mul sub moveto x1x x01 add yi ydel1 0.3 mul sub lineto stroke TBIK x1x x01 add 400 sub yi moveto RJGCBM it 8 idiv get show TBS 0 -80 rmoveto (d) show 0 80 rmoveto TK} if } for %it=0,8,48 } for i%=0,45 } ifelse %xchartl=1,>1 } ifelse %xchartl=0,>0 showpage grestore %} for %xchartl=00,09 grestore %} for %xcharti=00,10 %%Trailer