%!PS-Adobe-3.0 EPSF-3.0 LE670-7X.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/KE63/) /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:2010070112000) /ModDate (D:2010070112000) /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 /Courier-Bold findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /CourierB-ISOL1 exch definefont pop /TS {170 /Times-ISOL1 FS} bind def /TK {200 /Times-ISOL1 FS} bind def /TM {270 /Times-ISOL1 FS} bind def /TG {320 /Times-ISOL1 FS} bind def /TIS {170 /TimesI-ISOL1 FS} bind def /TIK {200 /TimesI-ISOL1 FS} bind def /TIM {270 /TimesI-ISOL1 FS} bind def /TIG {320 /TimesI-ISOL1 FS} bind def /TBS {170 /TimesB-ISOL1 FS} bind def /TBK {200 /TimesB-ISOL1 FS} bind def /TBM {270 /TimesB-ISOL1 FS} bind def /TBG {320 /TimesB-ISOL1 FS} bind def /TBIS {170 /TimesBI-ISOL1 FS} bind def /TBIK {200 /TimesBI-ISOL1 FS} bind def /TBIM {270 /TimesBI-ISOL1 FS} bind def /TBIG {320 /TimesBI-ISOL1 FS} bind def /CBKK {200 /CourierB-ISOL1 FS} bind def /CBK {250 /CourierB-ISOL1 FS} bind def /CBM {300 /CourierB-ISOL1 FS} bind def /CBG {350 /CourierB-ISOL1 FS} bind def /TSK {200 /Symbol FS} bind def /TSM {270 /Symbol FS} bind def /TSG {320 /Symbol FS} bind def /xyY0 7560 array def %1080x7 /LAB*TE [(LCED_low_gloss_100828_2)] def /xyY0 [ %produced with the settings of the LED-LCD (LECD) monitor; full white used %FILE LMT_1080_100828_2.TXT %no. r g b x y Y. Apple low glossy display. measurement 2 1 0.00000 0.00000 0.00000 0.3080 0.3037 23.31E-01 %corrected 1073 (missing) 2 0.00000 0.00000 0.12549 0.1946 0.1207 3.43E+00 3 0.00000 0.00000 0.25098 0.1714 0.0834 4.56E+00 4 0.00000 0.00000 0.37647 0.1620 0.0690 5.98E+00 5 0.00000 0.00000 0.50196 0.1574 0.0625 7.59E+00 6 0.00000 0.00000 0.62353 0.1557 0.0605 0.89E+01 7 0.00000 0.00000 0.74902 0.1544 0.0589 1.03E+01 8 0.00000 0.00000 0.87451 0.1523 0.0578 1.27E+01 9 0.00000 0.00000 1.00000 0.1507 0.0571 1.58E+01 10 0.00000 0.12549 0.00000 0.2982 0.5385 14.90E+00 11 0.00000 0.12549 0.12549 0.2349 0.3328 15.84E+00 12 0.00000 0.12549 0.25098 0.2035 0.2304 17.00E+00 13 0.00000 0.12549 0.37647 0.1863 0.1744 18.44E+00 14 0.00000 0.12549 0.50196 0.1763 0.1428 20.06E+00 15 0.00000 0.12549 0.62353 0.1720 0.1287 2.14E+01 16 0.00000 0.12549 0.74902 0.1684 0.1179 2.29E+01 17 0.00000 0.12549 0.87451 0.1638 0.1057 2.53E+01 18 0.00000 0.12549 1.00000 0.1603 0.0958 2.84E+01 19 0.00000 0.25098 0.00000 0.2973 0.5813 27.35E+00 20 0.00000 0.25098 0.12549 0.2531 0.4236 28.40E+00 21 0.00000 0.25098 0.25098 0.2234 0.3175 29.59E+00 22 0.00000 0.25098 0.37647 0.2037 0.2483 31.06E+00 23 0.00000 0.25098 0.50196 0.1912 0.2047 32.70E+00 24 0.00000 0.25098 0.62353 0.1852 0.1836 3.41E+01 25 0.00000 0.25098 0.74902 0.1803 0.1663 3.55E+01 26 0.00000 0.25098 0.87451 0.1742 0.1468 3.80E+01 27 0.00000 0.25098 1.00000 0.1689 0.1306 4.13E+01 28 0.00000 0.37647 0.00000 0.2983 0.6015 42.83E+00 29 0.00000 0.37647 0.12549 0.2657 0.4821 44.01E+00 30 0.00000 0.37647 0.25098 0.2395 0.3853 45.23E+00 31 0.00000 0.37647 0.37647 0.2197 0.3131 46.73E+00 32 0.00000 0.37647 0.50196 0.2059 0.2631 48.40E+00 33 0.00000 0.37647 0.62353 0.1987 0.2373 4.98E+01 34 0.00000 0.37647 0.74902 0.1927 0.2154 5.12E+01 35 0.00000 0.37647 0.87451 0.1853 0.1896 5.37E+01 36 0.00000 0.37647 1.00000 0.1785 0.1677 5.72E+01 37 0.00000 0.50196 0.00000 0.2992 0.6092 54.50E+00 38 0.00000 0.50196 0.12549 0.2721 0.5088 55.74E+00 39 0.00000 0.50196 0.25098 0.2482 0.4203 56.99E+00 40 0.00000 0.50196 0.37647 0.2290 0.3495 58.50E+00 41 0.00000 0.50196 0.50196 0.2148 0.2979 60.19E+00 42 0.00000 0.50196 0.62353 0.2075 0.2702 6.16E+01 43 0.00000 0.50196 0.74902 0.2005 0.2466 6.31E+01 44 0.00000 0.50196 0.87451 0.1923 0.2175 6.56E+01 45 0.00000 0.50196 1.00000 0.1849 0.1922 6.91E+01 46 0.00000 0.62353 0.00000 0.3003 0.6138 65.23E+00 47 0.00000 0.62353 0.12549 0.2767 0.5265 66.52E+00 48 0.00000 0.62353 0.25098 0.2547 0.4451 67.80E+00 49 0.00000 0.62353 0.37647 0.2362 0.3765 69.30E+00 50 0.00000 0.62353 0.50196 0.2220 0.3246 70.99E+00 51 0.00000 0.62353 0.62353 0.2141 0.2963 7.25E+01 52 0.00000 0.62353 0.74902 0.2073 0.2711 7.39E+01 53 0.00000 0.62353 0.87451 0.1983 0.2401 7.64E+01 54 0.00000 0.62353 1.00000 0.1903 0.2124 8.00E+01 55 0.00000 0.74902 0.00000 0.3018 0.6186 81.75E+00 56 0.00000 0.74902 0.12549 0.2821 0.5458 83.09E+00 57 0.00000 0.74902 0.25098 0.2626 0.4736 84.37E+00 58 0.00000 0.74902 0.37647 0.2452 0.4093 85.89E+00 59 0.00000 0.74902 0.50196 0.2315 0.3585 8.78E+01 60 0.00000 0.74902 0.62353 0.2233 0.3294 8.91E+01 61 0.00000 0.74902 0.74902 0.2162 0.3033 9.05E+01 62 0.00000 0.74902 0.87451 0.2066 0.2705 9.31E+01 63 0.00000 0.74902 1.00000 0.1981 0.2400 9.67E+01 64 0.00000 0.87451 0.00000 0.3039 0.6225 10.57E+01 65 0.00000 0.87451 0.12549 0.2880 0.5638 10.69E+01 66 0.00000 0.87451 0.25098 0.2710 0.5026 10.83E+01 67 0.00000 0.87451 0.37647 0.2553 0.4442 10.98E+01 68 0.00000 0.87451 0.50196 0.2420 0.3957 11.15E+01 69 0.00000 0.87451 0.62353 0.2339 0.3666 11.27E+01 70 0.00000 0.87451 0.74902 0.2268 0.3404 11.42E+01 71 0.00000 0.87451 0.87451 0.2170 0.3061 11.68E+01 72 0.00000 0.87451 1.00000 0.2076 0.2734 12.04E+01 73 0.00000 1.00000 0.00000 0.3062 0.6258 13.53E+01 74 0.00000 1.00000 0.12549 0.2934 0.5779 13.61E+01 75 0.00000 1.00000 0.25098 0.2787 0.5259 13.72E+01 76 0.00000 1.00000 0.37647 0.2645 0.4742 13.86E+01 77 0.00000 1.00000 0.50196 0.2521 0.4289 14.02E+01 78 0.00000 1.00000 0.62353 0.2443 0.4012 14.14E+01 79 0.00000 1.00000 0.74902 0.2371 0.3756 14.29E+01 80 0.00000 1.00000 0.87451 0.2270 0.3408 14.53E+01 81 0.00000 1.00000 1.00000 0.2171 0.3065 14.85E+01 82 0.12549 0.00000 0.00000 0.5218 0.3242 7.07E+00 83 0.12549 0.00000 0.12549 0.3457 0.1920 7.89E+00 84 0.12549 0.00000 0.25098 0.2690 0.1346 8.99E+00 85 0.12549 0.00000 0.37647 0.2295 0.1057 10.40E+00 86 0.12549 0.00000 0.50196 0.2077 0.0903 12.01E+00 87 0.12549 0.00000 0.62353 0.1981 0.0843 1.34E+01 88 0.12549 0.00000 0.74902 0.1899 0.0787 1.47E+01 89 0.12549 0.00000 0.87451 0.1813 0.0739 1.72E+01 90 0.12549 0.00000 1.00000 0.1741 0.0700 2.03E+01 91 0.12549 0.12549 0.00000 0.4184 0.4700 18.95E+00 92 0.12549 0.12549 0.12549 0.3305 0.3330 19.89E+00 93 0.12549 0.12549 0.25098 0.2752 0.2460 21.02E+00 94 0.12549 0.12549 0.37647 0.2404 0.1918 22.44E+00 95 0.12549 0.12549 0.50196 0.2188 0.1587 24.07E+00 96 0.12549 0.12549 0.62353 0.2089 0.1430 2.54E+01 97 0.12549 0.12549 0.74902 0.2003 0.1303 2.68E+01 98 0.12549 0.12549 0.87451 0.1900 0.1165 2.93E+01 99 0.12549 0.12549 1.00000 0.1815 0.1051 3.25E+01 100 0.12549 0.25098 0.00000 0.3796 0.5247 31.04E+00 101 0.12549 0.25098 0.12549 0.3225 0.4079 32.08E+00 102 0.12549 0.25098 0.25098 0.2793 0.3187 33.26E+00 103 0.12549 0.25098 0.37647 0.2484 0.2554 34.71E+00 104 0.12549 0.25098 0.50196 0.2277 0.2131 36.34E+00 105 0.12549 0.25098 0.62353 0.2174 0.1920 3.77E+01 106 0.12549 0.25098 0.74902 0.2083 0.1745 3.92E+01 107 0.12549 0.25098 0.87451 0.1976 0.1540 4.17E+01 108 0.12549 0.25098 1.00000 0.1884 0.1369 4.50E+01 109 0.12549 0.37647 0.00000 0.3567 0.5579 46.22E+00 110 0.12549 0.37647 0.12549 0.3172 0.4624 47.39E+00 111 0.12549 0.37647 0.25098 0.2832 0.3793 48.62E+00 112 0.12549 0.37647 0.37647 0.2562 0.3137 50.09E+00 113 0.12549 0.37647 0.50196 0.2367 0.2664 51.76E+00 114 0.12549 0.37647 0.62353 0.2264 0.2414 5.32E+01 115 0.12549 0.37647 0.74902 0.2169 0.2201 5.47E+01 116 0.12549 0.37647 0.87451 0.2060 0.1938 5.71E+01 117 0.12549 0.37647 1.00000 0.1963 0.1716 6.06E+01 118 0.12549 0.50196 0.00000 0.3469 0.5725 57.78E+00 119 0.12549 0.50196 0.12549 0.3151 0.4894 59.02E+00 120 0.12549 0.50196 0.25098 0.2857 0.4121 60.28E+00 121 0.12549 0.50196 0.37647 0.2611 0.3475 61.77E+00 122 0.12549 0.50196 0.50196 0.2424 0.2988 63.46E+00 123 0.12549 0.50196 0.62353 0.2322 0.2724 6.50E+01 124 0.12549 0.50196 0.74902 0.2231 0.2490 6.64E+01 125 0.12549 0.50196 0.87451 0.2119 0.2202 6.89E+01 126 0.12549 0.50196 1.00000 0.2015 0.1950 7.24E+01 127 0.12549 0.62353 0.00000 0.3409 0.5819 68.52E+00 128 0.12549 0.62353 0.12549 0.3139 0.5080 69.82E+00 129 0.12549 0.62353 0.25098 0.2878 0.4359 71.08E+00 130 0.12549 0.62353 0.37647 0.2650 0.3732 72.59E+00 131 0.12549 0.62353 0.50196 0.2471 0.3242 74.28E+00 132 0.12549 0.62353 0.62353 0.2373 0.2968 7.58E+01 133 0.12549 0.62353 0.74902 0.2279 0.2724 7.72E+01 134 0.12549 0.62353 0.87451 0.2166 0.2417 7.97E+01 135 0.12549 0.62353 1.00000 0.2059 0.2147 8.34E+01 136 0.12549 0.74902 0.00000 0.3348 0.5921 85.14E+00 137 0.12549 0.74902 0.12549 0.3129 0.5289 86.48E+00 138 0.12549 0.74902 0.25098 0.2906 0.4641 87.76E+00 139 0.12549 0.74902 0.37647 0.2701 0.4048 89.26E+00 140 0.12549 0.74902 0.50196 0.2534 0.3566 90.96E+00 141 0.12549 0.74902 0.62353 0.2437 0.3287 9.24E+01 142 0.12549 0.74902 0.74902 0.2349 0.3034 9.39E+01 143 0.12549 0.74902 0.87451 0.2232 0.2709 9.64E+01 144 0.12549 0.74902 1.00000 0.2124 0.2413 10.01E+01 145 0.12549 0.87451 0.00000 0.3302 0.6011 10.94E+01 146 0.12549 0.87451 0.12549 0.3127 0.5494 11.07E+01 147 0.12549 0.87451 0.25098 0.2944 0.4932 11.19E+01 148 0.12549 0.87451 0.37647 0.2764 0.4390 11.34E+01 149 0.12549 0.87451 0.50196 0.2610 0.3929 11.50E+01 150 0.12549 0.87451 0.62353 0.2518 0.3651 11.63E+01 151 0.12549 0.87451 0.74902 0.2430 0.3399 11.79E+01 152 0.12549 0.87451 0.87451 0.2316 0.3061 12.04E+01 153 0.12549 0.87451 1.00000 0.2207 0.2742 12.40E+01 154 0.12549 1.00000 0.00000 0.3265 0.6085 13.96E+01 155 0.12549 1.00000 0.12549 0.3131 0.5657 14.04E+01 156 0.12549 1.00000 0.25098 0.2977 0.5176 14.15E+01 157 0.12549 1.00000 0.37647 0.2821 0.4690 14.28E+01 158 0.12549 1.00000 0.50196 0.2685 0.4261 14.44E+01 159 0.12549 1.00000 0.62353 0.2598 0.3995 14.56E+01 160 0.12549 1.00000 0.74902 0.2516 0.3743 14.70E+01 161 0.12549 1.00000 0.87451 0.2403 0.3407 14.96E+01 162 0.12549 1.00000 1.00000 0.2291 0.3069 15.27E+01 163 0.25098 0.00000 0.00000 0.5672 0.3286 10.69E+00 164 0.25098 0.00000 0.12549 0.4135 0.2241 11.49E+00 165 0.25098 0.00000 0.25098 0.3257 0.1646 12.57E+00 166 0.25098 0.00000 0.37647 0.2737 0.1298 13.95E+00 167 0.25098 0.00000 0.50196 0.2429 0.1095 15.53E+00 168 0.25098 0.00000 0.62353 0.2282 0.1013 1.70E+01 169 0.25098 0.00000 0.74902 0.2164 0.0934 1.83E+01 170 0.25098 0.00000 0.87451 0.2026 0.0858 2.08E+01 171 0.25098 0.00000 1.00000 0.1912 0.0798 2.40E+01 172 0.25098 0.12549 0.00000 0.4712 0.4398 22.30E+00 173 0.25098 0.12549 0.12549 0.3834 0.3336 23.21E+00 174 0.25098 0.12549 0.25098 0.3206 0.2568 24.33E+00 175 0.25098 0.12549 0.37647 0.2775 0.2045 25.73E+00 176 0.25098 0.12549 0.50196 0.2494 0.1707 27.34E+00 177 0.25098 0.12549 0.62353 0.2354 0.1542 2.87E+01 178 0.25098 0.12549 0.74902 0.2236 0.1405 3.01E+01 179 0.25098 0.12549 0.87451 0.2094 0.1254 3.27E+01 180 0.25098 0.12549 1.00000 0.1978 0.1124 3.59E+01 181 0.25098 0.25098 0.00000 0.4245 0.4936 34.15E+00 182 0.25098 0.25098 0.12549 0.3653 0.3988 35.17E+00 183 0.25098 0.25098 0.25098 0.3168 0.3205 36.33E+00 184 0.25098 0.25098 0.37647 0.2802 0.2614 37.76E+00 185 0.25098 0.25098 0.50196 0.2545 0.2203 39.39E+00 186 0.25098 0.25098 0.62353 0.2412 0.1992 4.08E+01 187 0.25098 0.25098 0.74902 0.2295 0.1810 4.22E+01 188 0.25098 0.25098 0.87451 0.2157 0.1599 4.47E+01 189 0.25098 0.25098 1.00000 0.2035 0.1421 4.81E+01 190 0.25098 0.37647 0.00000 0.3931 0.5307 49.13E+00 191 0.25098 0.37647 0.12549 0.3516 0.4499 50.29E+00 192 0.25098 0.37647 0.25098 0.3140 0.3759 51.49E+00 193 0.25098 0.37647 0.37647 0.2831 0.3151 52.95E+00 194 0.25098 0.37647 0.50196 0.2599 0.2697 54.61E+00 195 0.25098 0.37647 0.62353 0.2472 0.2454 5.61E+01 196 0.25098 0.37647 0.74902 0.2361 0.2240 5.75E+01 197 0.25098 0.37647 0.87451 0.2221 0.1981 6.01E+01 198 0.25098 0.37647 1.00000 0.2099 0.1752 6.35E+01 199 0.25098 0.50196 0.00000 0.3783 0.5483 60.63E+00 200 0.25098 0.50196 0.12549 0.3447 0.4765 61.87E+00 201 0.25098 0.50196 0.25098 0.3127 0.4070 63.10E+00 202 0.25098 0.50196 0.37647 0.2851 0.3469 64.57E+00 203 0.25098 0.50196 0.50196 0.2635 0.3004 66.24E+00 204 0.25098 0.50196 0.62353 0.2514 0.2745 6.77E+01 205 0.25098 0.50196 0.74902 0.2405 0.2517 6.92E+01 206 0.25098 0.50196 0.87451 0.2267 0.2229 7.17E+01 207 0.25098 0.50196 1.00000 0.2142 0.1977 7.53E+01 208 0.25098 0.62353 0.00000 0.3685 0.5603 71.36E+00 209 0.25098 0.62353 0.12549 0.3402 0.4953 72.64E+00 210 0.25098 0.62353 0.25098 0.3121 0.4299 73.88E+00 211 0.25098 0.62353 0.37647 0.2867 0.3714 75.37E+00 212 0.25098 0.62353 0.50196 0.2665 0.3247 77.05E+00 213 0.25098 0.62353 0.62353 0.2548 0.2981 7.85E+01 214 0.25098 0.62353 0.74902 0.2443 0.2742 8.00E+01 215 0.25098 0.62353 0.87451 0.2307 0.2440 8.26E+01 216 0.25098 0.62353 1.00000 0.2181 0.2166 8.62E+01 217 0.25098 0.74902 0.00000 0.3581 0.5735 88.02E+00 218 0.25098 0.74902 0.12549 0.3353 0.5169 89.34E+00 219 0.25098 0.74902 0.25098 0.3114 0.4576 90.60E+00 220 0.25098 0.74902 0.37647 0.2892 0.4021 92.10E+00 221 0.25098 0.74902 0.50196 0.2706 0.3560 93.78E+00 222 0.25098 0.74902 0.62353 0.2597 0.3291 9.53E+01 223 0.25098 0.74902 0.74902 0.2494 0.3045 9.68E+01 224 0.25098 0.74902 0.87451 0.2363 0.2725 9.94E+01 225 0.25098 0.74902 1.00000 0.2238 0.2427 10.30E+01 226 0.25098 0.87451 0.00000 0.3490 0.5859 11.25E+01 227 0.25098 0.87451 0.12549 0.3311 0.5386 11.37E+01 228 0.25098 0.87451 0.25098 0.3116 0.4865 11.49E+01 229 0.25098 0.87451 0.37647 0.2927 0.4356 11.64E+01 230 0.25098 0.87451 0.50196 0.2759 0.3916 11.81E+01 231 0.25098 0.87451 0.62353 0.2659 0.3646 11.93E+01 232 0.25098 0.87451 0.74902 0.2561 0.3399 12.09E+01 233 0.25098 0.87451 0.87451 0.2434 0.3067 12.35E+01 234 0.25098 0.87451 1.00000 0.2309 0.2750 12.71E+01 235 0.25098 1.00000 0.00000 0.3421 0.5959 14.32E+01 236 0.25098 1.00000 0.12549 0.3281 0.5564 14.40E+01 237 0.25098 1.00000 0.25098 0.3122 0.5115 14.50E+01 238 0.25098 1.00000 0.37647 0.2958 0.4656 14.64E+01 239 0.25098 1.00000 0.50196 0.2812 0.4244 14.79E+01 240 0.25098 1.00000 0.62353 0.2718 0.3987 14.92E+01 241 0.25098 1.00000 0.74902 0.2630 0.3741 15.06E+01 242 0.25098 1.00000 0.87451 0.2507 0.3408 15.31E+01 243 0.25098 1.00000 1.00000 0.2384 0.3075 15.63E+01 244 0.37647 0.00000 0.00000 0.5885 0.3305 14.04E+00 245 0.37647 0.00000 0.12549 0.4548 0.2436 14.84E+00 246 0.37647 0.00000 0.25098 0.3657 0.1856 15.90E+00 247 0.37647 0.00000 0.37647 0.3078 0.1483 17.26E+00 248 0.37647 0.00000 0.50196 0.2710 0.1252 18.84E+00 249 0.37647 0.00000 0.62353 0.2531 0.1149 2.03E+01 250 0.37647 0.00000 0.74902 0.2384 0.1055 2.16E+01 251 0.37647 0.00000 0.87451 0.2212 0.0955 2.40E+01 252 0.37647 0.00000 1.00000 0.2064 0.0879 2.73E+01 253 0.37647 0.12549 0.00000 0.5031 0.4217 25.51E+00 254 0.37647 0.12549 0.12549 0.4197 0.3341 26.41E+00 255 0.37647 0.12549 0.25098 0.3545 0.2649 27.51E+00 256 0.37647 0.12549 0.37647 0.3069 0.2147 28.91E+00 257 0.37647 0.12549 0.50196 0.2744 0.1807 30.51E+00 258 0.37647 0.12549 0.62353 0.2577 0.1638 3.19E+01 259 0.37647 0.12549 0.74902 0.2434 0.1493 3.33E+01 260 0.37647 0.12549 0.87451 0.2264 0.1326 3.58E+01 261 0.37647 0.12549 1.00000 0.2120 0.1187 3.91E+01 262 0.37647 0.25098 0.00000 0.4554 0.4725 37.21E+00 263 0.37647 0.25098 0.12549 0.3967 0.3922 38.23E+00 264 0.37647 0.25098 0.25098 0.3460 0.3219 39.37E+00 265 0.37647 0.25098 0.37647 0.3059 0.2663 40.78E+00 266 0.37647 0.25098 0.50196 0.2767 0.2264 42.41E+00 267 0.37647 0.25098 0.62353 0.2615 0.2057 4.39E+01 268 0.37647 0.25098 0.74902 0.2475 0.1875 4.53E+01 269 0.37647 0.25098 0.87451 0.2308 0.1657 4.78E+01 270 0.37647 0.25098 1.00000 0.2164 0.1471 5.12E+01 271 0.37647 0.37647 0.00000 0.4200 0.5105 52.06E+00 272 0.37647 0.37647 0.12549 0.3780 0.4402 53.22E+00 273 0.37647 0.37647 0.25098 0.3387 0.3732 54.40E+00 274 0.37647 0.37647 0.37647 0.3052 0.3162 55.85E+00 275 0.37647 0.37647 0.50196 0.2794 0.2727 57.50E+00 276 0.37647 0.37647 0.62353 0.2650 0.2489 5.90E+01 277 0.37647 0.37647 0.74902 0.2526 0.2274 6.03E+01 278 0.37647 0.37647 0.87451 0.2365 0.2015 6.29E+01 279 0.37647 0.37647 1.00000 0.2218 0.1788 6.65E+01 280 0.37647 0.50196 0.00000 0.4025 0.5297 63.52E+00 281 0.37647 0.50196 0.12549 0.3683 0.4661 64.75E+00 282 0.37647 0.50196 0.25098 0.3347 0.4027 65.97E+00 283 0.37647 0.50196 0.37647 0.3050 0.3464 67.43E+00 284 0.37647 0.50196 0.50196 0.2813 0.3019 69.10E+00 285 0.37647 0.50196 0.62353 0.2679 0.2766 7.05E+01 286 0.37647 0.50196 0.74902 0.2558 0.2541 7.20E+01 287 0.37647 0.50196 0.87451 0.2400 0.2258 7.46E+01 288 0.37647 0.50196 1.00000 0.2255 0.2004 7.82E+01 289 0.37647 0.62353 0.00000 0.3905 0.5431 74.25E+00 290 0.37647 0.62353 0.12549 0.3614 0.4849 75.53E+00 291 0.37647 0.62353 0.25098 0.3320 0.4248 76.76E+00 292 0.37647 0.62353 0.37647 0.3050 0.3699 78.24E+00 293 0.37647 0.62353 0.50196 0.2829 0.3252 79.92E+00 294 0.37647 0.62353 0.62353 0.2703 0.2994 8.14E+01 295 0.37647 0.62353 0.74902 0.2585 0.2758 8.28E+01 296 0.37647 0.62353 0.87451 0.2431 0.2460 8.54E+01 297 0.37647 0.62353 1.00000 0.2291 0.2188 8.91E+01 298 0.37647 0.74902 0.00000 0.3771 0.5582 90.93E+00 299 0.37647 0.74902 0.12549 0.3537 0.5069 92.26E+00 300 0.37647 0.74902 0.25098 0.3289 0.4519 93.51E+00 301 0.37647 0.74902 0.37647 0.3054 0.3995 94.99E+00 302 0.37647 0.74902 0.50196 0.2854 0.3554 96.67E+00 303 0.37647 0.74902 0.62353 0.2736 0.3292 9.82E+01 304 0.37647 0.74902 0.74902 0.2625 0.3051 9.96E+01 305 0.37647 0.74902 0.87451 0.2478 0.2737 10.23E+01 306 0.37647 0.74902 1.00000 0.2337 0.2443 10.59E+01 307 0.37647 0.87451 0.00000 0.3648 0.5732 11.55E+01 308 0.37647 0.87451 0.12549 0.3466 0.5295 11.67E+01 309 0.37647 0.87451 0.25098 0.3264 0.4808 11.80E+01 310 0.37647 0.87451 0.37647 0.3063 0.4327 11.95E+01 311 0.37647 0.87451 0.50196 0.2889 0.3900 12.11E+01 312 0.37647 0.87451 0.62353 0.2777 0.3643 12.24E+01 313 0.37647 0.87451 0.74902 0.2676 0.3397 12.39E+01 314 0.37647 0.87451 0.87451 0.2536 0.3071 12.64E+01 315 0.37647 0.87451 1.00000 0.2401 0.2759 13.02E+01 316 0.37647 1.00000 0.00000 0.3552 0.5849 14.64E+01 317 0.37647 1.00000 0.12549 0.3410 0.5480 14.72E+01 318 0.37647 1.00000 0.25098 0.3245 0.5060 14.83E+01 319 0.37647 1.00000 0.37647 0.3076 0.4623 14.97E+01 320 0.37647 1.00000 0.50196 0.2925 0.4225 15.12E+01 321 0.37647 1.00000 0.62353 0.2824 0.3977 15.25E+01 322 0.37647 1.00000 0.74902 0.2731 0.3736 15.39E+01 323 0.37647 1.00000 0.87451 0.2601 0.3407 15.63E+01 324 0.37647 1.00000 1.00000 0.2469 0.3080 15.96E+01 325 0.50196 0.00000 0.00000 0.5994 0.3316 16.75E+00 326 0.50196 0.00000 0.12549 0.4796 0.2552 17.54E+00 327 0.50196 0.00000 0.25098 0.3920 0.1995 18.60E+00 328 0.50196 0.00000 0.37647 0.3313 0.1612 19.95E+00 329 0.50196 0.00000 0.50196 0.2914 0.1364 21.52E+00 330 0.50196 0.00000 0.62353 0.2711 0.1247 2.29E+01 331 0.50196 0.00000 0.74902 0.2542 0.1146 2.43E+01 332 0.50196 0.00000 0.87451 0.2347 0.1035 2.68E+01 333 0.50196 0.00000 1.00000 0.2179 0.0942 3.00E+01 334 0.50196 0.12549 0.00000 0.5221 0.4110 28.11E+00 335 0.50196 0.12549 0.12549 0.4429 0.3344 29.01E+00 336 0.50196 0.12549 0.25098 0.3775 0.2703 30.10E+00 337 0.50196 0.12549 0.37647 0.3277 0.2218 31.48E+00 338 0.50196 0.12549 0.50196 0.2926 0.1880 33.08E+00 339 0.50196 0.12549 0.62353 0.2743 0.1708 3.45E+01 340 0.50196 0.12549 0.74902 0.2585 0.1555 3.58E+01 341 0.50196 0.12549 0.87451 0.2392 0.1385 3.84E+01 342 0.50196 0.12549 1.00000 0.2226 0.1238 4.17E+01 343 0.50196 0.25098 0.00000 0.4752 0.4590 39.71E+00 344 0.50196 0.25098 0.12549 0.4177 0.3877 40.72E+00 345 0.50196 0.25098 0.25098 0.3663 0.3228 41.87E+00 346 0.50196 0.25098 0.37647 0.3244 0.2699 43.26E+00 347 0.50196 0.25098 0.50196 0.2931 0.2310 44.88E+00 348 0.50196 0.25098 0.62353 0.2763 0.2101 4.63E+01 349 0.50196 0.25098 0.74902 0.2612 0.1920 4.77E+01 350 0.50196 0.25098 0.87451 0.2431 0.1700 5.03E+01 351 0.50196 0.25098 1.00000 0.2264 0.1510 5.37E+01 352 0.50196 0.37647 0.00000 0.4383 0.4970 54.48E+00 353 0.50196 0.37647 0.12549 0.3965 0.4335 55.62E+00 354 0.50196 0.37647 0.25098 0.3563 0.3712 56.80E+00 355 0.50196 0.37647 0.37647 0.3214 0.3171 58.24E+00 356 0.50196 0.37647 0.50196 0.2939 0.2750 59.88E+00 357 0.50196 0.37647 0.62353 0.2787 0.2516 6.14E+01 358 0.50196 0.37647 0.74902 0.2649 0.2303 6.27E+01 359 0.50196 0.37647 0.87451 0.2473 0.2048 6.54E+01 360 0.50196 0.37647 1.00000 0.2312 0.1816 6.89E+01 361 0.50196 0.50196 0.00000 0.4193 0.5168 65.90E+00 362 0.50196 0.50196 0.12549 0.3850 0.4587 67.12E+00 363 0.50196 0.50196 0.25098 0.3508 0.3995 68.32E+00 364 0.50196 0.50196 0.37647 0.3198 0.3460 69.78E+00 365 0.50196 0.50196 0.50196 0.2947 0.3030 71.44E+00 366 0.50196 0.50196 0.62353 0.2803 0.2784 7.29E+01 367 0.50196 0.50196 0.74902 0.2670 0.2563 7.44E+01 368 0.50196 0.50196 0.87451 0.2501 0.2281 7.70E+01 369 0.50196 0.50196 1.00000 0.2344 0.2027 8.06E+01 370 0.50196 0.62353 0.00000 0.4060 0.5310 76.62E+00 371 0.50196 0.62353 0.12549 0.3767 0.4773 77.89E+00 372 0.50196 0.62353 0.25098 0.3466 0.4210 79.12E+00 373 0.50196 0.62353 0.37647 0.3186 0.3687 80.59E+00 374 0.50196 0.62353 0.50196 0.2954 0.3255 82.26E+00 375 0.50196 0.62353 0.62353 0.2819 0.3002 8.37E+01 376 0.50196 0.62353 0.74902 0.2692 0.2773 8.52E+01 377 0.50196 0.62353 0.87451 0.2528 0.2477 8.78E+01 378 0.50196 0.62353 1.00000 0.2375 0.2206 9.15E+01 379 0.50196 0.74902 0.00000 0.3911 0.5474 9.35E+01 380 0.50196 0.74902 0.12549 0.3672 0.4995 9.48E+01 381 0.50196 0.74902 0.25098 0.3420 0.4478 9.61E+01 382 0.50196 0.74902 0.37647 0.3177 0.3976 9.75E+01 383 0.50196 0.74902 0.50196 0.2967 0.3550 9.92E+01 384 0.50196 0.74902 0.62353 0.2840 0.3296 10.05E+01 385 0.50196 0.74902 0.74902 0.2722 0.3058 10.20E+01 386 0.50196 0.74902 0.87451 0.2566 0.2747 10.46E+01 387 0.50196 0.74902 1.00000 0.2417 0.2455 10.83E+01 388 0.50196 0.87451 0.00000 0.3762 0.5636 11.79E+01 389 0.50196 0.87451 0.12549 0.3577 0.5226 11.92E+01 390 0.50196 0.87451 0.25098 0.3374 0.4763 12.04E+01 391 0.50196 0.87451 0.37647 0.3169 0.4298 12.18E+01 392 0.50196 0.87451 0.50196 0.2986 0.3890 12.35E+01 393 0.50196 0.87451 0.62353 0.2870 0.3636 12.48E+01 394 0.50196 0.87451 0.74902 0.2763 0.3398 12.63E+01 395 0.50196 0.87451 0.87451 0.2616 0.3077 12.89E+01 396 0.50196 0.87451 1.00000 0.2472 0.2767 13.26E+01 397 0.50196 1.00000 0.00000 0.3649 0.5770 14.91E+01 398 0.50196 1.00000 0.12549 0.3506 0.5420 14.98E+01 399 0.50196 1.00000 0.25098 0.3340 0.5015 15.09E+01 400 0.50196 1.00000 0.37647 0.3165 0.4596 15.23E+01 401 0.50196 1.00000 0.50196 0.3008 0.4210 15.38E+01 402 0.50196 1.00000 0.62353 0.2907 0.3966 15.51E+01 403 0.50196 1.00000 0.74902 0.2807 0.3732 15.65E+01 404 0.50196 1.00000 0.87451 0.2672 0.3408 15.89E+01 405 0.50196 1.00000 1.00000 0.2532 0.3084 16.22E+01 406 0.62353 0.00000 0.00000 0.6079 0.3324 19.66E+00 407 0.62353 0.00000 0.12549 0.5003 0.2648 20.44E+00 408 0.62353 0.00000 0.25098 0.4153 0.2116 21.49E+00 409 0.62353 0.00000 0.37647 0.3533 0.1731 22.84E+00 410 0.62353 0.00000 0.50196 0.3109 0.1472 24.41E+00 411 0.62353 0.00000 0.62353 0.2892 0.1344 2.58E+01 412 0.62353 0.00000 0.74902 0.2707 0.1235 2.72E+01 413 0.62353 0.00000 0.87451 0.2484 0.1111 2.97E+01 414 0.62353 0.00000 1.00000 0.2296 0.1006 3.29E+01 415 0.62353 0.12549 0.00000 0.5378 0.4023 30.96E+00 416 0.62353 0.12549 0.12549 0.4632 0.3346 31.85E+00 417 0.62353 0.12549 0.25098 0.3987 0.2753 32.93E+00 418 0.62353 0.12549 0.37647 0.3475 0.2286 34.31E+00 419 0.62353 0.12549 0.50196 0.3103 0.1951 35.91E+00 420 0.62353 0.12549 0.62353 0.2905 0.1776 3.73E+01 421 0.62353 0.12549 0.74902 0.2732 0.1624 3.87E+01 422 0.62353 0.12549 0.87451 0.2522 0.1443 4.12E+01 423 0.62353 0.12549 1.00000 0.2336 0.1288 4.45E+01 424 0.62353 0.25098 0.00000 0.4923 0.4473 42.50E+00 425 0.62353 0.25098 0.12549 0.4368 0.3837 43.51E+00 426 0.62353 0.25098 0.25098 0.3854 0.3236 44.63E+00 427 0.62353 0.25098 0.37647 0.3421 0.2734 46.04E+00 428 0.62353 0.25098 0.50196 0.3092 0.2354 47.65E+00 429 0.62353 0.25098 0.62353 0.2912 0.2150 4.91E+01 430 0.62353 0.25098 0.74902 0.2751 0.1969 5.06E+01 431 0.62353 0.25098 0.87451 0.2549 0.1746 5.31E+01 432 0.62353 0.25098 1.00000 0.2367 0.1552 5.65E+01 433 0.62353 0.37647 0.00000 0.4549 0.4848 57.23E+00 434 0.62353 0.37647 0.12549 0.4136 0.4271 58.36E+00 435 0.62353 0.37647 0.25098 0.3731 0.3694 59.54E+00 436 0.62353 0.37647 0.37647 0.3371 0.3180 60.98E+00 437 0.62353 0.37647 0.50196 0.3084 0.2773 62.62E+00 438 0.62353 0.37647 0.62353 0.2918 0.2545 6.41E+01 439 0.62353 0.37647 0.74902 0.2769 0.2338 6.55E+01 440 0.62353 0.37647 0.87451 0.2580 0.2079 6.81E+01 441 0.62353 0.37647 1.00000 0.2408 0.1846 7.16E+01 442 0.62353 0.50196 0.00000 0.4349 0.5050 68.64E+00 443 0.62353 0.50196 0.12549 0.4008 0.4517 69.86E+00 444 0.62353 0.50196 0.25098 0.3661 0.3965 71.06E+00 445 0.62353 0.50196 0.37647 0.3342 0.3456 72.51E+00 446 0.62353 0.50196 0.50196 0.3080 0.3041 74.17E+00 447 0.62353 0.50196 0.62353 0.2927 0.2801 7.56E+01 448 0.62353 0.50196 0.74902 0.2788 0.2584 7.71E+01 449 0.62353 0.50196 0.87451 0.2604 0.2306 7.97E+01 450 0.62353 0.50196 1.00000 0.2436 0.2052 8.33E+01 451 0.62353 0.62353 0.00000 0.4206 0.5196 79.36E+00 452 0.62353 0.62353 0.12549 0.3914 0.4701 80.63E+00 453 0.62353 0.62353 0.25098 0.3609 0.4173 81.85E+00 454 0.62353 0.62353 0.37647 0.3321 0.3675 83.32E+00 455 0.62353 0.62353 0.50196 0.3078 0.3259 85.00E+00 456 0.62353 0.62353 0.62353 0.2937 0.3014 8.65E+01 457 0.62353 0.62353 0.74902 0.2802 0.2789 8.80E+01 458 0.62353 0.62353 0.87451 0.2627 0.2494 9.05E+01 459 0.62353 0.62353 1.00000 0.2462 0.2228 9.43E+01 460 0.62353 0.74902 0.00000 0.4044 0.5365 9.62E+01 461 0.62353 0.74902 0.12549 0.3806 0.4922 9.75E+01 462 0.62353 0.74902 0.25098 0.3546 0.4434 9.88E+01 463 0.62353 0.74902 0.37647 0.3296 0.3960 10.03E+01 464 0.62353 0.74902 0.50196 0.3082 0.3544 10.19E+01 465 0.62353 0.74902 0.62353 0.2948 0.3296 10.32E+01 466 0.62353 0.74902 0.74902 0.2824 0.3064 10.47E+01 467 0.62353 0.74902 0.87451 0.2657 0.2760 10.74E+01 468 0.62353 0.74902 1.00000 0.2497 0.2471 11.11E+01 469 0.62353 0.87451 0.00000 0.3880 0.5542 12.07E+01 470 0.62353 0.87451 0.12549 0.3694 0.5156 12.20E+01 471 0.62353 0.87451 0.25098 0.3485 0.4718 12.32E+01 472 0.62353 0.87451 0.37647 0.3273 0.4273 12.47E+01 473 0.62353 0.87451 0.50196 0.3084 0.3878 12.64E+01 474 0.62353 0.87451 0.62353 0.2967 0.3630 12.76E+01 475 0.62353 0.87451 0.74902 0.2854 0.3398 12.92E+01 476 0.62353 0.87451 0.87451 0.2698 0.3081 13.17E+01 477 0.62353 0.87451 1.00000 0.2546 0.2776 13.54E+01 478 0.62353 1.00000 0.00000 0.3746 0.5689 15.20E+01 479 0.62353 1.00000 0.12549 0.3604 0.5358 15.28E+01 480 0.62353 1.00000 0.25098 0.3432 0.4971 15.38E+01 481 0.62353 1.00000 0.37647 0.3258 0.4566 15.53E+01 482 0.62353 1.00000 0.50196 0.3094 0.4194 15.68E+01 483 0.62353 1.00000 0.62353 0.2989 0.3955 15.80E+01 484 0.62353 1.00000 0.74902 0.2886 0.3725 15.94E+01 485 0.62353 1.00000 0.87451 0.2744 0.3409 16.20E+01 486 0.62353 1.00000 1.00000 0.2600 0.3088 16.52E+01 487 0.74902 0.00000 0.00000 0.6175 0.3333 24.51E+00 488 0.74902 0.00000 0.12549 0.5251 0.2764 25.29E+00 489 0.74902 0.00000 0.25098 0.4456 0.2274 26.33E+00 490 0.74902 0.00000 0.37647 0.3835 0.1893 27.67E+00 491 0.74902 0.00000 0.50196 0.3388 0.1624 29.24E+00 492 0.74902 0.00000 0.62353 0.3150 0.1485 3.06E+01 493 0.74902 0.00000 0.74902 0.2944 0.1365 3.20E+01 494 0.74902 0.00000 0.87451 0.2695 0.1225 3.45E+01 495 0.74902 0.00000 1.00000 0.2477 0.1107 3.78E+01 496 0.74902 0.12549 0.00000 0.5568 0.3917 35.76E+00 497 0.74902 0.12549 0.12549 0.4891 0.3349 36.65E+00 498 0.74902 0.12549 0.25098 0.4268 0.2820 37.74E+00 499 0.74902 0.12549 0.37647 0.3749 0.2381 39.10E+00 500 0.74902 0.12549 0.50196 0.3357 0.2053 40.69E+00 501 0.74902 0.12549 0.62353 0.3145 0.1878 4.21E+01 502 0.74902 0.12549 0.74902 0.2953 0.1722 4.35E+01 503 0.74902 0.12549 0.87451 0.2714 0.1537 4.61E+01 504 0.74902 0.12549 1.00000 0.2505 0.1373 4.94E+01 505 0.74902 0.25098 0.00000 0.5144 0.4325 47.26E+00 506 0.74902 0.25098 0.12549 0.4621 0.3782 48.27E+00 507 0.74902 0.25098 0.25098 0.4115 0.3249 49.40E+00 508 0.74902 0.25098 0.37647 0.3673 0.2784 50.80E+00 509 0.74902 0.25098 0.50196 0.3326 0.2421 52.42E+00 510 0.74902 0.25098 0.62353 0.3133 0.2218 5.38E+01 511 0.74902 0.25098 0.74902 0.2956 0.2041 5.53E+01 512 0.74902 0.25098 0.87451 0.2732 0.1817 5.78E+01 513 0.74902 0.25098 1.00000 0.2529 0.1620 6.13E+01 514 0.74902 0.37647 0.00000 0.4772 0.4684 61.97E+00 515 0.74902 0.37647 0.12549 0.4372 0.4184 63.11E+00 516 0.74902 0.37647 0.25098 0.3968 0.3666 64.28E+00 517 0.74902 0.37647 0.37647 0.3598 0.3192 65.71E+00 518 0.74902 0.37647 0.50196 0.3295 0.2808 67.35E+00 519 0.74902 0.37647 0.62353 0.3121 0.2587 6.88E+01 520 0.74902 0.37647 0.74902 0.2958 0.2387 7.03E+01 521 0.74902 0.37647 0.87451 0.2750 0.2133 7.29E+01 522 0.74902 0.37647 1.00000 0.2559 0.1900 7.64E+01 523 0.74902 0.50196 0.00000 0.4565 0.4885 73.36E+00 524 0.74902 0.50196 0.12549 0.4230 0.4418 74.57E+00 525 0.74902 0.50196 0.25098 0.3881 0.3919 75.78E+00 526 0.74902 0.50196 0.37647 0.3552 0.3450 77.23E+00 527 0.74902 0.50196 0.50196 0.3277 0.3058 78.89E+00 528 0.74902 0.50196 0.62353 0.3113 0.2831 8.04E+01 529 0.74902 0.50196 0.74902 0.2962 0.2620 8.19E+01 530 0.74902 0.50196 0.87451 0.2765 0.2348 8.45E+01 531 0.74902 0.50196 1.00000 0.2577 0.2097 8.81E+01 532 0.74902 0.62353 0.00000 0.4413 0.5036 84.09E+00 533 0.74902 0.62353 0.12549 0.4123 0.4596 85.35E+00 534 0.74902 0.62353 0.25098 0.3815 0.4117 86.57E+00 535 0.74902 0.62353 0.37647 0.3517 0.3656 88.04E+00 536 0.74902 0.62353 0.50196 0.3263 0.3263 89.70E+00 537 0.74902 0.62353 0.62353 0.3109 0.3032 9.13E+01 538 0.74902 0.62353 0.74902 0.2969 0.2811 9.26E+01 539 0.74902 0.62353 0.87451 0.2778 0.2529 9.53E+01 540 0.74902 0.62353 1.00000 0.2597 0.2263 9.90E+01 541 0.74902 0.74902 0.00000 0.4233 0.5220 10.10E+01 542 0.74902 0.74902 0.12549 0.3994 0.4819 10.23E+01 543 0.74902 0.74902 0.25098 0.3733 0.4371 10.35E+01 544 0.74902 0.74902 0.37647 0.3474 0.3927 10.50E+01 545 0.74902 0.74902 0.50196 0.3247 0.3539 10.67E+01 546 0.74902 0.74902 0.62353 0.3108 0.3298 10.79E+01 547 0.74902 0.74902 0.74902 0.2976 0.3077 10.95E+01 548 0.74902 0.74902 0.87451 0.2797 0.2780 11.21E+01 549 0.74902 0.74902 1.00000 0.2625 0.2497 11.58E+01 550 0.74902 0.87451 0.00000 0.4046 0.5407 12.56E+01 551 0.74902 0.87451 0.12549 0.3860 0.5056 12.68E+01 552 0.74902 0.87451 0.25098 0.3649 0.4648 12.80E+01 553 0.74902 0.87451 0.37647 0.3431 0.4232 12.95E+01 554 0.74902 0.87451 0.50196 0.3234 0.3855 13.11E+01 555 0.74902 0.87451 0.62353 0.3108 0.3619 13.24E+01 556 0.74902 0.87451 0.74902 0.2990 0.3396 13.39E+01 557 0.74902 0.87451 0.87451 0.2826 0.3091 13.65E+01 558 0.74902 0.87451 1.00000 0.2663 0.2792 14.02E+01 559 0.74902 1.00000 0.00000 0.3891 0.5570 15.69E+01 560 0.74902 1.00000 0.12549 0.3745 0.5264 15.77E+01 561 0.74902 1.00000 0.25098 0.3576 0.4901 15.87E+01 562 0.74902 1.00000 0.37647 0.3394 0.4517 16.00E+01 563 0.74902 1.00000 0.50196 0.3223 0.4163 16.16E+01 564 0.74902 1.00000 0.62353 0.3115 0.3937 16.29E+01 565 0.74902 1.00000 0.74902 0.3009 0.3714 16.43E+01 566 0.74902 1.00000 0.87451 0.2859 0.3406 16.67E+01 567 0.74902 1.00000 1.00000 0.2705 0.3097 17.01E+01 568 0.87451 0.00000 0.00000 0.6262 0.3340 31.19E+00 569 0.87451 0.00000 0.12549 0.5490 0.2871 31.97E+00 570 0.87451 0.00000 0.25098 0.4769 0.2435 33.02E+00 571 0.87451 0.00000 0.37647 0.4165 0.2071 34.36E+00 572 0.87451 0.00000 0.50196 0.3706 0.1797 35.92E+00 573 0.87451 0.00000 0.62353 0.3454 0.1652 3.73E+01 574 0.87451 0.00000 0.74902 0.3230 0.1522 3.87E+01 575 0.87451 0.00000 0.87451 0.2952 0.1367 4.12E+01 576 0.87451 0.00000 1.00000 0.2701 0.1232 4.45E+01 577 0.87451 0.12549 0.00000 0.5751 0.3818 42.39E+00 578 0.87451 0.12549 0.12549 0.5153 0.3351 43.28E+00 579 0.87451 0.12549 0.25098 0.4568 0.2890 44.36E+00 580 0.87451 0.12549 0.37647 0.4055 0.2487 45.73E+00 581 0.87451 0.12549 0.50196 0.3651 0.2172 47.32E+00 582 0.87451 0.12549 0.62353 0.3424 0.1997 4.87E+01 583 0.87451 0.12549 0.74902 0.3216 0.1843 5.02E+01 584 0.87451 0.12549 0.87451 0.2955 0.1646 5.26E+01 585 0.87451 0.12549 1.00000 0.2717 0.1476 5.60E+01 586 0.87451 0.25098 0.00000 0.5366 0.4176 53.87E+00 587 0.87451 0.25098 0.12549 0.4886 0.3725 54.87E+00 588 0.87451 0.25098 0.25098 0.4401 0.3261 55.99E+00 589 0.87451 0.25098 0.37647 0.3958 0.2839 57.40E+00 590 0.87451 0.25098 0.50196 0.3599 0.2499 59.00E+00 591 0.87451 0.25098 0.62353 0.3392 0.2306 6.05E+01 592 0.87451 0.25098 0.74902 0.3203 0.2129 6.19E+01 593 0.87451 0.25098 0.87451 0.2958 0.1908 6.45E+01 594 0.87451 0.25098 1.00000 0.2730 0.1706 6.79E+01 595 0.87451 0.37647 0.00000 0.5009 0.4510 68.55E+00 596 0.87451 0.37647 0.12549 0.4631 0.4087 69.67E+00 597 0.87451 0.37647 0.25098 0.4235 0.3634 70.84E+00 598 0.87451 0.37647 0.37647 0.3861 0.3206 72.28E+00 599 0.87451 0.37647 0.50196 0.3546 0.2849 73.92E+00 600 0.87451 0.37647 0.62353 0.3358 0.2640 7.54E+01 601 0.87451 0.37647 0.74902 0.3188 0.2446 7.68E+01 602 0.87451 0.37647 0.87451 0.2961 0.2197 7.94E+01 603 0.87451 0.37647 1.00000 0.2746 0.1968 8.30E+01 604 0.87451 0.50196 0.00000 0.4801 0.4708 79.94E+00 605 0.87451 0.50196 0.12549 0.4479 0.4307 81.14E+00 606 0.87451 0.50196 0.25098 0.4133 0.3867 82.34E+00 607 0.87451 0.50196 0.37647 0.3799 0.3442 83.80E+00 608 0.87451 0.50196 0.50196 0.3512 0.3079 85.45E+00 609 0.87451 0.50196 0.62353 0.3340 0.2862 8.69E+01 610 0.87451 0.50196 0.74902 0.3180 0.2662 8.84E+01 611 0.87451 0.50196 0.87451 0.2964 0.2398 9.10E+01 612 0.87451 0.50196 1.00000 0.2758 0.2151 9.46E+01 613 0.87451 0.62353 0.00000 0.4644 0.4857 90.65E+00 614 0.87451 0.62353 0.12549 0.4361 0.4477 91.92E+00 615 0.87451 0.62353 0.25098 0.4054 0.4052 93.14E+00 616 0.87451 0.62353 0.37647 0.3751 0.3633 94.60E+00 617 0.87451 0.62353 0.50196 0.3488 0.3271 9.65E+01 618 0.87451 0.62353 0.62353 0.3325 0.3051 9.78E+01 619 0.87451 0.62353 0.74902 0.3171 0.2842 9.92E+01 620 0.87451 0.62353 0.87451 0.2966 0.2570 10.19E+01 621 0.87451 0.62353 1.00000 0.2770 0.2309 10.55E+01 622 0.87451 0.74902 0.00000 0.4451 0.5042 10.75E+01 623 0.87451 0.74902 0.12549 0.4217 0.4692 10.88E+01 624 0.87451 0.74902 0.25098 0.3953 0.4292 11.01E+01 625 0.87451 0.74902 0.37647 0.3691 0.3886 11.16E+01 626 0.87451 0.74902 0.50196 0.3454 0.3525 11.32E+01 627 0.87451 0.74902 0.62353 0.3305 0.3303 11.46E+01 628 0.87451 0.74902 0.74902 0.3166 0.3089 11.60E+01 629 0.87451 0.74902 0.87451 0.2974 0.2806 11.87E+01 630 0.87451 0.74902 1.00000 0.2787 0.2531 12.23E+01 631 0.87451 0.87451 0.00000 0.4245 0.5246 13.21E+01 632 0.87451 0.87451 0.12549 0.4061 0.4930 13.33E+01 633 0.87451 0.87451 0.25098 0.3844 0.4563 13.46E+01 634 0.87451 0.87451 0.37647 0.3621 0.4177 13.60E+01 635 0.87451 0.87451 0.50196 0.3418 0.3829 13.77E+01 636 0.87451 0.87451 0.62353 0.3287 0.3607 13.90E+01 637 0.87451 0.87451 0.74902 0.3162 0.3391 14.04E+01 638 0.87451 0.87451 0.87451 0.2987 0.3101 14.31E+01 639 0.87451 0.87451 1.00000 0.2812 0.2812 14.67E+01 640 0.87451 1.00000 0.00000 0.4070 0.5425 16.34E+01 641 0.87451 1.00000 0.12549 0.3922 0.5147 16.43E+01 642 0.87451 1.00000 0.25098 0.3747 0.4812 16.53E+01 643 0.87451 1.00000 0.37647 0.3561 0.4457 16.67E+01 644 0.87451 1.00000 0.50196 0.3386 0.4125 16.82E+01 645 0.87451 1.00000 0.62353 0.3273 0.3909 16.95E+01 646 0.87451 1.00000 0.74902 0.3162 0.3697 17.08E+01 647 0.87451 1.00000 0.87451 0.3003 0.3404 17.33E+01 648 0.87451 1.00000 1.00000 0.2839 0.3106 17.67E+01 649 1.00000 0.00000 0.00000 0.6336 0.3343 39.96E+00 650 1.00000 0.00000 0.12549 0.5698 0.2962 40.73E+00 651 1.00000 0.00000 0.25098 0.5059 0.2580 41.78E+00 652 1.00000 0.00000 0.37647 0.4489 0.2241 43.12E+00 653 1.00000 0.00000 0.50196 0.4033 0.1974 44.69E+00 654 1.00000 0.00000 0.62353 0.3770 0.1826 4.61E+01 655 1.00000 0.00000 0.74902 0.3539 0.1691 4.75E+01 656 1.00000 0.00000 0.87451 0.3237 0.1524 5.00E+01 657 1.00000 0.00000 1.00000 0.2964 0.1374 5.32E+01 658 1.00000 0.12549 0.00000 0.5911 0.3730 50.96E+00 659 1.00000 0.12549 0.12549 0.5391 0.3348 51.83E+00 660 1.00000 0.12549 0.25098 0.4854 0.2952 52.92E+00 661 1.00000 0.12549 0.37647 0.4360 0.2588 54.29E+00 662 1.00000 0.12549 0.50196 0.3955 0.2291 55.88E+00 663 1.00000 0.12549 0.62353 0.3719 0.2122 5.73E+01 664 1.00000 0.12549 0.74902 0.3502 0.1967 5.87E+01 665 1.00000 0.12549 0.87451 0.3221 0.1771 6.12E+01 666 1.00000 0.12549 1.00000 0.2962 0.1593 6.45E+01 667 1.00000 0.25098 0.00000 0.5571 0.4040 62.37E+00 668 1.00000 0.25098 0.12549 0.5138 0.3668 63.37E+00 669 1.00000 0.25098 0.25098 0.4681 0.3269 64.49E+00 670 1.00000 0.25098 0.37647 0.4249 0.2892 65.90E+00 671 1.00000 0.25098 0.50196 0.3890 0.2579 6.77E+01 672 1.00000 0.25098 0.62353 0.3669 0.2395 6.90E+01 673 1.00000 0.25098 0.74902 0.3472 0.2221 7.03E+01 674 1.00000 0.25098 0.87451 0.3211 0.2004 7.29E+01 675 1.00000 0.25098 1.00000 0.2963 0.1803 7.63E+01 676 1.00000 0.37647 0.00000 0.5239 0.4344 7.71E+01 677 1.00000 0.37647 0.12549 0.4888 0.3991 7.83E+01 678 1.00000 0.37647 0.25098 0.4508 0.3598 7.94E+01 679 1.00000 0.37647 0.37647 0.4135 0.3219 8.09E+01 680 1.00000 0.37647 0.50196 0.3815 0.2891 8.26E+01 681 1.00000 0.37647 0.62353 0.3620 0.2692 8.38E+01 682 1.00000 0.37647 0.74902 0.3438 0.2509 8.53E+01 683 1.00000 0.37647 0.87451 0.3196 0.2271 8.79E+01 684 1.00000 0.37647 1.00000 0.2964 0.2046 9.14E+01 685 1.00000 0.50196 0.00000 0.5038 0.4531 8.85E+01 686 1.00000 0.50196 0.12549 0.4729 0.4192 8.97E+01 687 1.00000 0.50196 0.25098 0.4390 0.3812 9.10E+01 688 1.00000 0.50196 0.37647 0.4061 0.3430 9.24E+01 689 1.00000 0.50196 0.50196 0.3766 0.3097 9.40E+01 690 1.00000 0.50196 0.62353 0.3586 0.2894 9.53E+01 691 1.00000 0.50196 0.74902 0.3417 0.2705 9.68E+01 692 1.00000 0.50196 0.87451 0.3187 0.2454 9.94E+01 693 1.00000 0.50196 1.00000 0.2966 0.2218 10.31E+01 694 1.00000 0.62353 0.00000 0.4877 0.4680 9.93E+01 695 1.00000 0.62353 0.12549 0.4608 0.4353 10.05E+01 696 1.00000 0.62353 0.25098 0.4304 0.3979 10.17E+01 697 1.00000 0.62353 0.37647 0.3999 0.3605 10.32E+01 698 1.00000 0.62353 0.50196 0.3729 0.3273 10.49E+01 699 1.00000 0.62353 0.62353 0.3559 0.3066 10.62E+01 700 1.00000 0.62353 0.74902 0.3400 0.2872 10.76E+01 701 1.00000 0.62353 0.87451 0.3181 0.2613 11.03E+01 702 1.00000 0.62353 1.00000 0.2969 0.2364 11.39E+01 703 1.00000 0.74902 0.00000 0.4679 0.4864 11.59E+01 704 1.00000 0.74902 0.12549 0.4450 0.4559 11.72E+01 705 1.00000 0.74902 0.25098 0.4189 0.4204 11.85E+01 706 1.00000 0.74902 0.37647 0.3922 0.3836 11.99E+01 707 1.00000 0.74902 0.50196 0.3679 0.3506 12.16E+01 708 1.00000 0.74902 0.62353 0.3524 0.3301 12.30E+01 709 1.00000 0.74902 0.74902 0.3377 0.3101 12.44E+01 710 1.00000 0.74902 0.87451 0.3177 0.2833 12.71E+01 711 1.00000 0.74902 1.00000 0.2974 0.2573 13.08E+01 712 1.00000 0.87451 0.00000 0.4462 0.5076 14.05E+01 713 1.00000 0.87451 0.12549 0.4276 0.4794 14.17E+01 714 1.00000 0.87451 0.25098 0.4059 0.4465 14.30E+01 715 1.00000 0.87451 0.37647 0.3832 0.4114 14.44E+01 716 1.00000 0.87451 0.50196 0.3621 0.3793 14.61E+01 717 1.00000 0.87451 0.62353 0.3487 0.3586 14.74E+01 718 1.00000 0.87451 0.74902 0.3354 0.3386 14.88E+01 719 1.00000 0.87451 0.87451 0.3171 0.3109 15.14E+01 720 1.00000 0.87451 1.00000 0.2984 0.2838 15.51E+01 721 1.00000 1.00000 0.00000 0.4261 0.5267 17.18E+01 722 1.00000 1.00000 0.12549 0.4116 0.5015 17.25E+01 723 1.00000 1.00000 0.25098 0.3939 0.4710 17.36E+01 724 1.00000 1.00000 0.37647 0.3748 0.4385 17.49E+01 725 1.00000 1.00000 0.50196 0.3569 0.4074 17.65E+01 726 1.00000 1.00000 0.62353 0.3448 0.3875 17.78E+01 727 1.00000 1.00000 0.74902 0.3333 0.3677 17.92E+01 728 1.00000 1.00000 0.87451 0.3168 0.3398 18.16E+01 729 1.00000 1.00000 1.00000 0.2996 0.3114 18.48E+01 730 1.00000 1.00000 1.00000 0.2996 0.3114 18.48E+01 731 0.87451 1.00000 1.00000 0.2839 0.3104 17.65E+01 732 0.74902 1.00000 1.00000 0.2704 0.3096 16.99E+01 733 0.62353 1.00000 1.00000 0.2599 0.3087 16.49E+01 734 0.50196 1.00000 1.00000 0.2530 0.3084 16.19E+01 735 0.37647 1.00000 1.00000 0.2463 0.3078 15.90E+01 736 0.25098 1.00000 1.00000 0.2378 0.3072 15.54E+01 737 0.12549 1.00000 1.00000 0.2284 0.3067 15.17E+01 738 0.00000 1.00000 1.00000 0.2168 0.3056 14.72E+01 739 1.00000 0.87451 0.87451 0.3170 0.3110 15.14E+01 740 0.87451 0.87451 0.87451 0.2988 0.3100 14.29E+01 741 0.74902 0.87451 0.87451 0.2825 0.3091 13.62E+01 742 0.62353 0.87451 0.87451 0.2697 0.3082 13.13E+01 743 0.50196 0.87451 0.87451 0.2613 0.3076 12.82E+01 744 0.37647 0.87451 0.87451 0.2532 0.3069 12.53E+01 745 0.25098 0.87451 0.87451 0.2427 0.3063 12.18E+01 746 0.12549 0.87451 0.87451 0.2308 0.3056 11.80E+01 747 0.00000 0.87451 0.87451 0.2165 0.3053 11.35E+01 748 1.00000 0.74902 0.74902 0.3377 0.3101 12.43E+01 749 0.87451 0.74902 0.74902 0.3167 0.3090 11.58E+01 750 0.74902 0.74902 0.74902 0.2976 0.3075 10.91E+01 751 0.62353 0.74902 0.74902 0.2822 0.3064 10.41E+01 752 0.50196 0.74902 0.74902 0.2721 0.3057 10.11E+01 753 0.37647 0.74902 0.74902 0.2621 0.3050 9.82E+01 754 0.25098 0.74902 0.74902 0.2489 0.3041 9.47E+01 755 0.12549 0.74902 0.74902 0.2341 0.3031 9.09E+01 756 0.00000 0.74902 0.74902 0.2158 0.3027 8.64E+01 757 1.00000 0.62353 0.62353 0.3560 0.3065 10.60E+01 758 0.87451 0.62353 0.62353 0.3325 0.3050 9.75E+01 759 0.74902 0.62353 0.62353 0.3110 0.3030 9.08E+01 760 0.62353 0.62353 0.62353 0.2936 0.3014 8.58E+01 761 0.50196 0.62353 0.62353 0.2819 0.3001 8.27E+01 762 0.37647 0.62353 0.62353 0.2700 0.2989 7.98E+01 763 0.25098 0.62353 0.62353 0.2546 0.2979 7.64E+01 764 0.12549 0.62353 0.62353 0.2367 0.2963 7.26E+01 765 0.00000 0.62353 0.62353 0.2138 0.2958 6.82E+01 766 1.00000 0.50196 0.50196 0.3766 0.3097 9.39E+01 767 0.87451 0.50196 0.50196 0.3515 0.3082 8.54E+01 768 0.74902 0.50196 0.50196 0.3281 0.3060 7.86E+01 769 0.62353 0.50196 0.50196 0.3087 0.3041 7.36E+01 770 0.50196 0.50196 0.50196 0.2948 0.3030 7.06E+01 771 0.37647 0.50196 0.50196 0.2813 0.3023 6.78E+01 772 0.25098 0.50196 0.50196 0.2635 0.3004 6.42E+01 773 0.12549 0.50196 0.50196 0.2421 0.2989 6.05E+01 774 0.00000 0.50196 0.50196 0.2147 0.2981 5.61E+01 775 1.00000 0.37647 0.37647 0.4134 0.3218 8.08E+01 776 0.87451 0.37647 0.37647 0.3863 0.3206 72.03E+00 777 0.74902 0.37647 0.37647 0.3601 0.3193 65.32E+00 778 0.62353 0.37647 0.37647 0.3375 0.3180 60.38E+00 779 0.50196 0.37647 0.37647 0.3218 0.3172 57.34E+00 780 0.37647 0.37647 0.37647 0.3055 0.3164 54.48E+00 781 0.25098 0.37647 0.37647 0.2832 0.3153 50.96E+00 782 0.12549 0.37647 0.37647 0.2560 0.3140 47.21E+00 783 0.00000 0.37647 0.37647 0.2197 0.3137 42.82E+00 784 1.00000 0.25098 0.25098 0.4683 0.3269 64.38E+00 785 0.87451 0.25098 0.25098 0.4405 0.3261 55.80E+00 786 0.74902 0.25098 0.25098 0.4121 0.3249 49.09E+00 787 0.62353 0.25098 0.25098 0.3861 0.3238 44.16E+00 788 0.50196 0.25098 0.25098 0.3672 0.3230 41.13E+00 789 0.37647 0.25098 0.25098 0.3469 0.3221 38.27E+00 790 0.25098 0.25098 0.25098 0.3175 0.3209 34.76E+00 791 0.12549 0.25098 0.25098 0.2796 0.3193 31.03E+00 792 0.00000 0.25098 0.25098 0.2237 0.3186 26.69E+00 793 1.00000 0.12549 0.12549 0.5392 0.3349 51.75E+00 794 0.87451 0.12549 0.12549 0.5157 0.3351 43.14E+00 795 0.74902 0.12549 0.12549 0.4899 0.3349 36.42E+00 796 0.62353 0.12549 0.12549 0.4642 0.3347 31.51E+00 797 0.50196 0.12549 0.12549 0.4442 0.3345 28.48E+00 798 0.37647 0.12549 0.12549 0.4211 0.3344 25.64E+00 799 0.25098 0.12549 0.12549 0.3848 0.3341 22.14E+00 800 0.12549 0.12549 0.12549 0.3316 0.3339 18.44E+00 801 0.00000 0.12549 0.12549 0.2361 0.3348 14.14E+00 802 1.00000 0.00000 0.00000 0.6336 0.3344 39.92E+00 803 0.87451 0.00000 0.00000 0.6262 0.3340 31.13E+00 804 0.74902 0.00000 0.00000 0.6176 0.3332 24.40E+00 805 0.62353 0.00000 0.00000 0.6081 0.3324 19.51E+00 806 0.50196 0.00000 0.00000 0.5998 0.3317 16.51E+00 807 0.37647 0.00000 0.00000 0.5887 0.3307 13.70E+00 808 0.25098 0.00000 0.00000 0.5674 0.3286 10.24E+00 809 0.12549 0.00000 0.00000 0.5217 0.3245 6.58E+00 810 0.00000 0.00000 0.00000 0.3079 0.3036 23.40E-01 811 1.00000 1.00000 1.00000 0.2996 0.3114 18.48E+01 812 0.87451 0.87451 1.00000 0.2810 0.2812 14.66E+01 813 0.74902 0.74902 1.00000 0.2624 0.2495 11.55E+01 814 0.62353 0.62353 1.00000 0.2457 0.2220 9.36E+01 815 0.50196 0.50196 1.00000 0.2338 0.2014 7.97E+01 816 0.37647 0.37647 1.00000 0.2207 0.1767 6.52E+01 817 0.25098 0.25098 1.00000 0.2018 0.1391 4.66E+01 818 0.12549 0.12549 1.00000 0.1797 0.1018 3.11E+01 819 0.00000 0.00000 1.00000 0.1501 0.0563 1.55E+01 820 1.00000 1.00000 0.87451 0.3167 0.3399 18.15E+01 821 0.87451 0.87451 0.87451 0.2986 0.3101 14.28E+01 822 0.74902 0.74902 0.87451 0.2798 0.2778 11.17E+01 823 0.62353 0.62353 0.87451 0.2623 0.2492 8.99E+01 824 0.50196 0.50196 0.87451 0.2499 0.2268 7.59E+01 825 0.37647 0.37647 0.87451 0.2355 0.1998 6.15E+01 826 0.25098 0.25098 0.87451 0.2139 0.1577 4.32E+01 827 0.12549 0.12549 0.87451 0.1878 0.1133 2.77E+01 828 0.00000 0.00000 0.87451 0.1521 0.0573 1.22E+01 829 1.00000 1.00000 0.74902 0.3333 0.3676 17.90E+01 830 0.87451 0.87451 0.74902 0.3161 0.3394 14.02E+01 831 0.74902 0.74902 0.74902 0.2977 0.3076 10.90E+01 832 0.62353 0.62353 0.74902 0.2802 0.2786 8.72E+01 833 0.50196 0.50196 0.74902 0.2669 0.2554 7.33E+01 834 0.37647 0.37647 0.74902 0.2519 0.2266 5.90E+01 835 0.25098 0.25098 0.74902 0.2284 0.1793 4.06E+01 836 0.12549 0.12549 0.74902 0.1986 0.1280 2.52E+01 837 0.00000 0.00000 0.74902 0.1544 0.0581 0.96E+01 838 1.00000 1.00000 0.62353 0.3450 0.3875 17.76E+01 839 0.87451 0.87451 0.62353 0.3288 0.3608 13.87E+01 840 0.74902 0.74902 0.62353 0.3109 0.3300 10.75E+01 841 0.62353 0.62353 0.62353 0.2937 0.3011 8.57E+01 842 0.50196 0.50196 0.62353 0.2803 0.2780 7.18E+01 843 0.37647 0.37647 0.62353 0.2650 0.2482 5.75E+01 844 0.25098 0.25098 0.62353 0.2403 0.1978 3.91E+01 845 0.12549 0.12549 0.62353 0.2078 0.1413 2.38E+01 846 0.00000 0.00000 0.62353 0.1558 0.0600 0.82E+01 847 1.00000 1.00000 0.50196 0.3567 0.4078 17.64E+01 848 0.87451 0.87451 0.50196 0.3418 0.3830 13.74E+01 849 0.74902 0.74902 0.50196 0.3250 0.3537 10.61E+01 850 0.62353 0.62353 0.50196 0.3083 0.3261 8.44E+01 851 0.50196 0.50196 0.50196 0.2952 0.3030 7.05E+01 852 0.37647 0.37647 0.50196 0.2795 0.2727 5.62E+01 853 0.25098 0.25098 0.50196 0.2540 0.2191 37.68E+00 854 0.12549 0.12549 0.50196 0.2179 0.1570 22.38E+00 855 0.00000 0.00000 0.50196 0.1574 0.0623 6.93E+00 856 1.00000 1.00000 0.37647 0.3750 0.4382 17.47E+01 857 0.87451 0.87451 0.37647 0.3622 0.4179 13.57E+01 858 0.74902 0.74902 0.37647 0.3477 0.3929 10.45E+01 859 0.62353 0.62353 0.37647 0.3324 0.3678 82.58E+00 860 0.50196 0.50196 0.37647 0.3201 0.3463 68.75E+00 861 0.37647 0.37647 0.37647 0.3056 0.3164 54.40E+00 862 0.25098 0.25098 0.37647 0.2804 0.2610 36.09E+00 863 0.12549 0.12549 0.37647 0.2402 0.1910 20.81E+00 864 0.00000 0.00000 0.37647 0.1622 0.0693 5.40E+00 865 1.00000 1.00000 0.25098 0.3939 0.4711 17.34E+01 866 0.87451 0.87451 0.25098 0.3848 0.4562 13.42E+01 867 0.74902 0.74902 0.25098 0.3737 0.4374 10.30E+01 868 0.62353 0.62353 0.25098 0.3613 0.4177 81.10E+00 869 0.50196 0.50196 0.25098 0.3512 0.4000 67.30E+00 870 0.37647 0.37647 0.25098 0.3393 0.3738 52.98E+00 871 0.25098 0.25098 0.25098 0.3175 0.3209 34.70E+00 872 0.12549 0.12549 0.25098 0.2757 0.2463 19.47E+00 873 0.00000 0.00000 0.25098 0.1720 0.0846 4.10E+00 874 1.00000 1.00000 0.12549 0.4114 0.5016 17.24E+01 875 0.87451 0.87451 0.12549 0.4062 0.4930 13.30E+01 876 0.74902 0.74902 0.12549 0.3998 0.4822 10.18E+01 877 0.62353 0.62353 0.12549 0.3918 0.4703 79.88E+00 878 0.50196 0.50196 0.12549 0.3855 0.4591 66.10E+00 879 0.37647 0.37647 0.12549 0.3787 0.4407 51.81E+00 880 0.25098 0.25098 0.12549 0.3663 0.3995 33.59E+00 881 0.12549 0.12549 0.12549 0.3316 0.3339 18.40E+00 882 0.00000 0.00000 0.12549 0.1963 0.1236 3.09E+00 883 1.00000 1.00000 0.00000 0.4260 0.5270 17.16E+01 884 0.87451 0.87451 0.00000 0.4248 0.5247 13.18E+01 885 0.74902 0.74902 0.00000 0.4237 0.5218 10.05E+01 886 0.62353 0.62353 0.00000 0.4208 0.5194 78.64E+00 887 0.50196 0.50196 0.00000 0.4195 0.5167 64.91E+00 888 0.37647 0.37647 0.00000 0.4204 0.5103 50.69E+00 889 0.25098 0.25098 0.00000 0.4252 0.4931 32.61E+00 890 0.12549 0.12549 0.00000 0.4189 0.4692 17.54E+00 891 0.00000 0.00000 0.00000 0.3080 0.3035 23.36E-01 892 1.00000 1.00000 1.00000 0.2996 0.3115 18.48E+01 893 1.00000 0.87451 1.00000 0.2983 0.2836 15.49E+01 894 1.00000 0.74902 1.00000 0.2974 0.2570 13.05E+01 895 1.00000 0.62353 1.00000 0.2969 0.2360 11.36E+01 896 1.00000 0.50196 1.00000 0.2966 0.2212 10.27E+01 897 1.00000 0.37647 1.00000 0.2964 0.2043 9.11E+01 898 1.00000 0.25098 1.00000 0.2963 0.1801 7.61E+01 899 1.00000 0.12549 1.00000 0.2962 0.1592 6.44E+01 900 1.00000 0.00000 1.00000 0.2963 0.1373 5.31E+01 901 0.87451 1.00000 0.87451 0.3002 0.3405 17.31E+01 902 0.87451 0.87451 0.87451 0.2987 0.3099 14.27E+01 903 0.87451 0.74902 0.87451 0.2975 0.2802 11.82E+01 904 0.87451 0.62353 0.87451 0.2967 0.2565 10.14E+01 905 0.87451 0.50196 0.87451 0.2963 0.2395 9.06E+01 906 0.87451 0.37647 0.87451 0.2959 0.2193 7.90E+01 907 0.87451 0.25098 0.87451 0.2956 0.1903 6.41E+01 908 0.87451 0.12549 0.87451 0.2957 0.1648 5.25E+01 909 0.87451 0.00000 0.87451 0.2951 0.1367 4.11E+01 910 0.74902 1.00000 0.74902 0.3008 0.3718 16.39E+01 911 0.74902 0.87451 0.74902 0.2990 0.3397 13.34E+01 912 0.74902 0.74902 0.74902 0.2977 0.3075 10.89E+01 913 0.74902 0.62353 0.74902 0.2967 0.2811 9.21E+01 914 0.74902 0.50196 0.74902 0.2965 0.2614 8.12E+01 915 0.74902 0.37647 0.74902 0.2957 0.2383 6.97E+01 916 0.74902 0.25098 0.74902 0.2956 0.2035 5.48E+01 917 0.74902 0.12549 0.74902 0.2952 0.1721 4.32E+01 918 0.74902 0.00000 0.74902 0.2947 0.1369 3.19E+01 919 0.62353 1.00000 0.62353 0.2990 0.3961 15.75E+01 920 0.62353 0.87451 0.62353 0.2966 0.3636 12.70E+01 921 0.62353 0.74902 0.62353 0.2948 0.3296 10.24E+01 922 0.62353 0.62353 0.62353 0.2938 0.3012 8.56E+01 923 0.62353 0.50196 0.62353 0.2929 0.2798 7.48E+01 924 0.62353 0.37647 0.62353 0.2921 0.2540 6.33E+01 925 0.62353 0.25098 0.62353 0.2910 0.2143 4.84E+01 926 0.62353 0.12549 0.62353 0.2908 0.1772 3.68E+01 927 0.62353 0.00000 0.62353 0.2893 0.1344 2.55E+01 928 0.50196 1.00000 0.50196 0.3009 0.4224 15.33E+01 929 0.50196 0.87451 0.50196 0.2988 0.3898 12.25E+01 930 0.50196 0.74902 0.50196 0.2970 0.3553 9.80E+01 931 0.50196 0.62353 0.50196 0.2959 0.3256 8.12E+01 932 0.50196 0.50196 0.50196 0.2951 0.3032 7.05E+01 933 0.50196 0.37647 0.50196 0.2943 0.2752 5.90E+01 934 0.50196 0.25098 0.50196 0.2934 0.2305 44.01E+00 935 0.50196 0.12549 0.50196 0.2929 0.1877 32.43E+00 936 0.50196 0.00000 0.50196 0.2917 0.1366 21.17E+00 937 0.37647 1.00000 0.37647 0.3080 0.4643 14.88E+01 938 0.37647 0.87451 0.37647 0.3064 0.4344 11.81E+01 939 0.37647 0.74902 0.37647 0.3059 0.4006 9.35E+01 940 0.37647 0.62353 0.37647 0.3053 0.3706 76.59E+00 941 0.37647 0.50196 0.37647 0.3053 0.3469 65.82E+00 942 0.37647 0.37647 0.37647 0.3055 0.3164 54.35E+00 943 0.37647 0.25098 0.37647 0.3064 0.2662 39.56E+00 944 0.37647 0.12549 0.37647 0.3076 0.2145 28.00E+00 945 0.37647 0.00000 0.37647 0.3084 0.1488 16.80E+00 946 0.25098 1.00000 0.25098 0.3124 0.5143 14.39E+01 947 0.25098 0.87451 0.25098 0.3118 0.4894 11.30E+01 948 0.25098 0.74902 0.25098 0.3116 0.4598 88.37E+00 949 0.25098 0.62353 0.25098 0.3122 0.4317 71.62E+00 950 0.25098 0.50196 0.25098 0.3131 0.4083 60.85E+00 951 0.25098 0.37647 0.25098 0.3145 0.3769 49.40E+00 952 0.25098 0.25098 0.25098 0.3176 0.3208 34.66E+00 953 0.25098 0.12549 0.25098 0.3216 0.2571 23.15E+00 954 0.25098 0.00000 0.25098 0.3269 0.1654 12.00E+00 955 0.12549 1.00000 0.12549 0.3129 0.5689 13.91E+01 956 0.12549 0.87451 0.12549 0.3127 0.5524 10.81E+01 957 0.12549 0.74902 0.12549 0.3127 0.5318 83.39E+00 958 0.12549 0.62353 0.12549 0.3138 0.5106 66.66E+00 959 0.12549 0.50196 0.12549 0.3152 0.4917 55.92E+00 960 0.12549 0.37647 0.12549 0.3175 0.4644 44.51E+00 961 0.12549 0.25098 0.12549 0.3232 0.4091 29.83E+00 962 0.12549 0.12549 0.12549 0.3317 0.3339 18.38E+00 963 0.12549 0.00000 0.12549 0.3475 0.1938 7.32E+00 964 0.00000 1.00000 0.00000 0.3061 0.6262 13.40E+01 965 0.00000 0.87451 0.00000 0.3040 0.6231 10.25E+01 966 0.00000 0.74902 0.00000 0.3013 0.6193 77.76E+00 967 0.00000 0.62353 0.00000 0.2999 0.6144 61.07E+00 968 0.00000 0.50196 0.00000 0.2989 0.6096 50.41E+00 969 0.00000 0.37647 0.00000 0.2981 0.6016 39.09E+00 970 0.00000 0.25098 0.00000 0.2977 0.5809 24.55E+00 971 0.00000 0.12549 0.00000 0.2984 0.5380 13.25E+00 972 0.00000 0.00000 0.00000 0.3079 0.3036 23.34E-01 973 0.00000 0.00000 0.00000 0.3080 0.3036 23.34E-01 974 0.12549 0.12549 0.12549 0.3318 0.3338 18.37E+00 975 0.25098 0.25098 0.25098 0.3176 0.3209 34.65E+00 976 0.37647 0.37647 0.37647 0.3056 0.3164 54.33E+00 977 0.50196 0.50196 0.50196 0.2949 0.3029 70.31E+00 978 0.62353 0.62353 0.62353 0.2937 0.3011 8.56E+01 979 0.74902 0.74902 0.74902 0.2977 0.3075 10.89E+01 980 0.87451 0.87451 0.87451 0.2986 0.3099 14.26E+01 981 1.00000 1.00000 1.00000 0.2995 0.3115 18.46E+01 982 0.00000 0.00000 0.00000 0.3079 0.3036 23.33E-01 983 0.12549 0.12549 0.12549 0.3317 0.3339 18.37E+00 984 0.25098 0.25098 0.25098 0.3176 0.3209 34.65E+00 985 0.37647 0.37647 0.37647 0.3055 0.3164 54.32E+00 986 0.50196 0.50196 0.50196 0.2949 0.3029 70.29E+00 987 0.62353 0.62353 0.62353 0.2934 0.3014 8.57E+01 988 0.74902 0.74902 0.74902 0.2975 0.3074 10.88E+01 989 0.87451 0.87451 0.87451 0.2986 0.3101 14.27E+01 990 1.00000 1.00000 1.00000 0.2995 0.3115 18.46E+01 991 0.00000 0.00000 0.00000 0.3080 0.3037 23.33E-01 992 0.12549 0.12549 0.12549 0.3318 0.3338 18.36E+00 993 0.25098 0.25098 0.25098 0.3176 0.3209 34.63E+00 994 0.37647 0.37647 0.37647 0.3056 0.3164 54.31E+00 995 0.50196 0.50196 0.50196 0.2949 0.3029 70.29E+00 996 0.62353 0.62353 0.62353 0.2938 0.3012 8.56E+01 997 0.74902 0.74902 0.74902 0.2975 0.3077 10.89E+01 998 0.87451 0.87451 0.87451 0.2984 0.3101 14.27E+01 999 1.00000 1.00000 1.00000 0.2995 0.3115 18.46E+01 1000 0.00000 0.00000 0.00000 0.3080 0.3036 23.32E-01 1001 0.12549 0.12549 0.12549 0.3317 0.3339 18.36E+00 1002 0.25098 0.25098 0.25098 0.3176 0.3209 34.63E+00 1003 0.37647 0.37647 0.37647 0.3056 0.3164 54.30E+00 1004 0.50196 0.50196 0.50196 0.2949 0.3029 70.27E+00 1005 0.62353 0.62353 0.62353 0.2937 0.3011 8.55E+01 1006 0.74902 0.74902 0.74902 0.2976 0.3075 10.88E+01 1007 0.87451 0.87451 0.87451 0.2987 0.3100 14.26E+01 1008 1.00000 1.00000 1.00000 0.2995 0.3115 18.46E+01 1009 0.00000 0.00000 0.00000 0.3079 0.3036 23.32E-01 1010 0.06667 0.06667 0.06667 0.3408 0.3359 11.00E+00 1011 0.13333 0.13333 0.13333 0.3311 0.3320 19.18E+00 1012 0.20000 0.20000 0.20000 0.3235 0.3257 27.84E+00 1013 0.26667 0.26667 0.26667 0.3155 0.3198 37.23E+00 1014 0.33333 0.33333 0.33333 0.3103 0.3173 47.23E+00 1015 0.40000 0.40000 0.40000 0.3030 0.3124 57.04E+00 1016 0.46667 0.46667 0.46667 0.2963 0.3041 65.86E+00 1017 0.53333 0.53333 0.53333 0.2942 0.3028 74.13E+00 1018 0.60000 0.60000 0.60000 0.2925 0.3017 8.23E+01 1019 0.66667 0.66667 0.66667 0.2951 0.3014 9.14E+01 1020 0.73333 0.73333 0.73333 0.2981 0.3078 10.55E+01 1021 0.80000 0.80000 0.80000 0.2978 0.3087 12.12E+01 1022 0.86667 0.86667 0.86667 0.2987 0.3093 13.96E+01 1023 0.93333 0.93333 0.93333 0.3017 0.3137 16.45E+01 1024 1.00000 1.00000 1.00000 0.2995 0.3115 18.46E+01 1025 0.00000 0.00000 0.00000 0.3080 0.3036 23.32E-01 1026 0.06667 0.06667 0.06667 0.3407 0.3358 10.99E+00 1027 0.13333 0.13333 0.13333 0.3312 0.3321 19.18E+00 1028 0.20000 0.20000 0.20000 0.3235 0.3257 27.84E+00 1029 0.26667 0.26667 0.26667 0.3155 0.3198 37.23E+00 1030 0.33333 0.33333 0.33333 0.3103 0.3173 47.22E+00 1031 0.40000 0.40000 0.40000 0.3030 0.3124 57.03E+00 1032 0.46667 0.46667 0.46667 0.2963 0.3041 65.85E+00 1033 0.53333 0.53333 0.53333 0.2942 0.3028 74.11E+00 1034 0.60000 0.60000 0.60000 0.2928 0.3016 8.23E+01 1035 0.66667 0.66667 0.66667 0.2950 0.3013 9.14E+01 1036 0.73333 0.73333 0.73333 0.2981 0.3078 10.55E+01 1037 0.80000 0.80000 0.80000 0.2979 0.3086 12.12E+01 1038 0.86667 0.86667 0.86667 0.2987 0.3093 13.96E+01 1039 0.93333 0.93333 0.93333 0.3015 0.3137 16.45E+01 1040 1.00000 1.00000 1.00000 0.2995 0.3113 18.45E+01 1041 0.00000 0.00000 0.00000 0.3080 0.3036 23.31E-01 1042 0.06667 0.06667 0.06667 0.3408 0.3359 11.00E+00 1043 0.13333 0.13333 0.13333 0.3311 0.3320 19.18E+00 1044 0.20000 0.20000 0.20000 0.3236 0.3257 27.84E+00 1045 0.26667 0.26667 0.26667 0.3155 0.3198 37.23E+00 1046 0.33333 0.33333 0.33333 0.3103 0.3173 47.23E+00 1047 0.40000 0.40000 0.40000 0.3030 0.3124 57.03E+00 1048 0.46667 0.46667 0.46667 0.2963 0.3041 65.85E+00 1049 0.53333 0.53333 0.53333 0.2942 0.3028 74.12E+00 1050 0.60000 0.60000 0.60000 0.2928 0.3016 8.23E+01 1051 0.66667 0.66667 0.66667 0.2948 0.3017 9.15E+01 1052 0.73333 0.73333 0.73333 0.2983 0.3077 10.55E+01 1053 0.80000 0.80000 0.80000 0.2977 0.3089 12.13E+01 1054 0.86667 0.86667 0.86667 0.2987 0.3093 13.96E+01 1055 0.93333 0.93333 0.93333 0.3015 0.3139 16.46E+01 1056 1.00000 1.00000 1.00000 0.2996 0.3114 18.46E+01 1057 0.00000 0.00000 0.00000 0.3080 0.3037 23.32E-01 1058 0.06667 0.06667 0.06667 0.3406 0.3360 11.00E+00 1059 0.13333 0.13333 0.13333 0.3312 0.3321 19.18E+00 1060 0.20000 0.20000 0.20000 0.3235 0.3258 27.84E+00 1061 0.26667 0.26667 0.26667 0.3155 0.3198 37.22E+00 1062 0.33333 0.33333 0.33333 0.3103 0.3173 47.23E+00 1063 0.40000 0.40000 0.40000 0.3030 0.3124 57.03E+00 1064 0.46667 0.46667 0.46667 0.2963 0.3041 65.85E+00 1065 0.53333 0.53333 0.53333 0.2942 0.3028 74.11E+00 1066 0.60000 0.60000 0.60000 0.2928 0.3016 8.23E+01 1067 0.66667 0.66667 0.66667 0.2949 0.3015 9.14E+01 1068 0.73333 0.73333 0.73333 0.2982 0.3076 10.54E+01 1069 0.80000 0.80000 0.80000 0.2979 0.3086 12.12E+01 1070 0.86667 0.86667 0.86667 0.2986 0.3092 13.95E+01 1071 0.93333 0.93333 0.93333 0.3015 0.3137 16.45E+01 1072 1.00000 1.00000 1.00000 0.2996 0.3114 18.45E+01 1073 0.00000 0.00000 0.00000 0.3080 0.3037 23.31E-01 1074 1.00000 1.00000 1.00000 0.2995 0.3115 18.47E+01 1075 1.00000 0.00000 0.00000 0.6336 0.3344 39.87E+00 1076 0.00000 1.00000 1.00000 0.2168 0.3056 14.70E+01 1077 1.00000 1.00000 0.00000 0.4259 0.5270 17.15E+01 1078 0.00000 0.00000 1.00000 0.1502 0.0567 1.56E+01 1079 0.00000 1.00000 0.00000 0.3060 0.6266 13.39E+01 1080 1.00000 0.00000 1.00000 0.2962 0.1371 5.30E+01 ] def %**************************************************************************** %For output linearization in CIELAB %**************************************************************************** %BEG -- LUT Code ---Look-up-Table for FP-file /nR 9 def %LUT size /nG 9 def /nB 9 def /nges nR nG nB mul mul def /Lab2RGB {%BEG Procedure Lab2RGB % --- Lab2RGB ----------------- % % --- Input (stack): L* a* b* % --- Output (stack): iR iG iB ; LUT value with smallest Delta-E % ---- : delta-E % /Zielb exch def /Ziela exch def /ZielL exch def /dE 1000 def /opt 0 def 1 1 nges { 1 sub 3 mul /ii exch def /dL lut ii get ZielL sub abs def dE dL ge { %dE>dL /da lut ii 1 add get Ziela sub abs def dE da ge { %dE>da /db lut ii 2 add get Zielb sub abs def dE db ge { %dE>db /dEneu dL dL mul da da mul db db mul add add sqrt def /d_L* dL def %new /d_a* da def %new /d_b* db def %new dE dEneu ge { % test ob dEneu < dE /dE dEneu def /opt ii def } if } if } if } if } for /opt opt 3 idiv def /delta_L* d_L* def %new /delta_a* d_a* def %new /delta_b* d_b* def %new /delta_E* d_L* dup mul d_a* dup mul add d_b* dup mul add 0.001 add sqrt def %new /LAB*L*Fa3D ZielL d_L* add def %new /LAB*a*Fa3D Ziela d_a* add def %new /LAB*b*Fa3D Zielb d_b* add def %new /LAB*C*Fa3D LAB*a*Fa3D dup mul LAB*b*Fa3D dup mul add 0.0001 add sqrt def %new /LAB*hFa3D LAB*b*Fa3D LAB*a*Fa3D 0.0001 add atan def %new opt nG nB mul idiv % R auf den stack (Wertebereich real: 0-(nr-1)) opt nG nB mul mod nB idiv % G auf den stack opt nG nB mul mod nB mod % B auf den stack dEneu } def %END Procedure Lab2RGB %********************************************************************* /indexkonv {%BEG Procedure indexkonv % --- indexkonv ----------------- % % --- Eingabe (stack): iR iG iB ; Indizes eines LUT-Wertes % --- Ausgabe (stack): Position des LUT-Wertes im 1-dim Lut-Array % %errechnet aus r g b index auf stack den fortlaufenden index exch nB mul add exch nB nG mul mul add 3 mul } def %END Procedure indexkonv %********************************************************************* /set_oktant {%BEG Procedure set_oktant % --- set_oktant ----------------- % % --- Eingabe (stack): iR iG iB ; Indizes eines LUT-Wertes, % kennzeichnet die dem Ursprung entfernteste Ecke des ausgewaehlten Raumbereiches % sortierung v1->v8: RGB, RGB+1, RG+1B, RG+1B+1, usw.. % --- Ausgabe (stack): keine % /B_index exch def /G_index exch def /R_index exch def R_index G_index B_index indexkonv /tempindex exch def % /eswird R_index G_index B_index /zu tempindex /lin_v8L lut tempindex get def /lin_v8a lut tempindex 1 add get def /lin_v8b lut tempindex 2 add get def R_index G_index B_index 1 sub indexkonv /tempindex exch def % /eswird R_index G_index B_index 1 sub /zu tempindex jens /lin_v7L lut tempindex get def /lin_v7a lut tempindex 1 add get def /lin_v7b lut tempindex 2 add get def R_index G_index 1 sub B_index indexkonv /tempindex exch def /lin_v6L lut tempindex get def /lin_v6a lut tempindex 1 add get def /lin_v6b lut tempindex 2 add get def R_index G_index 1 sub B_index 1 sub indexkonv /tempindex exch def /lin_v5L lut tempindex get def /lin_v5a lut tempindex 1 add get def /lin_v5b lut tempindex 2 add get def R_index 1 sub G_index B_index indexkonv /tempindex exch def /lin_v4L lut tempindex get def /lin_v4a lut tempindex 1 add get def /lin_v4b lut tempindex 2 add get def R_index 1 sub G_index B_index 1 sub indexkonv /tempindex exch def /lin_v3L lut tempindex get def /lin_v3a lut tempindex 1 add get def /lin_v3b lut tempindex 2 add get def R_index 1 sub G_index 1 sub B_index indexkonv /tempindex exch def /lin_v2L lut tempindex get def /lin_v2a lut tempindex 1 add get def /lin_v2b lut tempindex 2 add get def R_index 1 sub G_index 1 sub B_index 1 sub indexkonv /tempindex exch def /lin_v1L lut tempindex get def /lin_v1a lut tempindex 1 add get def /lin_v1b lut tempindex 2 add get def } def %END Procedure set_oktant %********************************************************************* /L_abc {%BEG Procedure L_abc % --- L_abc ----------------- % % --- Eingabe (stack): alpha (R-Richtung) beta (G-Richtung) gamma (B-Richtung) % --- Ausgabe (stack): L* interpoliert aus LUT im aktuellen Oktanten % /gamma exch def /beta exch def /alpha exch def /alpham 1 alpha sub def /betam 1 beta sub def /gammam 1 gamma sub def lin_v8L alpha beta gamma mul mul mul lin_v7L alpha beta gammam mul mul mul add lin_v6L alpha betam gamma mul mul mul add lin_v5L alpha betam gammam mul mul mul add lin_v4L alpham beta gamma mul mul mul add lin_v3L alpham beta gammam mul mul mul add lin_v2L alpham betam gamma mul mul mul add lin_v1L alpham betam gammam mul mul mul add } def %END Procedure L_abc %********************************************************************* /a_abc {%BEG Procedure a_abc % --- a_abc ----------------- % % --- Eingabe (stack): alpha (R-Richtung) beta (G-Richtung) gamma (B-Richtung) % --- Ausgabe (stack): L* interpoliert aus LUT im aktuellen Oktanten % /gamma exch def /beta exch def /alpha exch def /alpham 1 alpha sub def /betam 1 beta sub def /gammam 1 gamma sub def lin_v8a alpha beta gamma mul mul mul lin_v7a alpha beta gammam mul mul mul add lin_v6a alpha betam gamma mul mul mul add lin_v5a alpha betam gammam mul mul mul add lin_v4a alpham beta gamma mul mul mul add lin_v3a alpham beta gammam mul mul mul add lin_v2a alpham betam gamma mul mul mul add lin_v1a alpham betam gammam mul mul mul add } def %END Procedure a_abc %********************************************************************* /b_abc {%BEG Procedure b_abc % --- b_abc ----------------- % % --- Eingabe (stack): alpha (R-Richtung) beta (G-Richtung) gamma (B-Richtung) % --- Ausgabe (stack): L* interpoliert aus LUT im aktuellen Oktanten % /gamma exch def /beta exch def /alpha exch def /alpham 1 alpha sub def /betam 1 beta sub def /gammam 1 gamma sub def lin_v8b alpha beta gamma mul mul mul lin_v7b alpha beta gammam mul mul mul add lin_v6b alpha betam gamma mul mul mul add lin_v5b alpha betam gammam mul mul mul add lin_v4b alpham beta gamma mul mul mul add lin_v3b alpham beta gammam mul mul mul add lin_v2b alpham betam gamma mul mul mul add lin_v1b alpham betam gammam mul mul mul add } def %END Procedure b_abc %********************************************************************* /Jacobi_abc {%BEG Procedure Jacobi_abc % --- Jacobi_abc ----------------- % % --- Eingabe (stack): alpha (R-Richtung) beta (G-Richtung) gamma (B-Richtung) % --- Ausgabe (stack): Jacobi Matrix an der stelle abc im aktuellen Oktanten % in der reihenfolge abcdefghi % (a b c) % (d e f) % (g h i) % /gamma exch def /beta exch def /alpha exch def /alpham 1 alpha sub def /betam 1 beta sub def /gammam 1 gamma sub def lin_v5L lin_v1L sub betam gammam mul mul lin_v6L lin_v2L sub betam gamma mul mul add lin_v7L lin_v3L sub beta gammam mul mul add lin_v8L lin_v4L sub beta gamma mul mul add lin_v3L lin_v1L sub alpham gammam mul mul lin_v4L lin_v2L sub alpham gamma mul mul add lin_v7L lin_v5L sub alpha gammam mul mul add lin_v8L lin_v6L sub alpha gamma mul mul add lin_v2L lin_v1L sub alpham betam mul mul lin_v4L lin_v3L sub alpham beta mul mul add lin_v6L lin_v5L sub alpha betam mul mul add lin_v8L lin_v7L sub alpha beta mul mul add lin_v5a lin_v1a sub betam gammam mul mul lin_v6a lin_v2a sub betam gamma mul mul add lin_v7a lin_v3a sub beta gammam mul mul add lin_v8a lin_v4a sub beta gamma mul mul add lin_v3a lin_v1a sub alpham gammam mul mul lin_v4a lin_v2a sub alpham gamma mul mul add lin_v7a lin_v5a sub alpha gammam mul mul add lin_v8a lin_v6a sub alpha gamma mul mul add lin_v2a lin_v1a sub alpham betam mul mul lin_v4a lin_v3a sub alpham beta mul mul add lin_v6a lin_v5a sub alpha betam mul mul add lin_v8a lin_v7a sub alpha beta mul mul add lin_v5b lin_v1b sub betam gammam mul mul lin_v6b lin_v2b sub betam gamma mul mul add lin_v7b lin_v3b sub beta gammam mul mul add lin_v8b lin_v4b sub beta gamma mul mul add lin_v3b lin_v1b sub alpham gammam mul mul lin_v4b lin_v2b sub alpham gamma mul mul add lin_v7b lin_v5b sub alpha gammam mul mul add lin_v8b lin_v6b sub alpha gamma mul mul add lin_v2b lin_v1b sub alpham betam mul mul lin_v4b lin_v3b sub alpham beta mul mul add lin_v6b lin_v5b sub alpha betam mul mul add lin_v8b lin_v7b sub alpha beta mul mul add } def %END Procedure Jacobi_abc %********************************************************************* /Inverse_mat {%BEG Procedure Inverse_mat % --- Inverse_mat ----------------- % % --- Eingabe (stack): Matrix in der reihenfolge abcdefghi % invertiert die Matrix (a b c) % (d e f) % (g h i) % --- Ausgabe (stack): Matrix % /i_i exch def /i_h exch def /i_g exch def /i_f exch def /i_e exch def /i_d exch def /i_c exch def /i_b exch def /i_a exch def /i_det i_a i_e i_i mul mul i_b i_d i_i mul mul sub i_a i_f i_h mul mul sub i_c i_d i_h mul mul add i_b i_f i_g mul mul add i_c i_e i_g mul mul sub def i_e i_i mul i_f i_h mul sub i_det div %a der inversen auf stack i_c i_h mul i_b i_i mul sub i_det div %b der inversen auf stack i_b i_f mul i_c i_e mul sub i_det div %c der inversen auf stack i_f i_g mul i_d i_i mul sub i_det div %d der inversen auf stack i_a i_i mul i_c i_g mul sub i_det div %e der inversen auf stack i_c i_d mul i_a i_f mul sub i_det div %f der inversen auf stack i_d i_h mul i_e i_g mul sub i_det div %g der inversen auf stack i_b i_g mul i_a i_h mul sub i_det div %h der inversen auf stack i_a i_e mul i_b i_d mul sub i_det div %i der inversen auf stack } def %END Procedure Inverse_mat %********************************************************************* /linear_finden {%BEG Procedure linear_finden % --- linear_finden ----------------- % % --- Eingabe (stack): iR iG iB ; Indizes eines LUT-Wertes, % kennzeichnet die dem Ursprung entfernteste Ecke des ausgewaehlten Raumbereiches % L* a* b* ; danach der zielpunkt als lab wert % --- Ausgabe (stack): Delta-E: Abstand zum Zielpunkt % alpha, beta, gamma die den kürzesten abstand zum gegebenen zielpunkt aufweisen % /lin_zielb exch def /lin_ziela exch def /lin_zielL exch def set_oktant /akt_a 0.5 def /akt_b 0.5 def /akt_c 0.5 def /last_L akt_a akt_b akt_c L_abc def /last_a akt_a akt_b akt_c a_abc def /last_b akt_a akt_b akt_c b_abc def /diff_L last_L lin_zielL sub def /diff_a last_a lin_ziela sub def /diff_b last_b lin_zielb sub def 0 %default rueckgabewert fuer delta-e (wird nie benutzt, aber fuer pop wichtig) 1 1 10 { pop %pop schleifenzaehler pop %pop letzes Delta-E akt_a akt_b akt_c Jacobi_abc Inverse_mat diff_b mul exch diff_a mul add exch diff_L mul add /delta_c exch def diff_b mul exch diff_a mul add exch diff_L mul add /delta_b exch def diff_b mul exch diff_a mul add exch diff_L mul add /delta_a exch def % akt_a akt_b akt_c % delta_a delta_b delta_c /akt_a akt_a delta_a sub def /akt_b akt_b delta_b sub def /akt_c akt_c delta_c sub def akt_a 0 lt {/akt_a 0 def} if akt_b 0 lt {/akt_b 0 def} if akt_c 0 lt {/akt_c 0 def} if 1 akt_a lt {/akt_a 1 def} if 1 akt_b lt {/akt_b 1 def} if 1 akt_c lt {/akt_c 1 def} if /last_L akt_a akt_b akt_c L_abc def /last_a akt_a akt_b akt_c a_abc def /last_b akt_a akt_b akt_c b_abc def /diff_L last_L lin_zielL sub def /diff_a last_a lin_ziela sub def /diff_b last_b lin_zielb sub def %/naechster %akt_a %akt_b %akt_c %last_L %last_a %last_b diff_L dup mul diff_a dup mul diff_b dup mul add add sqrt dup %Abbruch wenn Delta_e<0.1 0.1 lt {exit} if } for /diff_L* diff_L def %new /diff_a* diff_a def %new /diff_b* diff_b def %new /diff_E* diff_L dup mul diff_a dup mul add diff_b dup mul add 0.0001 add sqrt def /last_L* last_L def /last_a* last_a def /last_b* last_b def akt_a akt_b akt_c } def %END Procedure linear_finden %********************************************************************* /Lab2RGBinterpolation {%BEG Procedure Lab2RGBinterpolation /Ziel_b exch def /Ziel_a exch def /Ziel_L exch def Ziel_L Ziel_a Ziel_b Lab2RGB /now_delta_e exch def /B_next exch def /G_next exch def /R_next exch def /R_fin R_next nR 1 sub div def % defaults falls kein besserer wert gefunden /G_fin G_next nG 1 sub div def /B_fin B_next nB 1 sub div def -1 1 2 { R_next add /R_now exch def -1 1 2 { G_next add /G_now exch def -1 1 2 { B_next add /B_now exch def B_now 0 gt G_now 0 gt R_now 0 gt nB B_now gt nG G_now gt nR R_now gt and and and and and { R_now G_now B_now Ziel_L Ziel_a Ziel_b linear_finden /now_c exch def /now_b exch def /now_a exch def dup %rückgabe delta-e doppeln now_delta_e lt { /now_delta_e exch def /Bs0 B_now 1 sub nB 1 sub div 255 mul round 255 div def /Bs1 B_now nB 1 sub div 255 mul round 255 div def /B_fin Bs0 1 now_c sub mul Bs1 now_c mul add def /Gs0 G_now 1 sub nG 1 sub div 255 mul round 255 div def /Gs1 G_now nG 1 sub div 255 mul round 255 div def /G_fin Gs0 1 now_b sub mul Gs1 now_b mul add def /Rs0 R_now 1 sub nR 1 sub div 255 mul round 255 div def /Rs1 R_now nR 1 sub div 255 mul round 255 div def /R_fin Rs0 1 now_a sub mul Rs1 now_a mul add def } { pop } ifelse } if } for } for } for /R*fin R_fin def %new /G*fin G_fin def %new /B*fin B_fin def %new R_fin G_fin B_fin } bind def %END Procedure Lab2RGBinterpolation %**************************************************************************** /xyY 4320 array def /RGB0 3240 array def /XYZ*system { %BEG procedure XYZ*system 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 xyY j40 xyY0 j00 get put xyY j41 xyY0 j04 get put xyY j42 xyY0 j05 get put xyY j43 xyY0 j06 get put } for 0 1 1079 {/xchartl exch def /j00 xchartl 7 mul 0 add def /j01 j00 1 add def /j02 j00 2 add def /j03 j00 3 add def /j30 xchartl 3 mul 0 add def /j31 xchartl 3 mul 1 add def /j32 xchartl 3 mul 2 add def RGB0 j30 xyY0 j01 get put RGB0 j31 xyY0 j02 get put RGB0 j32 xyY0 j03 get put } for /XYZrx089 3240 array def %1080*3=3240 /XYZrx100 3240 array def /jend 1073 4 mul 3 add def %White-Measurement /fakt 100 xyY jend get div def /IM0 1080 def /IM1 IM0 1 sub def /IM3 IM0 3 mul 1 sub def /IM4 IM0 4 mul 1 sub def 0 1 IM1 {/i exch def %i=0,IM1 /i30 i 3 mul def /i31 i30 1 add def /i32 i30 2 add def /j30 i 4 mul 1 add def /j31 j30 1 add def /j32 j30 2 add def /SUM xyY j32 get xyY j31 get div def XYZrx100 i30 xyY j30 get SUM mul fakt mul put XYZrx100 i31 xyY j32 get fakt mul put XYZrx100 i32 1 xyY j30 get sub xyY j31 get sub SUM mul fakt mul put } for %i=0,IM1 0 1 IM3 {/i exch def %i=0,IM3 XYZrx089 i XYZrx100 i get 0.8859 mul put } for %i=0,IM3 /iN 1072 3 mul def /iW 1073 3 mul def /XLN100 XYZrx100 iN get def /YLN100 XYZrx100 iN 1 add get def /ZLN100 XYZrx100 iN 2 add get def /XLW100 XYZrx100 iW get def /YLW100 XYZrx100 iW 1 add get def /ZLW100 XYZrx100 iW 2 add get def /XLN089 XYZrx089 iN get def /YLN089 XYZrx089 iN 1 add get def /ZLN089 XYZrx089 iN 2 add get def /XLW089 XYZrx089 iW get def /YLW089 XYZrx089 iW 1 add get def /ZLW089 XYZrx089 iW 2 add get def % achromatic (D65) colours /XLWD65100 95.04 def /YLWD65100 100.00 def /ZLWD65100 108.88 def /XLWD65089 95.04 0.8859 mul def /YLWD65089 100.00 0.8859 mul def /ZLWD65089 108.88 0.8859 mul def /XLN001 XLWD65100 100 div def /YLN001 YLWD65100 100 div def /ZLN001 ZLWD65100 100 div def /LABN [(O (R)) (Y) (L (G)) (C) (V (B)) (M) (O (R)) (N) (W) (N0) (W1)] def } bind def %END procedure XYZ*system /XD65W 95.04 def /YD65W 100.00 def /ZD65W 108.88 def /XD50W 96.42 def /YD50W 100.00 def /ZD50W 82.51 def /DAKTE [(D65) (D50)] def %Save 8 standard colours /COL*01 08 array def /COL*01 [(%O1 0) (%Y1 1) (%L1 2) (%C1 3) (%V1 4) (%M1 5) (%N1 6) (%W1 7) ] def /COL*02 08 array def /COL*02 [(%O2 0) (%Y2 1) (%L2 2) (%C2 3) (%V2 4) (%M2 5) (%N2 6) (%W2 7) ] def /COL*03 08 array def /COL*03 [(%O3 0) (%Y3 1) (%L3 2) (%C3 3) (%V3 4) (%M3 5) (%N3 6) (%W3 7) ] def /COL*04 08 array def /COL*04 [(%O4 0) (%Y4 1) (%L4 2) (%C4 3) (%V4 4) (%M4 5) (%N4 6) (%W4 7) ] def /COL*05 08 array def /COL*05 [(%O5 0) (%Y5 1) (%L5 2) (%C5 3) (%V5 4) (%M5 5) (%N5 6) (%W5 7) ] def /COL*06 08 array def /COL*06 [(%O6 0) (%Y6 1) (%L6 2) (%C6 3) (%V6 4) (%M6 5) (%N6 6) (%W6 7) ] def /COL*07 08 array def /COL*07 [(%O7 0) (%Y7 1) (%L7 2) (%C7 3) (%V7 4) (%M7 5) (%N7 6) (%W7 7) ] def /LAB*01 24 array def /LAB*02 24 array def /LAB*03 24 array def /LAB*04 24 array def /LAB*05 24 array def /LAB*06 24 array def /LAB*07 24 array def /LAB*a01 24 array def /LAB*a02 24 array def /LAB*a03 24 array def /LAB*a04 24 array def /LAB*a05 24 array def /LAB*a06 24 array def /LAB*a07 24 array 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 /cvishowr {0.5 add cvi 6 string cvs 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 /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 /cvi1000 {1000 mul cvi /xi exch def xi 0 ge xi 9 le {(000) show} if xi 10 ge xi 99 le and {(00) show} if xi 100 ge xi 999 le and {(0) show} if xi cvishow } bind def /cvisp3 {/xi exch cvi def xi 0 ge xi 9 le {(000) show} if xi 10 ge xi 99 le and {(00) show} if xi 100 ge xi 999 le and {(0) show} if xi cvishow } bind def /cvisp2 {/xi exch cvi def xi 0 ge xi 9 le {(00) show} if xi 10 ge xi 99 le and {(0) show} if xi cvishow } bind def /rec %x, y width heigth {/heigth exch def /width exch def moveto width 0 rlineto 0 heigth rlineto width neg 0 rlineto closepath } bind def /colrecfi %x y width heigth c m y k {setcmykcolor rec fill} bind def /colrecst %x y width heigth c m y k {setcmykcolor rec stroke} 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 /xchartx xchartg def} {/xchartx 0 def} ifelse /xcolorg where {pop /xcolorx xchartg def} {/xcolorx 0 def} ifelse /colormg where {pop /colorm colormg def} {/colorm 0 def} ifelse %3240=1080*3 /LAB*rc089 3240 array def /XYZrc089 3240 array def /LAB*ra089 3240 array def /XYZra089 3240 array def /LAB*la089 3240 array def /XYZla089 3240 array def /LAB*lc089 3240 array def /XYZlc089 3240 array def /XYZ_Xj 1080 array def /XYZ_Yj 1080 array def /XYZ_Zj 1080 array def /LAB*Lj 1080 array def /LAB*aj 1080 array def /LAB*bj 1080 array def /LAB*Lja 1080 array def /LAB*aja 1080 array def /LAB*bja 1080 array def /ymax 16600 def /ydel 203 def /cvishow {0.5 add cvi 6 string cvs show} def /cvsshow1 {0.05 add 10 mul cvi 0.1 mul 7 string cvs show} def /cvsshow2 {0.005 add 100 mul cvi 0.01 mul 7 string cvs show} def /cvsshow3 {0.0005 add 1000 mul cvi 0.001 mul 7 string cvs show} def /RJGBLAB* 12 array def /RJGBLAB*[ 39.92 58.74 27.99 % R CIE No.09 elementary colours in LAB, D65 81.26 -2.89 71.56 % J CIE No.10 52.23 -42.42 13.60 % G CIE No.11 30.57 1.41 -46.47 % B CIE No.12 ] def /RGBhab08 8 array def RGBhab08 0 RJGBLAB* 02 get RJGBLAB* 01 get atan put %026 RGBhab08 1 RJGBLAB* 05 get RJGBLAB* 04 get atan put %092 RGBhab08 2 RJGBLAB* 08 get RJGBLAB* 07 get atan put %162 RGBhab08 4 RJGBLAB* 11 get RJGBLAB* 10 get atan put %272 RGBhab08 3 RGBhab08 2 get RGBhab08 4 get add 0.5 mul put %217 RGBhab08 5 RGBhab08 4 get RGBhab08 0 get 360 add add 0.5 mul put %329 RGBhab08 6 RGBhab08 0 get 360 add put %386 RGBhab08 7 RGBhab08 1 get 360 add put %452 /RGBhab08d 8 array def 0 1 6 {/j exch def %j=0,6 RGBhab08d j RGBhab08 j 1 add get RGBhab08 j get sub put } for /xs 1000 def /ys xs def /d2 xs 2 div def /d8 xs 8 div def /xs5x xs 5.4 mul def /ys5x ys 5.4 mul def XYZ*system /Lrefl 11 array def /Lrefl [(0%) (0%) (0%) (0%) (0,6%) (1,2%) (2,5%) (5%) (10%) (20%) (40%)] def /u*dtx [(o) (y) (l) (c) (v) (m) (o)] def /u*etx [(r) (j) (g) () (b) () (r)] def /LAB*na089 3240 array def /XYZna089 3240 array def /IN 27 array def /IN [0000 0001 0002 0003 0004 0005 0006 0007 0008 0243 0244 0245 0246 0247 0248 0249 0250 0251 0486 0487 0488 0489 0490 0491 0492 0493 0494] def /LUTL*64a 64 array def /LUTA*64a 64 array def /LUTB*64a 64 array def /LUTC*64a 64 array def /LUTH*64a 64 array def /holv*64a 64 array def /OLVhab64 64 array def /RGBhab64 64 array def /indton64 64 array def /LNWton09 09 array def /L*ton 9 array def /RJGB16 16 array def /RJGB16 [(r00j=R) (r25j) (r50j) (r75j) (j00g=J) (j25g) (j50g) (j75g) (g00b=G) (g25b) (g50b) (g75b) (b00r=B) (b25r) (b50r) (b75r)] def /L05 5 array def /L05 [(n000w=N) (n025w) (n050w) (n075w) (n100w=W)] def /RGB*16 16 array def /RGB*16 [(1.00 0.00 0.00) (1.00 0.25 0.00) (1.00 0.50 0.00) (1.00 0.75 0.00) (1.00 1.00 0.00) (0.75 1.00 0.00) (0.50 1.00 0.00) (0.25 1.00 0.00) (0.00 1.00 0.00) (0.00 1.00 0.50) (0.00 1.00 1.00) (0.00 0.50 1.00) (0.00 0.00 1.00) (0.50 0.00 1.00) (1.00 0.00 1.00) (1.00 0.00 0.50) ] def /RGBNM*16 16 array def /RGBNW*16 [(1.00 0.00 0.00) (0.50 0.00 0.00) (1.00 0.50 0.50) () (1.00 1.00 0.00) (0.50 0.50 0.00) (1.00 1.00 0.50) () (0.00 1.00 0.00) (0.00 0.50 0.00) (0.50 1.00 0.50) () (0.00 0.00 1.00) (0.00 0.00 0.50) (0.50 0.50 1.00) ()] def /RGB*005 05 array def /RGB*005 [(0.00 0.00 0.00) (0.25 0.25 0.25) (0.50 0.50 0.50) (0.75 0.75 0.75) (1.00 1.00 1.00)] def /RGB*009 09 array def /RGB*009 [(0.000 0.000 0.000) (0.125 0.125 0.125) (0.250 0.250 0.250) (0.375 0.375 0.375) (0.500 0.500 0.500) (0.625 0.625 0.625) (0.750 0.750 0.750) (0.875 0.875 0.875) (1.000 1.000 1.000)] def /OLV64 64 array def /OLV64 [(o00y=O) (o12y) (o25y) (o37y) (o50y) (o62y) (o75y) (o87y) (y00l=Y) (y12l) (y25l) (y37l) (y50l) (y62l) (y75l) (y87l) (l00c=L) (l12c) (l25c) (l37c) (l50c) (l62c) (l75c) (l87c) (c00v=C) (c12v) (c25v) (c37v) (c50v) (c62v) (c75v) (c87v) (v00m=V) (v12m) (v25m) (v37m) (v50m) (v62m) (v75m) (v87m) (m00o=M) (m12o) (m25o) (m37o) (m50o) (m62o) (m75o) (m87o) %repeat for range >360 degree (o00y=O) (o12y) (o25y) (o37y) (o50y) (o62y) (o75y) (o87y) (y00l=Y) (y12l) (y25l) (y37l) (y50l) (y62l) (y75l) (y87l) ] def /RGB64 64 array def /RGB64[(r00j=R) (r12j) (r25j) (r37j) (r50j) (r62j) (r75j) (r87j) (j00g=J) (j12g) (j25g) (j37g) (j50g) (j62g) (j75g) (j87g) (g00c'=G) (g12c') (g25c') (g37c') (g50c') (g62c') (g75c') (g87c') (c'00b=C') (c'12b) (c'25b) (c'37b) (c'50b) (c'62b) (c'75b) (c'87b) (b00m'=B) (b12m') (b25m') (b37m') (b50m') (b62m') (b75m') (b87m') (m'00r=M') (m'12r) (m'25r) (m'37r) (m'50r) (m'62r) (m'75r) (m'87r) %repeat for range >360 degree (r00j=R) (r12j) (r25j) (r37j) (r50j) (r62j) (r75j) (r87j) (j00g=J) (j12g) (j25g) (j37g) (j50g) (j62g) (j75g) (j87g) ] def /RGBOLV*64tx 64 array def /RGBOLV*64tx [(1.000 0.000 0.000) (1.000 0.125 0.000) (1.000 0.250 0.000) (1.000 0.375 0.000) %O-Y (1.000 0.500 0.000) (1.000 0.625 0.000) (1.000 0.750 0.000) (1.000 0.875 0.000) (1.000 1.000 0.000) (0.875 1.000 0.000) (0.750 1.000 0.000) (0.625 1.000 0.000) %Y-L (0.500 1.000 0.000) (0.375 1.000 0.000) (0.250 1.000 0.000) (0.125 1.000 0.000) (0.000 1.000 0.000) (0.000 1.000 0.125) (0.000 1.000 0.250) (0.000 1.000 0.375) %L-C (0.000 1.000 0.500) (0.000 1.000 0.625) (0.000 1.000 0.750) (0.000 1.000 0.875) (0.000 1.000 1.000) (0.000 0.875 1.000) (0.000 0.750 1.000) (0.000 0.625 1.000) %C-V (0.000 0.500 1.000) (0.000 0.375 1.000) (0.000 0.250 1.000) (0.000 0.125 1.000) (0.000 0.000 1.000) (0.125 0.000 1.000) (0.250 0.000 1.000) (0.375 0.000 1.000) %V-M (0.500 0.000 1.000) (0.625 0.000 1.000) (0.750 0.000 1.000) (0.875 0.000 1.000) (1.000 0.000 1.000) (1.000 0.000 0.875) (1.000 0.000 0.750) (1.000 0.000 0.625) %M-O (1.000 0.000 0.500) (1.000 0.000 0.375) (1.000 0.000 0.250) (1.000 0.000 0.125) %repeat for range >360 degree (1.000 0.000 0.000) (1.000 0.125 0.000) (1.000 0.250 0.000) (1.000 0.375 0.000) %O-Y (1.000 0.500 0.000) (1.000 0.625 0.000) (1.000 0.750 0.000) (1.000 0.875 0.000) (1.000 1.000 0.000) (0.875 1.000 0.000) (0.750 1.000 0.000) (0.625 1.000 0.000) %Y-L (0.500 1.000 0.000) (0.375 1.000 0.000) (0.250 1.000 0.000) (0.125 1.000 0.000) ] def /RGBOLV*192 192 array def /RGBOLV*192 [1.000 0.000 0.000 1.000 0.125 0.000 1.000 0.250 0.000 1.000 0.375 0.000 %O-Y 1.000 0.500 0.000 1.000 0.625 0.000 1.000 0.750 0.000 1.000 0.875 0.000 1.000 1.000 0.000 0.875 1.000 0.000 0.750 1.000 0.000 0.625 1.000 0.000 %Y-L 0.500 1.000 0.000 0.375 1.000 0.000 0.250 1.000 0.000 0.125 1.000 0.000 0.000 1.000 0.000 0.000 1.000 0.125 0.000 1.000 0.250 0.000 1.000 0.375 %L-C 0.000 1.000 0.500 0.000 1.000 0.625 0.000 1.000 0.750 0.000 1.000 0.875 0.000 1.000 1.000 0.000 0.875 1.000 0.000 0.750 1.000 0.000 0.625 1.000 %C-V 0.000 0.500 1.000 0.000 0.375 1.000 0.000 0.250 1.000 0.000 0.125 1.000 0.000 0.000 1.000 0.125 0.000 1.000 0.250 0.000 1.000 0.375 0.000 1.000 %V-M 0.500 0.000 1.000 0.625 0.000 1.000 0.750 0.000 1.000 0.875 0.000 1.000 1.000 0.000 1.000 1.000 0.000 0.875 1.000 0.000 0.750 1.000 0.000 0.625 %M-O 1.000 0.000 0.500 1.000 0.000 0.375 1.000 0.000 0.250 1.000 0.000 0.125 %repeat for range >360 degree 1.000 0.000 0.000 1.000 0.125 0.000 1.000 0.250 0.000 1.000 0.375 0.000 %O-Y 1.000 0.500 0.000 1.000 0.625 0.000 1.000 0.750 0.000 1.000 0.875 0.000 1.000 1.000 0.000 0.875 1.000 0.000 0.750 1.000 0.000 0.625 1.000 0.000 %Y-L 0.500 1.000 0.000 0.375 1.000 0.000 0.250 1.000 0.000 0.125 1.000 0.000 ] def /RGBOLV*640 64 array def /RGBOLV*641 64 array def /RGBOLV*642 64 array def 0 1 63 {/j exch def %j=0,63 RGBOLV*640 j RGBOLV*192 j 3 mul get put RGBOLV*641 j RGBOLV*192 j 3 mul 1 add get put RGBOLV*642 j RGBOLV*192 j 3 mul 2 add get put } for %j=0,63 /RGBOLVL 0 def %Interpretation rgb->rgb* (0,2) or rgb->olv* (1,3) /LABOLVL 0 def %Output LAB* (0) or OLV*/RGB* (1) /REFLECL 0 def %00 1 00 {/REFLECL exch def %beg REFLECL=0,0 /xcharti 3 def %03 3 6 {/xcharti exch def %beg xcharti=3,10 xcharti 2 le {/il 0 def} {/il xcharti 3 sub def} ifelse %Reference black and factors /YrN 2.52 def /ilf [0.00 0.25 0.50 1.00 2.00 4.00 8.00 16.00] 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 1079 def 0 1 IM1 {/i exch def %i=0,IM1 /i30 i 3 mul def /i31 i 3 mul 1 add def /i32 i 3 mul 2 add def XYZrc089 i30 XYZrx089 i30 get put XYZrc089 i31 XYZrx089 i31 get put XYZrc089 i32 XYZrx089 i32 get put /XQ XYZrc089 i30 get XLWD65100 div def /YQ XYZrc089 i31 get YLWD65100 div def /ZQ XYZrc089 i32 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 LAB*rc089 i30 YQ 0.008856 lt {903.3 YQ mul} {YQ 0.33333333 exp 116 mul 16 sub} ifelse put LAB*rc089 i31 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 LAB*rc089 i32 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 /jN 1072 3 mul def /L*N LAB*rc089 jN get def /A*N LAB*rc089 jN 1 add get def /B*N LAB*rc089 jN 2 add get def /jW 1073 3 mul def /L*W LAB*rc089 jW get def /A*W LAB*rc089 jW 1 add get def /B*W LAB*rc089 jW 2 add get def 0 1 IM1 {/i exch def %i=0,IM1 /i30 i 3 mul def /i31 i 3 mul 1 add def /i32 i 3 mul 2 add def LAB*ra089 i30 LAB*rc089 i30 get put /l*CIE LAB*rc089 i30 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 LAB*ra089 i31 LAB*rc089 i31 get A*N sub a*s sub put LAB*ra089 i32 LAB*rc089 i32 get B*N sub b*s sub put } for %i=0,IM1 0 1 IM1 {/i exch def %i=0,IM1 /i30 i 3 mul def /i31 i 3 mul 1 add def /i32 i 3 mul 2 add def /X* {LAB*ra089 i30 get 16 add 116 div LAB*ra089 i31 get 500 div add} bind def /Y* {LAB*ra089 i30 get 16 add 116 div} bind def /Z* {LAB*ra089 i30 get 16 add 116 div LAB*ra089 i32 get 200 div sub} bind def XYZra089 i30 X* DecodeXYZ* XLWD65100 mul put XYZra089 i31 Y* DecodeXYZ* YLWD65100 mul put XYZra089 i32 Z* DecodeXYZ* ZLWD65100 mul put } for %i=0,IM1 xcharti 2 ge {%xcharti>=2 /jW 1073 3 mul def %for white X data /Xwref089 XYZra089 jW get def /Ywref089 XYZra089 jW 1 add get def /Zwref089 XYZra089 jW 2 add get def /jN 1072 3 mul 1 add def %for black X data /YrN XYZra089 jN 1 add get def /Xnref089 YrN XLN001 mul def /Ynref089 YrN def /Znref089 YrN ZLN001 mul def 0 1 IM1 {/i exch def /i30 i 3 mul def /i31 i 3 mul 1 add def /i32 i 3 mul 2 add def XYZna089 i30 XYZra089 i30 get Xnref089 sub Xwref089 Xwref089 Xnref089 sub div mul put XYZna089 i31 XYZra089 i31 get Ynref089 sub Ywref089 Ywref089 Ynref089 sub div mul put XYZna089 i32 XYZra089 i32 get Znref089 sub Zwref089 Zwref089 Znref089 sub div mul put } for %i=I1,I2 0 1 IM1 {/i exch def /i30 i 3 mul def /i31 i 3 mul 1 add def /i32 i 3 mul 2 add def /XQ XYZna089 i30 get XLWD65100 div def /YQ XYZna089 i31 get YLWD65100 div def /ZQ XYZna089 i32 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 LAB*na089 i30 YQ 0.008856 lt {903.3 YQ mul} {YQ 0.33333333 exp 116 mul 16 sub} ifelse put LAB*na089 i31 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 LAB*na089 i32 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=I1,I2 } if %xchart>=2 xcharti 3 ge {%xchart>=3 /jW 1073 3 mul def %for white X data %/jW 57 3 mul def %W /Xwref089 XYZra089 jW get def /Ywref089 XYZra089 jW 1 add get def /Zwref089 XYZra089 jW 2 add get def /kn Ywref089 Ywref089 Ytref089 sub div def 0 1 IM1 {/i exch def /i30 i 3 mul def /i31 i 3 mul 1 add def /i32 i 3 mul 2 add def XYZla089 i30 XYZna089 i30 get kn div Xtref089 add put XYZla089 i31 XYZna089 i31 get kn div Ytref089 add put XYZla089 i32 XYZna089 i32 get kn div Ztref089 add put } for %i=I1,I2 0 1 IM1 {/i exch def /i30 i 3 mul def /i31 i 3 mul 1 add def /i32 i 3 mul 2 add def /XQ XYZla089 i30 get XLWD65100 div def /YQ XYZla089 i31 get YLWD65100 div def /ZQ XYZla089 i32 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 LAB*la089 i30 YQ 0.008856 lt {903.3 YQ mul} {YQ 0.33333333 exp 116 mul 16 sub} ifelse put LAB*la089 i31 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 LAB*la089 i32 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=I1,I2 } if %xchart>=3 xcharti 0 eq {%xcharti=0 (1x) 0 1 IM1 {/i exch def %i=0,IM1 /i30 i 3 mul def /i31 i30 1 add def /i32 i30 2 add def % 10100 ymax i i 80 idiv 80 mul sub ydel mul sub moveto LAB*Lj i LAB*rc089 i30 get put LAB*aj i LAB*rc089 i31 get put LAB*bj i LAB*rc089 i32 get put XYZ_Xj i XYZrc089 i30 get put XYZ_Yj i XYZrc089 i31 get put XYZ_Zj i XYZrc089 i32 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 /i30 i 3 mul def /i31 i30 1 add def /i32 i30 2 add def % 10100 ymax i i 80 idiv 80 mul sub ydel mul sub moveto LAB*Lj i LAB*ra089 i30 get put LAB*aj i LAB*ra089 i31 get put LAB*bj i LAB*ra089 i32 get put XYZ_Xj i XYZra089 i30 get put XYZ_Yj i XYZra089 i31 get put XYZ_Zj i XYZra089 i32 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 /i30 i 3 mul def /i31 i30 1 add def /i32 i30 2 add def % 10100 ymax i i 80 idiv 80 mul sub ydel mul sub moveto LAB*Lj i LAB*na089 i30 get put LAB*aj i LAB*na089 i31 get put LAB*bj i LAB*na089 i32 get put XYZ_Xj i XYZna089 i30 get put XYZ_Yj i XYZna089 i31 get put XYZ_Zj i XYZna089 i32 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 IM1 {/i exch def %i=0,IM1 /i30 i 3 mul def /i31 i30 1 add def /i32 i30 2 add def % 10100 ymax i i 80 idiv 80 mul sub ydel mul sub moveto LAB*Lj i LAB*la089 i30 get put LAB*aj i LAB*la089 i31 get put LAB*bj i LAB*la089 i32 get put XYZ_Xj i XYZla089 i30 get put XYZ_Yj i XYZla089 i31 get put XYZ_Zj i XYZla089 i32 get put } for %i=0,IM1 } if %xcharti=3,4,5,6,7,8,9,10 (8x) 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 0 1 728 {/j exch def %j=1,728 %necessary in both cases j 072 eq {%072 0-8-0 L 2 LAB*01 06 LAB*Lj j get put LAB*01 07 LAB*aj j get put LAB*01 08 LAB*bj j get put} if j 080 eq {%080 0-8-8 C 3 LAB*01 09 LAB*Lj j get put LAB*01 10 LAB*aj j get put LAB*01 11 LAB*bj j get put} if j 008 eq {%008 0-0-8 V 4 LAB*01 12 LAB*Lj j get put LAB*01 13 LAB*aj j get put LAB*01 14 LAB*bj j get put} if j 000 eq {%000 0-0-0 N 6 LAB*01 18 LAB*Lj j get put LAB*01 19 LAB*aj j get put LAB*01 20 LAB*bj j get put} if j 648 eq {%648 8-0-0 O 0 LAB*01 00 LAB*Lj j get put LAB*01 01 LAB*aj j get put LAB*01 02 LAB*bj j get put} if j 720 eq {%720 8-8-0 Y 1 LAB*01 03 LAB*Lj j get put LAB*01 04 LAB*aj j get put LAB*01 05 LAB*bj j get put} if j 656 eq {%656 8-0-8 M 5 LAB*01 15 LAB*Lj j get put LAB*01 16 LAB*aj j get put LAB*01 17 LAB*bj j get put} if j 728 eq {%728 8-8-8 W 7 LAB*01 21 LAB*Lj j get put LAB*01 22 LAB*aj j get put LAB*01 23 LAB*bj j get put} if } for %j=0,728 729 1 971 {/j exch def %j=729,971 %necessary in both cases j 963 eq {%963 0-8-0 L 2 LAB*02 06 LAB*Lj j get put LAB*02 07 LAB*aj j get put LAB*02 08 LAB*bj j get put} if j 737 eq {%737 0-8-8 C 3 LAB*02 09 LAB*Lj j get put LAB*02 10 LAB*aj j get put LAB*02 11 LAB*bj j get put} if j 818 eq {%818 0-0-8 V 4 LAB*02 12 LAB*Lj j get put LAB*02 13 LAB*aj j get put LAB*02 14 LAB*bj j get put} if j 809 eq {%809 or 890 or 971 0-0-0 N 6 LAB*02 18 LAB*Lj j get LAB*Lj 890 get add LAB*Lj 971 get add 3 div put LAB*02 19 LAB*aj j get LAB*aj 890 get add LAB*aj 971 get add 3 div put LAB*02 20 LAB*bj j get LAB*bj 890 get add LAB*bj 971 get add 3 div put} if j 801 eq {%801 8-0-0 O 0 LAB*02 00 LAB*Lj j get put LAB*02 01 LAB*aj j get put LAB*02 02 LAB*bj j get put} if j 882 eq {%882 8-8-0 Y 1 LAB*02 03 LAB*Lj j get put LAB*02 04 LAB*aj j get put LAB*02 05 LAB*bj j get put} if j 899 eq {%899 8-0-8 M 5 LAB*02 15 LAB*Lj j get put LAB*02 16 LAB*aj j get put LAB*02 17 LAB*bj j get put} if j 729 eq {%729 or 810 or 891 8-8-8 W 7 LAB*02 21 LAB*Lj j get LAB*Lj 810 get add LAB*Lj 891 get add 3 div put LAB*02 22 LAB*aj j get LAB*aj 810 get add LAB*aj 891 get add 3 div put LAB*02 23 LAB*bj j get LAB*bj 810 get add LAB*bj 891 get add 3 div put} if } for %j=j=729,971 972 1 1079 {/j exch def %j=972,1079 %only last colours 1072 to 1079 j 1078 eq {%1078 0-8-0 L 2 LAB*03 06 LAB*Lj j get put LAB*03 07 LAB*aj j get put LAB*03 08 LAB*bj j get put} if j 1075 eq {%1075 0-8-8 C 3 LAB*03 09 LAB*Lj j get put LAB*03 10 LAB*aj j get put LAB*03 11 LAB*bj j get put} if j 1077 eq {%1077 0-0-8 V 4 LAB*03 12 LAB*Lj j get put LAB*03 13 LAB*aj j get put LAB*03 14 LAB*bj j get put} if j 1072 eq {%1072 0-0-0 N 6 LAB*03 18 LAB*Lj j get put LAB*03 19 LAB*aj j get put LAB*03 20 LAB*bj j get put} if j 1074 eq {%1074 8-0-0 O 0 LAB*03 00 LAB*Lj j get put LAB*03 01 LAB*aj j get put LAB*03 02 LAB*bj j get put} if j 1076 eq {%1076 8-8-0 Y 1 LAB*03 03 LAB*Lj j get put LAB*03 04 LAB*aj j get put LAB*03 05 LAB*bj j get put} if j 1079 eq {%1079 8-0-8 M 5 LAB*03 15 LAB*Lj j get put LAB*03 16 LAB*aj j get put LAB*03 17 LAB*bj j get put} if j 1073 eq {%1073 8-8-8 W 7 LAB*03 21 LAB*Lj j get put LAB*03 22 LAB*aj j get put LAB*03 23 LAB*bj j get put} if } for %j=j=972,1079 972 1 1079 {/j exch def %09 step N,W: j=0972,0980; 0981,0989; 0990,0998; % 0999,1007 %16 step N,W: j=1008,1023; 1024,1039; 1040,1055; % 1056,1071 %necessary for four 09-step grey scales j 0972 eq {%0972 or 1008 0-0-0 N 6 LAB*04 18 LAB*Lj j get put LAB*04 19 LAB*aj j get put LAB*04 20 LAB*bj j get put} if j 0980 eq {%0980 or 1023 8-8-8 W 7 LAB*04 21 LAB*Lj j get put LAB*04 22 LAB*aj j get put LAB*04 23 LAB*bj j get put} if j 0981 eq {%0981 or 1024 0-0-0 N 6 LAB*05 18 LAB*Lj j get put LAB*05 19 LAB*aj j get put LAB*05 20 LAB*bj j get put} if j 0989 eq {%0989 or 1039 8-8-8 W 7 LAB*05 21 LAB*Lj j get put LAB*05 22 LAB*aj j get put LAB*05 23 LAB*bj j get put} if j 0990 eq {%0990 or 1040 0-0-0 N 6 LAB*06 18 LAB*Lj j get put LAB*06 19 LAB*aj j get put LAB*06 20 LAB*bj j get put} if j 0998 eq {%0998 or 1055 8-8-8 W 7 LAB*06 21 LAB*Lj j get put LAB*06 22 LAB*aj j get put LAB*06 23 LAB*bj j get put} if j 0999 eq {%0999 or 1056 0-0-0 N 6 LAB*07 18 LAB*Lj j get put LAB*07 19 LAB*aj j get put LAB*07 20 LAB*bj j get put} if j 1007 eq {%1007 or 1071 8-8-8 W 7 LAB*07 21 LAB*Lj j get put LAB*07 22 LAB*aj j get put LAB*07 23 LAB*bj j get put} if } for %j=972,1079 %Adaptation /L*Nio LAB*07 18 get def /A*Nio LAB*07 19 get def /B*Nio LAB*07 20 get def /L*Wio LAB*07 21 get def /A*Wio LAB*07 22 get def /B*Wio LAB*07 23 get def /A*Dio A*Wio A*Nio sub def /B*Dio B*Wio B*Nio sub def 0 1 1079 {/j exch def %j=0,1079 LAB*Lja j LAB*Lj j get put /l*CIE LAB*Lj 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 LAB*aja j LAB*aj j get A*Nio sub a*s sub put LAB*bja j LAB*bj j get B*Nio sub b*s sub put } for %j=0,1079 /lut 2187 array def %729x3=2187 0 3 2186 {/j exch def %j=0,2186 /j3 j 3 idiv def lut j LAB*Lja j3 get put lut j 1 add LAB*aja j3 get put lut j 2 add LAB*bja j3 get put } for %j=0,2186 %*********************************************************************************** xcharti 2 le {/jN 1072 3 mul def /YNil XYZrx089 jN 1 add get def /L*Nil LAB*rc089 jN get def} if /RJGB0 RJGBLAB* 02 get RJGBLAB* 01 get atan def %026 /RJGB1 RJGBLAB* 05 get RJGBLAB* 04 get atan def %092 /RJGB2 RJGBLAB* 08 get RJGBLAB* 07 get atan def %162 /RJGB3 RJGBLAB* 11 get RJGBLAB* 10 get atan def %272 /CeGB RJGB2 RJGB3 add 0.5 mul def /MeBR RJGB3 RJGB0 360 add add 0.5 mul def 0 1 47 {/j exch def %i=0,47 elementary and intemediate hue angles /j0 j j 8 idiv 8 mul sub def %0,1,2,3,4,5,6,7 /b0 j0 0.125 mul def /a0 1 b0 sub def j 00 ge j 07 le and {RGBhab64 j a0 RJGB0 mul b0 RJGB1 mul add put} if j 08 ge j 15 le and {RGBhab64 j a0 RJGB1 mul b0 RJGB2 mul add put} if j 16 ge j 23 le and {RGBhab64 j a0 RJGB2 mul b0 CeGB mul add put} if j 24 ge j 31 le and {RGBhab64 j a0 CeGB mul b0 RJGB3 mul add put} if j 32 ge j 39 le and {RGBhab64 j a0 RJGB3 mul b0 MeBR mul add put} if j 40 ge j 47 le and {RGBhab64 j a0 MeBR mul b0 RJGB0 360 add mul add dup 360 ge {360 sub} if put} if } for %j=0,47 elementary and intemediate hue angles 0 1 15 {/j exch def %j=0,15 %for interpolation 0 rgb* (0,2) /LAB*hMaP LAB*hMa def LAB*hMa OLVhab64 0 get lt {/LAB*hMaP LAB*hMa 360 add def} if /joj -1 def 0 1 62 {/jj exch def %jj=1,62 /habton0 OLVhab64 jj get def /habton1 OLVhab64 jj 1 add get def LAB*hMaP habton0 ge LAB*hMaP habton1 lt and {/joj jj def exit } if } for %jj=0,62 joj -1 eq {%output in case of data failure -100 -100 rmoveto (STOPjoj=-1) show (, ) show jj cvishow (, ) show LAB*hMaP cvsshow1 (, ) show OLVhab64 jj get cvsshow1 (, ) show OLVhab64 jj 1 add get cvsshow1 } if % } if %RGBOLVL=0 /A2 LAB*hMaP habton0 sub habton1 habton0 sub div def /A1 1 A2 sub def /jxj joj def %RGBOLVL 0 eq RGBOLVL 2 eq or {joj} {jrj} ifelse def /LAB*L*Ma LUTL*64a jxj get A1 mul LUTL*64a jxj 1 add get A2 mul add def /LAB*C*Ma LUTC*64a jxj get A1 mul LUTC*64a jxj 1 add get A2 mul add def /LAB*H*Ma LUTH*64a jxj get A1 mul LUTH*64a jxj 1 add get A2 mul add def /LAB*a*Ma LAB*C*Ma LAB*H*Ma cos mul def /LAB*b*Ma LAB*C*Ma LAB*H*Ma sin mul def /o3*Ma RGBOLV*640 jxj get A1 mul RGBOLV*640 jxj 1 add get A2 mul add def /l3*Ma RGBOLV*641 jxj get A1 mul RGBOLV*641 jxj 1 add get A2 mul add def /v3*Ma RGBOLV*642 jxj get A1 mul RGBOLV*642 jxj 1 add get A2 mul add def /LAB*L*M LAB*L*Ma def /l*CIE LAB*L*Ma L*Nio sub L*Wio L*Nio sub div def %relative lightness /LAB*Cja LAB*aja xchartl get dup mul LAB*bja xchartl get dup mul add 0.0001 add sqrt def /LAB*hja LAB*bja xchartl get LAB*aja xchartl get 0.0001 add atan def /LAB*a*Mae LAB*C*Ma LAB*hMa cos mul def /LAB*b*Mae LAB*C*Ma LAB*hMa sin mul def %relative chroma c*3, blackness n*3, brilliance i*3 /minFa o3*Fa def l3*Fa minFa lt {/minFa l3*Fa def} if v3*Fa minFa lt {/minFa v3*Fa def} if /maxFa o3*Fa def l3*Fa maxFa gt {/maxFa l3*Fa def} if v3*Fa maxFa gt {/maxFa v3*Fa def} if /i*3 maxFa def /c*3 maxFa minFa sub def /n*3 1 i*3 sub def %CIE lightness and chroma of colour Fa %See equations (1) to (4) of www.ps.bam.de/D33872-AE.PDF, Page 10 /t*3 i*3 c*3 0.5 mul sub def /l*3 t*3 c*3 LAB*L*Ma L*Nio sub L*Wio L*Nio sub div 0.5 sub mul add def /LAB*L*Fa l*3 L*Wio L*Nio sub mul L*Nio add def /LAB*C*Fa LAB*C*Ma c*3 mul def /LAB*a*Fa LAB*C*Fa LAB*hFa cos mul def /LAB*b*Fa LAB*C*Fa LAB*hFa sin mul def %for output of data for colours Ma and Fa LAB*hMa 360 ge {/LAB*hMa LAB*hMa 360 sub def} if /LAB*hFa LAB*hMa def /LAB*L*Fait LAB*L*Fa def /LAB*a*Fait LAB*a*Fa def /LAB*b*Fait LAB*b*Fa def /LAB*C*Fait LAB*a*Fait dup mul LAB*b*Fait dup mul add 0.0001 add sqrt def /LAB*hFait LAB*b*Fait LAB*a*Fait 0.0001 add atan def LAB*L*Fait LAB*a*Fait LAB*b*Fait %*************************************************** Lab2RGBinterpolation %procedure for 3D interpolation %*************************************************** /v*3Fa3D exch def /l*3Fa3D exch def /o*3Fa3D exch def %produces in addition: %delta_L*, delta_a*, delta_b*, delta_E* %LAB*L*Fa3D, LAB*a*Fa3D, LAB*b*Fa3D, LAB*C*Fa3D, LAB*hFa3D %end 3D interpolation of measured start output data ixx 500 0 mul add iymax ilj idy mul sub moveto LAB*L*Fa3D cvi100 ixx 500 1.5 mul add iymax ilj idy mul sub moveto LAB*a*Fa3D cvi100 ixx 500 3.0 mul add iymax ilj idy mul sub moveto LAB*b*Fa3D cvi100 ixx 500 4.6 mul add iymax ilj idy mul sub moveto (%) show xyY0 j00 get cvisp3 } ifelse %xcharts=0,1 or 2,3 } for %xchartl=xch1,xch2 showpage grestore } for %end xcharts=0,1 %%Trailer