%!PS-Adobe-3.0 EPSF-3.0 LG310-7R.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/LG31/) /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:2010110112000) /ModDate (D:2010110112000) /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 /nrgbxyY 7560 array def %1080x7 to be calculated by XYZ*system /xyY0 7560 array def %1080x7 /FileDat (LG31_LCD projector_1) def /LAB*TE [(LCD_projector_100828_1)] def /xyY0 [ %produced with the settings of the LED-LCD (LECD) monitor; full white used %FILE LMT_1080_100901_1.TXT %no. r g b x y Y. projector ACER XD1150. measurement 1 1 0.00000 0.00000 0.00000 0.3176 0.3419 10.12E+00 2 0.00000 0.00000 0.12549 0.2892 0.2979 10.55E+00 3 0.00000 0.00000 0.25098 0.2309 0.2075 12.35E+00 4 0.00000 0.00000 0.37647 0.1831 0.1340 17.97E+00 5 0.00000 0.00000 0.50196 0.1626 0.1018 3.03E+01 6 0.00000 0.00000 0.62353 0.1538 0.0885 5.27E+01 7 0.00000 0.00000 0.74902 0.1500 0.0824 9.06E+01 8 0.00000 0.00000 0.87451 0.1483 0.0797 1.50E+02 9 0.00000 0.00000 1.00000 0.1474 0.0787 2.19E+02 10 0.00000 0.12549 0.00000 0.3202 0.3738 12.90E+00 11 0.00000 0.12549 0.12549 0.2972 0.3326 13.53E+00 12 0.00000 0.12549 0.25098 0.2408 0.2368 15.33E+00 13 0.00000 0.12549 0.37647 0.1901 0.1514 21.20E+00 14 0.00000 0.12549 0.50196 0.1661 0.1107 3.36E+01 15 0.00000 0.12549 0.62353 0.1558 0.0931 5.60E+01 16 0.00000 0.12549 0.74902 0.1510 0.0849 9.38E+01 17 0.00000 0.12549 0.87451 0.1490 0.0811 1.53E+02 18 0.00000 0.12549 1.00000 0.1478 0.0797 2.22E+02 19 0.00000 0.25098 0.00000 0.3313 0.4514 26.79E+00 20 0.00000 0.25098 0.12549 0.3150 0.4187 27.41E+00 21 0.00000 0.25098 0.25098 0.2699 0.3283 29.75E+00 22 0.00000 0.25098 0.37647 0.2137 0.2142 35.43E+00 23 0.00000 0.25098 0.50196 0.1800 0.1453 4.78E+01 24 0.00000 0.25098 0.62353 0.1634 0.1122 7.03E+01 25 0.00000 0.25098 0.74902 0.1552 0.0956 10.81E+01 26 0.00000 0.25098 0.87451 0.1513 0.0874 1.67E+02 27 0.00000 0.25098 1.00000 0.1494 0.0839 2.36E+02 28 0.00000 0.37647 0.00000 0.3386 0.5156 72.71E+00 29 0.00000 0.37647 0.12549 0.3310 0.4983 73.49E+00 30 0.00000 0.37647 0.25098 0.3049 0.4392 75.87E+00 31 0.00000 0.37647 0.37647 0.2580 0.3324 8.31E+01 32 0.00000 0.37647 0.50196 0.2137 0.2311 9.55E+01 33 0.00000 0.37647 0.62353 0.1851 0.1661 11.80E+01 34 0.00000 0.37647 0.74902 0.1686 0.1286 15.56E+01 35 0.00000 0.37647 0.87451 0.1600 0.1082 2.15E+02 36 0.00000 0.37647 1.00000 0.1553 0.0980 2.84E+02 37 0.00000 0.50196 0.00000 0.3422 0.5419 17.02E+01 38 0.00000 0.50196 0.12549 0.3388 0.5335 17.10E+01 39 0.00000 0.50196 0.25098 0.3254 0.5012 17.31E+01 40 0.00000 0.50196 0.37647 0.2938 0.4264 18.03E+01 41 0.00000 0.50196 0.50196 0.2533 0.3311 19.59E+01 42 0.00000 0.50196 0.62353 0.2172 0.2458 21.89E+01 43 0.00000 0.50196 0.74902 0.1912 0.1841 25.67E+01 44 0.00000 0.50196 0.87451 0.1748 0.1454 3.16E+02 45 0.00000 0.50196 1.00000 0.1666 0.1249 3.84E+02 46 0.00000 0.62353 0.00000 0.3439 0.5529 35.47E+01 47 0.00000 0.62353 0.12549 0.3420 0.5487 35.54E+01 48 0.00000 0.62353 0.25098 0.3350 0.5316 35.77E+01 49 0.00000 0.62353 0.37647 0.3160 0.4863 36.41E+01 50 0.00000 0.62353 0.50196 0.2860 0.4140 38.03E+01 51 0.00000 0.62353 0.62353 0.2524 0.3330 40.84E+01 52 0.00000 0.62353 0.74902 0.2213 0.2583 44.69E+01 53 0.00000 0.62353 0.87451 0.1978 0.2014 5.05E+02 54 0.00000 0.62353 1.00000 0.1843 0.1684 5.74E+02 55 0.00000 0.74902 0.00000 0.3442 0.5577 65.25E+01 56 0.00000 0.74902 0.12549 0.3433 0.5554 65.32E+01 57 0.00000 0.74902 0.25098 0.3386 0.5455 65.38E+01 58 0.00000 0.74902 0.37647 0.3274 0.5181 66.01E+01 59 0.00000 0.74902 0.50196 0.3069 0.4683 67.62E+01 60 0.00000 0.74902 0.62353 0.2796 0.4022 70.43E+01 61 0.00000 0.74902 0.74902 0.2505 0.3312 75.29E+01 62 0.00000 0.74902 0.87451 0.2238 0.2664 8.13E+02 63 0.00000 0.74902 1.00000 0.2062 0.2234 8.83E+02 64 0.00000 0.87451 0.00000 0.3437 0.5596 10.94E+02 65 0.00000 0.87451 0.12549 0.3434 0.5582 10.94E+02 66 0.00000 0.87451 0.25098 0.3412 0.5524 10.96E+02 67 0.00000 0.87451 0.37647 0.3340 0.5352 11.01E+02 68 0.00000 0.87451 0.50196 0.3200 0.5022 11.19E+02 69 0.00000 0.87451 0.62353 0.2999 0.4522 11.46E+02 70 0.00000 0.87451 0.74902 0.2744 0.3908 11.92E+02 71 0.00000 0.87451 0.87451 0.2489 0.3276 12.57E+02 72 0.00000 0.87451 1.00000 0.2295 0.2799 13.28E+02 73 0.00000 1.00000 0.00000 0.3442 0.5609 15.53E+02 74 0.00000 1.00000 0.12549 0.3437 0.5598 15.54E+02 75 0.00000 1.00000 0.25098 0.3420 0.5559 15.57E+02 76 0.00000 1.00000 0.37647 0.3369 0.5435 15.63E+02 77 0.00000 1.00000 0.50196 0.3269 0.5184 15.78E+02 78 0.00000 1.00000 0.62353 0.3110 0.4793 16.06E+02 79 0.00000 1.00000 0.74902 0.2895 0.4274 16.56E+02 80 0.00000 1.00000 0.87451 0.2660 0.3695 17.28E+02 81 0.00000 1.00000 1.00000 0.2473 0.3238 18.16E+02 82 0.12549 0.00000 0.00000 0.3274 0.3379 10.30E+00 83 0.12549 0.00000 0.12549 0.2985 0.2963 10.76E+00 84 0.12549 0.00000 0.25098 0.2372 0.2076 12.55E+00 85 0.12549 0.00000 0.37647 0.1866 0.1347 18.18E+00 86 0.12549 0.00000 0.50196 0.1643 0.1025 3.05E+01 87 0.12549 0.00000 0.62353 0.1548 0.0887 5.28E+01 88 0.12549 0.00000 0.74902 0.1504 0.0825 9.06E+01 89 0.12549 0.00000 0.87451 0.1486 0.0799 1.50E+02 90 0.12549 0.00000 1.00000 0.1474 0.0786 2.18E+02 91 0.12549 0.12549 0.00000 0.3300 0.3706 13.23E+00 92 0.12549 0.12549 0.12549 0.3044 0.3298 13.75E+00 93 0.12549 0.12549 0.25098 0.2463 0.2365 15.52E+00 94 0.12549 0.12549 0.37647 0.1929 0.1515 21.27E+00 95 0.12549 0.12549 0.50196 0.1675 0.1108 3.36E+01 96 0.12549 0.12549 0.62353 0.1566 0.0932 5.60E+01 97 0.12549 0.12549 0.74902 0.1514 0.0848 9.36E+01 98 0.12549 0.12549 0.87451 0.1488 0.0813 1.53E+02 99 0.12549 0.12549 1.00000 0.1480 0.0794 2.21E+02 100 0.12549 0.25098 0.00000 0.3359 0.4481 26.89E+00 101 0.12549 0.25098 0.12549 0.3190 0.4157 27.55E+00 102 0.12549 0.25098 0.25098 0.2735 0.3269 29.80E+00 103 0.12549 0.25098 0.37647 0.2159 0.2139 35.48E+00 104 0.12549 0.25098 0.50196 0.1810 0.1454 4.78E+01 105 0.12549 0.25098 0.62353 0.1640 0.1120 7.02E+01 106 0.12549 0.25098 0.74902 0.1556 0.0955 10.80E+01 107 0.12549 0.25098 0.87451 0.1518 0.0879 1.68E+02 108 0.12549 0.25098 1.00000 0.1497 0.0837 2.35E+02 109 0.12549 0.37647 0.00000 0.3406 0.5140 72.82E+00 110 0.12549 0.37647 0.12549 0.3329 0.4966 73.50E+00 111 0.12549 0.37647 0.25098 0.3067 0.4379 75.66E+00 112 0.12549 0.37647 0.37647 0.2594 0.3320 8.32E+01 113 0.12549 0.37647 0.50196 0.2147 0.2311 9.55E+01 114 0.12549 0.37647 0.62353 0.1856 0.1659 11.78E+01 115 0.12549 0.37647 0.74902 0.1690 0.1284 15.52E+01 116 0.12549 0.37647 0.87451 0.1599 0.1084 2.15E+02 117 0.12549 0.37647 1.00000 0.1557 0.0979 2.83E+02 118 0.12549 0.50196 0.00000 0.3433 0.5411 16.99E+01 119 0.12549 0.50196 0.12549 0.3398 0.5325 17.05E+01 120 0.12549 0.50196 0.25098 0.3261 0.5004 17.28E+01 121 0.12549 0.50196 0.37647 0.2942 0.4260 17.98E+01 122 0.12549 0.50196 0.50196 0.2539 0.3308 19.53E+01 123 0.12549 0.50196 0.62353 0.2176 0.2456 21.82E+01 124 0.12549 0.50196 0.74902 0.1914 0.1839 25.58E+01 125 0.12549 0.50196 0.87451 0.1754 0.1454 3.15E+02 126 0.12549 0.50196 1.00000 0.1669 0.1248 3.82E+02 127 0.12549 0.62353 0.00000 0.3443 0.5526 35.32E+01 128 0.12549 0.62353 0.12549 0.3424 0.5481 35.41E+01 129 0.12549 0.62353 0.25098 0.3353 0.5311 35.62E+01 130 0.12549 0.62353 0.37647 0.3163 0.4857 36.28E+01 131 0.12549 0.62353 0.50196 0.2864 0.4138 37.90E+01 132 0.12549 0.62353 0.62353 0.2527 0.3328 40.74E+01 133 0.12549 0.62353 0.74902 0.2215 0.2581 44.59E+01 134 0.12549 0.62353 0.87451 0.1981 0.2017 5.05E+02 135 0.12549 0.62353 1.00000 0.1843 0.1684 5.72E+02 136 0.12549 0.74902 0.00000 0.3445 0.5575 65.18E+01 137 0.12549 0.74902 0.12549 0.3434 0.5551 65.24E+01 138 0.12549 0.74902 0.25098 0.3395 0.5455 65.51E+01 139 0.12549 0.74902 0.37647 0.3281 0.5181 66.09E+01 140 0.12549 0.74902 0.50196 0.3077 0.4686 67.70E+01 141 0.12549 0.74902 0.62353 0.2803 0.4024 70.50E+01 142 0.12549 0.74902 0.74902 0.2510 0.3315 75.35E+01 143 0.12549 0.74902 0.87451 0.2244 0.2664 8.13E+02 144 0.12549 0.74902 1.00000 0.2066 0.2233 8.82E+02 145 0.12549 0.87451 0.00000 0.3442 0.5596 10.94E+02 146 0.12549 0.87451 0.12549 0.3442 0.5584 10.95E+02 147 0.12549 0.87451 0.25098 0.3415 0.5528 10.99E+02 148 0.12549 0.87451 0.37647 0.3341 0.5354 11.04E+02 149 0.12549 0.87451 0.50196 0.3209 0.5022 11.22E+02 150 0.12549 0.87451 0.62353 0.3004 0.4524 11.49E+02 151 0.12549 0.87451 0.74902 0.2750 0.3912 11.95E+02 152 0.12549 0.87451 0.87451 0.2495 0.3280 12.61E+02 153 0.12549 0.87451 1.00000 0.2297 0.2805 13.33E+02 154 0.12549 1.00000 0.00000 0.3446 0.5608 15.59E+02 155 0.12549 1.00000 0.12549 0.3442 0.5599 15.60E+02 156 0.12549 1.00000 0.25098 0.3427 0.5559 15.62E+02 157 0.12549 1.00000 0.37647 0.3376 0.5435 15.68E+02 158 0.12549 1.00000 0.50196 0.3273 0.5185 15.84E+02 159 0.12549 1.00000 0.62353 0.3112 0.4792 16.12E+02 160 0.12549 1.00000 0.74902 0.2899 0.4274 16.60E+02 161 0.12549 1.00000 0.87451 0.2662 0.3697 17.33E+02 162 0.12549 1.00000 1.00000 0.2475 0.3238 18.21E+02 163 0.25098 0.00000 0.00000 0.3847 0.3392 12.47E+00 164 0.25098 0.00000 0.12549 0.3538 0.3053 12.91E+00 165 0.25098 0.00000 0.25098 0.2797 0.2231 14.65E+00 166 0.25098 0.00000 0.37647 0.2082 0.1445 20.29E+00 167 0.25098 0.00000 0.50196 0.1746 0.1078 3.26E+01 168 0.25098 0.00000 0.62353 0.1601 0.0917 5.50E+01 169 0.25098 0.00000 0.74902 0.1533 0.0842 9.27E+01 170 0.25098 0.00000 0.87451 0.1502 0.0810 1.52E+02 171 0.25098 0.00000 1.00000 0.1489 0.0793 2.20E+02 172 0.25098 0.12549 0.00000 0.3799 0.3636 15.11E+00 173 0.25098 0.12549 0.12549 0.3527 0.3281 15.35E+00 174 0.25098 0.12549 0.25098 0.2838 0.2448 17.21E+00 175 0.25098 0.12549 0.37647 0.2127 0.1581 22.91E+00 176 0.25098 0.12549 0.50196 0.1774 0.1144 3.51E+01 177 0.25098 0.12549 0.62353 0.1614 0.0955 5.76E+01 178 0.25098 0.12549 0.74902 0.1541 0.0862 9.52E+01 179 0.25098 0.12549 0.87451 0.1506 0.0820 1.54E+02 180 0.25098 0.12549 1.00000 0.1489 0.0804 2.23E+02 181 0.25098 0.25098 0.00000 0.3667 0.4357 28.45E+00 182 0.25098 0.25098 0.12549 0.3490 0.4060 28.64E+00 183 0.25098 0.25098 0.25098 0.2975 0.3214 30.15E+00 184 0.25098 0.25098 0.37647 0.2303 0.2130 35.81E+00 185 0.25098 0.25098 0.50196 0.1887 0.1457 4.81E+01 186 0.25098 0.25098 0.62353 0.1681 0.1125 7.05E+01 187 0.25098 0.25098 0.74902 0.1580 0.0958 10.81E+01 188 0.25098 0.25098 0.87451 0.1530 0.0878 1.67E+02 189 0.25098 0.25098 1.00000 0.1509 0.0837 2.34E+02 190 0.25098 0.37647 0.00000 0.3537 0.5057 73.98E+00 191 0.25098 0.37647 0.12549 0.3459 0.4894 74.26E+00 192 0.25098 0.37647 0.25098 0.3187 0.4330 75.76E+00 193 0.25098 0.37647 0.37647 0.2684 0.3299 8.32E+01 194 0.25098 0.37647 0.50196 0.2204 0.2308 9.56E+01 195 0.25098 0.37647 0.62353 0.1892 0.1661 11.79E+01 196 0.25098 0.37647 0.74902 0.1710 0.1285 15.50E+01 197 0.25098 0.37647 0.87451 0.1614 0.1082 2.14E+02 198 0.25098 0.37647 1.00000 0.1562 0.0979 2.82E+02 199 0.25098 0.50196 0.00000 0.3492 0.5368 17.08E+01 200 0.25098 0.50196 0.12549 0.3454 0.5288 17.10E+01 201 0.25098 0.50196 0.25098 0.3316 0.4977 17.29E+01 202 0.25098 0.50196 0.37647 0.2991 0.4239 17.97E+01 203 0.25098 0.50196 0.50196 0.2577 0.3298 19.52E+01 204 0.25098 0.50196 0.62353 0.2202 0.2452 21.82E+01 205 0.25098 0.50196 0.74902 0.1931 0.1838 25.59E+01 206 0.25098 0.50196 0.87451 0.1763 0.1454 3.15E+02 207 0.25098 0.50196 1.00000 0.1673 0.1251 3.83E+02 208 0.25098 0.62353 0.00000 0.3469 0.5502 35.43E+01 209 0.25098 0.62353 0.12549 0.3452 0.5461 35.50E+01 210 0.25098 0.62353 0.25098 0.3380 0.5295 35.68E+01 211 0.25098 0.62353 0.37647 0.3190 0.4843 36.33E+01 212 0.25098 0.62353 0.50196 0.2887 0.4129 37.96E+01 213 0.25098 0.62353 0.62353 0.2544 0.3324 40.80E+01 214 0.25098 0.62353 0.74902 0.2229 0.2580 44.66E+01 215 0.25098 0.62353 0.87451 0.1991 0.2015 5.05E+02 216 0.25098 0.62353 1.00000 0.1852 0.1688 5.75E+02 217 0.25098 0.74902 0.00000 0.3461 0.5564 65.45E+01 218 0.25098 0.74902 0.12549 0.3451 0.5540 65.55E+01 219 0.25098 0.74902 0.25098 0.3411 0.5445 65.72E+01 220 0.25098 0.74902 0.37647 0.3297 0.5172 66.29E+01 221 0.25098 0.74902 0.50196 0.3091 0.4680 67.93E+01 222 0.25098 0.74902 0.62353 0.2816 0.4020 70.72E+01 223 0.25098 0.74902 0.74902 0.2520 0.3312 75.58E+01 224 0.25098 0.74902 0.87451 0.2250 0.2665 8.16E+02 225 0.25098 0.74902 1.00000 0.2072 0.2233 8.85E+02 226 0.25098 0.87451 0.00000 0.3454 0.5590 10.99E+02 227 0.25098 0.87451 0.12549 0.3450 0.5576 10.99E+02 228 0.25098 0.87451 0.25098 0.3425 0.5522 11.01E+02 229 0.25098 0.87451 0.37647 0.3356 0.5348 11.06E+02 230 0.25098 0.87451 0.50196 0.3219 0.5013 11.23E+02 231 0.25098 0.87451 0.62353 0.3011 0.4519 11.51E+02 232 0.25098 0.87451 0.74902 0.2758 0.3903 11.96E+02 233 0.25098 0.87451 0.87451 0.2497 0.3278 12.63E+02 234 0.25098 0.87451 1.00000 0.2303 0.2800 13.33E+02 235 0.25098 1.00000 0.00000 0.3451 0.5605 15.61E+02 236 0.25098 1.00000 0.12549 0.3450 0.5593 15.61E+02 237 0.25098 1.00000 0.25098 0.3433 0.5551 15.62E+02 238 0.25098 1.00000 0.37647 0.3381 0.5431 15.68E+02 239 0.25098 1.00000 0.50196 0.3279 0.5181 15.85E+02 240 0.25098 1.00000 0.62353 0.3119 0.4789 16.12E+02 241 0.25098 1.00000 0.74902 0.2905 0.4270 16.61E+02 242 0.25098 1.00000 0.87451 0.2666 0.3693 17.33E+02 243 0.25098 1.00000 1.00000 0.2478 0.3237 18.21E+02 244 0.37647 0.00000 0.00000 0.4880 0.3398 20.73E+00 245 0.37647 0.00000 0.12549 0.4587 0.3173 21.22E+00 246 0.37647 0.00000 0.25098 0.3799 0.2563 22.88E+00 247 0.37647 0.00000 0.37647 0.2760 0.1767 28.36E+00 248 0.37647 0.00000 0.50196 0.2107 0.1259 4.07E+01 249 0.37647 0.00000 0.62353 0.1793 0.1016 6.31E+01 250 0.37647 0.00000 0.74902 0.1640 0.0897 10.06E+01 251 0.37647 0.00000 0.87451 0.1564 0.0840 1.59E+02 252 0.37647 0.00000 1.00000 0.1530 0.0811 2.28E+02 253 0.37647 0.12549 0.00000 0.4764 0.3556 23.49E+00 254 0.37647 0.12549 0.12549 0.4511 0.3325 23.77E+00 255 0.37647 0.12549 0.25098 0.3778 0.2707 25.41E+00 256 0.37647 0.12549 0.37647 0.2776 0.1873 30.91E+00 257 0.37647 0.12549 0.50196 0.2122 0.1319 4.32E+01 258 0.37647 0.12549 0.62353 0.1806 0.1049 6.56E+01 259 0.37647 0.12549 0.74902 0.1648 0.0916 10.31E+01 260 0.37647 0.12549 0.87451 0.1569 0.0853 1.62E+02 261 0.37647 0.12549 1.00000 0.1535 0.0821 2.31E+02 262 0.37647 0.25098 0.00000 0.4421 0.4096 36.55E+00 263 0.37647 0.25098 0.12549 0.4244 0.3883 36.74E+00 264 0.37647 0.25098 0.25098 0.3698 0.3222 37.33E+00 265 0.37647 0.25098 0.37647 0.2845 0.2287 42.71E+00 266 0.37647 0.25098 0.50196 0.2202 0.1575 5.50E+01 267 0.37647 0.25098 0.62353 0.1858 0.1196 7.74E+01 268 0.37647 0.25098 0.74902 0.1681 0.1001 11.48E+01 269 0.37647 0.25098 0.87451 0.1593 0.0906 1.74E+02 270 0.37647 0.25098 1.00000 0.1549 0.0857 2.43E+02 271 0.37647 0.37647 0.00000 0.3956 0.4821 81.67E+00 272 0.37647 0.37647 0.12549 0.3875 0.4684 81.85E+00 273 0.37647 0.37647 0.25098 0.3590 0.4198 82.11E+00 274 0.37647 0.37647 0.37647 0.3006 0.3230 85.11E+00 275 0.37647 0.37647 0.50196 0.2418 0.2289 9.76E+01 276 0.37647 0.37647 0.62353 0.2023 0.1661 11.98E+01 277 0.37647 0.37647 0.74902 0.1791 0.1289 15.70E+01 278 0.37647 0.37647 0.87451 0.1664 0.1084 2.15E+02 279 0.37647 0.37647 1.00000 0.1599 0.0981 2.84E+02 280 0.37647 0.50196 0.00000 0.3704 0.5229 17.93E+01 281 0.37647 0.50196 0.12549 0.3666 0.5152 17.96E+01 282 0.37647 0.50196 0.25098 0.3527 0.4872 18.01E+01 283 0.37647 0.50196 0.37647 0.3182 0.4179 18.31E+01 284 0.37647 0.50196 0.50196 0.2724 0.3279 19.89E+01 285 0.37647 0.50196 0.62353 0.2308 0.2452 22.17E+01 286 0.37647 0.50196 0.74902 0.2003 0.1846 25.92E+01 287 0.37647 0.50196 0.87451 0.1810 0.1461 3.18E+02 288 0.37647 0.50196 1.00000 0.1707 0.1254 3.87E+02 289 0.37647 0.62353 0.00000 0.3580 0.5427 36.35E+01 290 0.37647 0.62353 0.12549 0.3562 0.5387 36.42E+01 291 0.37647 0.62353 0.25098 0.3491 0.5228 36.42E+01 292 0.37647 0.62353 0.37647 0.3296 0.4797 36.66E+01 293 0.37647 0.62353 0.50196 0.2978 0.4102 38.29E+01 294 0.37647 0.62353 0.62353 0.2618 0.3312 41.14E+01 295 0.37647 0.62353 0.74902 0.2284 0.2579 45.02E+01 296 0.37647 0.62353 0.87451 0.2030 0.2018 5.08E+02 297 0.37647 0.62353 1.00000 0.1880 0.1685 5.77E+02 298 0.37647 0.74902 0.00000 0.3521 0.5519 66.13E+01 299 0.37647 0.74902 0.12549 0.3512 0.5496 66.17E+01 300 0.37647 0.74902 0.25098 0.3471 0.5405 66.25E+01 301 0.37647 0.74902 0.37647 0.3358 0.5141 66.36E+01 302 0.37647 0.74902 0.50196 0.3148 0.4656 68.03E+01 303 0.37647 0.74902 0.62353 0.2864 0.4006 70.87E+01 304 0.37647 0.74902 0.74902 0.2560 0.3306 75.62E+01 305 0.37647 0.74902 0.87451 0.2280 0.2663 8.14E+02 306 0.37647 0.74902 1.00000 0.2094 0.2230 8.85E+02 307 0.37647 0.87451 0.00000 0.3493 0.5559 11.03E+02 308 0.37647 0.87451 0.12549 0.3486 0.5548 11.03E+02 309 0.37647 0.87451 0.25098 0.3461 0.5498 11.04E+02 310 0.37647 0.87451 0.37647 0.3393 0.5323 11.03E+02 311 0.37647 0.87451 0.50196 0.3252 0.4998 11.22E+02 312 0.37647 0.87451 0.62353 0.3043 0.4508 11.51E+02 313 0.37647 0.87451 0.74902 0.2779 0.3897 11.89E+02 314 0.37647 0.87451 0.87451 0.2518 0.3276 12.58E+02 315 0.37647 0.87451 1.00000 0.2316 0.2794 13.27E+02 316 0.37647 1.00000 0.00000 0.3472 0.5579 15.52E+02 317 0.37647 1.00000 0.12549 0.3467 0.5574 15.53E+02 318 0.37647 1.00000 0.25098 0.3452 0.5533 15.53E+02 319 0.37647 1.00000 0.37647 0.3401 0.5411 15.53E+02 320 0.37647 1.00000 0.50196 0.3298 0.5166 15.71E+02 321 0.37647 1.00000 0.62353 0.3134 0.4776 16.00E+02 322 0.37647 1.00000 0.74902 0.2920 0.4260 16.47E+02 323 0.37647 1.00000 0.87451 0.2681 0.3689 17.20E+02 324 0.37647 1.00000 1.00000 0.2486 0.3225 18.06E+02 325 0.50196 0.00000 0.00000 0.5661 0.3406 38.83E+00 326 0.50196 0.00000 0.12549 0.5470 0.3285 39.28E+00 327 0.50196 0.00000 0.25098 0.4835 0.2883 40.98E+00 328 0.50196 0.00000 0.37647 0.3724 0.2189 46.18E+00 329 0.50196 0.00000 0.50196 0.2773 0.1588 5.80E+01 330 0.50196 0.00000 0.62353 0.2181 0.1215 8.04E+01 331 0.50196 0.00000 0.74902 0.1867 0.1015 11.80E+01 332 0.50196 0.00000 0.87451 0.1704 0.0914 1.77E+02 333 0.50196 0.00000 1.00000 0.1626 0.0864 2.46E+02 334 0.50196 0.12549 0.00000 0.5561 0.3488 41.45E+00 335 0.50196 0.12549 0.12549 0.5383 0.3362 41.69E+00 336 0.50196 0.12549 0.25098 0.4784 0.2962 43.39E+00 337 0.50196 0.12549 0.37647 0.3712 0.2256 48.62E+00 338 0.50196 0.12549 0.50196 0.2777 0.1635 6.04E+01 339 0.50196 0.12549 0.62353 0.2189 0.1242 8.27E+01 340 0.50196 0.12549 0.74902 0.1873 0.1032 12.03E+01 341 0.50196 0.12549 0.87451 0.1709 0.0924 1.79E+02 342 0.50196 0.12549 1.00000 0.1627 0.0871 2.48E+02 343 0.50196 0.25098 0.00000 0.5212 0.3840 54.58E+00 344 0.50196 0.25098 0.12549 0.5073 0.3715 54.75E+00 345 0.50196 0.25098 0.25098 0.4596 0.3284 55.39E+00 346 0.50196 0.25098 0.37647 0.3678 0.2548 60.45E+00 347 0.50196 0.25098 0.50196 0.2813 0.1849 7.23E+01 348 0.50196 0.25098 0.62353 0.2226 0.1375 9.45E+01 349 0.50196 0.25098 0.74902 0.1900 0.1113 13.21E+01 350 0.50196 0.25098 0.87451 0.1721 0.0975 1.91E+02 351 0.50196 0.25098 1.00000 0.1640 0.0907 2.60E+02 352 0.50196 0.37647 0.00000 0.4581 0.4472 9.82E+01 353 0.50196 0.37647 0.12549 0.4507 0.4378 9.85E+01 354 0.50196 0.37647 0.25098 0.4227 0.4020 9.88E+01 355 0.50196 0.37647 0.37647 0.3601 0.3227 10.00E+01 356 0.50196 0.37647 0.50196 0.2893 0.2407 11.15E+01 357 0.50196 0.37647 0.62353 0.2334 0.1764 13.38E+01 358 0.50196 0.37647 0.74902 0.1986 0.1365 17.11E+01 359 0.50196 0.37647 0.87451 0.1788 0.1134 2.29E+02 360 0.50196 0.37647 1.00000 0.1686 0.1017 2.98E+02 361 0.50196 0.50196 0.00000 0.4092 0.4974 19.28E+01 362 0.50196 0.50196 0.12549 0.4054 0.4914 19.33E+01 363 0.50196 0.50196 0.25098 0.3912 0.4677 19.39E+01 364 0.50196 0.50196 0.37647 0.3547 0.4071 19.51E+01 365 0.50196 0.50196 0.50196 0.3024 0.3210 20.14E+01 366 0.50196 0.50196 0.62353 0.2521 0.2423 22.40E+01 367 0.50196 0.50196 0.74902 0.2145 0.1835 26.14E+01 368 0.50196 0.50196 0.87451 0.1903 0.1457 3.20E+02 369 0.50196 0.50196 1.00000 0.1776 0.1256 3.89E+02 370 0.50196 0.62353 0.00000 0.3799 0.5276 37.62E+01 371 0.50196 0.62353 0.12549 0.3782 0.5239 37.65E+01 372 0.50196 0.62353 0.25098 0.3708 0.5096 37.72E+01 373 0.50196 0.62353 0.37647 0.3507 0.4701 37.84E+01 374 0.50196 0.62353 0.50196 0.3170 0.4038 38.51E+01 375 0.50196 0.62353 0.62353 0.2769 0.3278 41.34E+01 376 0.50196 0.62353 0.74902 0.2395 0.2563 45.20E+01 377 0.50196 0.62353 0.87451 0.2109 0.2018 5.13E+02 378 0.50196 0.62353 1.00000 0.1941 0.1686 5.81E+02 379 0.50196 0.74902 0.00000 0.3649 0.5429 67.63E+01 380 0.50196 0.74902 0.12549 0.3640 0.5408 67.71E+01 381 0.50196 0.74902 0.25098 0.3600 0.5322 67.81E+01 382 0.50196 0.74902 0.37647 0.3485 0.5073 68.01E+01 383 0.50196 0.74902 0.50196 0.3270 0.4614 69.04E+01 384 0.50196 0.74902 0.62353 0.2970 0.3976 71.54E+01 385 0.50196 0.74902 0.74902 0.2643 0.3286 76.19E+01 386 0.50196 0.74902 0.87451 0.2347 0.2653 8.22E+02 387 0.50196 0.74902 1.00000 0.2147 0.2225 8.91E+02 388 0.50196 0.87451 0.00000 0.3569 0.5506 11.20E+02 389 0.50196 0.87451 0.12549 0.3567 0.5492 11.21E+02 390 0.50196 0.87451 0.25098 0.3544 0.5442 11.21E+02 391 0.50196 0.87451 0.37647 0.3470 0.5281 11.20E+02 392 0.50196 0.87451 0.50196 0.3330 0.4963 11.28E+02 393 0.50196 0.87451 0.62353 0.3113 0.4479 11.57E+02 394 0.50196 0.87451 0.74902 0.2848 0.3882 12.05E+02 395 0.50196 0.87451 0.87451 0.2575 0.3269 12.76E+02 396 0.50196 0.87451 1.00000 0.2364 0.2796 13.47E+02 397 0.50196 1.00000 0.00000 0.3537 0.5542 15.84E+02 398 0.50196 1.00000 0.12549 0.3534 0.5534 15.85E+02 399 0.50196 1.00000 0.25098 0.3516 0.5496 15.85E+02 400 0.50196 1.00000 0.37647 0.3466 0.5379 15.83E+02 401 0.50196 1.00000 0.50196 0.3363 0.5139 15.92E+02 402 0.50196 1.00000 0.62353 0.3196 0.4756 16.19E+02 403 0.50196 1.00000 0.74902 0.2974 0.4246 16.68E+02 404 0.50196 1.00000 0.87451 0.2726 0.3679 17.41E+02 405 0.50196 1.00000 1.00000 0.2527 0.3223 18.28E+02 406 0.62353 0.00000 0.00000 0.6063 0.3408 7.41E+01 407 0.62353 0.00000 0.12549 0.5944 0.3339 7.45E+01 408 0.62353 0.00000 0.25098 0.5531 0.3101 7.62E+01 409 0.62353 0.00000 0.37647 0.4625 0.2584 8.14E+01 410 0.62353 0.00000 0.50196 0.3600 0.1989 9.30E+01 411 0.62353 0.00000 0.62353 0.2793 0.1524 11.40E+01 412 0.62353 0.00000 0.74902 0.2255 0.1214 15.18E+01 413 0.62353 0.00000 0.87451 0.1948 0.1043 2.11E+02 414 0.62353 0.00000 1.00000 0.1798 0.0953 2.80E+02 415 0.62353 0.12549 0.00000 0.6000 0.3452 7.68E+01 416 0.62353 0.12549 0.12549 0.5894 0.3386 7.71E+01 417 0.62353 0.12549 0.25098 0.5493 0.3146 7.88E+01 418 0.62353 0.12549 0.37647 0.4609 0.2627 8.39E+01 419 0.62353 0.12549 0.50196 0.3597 0.2022 9.54E+01 420 0.62353 0.12549 0.62353 0.2798 0.1549 11.65E+01 421 0.62353 0.12549 0.74902 0.2260 0.1230 15.42E+01 422 0.62353 0.12549 0.87451 0.1955 0.1051 2.13E+02 423 0.62353 0.12549 1.00000 0.1801 0.0960 2.82E+02 424 0.62353 0.25098 0.00000 0.5757 0.3662 9.00E+01 425 0.62353 0.25098 0.12549 0.5663 0.3589 9.02E+01 426 0.62353 0.25098 0.25098 0.5321 0.3332 9.08E+01 427 0.62353 0.25098 0.37647 0.4529 0.2806 9.57E+01 428 0.62353 0.25098 0.50196 0.3589 0.2176 10.74E+01 429 0.62353 0.25098 0.62353 0.2813 0.1660 12.86E+01 430 0.62353 0.25098 0.74902 0.2279 0.1303 16.63E+01 431 0.62353 0.25098 0.87451 0.1969 0.1099 2.25E+02 432 0.62353 0.25098 1.00000 0.1814 0.0993 2.94E+02 433 0.62353 0.37647 0.00000 0.5191 0.4139 13.41E+01 434 0.62353 0.37647 0.12549 0.5129 0.4078 13.43E+01 435 0.62353 0.37647 0.25098 0.4897 0.3841 13.46E+01 436 0.62353 0.37647 0.37647 0.4318 0.3273 13.56E+01 437 0.62353 0.37647 0.50196 0.3556 0.2598 14.73E+01 438 0.62353 0.37647 0.62353 0.2858 0.1987 16.85E+01 439 0.62353 0.37647 0.74902 0.2339 0.1530 20.59E+01 440 0.62353 0.37647 0.87451 0.2018 0.1248 2.64E+02 441 0.62353 0.37647 1.00000 0.1849 0.1101 3.34E+02 442 0.62353 0.50196 0.00000 0.4600 0.4646 22.92E+01 443 0.62353 0.50196 0.12549 0.4565 0.4601 22.93E+01 444 0.62353 0.50196 0.25098 0.4429 0.4421 22.99E+01 445 0.62353 0.50196 0.37647 0.4068 0.3949 23.06E+01 446 0.62353 0.50196 0.50196 0.3516 0.3220 23.44E+01 447 0.62353 0.50196 0.62353 0.2938 0.2527 25.49E+01 448 0.62353 0.50196 0.74902 0.2444 0.1936 29.27E+01 449 0.62353 0.50196 0.87451 0.2108 0.1540 3.52E+02 450 0.62353 0.50196 1.00000 0.1925 0.1316 4.21E+02 451 0.62353 0.62353 0.00000 0.4150 0.5034 40.92E+01 452 0.62353 0.62353 0.12549 0.4130 0.5005 40.94E+01 453 0.62353 0.62353 0.25098 0.4057 0.4883 40.99E+01 454 0.62353 0.62353 0.37647 0.3850 0.4545 41.01E+01 455 0.62353 0.62353 0.50196 0.3496 0.3950 41.19E+01 456 0.62353 0.62353 0.62353 0.3043 0.3213 42.15E+01 457 0.62353 0.62353 0.74902 0.2604 0.2535 46.02E+01 458 0.62353 0.62353 0.87451 0.2260 0.2005 5.19E+02 459 0.62353 0.62353 1.00000 0.2052 0.1680 5.88E+02 460 0.62353 0.74902 0.00000 0.3869 0.5268 70.39E+01 461 0.62353 0.74902 0.12549 0.3859 0.5249 70.41E+01 462 0.62353 0.74902 0.25098 0.3818 0.5171 70.54E+01 463 0.62353 0.74902 0.37647 0.3697 0.4948 70.85E+01 464 0.62353 0.74902 0.50196 0.3477 0.4521 71.22E+01 465 0.62353 0.74902 0.62353 0.3158 0.3909 71.88E+01 466 0.62353 0.74902 0.74902 0.2798 0.3255 76.88E+01 467 0.62353 0.74902 0.87451 0.2470 0.2642 8.29E+02 468 0.62353 0.74902 1.00000 0.2242 0.2220 8.99E+02 469 0.62353 0.87451 0.00000 0.3709 0.5400 11.40E+02 470 0.62353 0.87451 0.12549 0.3705 0.5392 11.41E+02 471 0.62353 0.87451 0.25098 0.3678 0.5339 11.41E+02 472 0.62353 0.87451 0.37647 0.3609 0.5189 11.40E+02 473 0.62353 0.87451 0.50196 0.3466 0.4885 11.43E+02 474 0.62353 0.87451 0.62353 0.3243 0.4419 11.53E+02 475 0.62353 0.87451 0.74902 0.2957 0.3840 12.01E+02 476 0.62353 0.87451 0.87451 0.2666 0.3247 12.74E+02 477 0.62353 0.87451 1.00000 0.2439 0.2782 13.46E+02 478 0.62353 1.00000 0.00000 0.3635 0.5465 15.98E+02 479 0.62353 1.00000 0.12549 0.3633 0.5459 15.99E+02 480 0.62353 1.00000 0.25098 0.3616 0.5422 16.00E+02 481 0.62353 1.00000 0.37647 0.3566 0.5309 15.99E+02 482 0.62353 1.00000 0.50196 0.3461 0.5079 16.04E+02 483 0.62353 1.00000 0.62353 0.3290 0.4709 16.12E+02 484 0.62353 1.00000 0.74902 0.3058 0.4211 16.62E+02 485 0.62353 1.00000 0.87451 0.2799 0.3654 17.34E+02 486 0.62353 1.00000 1.00000 0.2590 0.3204 18.21E+02 487 0.74902 0.00000 0.00000 0.6257 0.3410 13.12E+01 488 0.74902 0.00000 0.12549 0.6191 0.3373 13.15E+01 489 0.74902 0.00000 0.25098 0.5933 0.3230 13.31E+01 490 0.74902 0.00000 0.37647 0.5286 0.2873 13.78E+01 491 0.74902 0.00000 0.50196 0.4372 0.2367 14.98E+01 492 0.74902 0.00000 0.62353 0.3485 0.1876 17.03E+01 493 0.74902 0.00000 0.74902 0.2792 0.1493 20.59E+01 494 0.74902 0.00000 0.87451 0.2314 0.1234 2.65E+02 495 0.74902 0.00000 1.00000 0.2061 0.1091 3.33E+02 496 0.74902 0.12549 0.00000 0.6222 0.3434 13.35E+01 497 0.74902 0.12549 0.12549 0.6156 0.3394 13.37E+01 498 0.74902 0.12549 0.25098 0.5904 0.3255 13.55E+01 499 0.74902 0.12549 0.37647 0.5265 0.2896 14.02E+01 500 0.74902 0.12549 0.50196 0.4364 0.2388 15.22E+01 501 0.74902 0.12549 0.62353 0.3482 0.1892 17.27E+01 502 0.74902 0.12549 0.74902 0.2794 0.1504 20.81E+01 503 0.74902 0.12549 0.87451 0.2312 0.1240 2.67E+02 504 0.74902 0.12549 1.00000 0.2063 0.1098 3.36E+02 505 0.74902 0.25098 0.00000 0.6064 0.3558 14.68E+01 506 0.74902 0.25098 0.12549 0.6004 0.3518 14.70E+01 507 0.74902 0.25098 0.25098 0.5775 0.3362 14.77E+01 508 0.74902 0.25098 0.37647 0.5180 0.3005 15.23E+01 509 0.74902 0.25098 0.50196 0.4330 0.2489 16.44E+01 510 0.74902 0.25098 0.62353 0.3479 0.1976 18.53E+01 511 0.74902 0.25098 0.74902 0.2801 0.1566 22.07E+01 512 0.74902 0.25098 0.87451 0.2324 0.1283 2.80E+02 513 0.74902 0.25098 1.00000 0.2069 0.1128 3.49E+02 514 0.74902 0.37647 0.00000 0.5641 0.3889 19.05E+01 515 0.74902 0.37647 0.12549 0.5593 0.3851 19.08E+01 516 0.74902 0.37647 0.25098 0.5417 0.3702 19.12E+01 517 0.74902 0.37647 0.37647 0.4944 0.3309 19.19E+01 518 0.74902 0.37647 0.50196 0.4227 0.2781 20.39E+01 519 0.74902 0.37647 0.62353 0.3465 0.2224 22.48E+01 520 0.74902 0.37647 0.74902 0.2828 0.1757 26.02E+01 521 0.74902 0.37647 0.87451 0.2356 0.1415 3.19E+02 522 0.74902 0.37647 1.00000 0.2099 0.1226 3.88E+02 523 0.74902 0.50196 0.00000 0.5089 0.4331 28.60E+01 524 0.74902 0.50196 0.12549 0.5056 0.4299 28.63E+01 525 0.74902 0.50196 0.25098 0.4939 0.4172 28.68E+01 526 0.74902 0.50196 0.37647 0.4610 0.3829 28.75E+01 527 0.74902 0.50196 0.50196 0.4077 0.3254 29.16E+01 528 0.74902 0.50196 0.62353 0.3452 0.2657 31.20E+01 529 0.74902 0.50196 0.74902 0.2877 0.2107 34.77E+01 530 0.74902 0.50196 0.87451 0.2425 0.1677 4.06E+02 531 0.74902 0.50196 1.00000 0.2160 0.1426 4.76E+02 532 0.74902 0.62353 0.00000 0.4557 0.4755 46.52E+01 533 0.74902 0.62353 0.12549 0.4538 0.4731 46.53E+01 534 0.74902 0.62353 0.25098 0.4469 0.4634 46.55E+01 535 0.74902 0.62353 0.37647 0.4267 0.4363 46.52E+01 536 0.74902 0.62353 0.50196 0.3914 0.3874 46.95E+01 537 0.74902 0.62353 0.62353 0.3435 0.3224 47.56E+01 538 0.74902 0.62353 0.74902 0.2951 0.2614 50.90E+01 539 0.74902 0.62353 0.87451 0.2524 0.2086 5.67E+02 540 0.74902 0.62353 1.00000 0.2258 0.1754 6.37E+02 541 0.74902 0.74902 0.00000 0.4167 0.5064 76.18E+01 542 0.74902 0.74902 0.12549 0.4157 0.5047 76.21E+01 543 0.74902 0.74902 0.25098 0.4117 0.4980 76.25E+01 544 0.74902 0.74902 0.37647 0.3997 0.4783 76.02E+01 545 0.74902 0.74902 0.50196 0.3774 0.4405 76.32E+01 546 0.74902 0.74902 0.62353 0.3440 0.3860 77.13E+01 547 0.74902 0.74902 0.74902 0.3040 0.3211 80.49E+01 548 0.74902 0.74902 0.87451 0.2666 0.2633 8.64E+02 549 0.74902 0.74902 1.00000 0.2410 0.2233 9.34E+02 550 0.74902 0.87451 0.00000 0.3919 0.5250 11.87E+02 551 0.74902 0.87451 0.12549 0.3914 0.5243 11.88E+02 552 0.74902 0.87451 0.25098 0.3892 0.5195 11.88E+02 553 0.74902 0.87451 0.37647 0.3815 0.5055 11.86E+02 554 0.74902 0.87451 0.50196 0.3669 0.4785 11.92E+02 555 0.74902 0.87451 0.62353 0.3441 0.4350 11.97E+02 556 0.74902 0.87451 0.74902 0.3134 0.3780 12.35E+02 557 0.74902 0.87451 0.87451 0.2816 0.3218 13.07E+02 558 0.74902 0.87451 1.00000 0.2572 0.2773 13.78E+02 559 0.74902 1.00000 0.00000 0.3792 0.5354 16.49E+02 560 0.74902 1.00000 0.12549 0.3793 0.5345 16.49E+02 561 0.74902 1.00000 0.25098 0.3775 0.5311 16.50E+02 562 0.74902 1.00000 0.37647 0.3719 0.5210 16.49E+02 563 0.74902 1.00000 0.50196 0.3617 0.4992 16.52E+02 564 0.74902 1.00000 0.62353 0.3442 0.4643 16.58E+02 565 0.74902 1.00000 0.74902 0.3199 0.4153 17.03E+02 566 0.74902 1.00000 0.87451 0.2924 0.3623 17.77E+02 567 0.74902 1.00000 1.00000 0.2703 0.3196 18.67E+02 568 0.87451 0.00000 0.00000 0.6363 0.3410 22.66E+01 569 0.87451 0.00000 0.12549 0.6323 0.3388 22.71E+01 570 0.87451 0.00000 0.25098 0.6165 0.3302 22.88E+01 571 0.87451 0.00000 0.37647 0.5733 0.3069 23.33E+01 572 0.87451 0.00000 0.50196 0.5025 0.2685 24.55E+01 573 0.87451 0.00000 0.62353 0.4195 0.2235 26.63E+01 574 0.87451 0.00000 0.74902 0.3427 0.1820 30.12E+01 575 0.87451 0.00000 0.87451 0.2764 0.1472 3.85E+02 576 0.87451 0.00000 1.00000 0.2428 0.1287 4.52E+02 577 0.87451 0.12549 0.00000 0.6341 0.3425 22.94E+01 578 0.87451 0.12549 0.12549 0.6302 0.3402 22.98E+01 579 0.87451 0.12549 0.25098 0.6147 0.3315 23.14E+01 580 0.87451 0.12549 0.37647 0.5719 0.3084 23.62E+01 581 0.87451 0.12549 0.50196 0.5015 0.2698 24.83E+01 582 0.87451 0.12549 0.62353 0.4191 0.2248 26.90E+01 583 0.87451 0.12549 0.74902 0.3426 0.1830 30.39E+01 584 0.87451 0.12549 0.87451 0.2766 0.1478 3.88E+02 585 0.87451 0.12549 1.00000 0.2430 0.1292 4.55E+02 586 0.87451 0.25098 0.00000 0.6244 0.3498 24.29E+01 587 0.87451 0.25098 0.12549 0.6205 0.3475 24.32E+01 588 0.87451 0.25098 0.25098 0.6059 0.3379 24.36E+01 589 0.87451 0.25098 0.37647 0.5653 0.3147 24.81E+01 590 0.87451 0.25098 0.50196 0.4978 0.2763 26.05E+01 591 0.87451 0.25098 0.62353 0.4176 0.2305 28.13E+01 592 0.87451 0.25098 0.74902 0.3425 0.1876 31.61E+01 593 0.87451 0.25098 0.87451 0.2771 0.1513 3.98E+02 594 0.87451 0.25098 1.00000 0.2435 0.1318 4.66E+02 595 0.87451 0.37647 0.00000 0.5958 0.3715 28.63E+01 596 0.87451 0.37647 0.12549 0.5923 0.3693 28.68E+01 597 0.87451 0.37647 0.25098 0.5800 0.3599 28.71E+01 598 0.87451 0.37647 0.37647 0.5452 0.3342 28.71E+01 599 0.87451 0.37647 0.50196 0.4857 0.2955 29.98E+01 600 0.87451 0.37647 0.62353 0.4127 0.2482 32.07E+01 601 0.87451 0.37647 0.74902 0.3425 0.2027 35.53E+01 602 0.87451 0.37647 0.87451 0.2786 0.1622 4.32E+02 603 0.87451 0.37647 1.00000 0.2446 0.1398 4.99E+02 604 0.87451 0.50196 0.00000 0.5511 0.4058 38.20E+01 605 0.87451 0.50196 0.12549 0.5487 0.4037 38.24E+01 606 0.87451 0.50196 0.25098 0.5394 0.3952 38.26E+01 607 0.87451 0.50196 0.37647 0.5128 0.3715 38.29E+01 608 0.87451 0.50196 0.50196 0.4657 0.3291 38.71E+01 609 0.87451 0.50196 0.62353 0.4042 0.2803 40.77E+01 610 0.87451 0.50196 0.74902 0.3413 0.2304 44.28E+01 611 0.87451 0.50196 0.87451 0.2812 0.1837 5.07E+02 612 0.87451 0.50196 1.00000 0.2480 0.1572 5.73E+02 613 0.87451 0.62353 0.00000 0.4992 0.4455 56.04E+01 614 0.87451 0.62353 0.12549 0.4975 0.4439 56.10E+01 615 0.87451 0.62353 0.25098 0.4914 0.4368 56.14E+01 616 0.87451 0.62353 0.37647 0.4734 0.4165 56.07E+01 617 0.87451 0.62353 0.50196 0.4402 0.3788 56.51E+01 618 0.87451 0.62353 0.62353 0.3927 0.3254 57.07E+01 619 0.87451 0.62353 0.74902 0.3405 0.2721 60.40E+01 620 0.87451 0.62353 0.87451 0.2924 0.2234 6.58E+02 621 0.87451 0.62353 1.00000 0.2580 0.1890 7.28E+02 622 0.87451 0.74902 0.00000 0.4540 0.4802 85.36E+01 623 0.87451 0.74902 0.12549 0.4529 0.4789 85.44E+01 624 0.87451 0.74902 0.25098 0.4491 0.4734 85.39E+01 625 0.87451 0.74902 0.37647 0.4380 0.4572 84.97E+01 626 0.87451 0.74902 0.50196 0.4157 0.4262 85.50E+01 627 0.87451 0.74902 0.62353 0.3818 0.3799 86.37E+01 628 0.87451 0.74902 0.74902 0.3388 0.3249 95.67E+01 629 0.87451 0.74902 0.87451 0.3006 0.2760 10.31E+02 630 0.87451 0.74902 1.00000 0.2705 0.2373 11.02E+02 631 0.87451 0.87451 0.00000 0.4231 0.5036 13.46E+02 632 0.87451 0.87451 0.12549 0.4227 0.5026 13.46E+02 633 0.87451 0.87451 0.25098 0.4207 0.4985 13.27E+02 634 0.87451 0.87451 0.37647 0.4134 0.4863 12.81E+02 635 0.87451 0.87451 0.50196 0.3960 0.4641 12.81E+02 636 0.87451 0.87451 0.62353 0.3727 0.4257 12.86E+02 637 0.87451 0.87451 0.74902 0.3401 0.3736 13.71E+02 638 0.87451 0.87451 0.87451 0.3110 0.3290 18.69E+02 639 0.87451 0.87451 1.00000 0.2883 0.2944 19.42E+02 640 0.87451 1.00000 0.00000 0.4056 0.5171 19.62E+02 641 0.87451 1.00000 0.12549 0.4055 0.5163 19.62E+02 642 0.87451 1.00000 0.25098 0.4042 0.5136 19.29E+02 643 0.87451 1.00000 0.37647 0.3974 0.5057 18.63E+02 644 0.87451 1.00000 0.50196 0.3864 0.4853 17.47E+02 645 0.87451 1.00000 0.62353 0.3666 0.4544 17.34E+02 646 0.87451 1.00000 0.74902 0.3409 0.4075 18.29E+02 647 0.87451 1.00000 0.87451 0.3151 0.3583 23.20E+02 648 0.87451 1.00000 1.00000 0.2947 0.3247 24.11E+02 649 1.00000 0.00000 0.00000 0.6401 0.3410 33.54E+01 650 1.00000 0.00000 0.12549 0.6373 0.3394 33.56E+01 651 1.00000 0.00000 0.25098 0.6266 0.3336 33.73E+01 652 1.00000 0.00000 0.37647 0.5954 0.3169 34.10E+01 653 1.00000 0.00000 0.50196 0.5403 0.2873 35.36E+01 654 1.00000 0.00000 0.62353 0.4678 0.2484 37.40E+01 655 1.00000 0.00000 0.74902 0.3921 0.2078 40.91E+01 656 1.00000 0.00000 0.87451 0.3181 0.1691 4.82E+02 657 1.00000 0.00000 1.00000 0.2743 0.1454 5.92E+02 658 1.00000 0.12549 0.00000 0.6387 0.3418 33.71E+01 659 1.00000 0.12549 0.12549 0.6360 0.3403 33.74E+01 660 1.00000 0.12549 0.25098 0.6252 0.3344 33.92E+01 661 1.00000 0.12549 0.37647 0.5943 0.3177 34.31E+01 662 1.00000 0.12549 0.50196 0.5395 0.2880 35.57E+01 663 1.00000 0.12549 0.62353 0.4672 0.2491 37.64E+01 664 1.00000 0.12549 0.74902 0.3918 0.2083 41.16E+01 665 1.00000 0.12549 0.87451 0.3181 0.1695 4.85E+02 666 1.00000 0.12549 1.00000 0.2742 0.1459 5.96E+02 667 1.00000 0.25098 0.00000 0.6319 0.3469 35.09E+01 668 1.00000 0.25098 0.12549 0.6295 0.3453 35.10E+01 669 1.00000 0.25098 0.25098 0.6191 0.3387 35.16E+01 670 1.00000 0.25098 0.37647 0.5890 0.3222 35.56E+01 671 1.00000 0.25098 0.50196 0.5359 0.2925 36.84E+01 672 1.00000 0.25098 0.62353 0.4653 0.2532 38.90E+01 673 1.00000 0.25098 0.74902 0.3911 0.2119 42.44E+01 674 1.00000 0.25098 0.87451 0.3175 0.1721 4.96E+02 675 1.00000 0.25098 1.00000 0.2746 0.1480 6.07E+02 676 1.00000 0.37647 0.00000 0.6112 0.3624 39.35E+01 677 1.00000 0.37647 0.12549 0.6088 0.3608 39.38E+01 678 1.00000 0.37647 0.25098 0.5996 0.3543 39.44E+01 679 1.00000 0.37647 0.37647 0.5732 0.3358 39.49E+01 680 1.00000 0.37647 0.50196 0.5245 0.3061 40.69E+01 681 1.00000 0.37647 0.62353 0.4592 0.2663 42.76E+01 682 1.00000 0.37647 0.74902 0.3890 0.2237 46.26E+01 683 1.00000 0.37647 0.87451 0.3187 0.1813 5.28E+02 684 1.00000 0.37647 1.00000 0.2753 0.1549 6.41E+02 685 1.00000 0.50196 0.00000 0.5758 0.3891 48.98E+01 686 1.00000 0.50196 0.12549 0.5738 0.3877 48.99E+01 687 1.00000 0.50196 0.25098 0.5663 0.3817 49.07E+01 688 1.00000 0.50196 0.37647 0.5447 0.3641 49.00E+01 689 1.00000 0.50196 0.50196 0.5046 0.3316 49.49E+01 690 1.00000 0.50196 0.62353 0.4480 0.2911 51.50E+01 691 1.00000 0.50196 0.74902 0.3848 0.2459 55.03E+01 692 1.00000 0.50196 0.87451 0.3267 0.2045 6.04E+02 693 1.00000 0.50196 1.00000 0.2780 0.1697 7.18E+02 694 1.00000 0.62353 0.00000 0.5293 0.4244 66.81E+01 695 1.00000 0.62353 0.12549 0.5279 0.4229 66.76E+01 696 1.00000 0.62353 0.25098 0.5224 0.4176 66.91E+01 697 1.00000 0.62353 0.37647 0.5067 0.4020 66.79E+01 698 1.00000 0.62353 0.50196 0.4767 0.3721 67.28E+01 699 1.00000 0.62353 0.62353 0.4318 0.3275 67.78E+01 700 1.00000 0.62353 0.74902 0.3790 0.2805 71.14E+01 701 1.00000 0.62353 0.87451 0.3275 0.2350 7.65E+02 702 1.00000 0.62353 1.00000 0.2855 0.1977 8.59E+02 703 1.00000 0.74902 0.00000 0.4831 0.4588 9.63E+02 704 1.00000 0.74902 0.12549 0.4822 0.4579 9.63E+02 705 1.00000 0.74902 0.25098 0.4791 0.4536 9.64E+02 706 1.00000 0.74902 0.37647 0.4683 0.4408 9.60E+02 707 1.00000 0.74902 0.50196 0.4477 0.4146 9.64E+02 708 1.00000 0.74902 0.62353 0.4144 0.3751 9.73E+02 709 1.00000 0.74902 0.74902 0.3692 0.3267 10.70E+02 710 1.00000 0.74902 0.87451 0.3280 0.2813 11.40E+02 711 1.00000 0.74902 1.00000 0.2962 0.2454 12.08E+02 712 1.00000 0.87451 0.00000 0.4490 0.4844 13.83E+02 713 1.00000 0.87451 0.12549 0.4486 0.4839 13.83E+02 714 1.00000 0.87451 0.25098 0.4441 0.4820 13.83E+02 715 1.00000 0.87451 0.37647 0.4365 0.4720 13.82E+02 716 1.00000 0.87451 0.50196 0.4222 0.4511 13.88E+02 717 1.00000 0.87451 0.62353 0.3986 0.4175 13.94E+02 718 1.00000 0.87451 0.74902 0.3645 0.3707 14.89E+02 719 1.00000 0.87451 0.87451 0.3286 0.3304 20.67E+02 720 1.00000 0.87451 1.00000 0.3071 0.3001 21.61E+02 721 1.00000 1.00000 0.00000 0.4233 0.5048 22.47E+02 722 1.00000 1.00000 0.12549 0.4230 0.5046 22.44E+02 723 1.00000 1.00000 0.25098 0.4220 0.5018 22.13E+02 724 1.00000 1.00000 0.37647 0.4182 0.4929 20.96E+02 725 1.00000 1.00000 0.50196 0.4080 0.4751 19.34E+02 726 1.00000 1.00000 0.62353 0.3884 0.4455 18.43E+02 727 1.00000 1.00000 0.74902 0.3613 0.4026 19.41E+02 728 1.00000 1.00000 0.87451 0.3306 0.3571 25.24E+02 729 1.00000 1.00000 1.00000 0.3126 0.3292 32.98E+02 730 1.00000 1.00000 1.00000 0.3126 0.3291 33.00E+02 731 0.87451 1.00000 1.00000 0.2949 0.3253 24.31E+02 732 0.74902 1.00000 1.00000 0.2704 0.3196 18.72E+02 733 0.62353 1.00000 1.00000 0.2593 0.3207 18.35E+02 734 0.50196 1.00000 1.00000 0.2528 0.3226 18.27E+02 735 0.37647 1.00000 1.00000 0.2486 0.3224 18.04E+02 736 0.25098 1.00000 1.00000 0.2472 0.3231 18.04E+02 737 0.12549 1.00000 1.00000 0.2469 0.3231 18.02E+02 738 0.00000 1.00000 1.00000 0.2467 0.3231 18.02E+02 739 1.00000 0.87451 0.87451 0.3287 0.3300 20.52E+02 740 0.87451 0.87451 0.87451 0.3110 0.3289 18.57E+02 741 0.74902 0.87451 0.87451 0.2816 0.3215 13.05E+02 742 0.62353 0.87451 0.87451 0.2666 0.3247 12.73E+02 743 0.50196 0.87451 0.87451 0.2569 0.3264 12.63E+02 744 0.37647 0.87451 0.87451 0.2519 0.3277 12.54E+02 745 0.25098 0.87451 0.87451 0.2493 0.3269 12.48E+02 746 0.12549 0.87451 0.87451 0.2488 0.3272 12.48E+02 747 0.00000 0.87451 0.87451 0.2487 0.3271 12.47E+02 748 1.00000 0.74902 0.74902 0.3691 0.3264 10.62E+02 749 0.87451 0.74902 0.74902 0.3390 0.3247 9.48E+02 750 0.74902 0.74902 0.74902 0.3039 0.3215 8.04E+02 751 0.62353 0.74902 0.74902 0.2801 0.3256 7.67E+02 752 0.50196 0.74902 0.74902 0.2642 0.3281 7.55E+02 753 0.37647 0.74902 0.74902 0.2559 0.3300 7.49E+02 754 0.25098 0.74902 0.74902 0.2518 0.3313 7.50E+02 755 0.12549 0.74902 0.74902 0.2507 0.3313 7.48E+02 756 0.00000 0.74902 0.74902 0.2507 0.3313 7.48E+02 757 1.00000 0.62353 0.62353 0.4322 0.3274 67.36E+01 758 0.87451 0.62353 0.62353 0.3931 0.3252 56.60E+01 759 0.74902 0.62353 0.62353 0.3437 0.3220 47.06E+01 760 0.62353 0.62353 0.62353 0.3043 0.3214 42.00E+01 761 0.50196 0.62353 0.62353 0.2767 0.3275 41.23E+01 762 0.37647 0.62353 0.62353 0.2614 0.3308 40.76E+01 763 0.25098 0.62353 0.62353 0.2543 0.3320 40.53E+01 764 0.12549 0.62353 0.62353 0.2523 0.3324 40.44E+01 765 0.00000 0.62353 0.62353 0.2521 0.3326 40.46E+01 766 1.00000 0.50196 0.50196 0.5048 0.3317 49.36E+01 767 0.87451 0.50196 0.50196 0.4659 0.3292 38.50E+01 768 0.74902 0.50196 0.50196 0.4079 0.3254 28.96E+01 769 0.62353 0.50196 0.50196 0.3517 0.3219 23.28E+01 770 0.50196 0.50196 0.50196 0.3024 0.3209 20.14E+01 771 0.37647 0.50196 0.50196 0.2722 0.3276 19.77E+01 772 0.25098 0.50196 0.50196 0.2576 0.3301 19.49E+01 773 0.12549 0.50196 0.50196 0.2537 0.3309 19.44E+01 774 0.00000 0.50196 0.50196 0.2531 0.3308 19.40E+01 775 1.00000 0.37647 0.37647 0.5734 0.3359 39.38E+01 776 0.87451 0.37647 0.37647 0.5454 0.3344 28.57E+01 777 0.74902 0.37647 0.37647 0.4946 0.3311 19.12E+01 778 0.62353 0.37647 0.37647 0.4319 0.3272 13.50E+01 779 0.50196 0.37647 0.37647 0.3602 0.3228 10.01E+01 780 0.37647 0.37647 0.37647 0.3009 0.3229 8.49E+01 781 0.25098 0.37647 0.37647 0.2685 0.3302 8.30E+01 782 0.12549 0.37647 0.37647 0.2594 0.3323 8.25E+01 783 0.00000 0.37647 0.37647 0.2582 0.3325 8.23E+01 784 1.00000 0.25098 0.25098 0.6192 0.3389 35.17E+01 785 0.87451 0.25098 0.25098 0.6061 0.3381 24.31E+01 786 0.74902 0.25098 0.25098 0.5780 0.3361 14.76E+01 787 0.62353 0.25098 0.25098 0.5326 0.3331 9.05E+01 788 0.50196 0.25098 0.25098 0.4602 0.3289 55.37E+00 789 0.37647 0.25098 0.25098 0.3702 0.3224 37.24E+00 790 0.25098 0.25098 0.25098 0.2977 0.3219 30.10E+00 791 0.12549 0.25098 0.25098 0.2736 0.3276 29.57E+00 792 0.00000 0.25098 0.25098 0.2696 0.3281 29.44E+00 793 1.00000 0.12549 0.12549 0.6361 0.3402 33.83E+01 794 0.87451 0.12549 0.12549 0.6303 0.3402 23.01E+01 795 0.74902 0.12549 0.12549 0.6160 0.3395 13.43E+01 796 0.62353 0.12549 0.12549 0.5899 0.3382 7.71E+01 797 0.50196 0.12549 0.12549 0.5390 0.3362 41.76E+00 798 0.37647 0.12549 0.12549 0.4515 0.3322 23.75E+00 799 0.25098 0.12549 0.12549 0.3524 0.3275 15.24E+00 800 0.12549 0.12549 0.12549 0.3046 0.3300 13.65E+00 801 0.00000 0.12549 0.12549 0.2970 0.3324 13.50E+00 802 1.00000 0.00000 0.00000 0.6405 0.3407 33.66E+01 803 0.87451 0.00000 0.00000 0.6365 0.3409 22.75E+01 804 0.74902 0.00000 0.00000 0.6263 0.3408 13.16E+01 805 0.62353 0.00000 0.00000 0.6061 0.3407 7.43E+01 806 0.50196 0.00000 0.00000 0.5664 0.3403 38.82E+00 807 0.37647 0.00000 0.00000 0.4881 0.3394 20.76E+00 808 0.25098 0.00000 0.00000 0.3857 0.3394 12.40E+00 809 0.12549 0.00000 0.00000 0.3278 0.3384 10.24E+00 810 0.00000 0.00000 0.00000 0.3182 0.3422 10.12E+00 811 1.00000 1.00000 1.00000 0.3126 0.3291 33.04E+02 812 0.87451 0.87451 1.00000 0.2885 0.2944 19.47E+02 813 0.74902 0.74902 1.00000 0.2410 0.2236 9.41E+02 814 0.62353 0.62353 1.00000 0.2053 0.1684 5.92E+02 815 0.50196 0.50196 1.00000 0.1773 0.1255 3.92E+02 816 0.37647 0.37647 1.00000 0.1599 0.0983 2.86E+02 817 0.25098 0.25098 1.00000 0.1507 0.0839 2.36E+02 818 0.12549 0.12549 1.00000 0.1481 0.0796 2.22E+02 819 0.00000 0.00000 1.00000 0.1475 0.0784 2.18E+02 820 1.00000 1.00000 0.87451 0.3306 0.3567 25.26E+02 821 0.87451 0.87451 0.87451 0.3111 0.3292 18.74E+02 822 0.74902 0.74902 0.87451 0.2669 0.2635 8.71E+02 823 0.62353 0.62353 0.87451 0.2265 0.2004 5.22E+02 824 0.50196 0.50196 0.87451 0.1903 0.1457 3.23E+02 825 0.37647 0.37647 0.87451 0.1662 0.1085 2.16E+02 826 0.25098 0.25098 0.87451 0.1530 0.0877 1.68E+02 827 0.12549 0.12549 0.87451 0.1492 0.0812 1.53E+02 828 0.00000 0.00000 0.87451 0.1484 0.0798 1.50E+02 829 1.00000 1.00000 0.74902 0.3613 0.4023 19.42E+02 830 0.87451 0.87451 0.74902 0.3400 0.3735 13.73E+02 831 0.74902 0.74902 0.74902 0.3043 0.3217 8.12E+02 832 0.62353 0.62353 0.74902 0.2605 0.2537 46.24E+01 833 0.50196 0.50196 0.74902 0.2145 0.1835 26.35E+01 834 0.37647 0.37647 0.74902 0.1791 0.1290 15.76E+01 835 0.25098 0.25098 0.74902 0.1579 0.0957 10.86E+01 836 0.12549 0.12549 0.74902 0.1513 0.0848 9.36E+01 837 0.00000 0.00000 0.74902 0.1499 0.0823 9.05E+01 838 1.00000 1.00000 0.62353 0.3884 0.4454 18.44E+02 839 0.87451 0.87451 0.62353 0.3726 0.4258 12.88E+02 840 0.74902 0.74902 0.62353 0.3440 0.3859 77.21E+01 841 0.62353 0.62353 0.62353 0.3043 0.3215 42.35E+01 842 0.50196 0.50196 0.62353 0.2521 0.2424 22.59E+01 843 0.37647 0.37647 0.62353 0.2023 0.1660 12.02E+01 844 0.25098 0.25098 0.62353 0.1681 0.1121 7.06E+01 845 0.12549 0.12549 0.62353 0.1564 0.0929 5.58E+01 846 0.00000 0.00000 0.62353 0.1539 0.0886 5.27E+01 847 1.00000 1.00000 0.50196 0.4080 0.4751 19.34E+02 848 0.87451 0.87451 0.50196 0.3961 0.4638 12.81E+02 849 0.74902 0.74902 0.50196 0.3774 0.4405 76.38E+01 850 0.62353 0.62353 0.50196 0.3497 0.3955 41.40E+01 851 0.50196 0.50196 0.50196 0.3023 0.3211 20.31E+01 852 0.37647 0.37647 0.50196 0.2417 0.2288 9.75E+01 853 0.25098 0.25098 0.50196 0.1885 0.1455 4.81E+01 854 0.12549 0.12549 0.50196 0.1671 0.1105 3.34E+01 855 0.00000 0.00000 0.50196 0.1627 0.1023 3.03E+01 856 1.00000 1.00000 0.37647 0.4183 0.4923 20.82E+02 857 0.87451 0.87451 0.37647 0.4134 0.4859 12.73E+02 858 0.74902 0.74902 0.37647 0.3997 0.4778 75.46E+01 859 0.62353 0.62353 0.37647 0.3851 0.4537 40.70E+01 860 0.50196 0.50196 0.37647 0.3545 0.4065 19.48E+01 861 0.37647 0.37647 0.37647 0.3005 0.3222 8.48E+01 862 0.25098 0.25098 0.37647 0.2305 0.2132 3.58E+01 863 0.12549 0.12549 0.37647 0.1929 0.1521 2.13E+01 864 0.00000 0.00000 0.37647 0.1839 0.1353 1.81E+01 865 1.00000 1.00000 0.25098 0.4221 0.5013 21.92E+02 866 0.87451 0.87451 0.25098 0.4206 0.4981 13.17E+02 867 0.74902 0.74902 0.25098 0.4118 0.4975 75.58E+01 868 0.62353 0.62353 0.25098 0.4056 0.4878 40.64E+01 869 0.50196 0.50196 0.25098 0.3910 0.4672 19.37E+01 870 0.37647 0.37647 0.25098 0.3588 0.4188 81.48E+00 871 0.25098 0.25098 0.25098 0.2973 0.3212 29.97E+00 872 0.12549 0.12549 0.25098 0.2457 0.2357 15.33E+00 873 0.00000 0.00000 0.25098 0.2312 0.2077 12.28E+00 874 1.00000 1.00000 0.12549 0.4232 0.5040 22.22E+02 875 0.87451 0.87451 0.12549 0.4226 0.5023 13.36E+02 876 0.74902 0.74902 0.12549 0.4158 0.5043 75.45E+01 877 0.62353 0.62353 0.12549 0.4129 0.5001 40.56E+01 878 0.50196 0.50196 0.12549 0.4057 0.4912 19.30E+01 879 0.37647 0.37647 0.12549 0.3875 0.4677 81.23E+00 880 0.25098 0.25098 0.12549 0.3493 0.4066 28.43E+00 881 0.12549 0.12549 0.12549 0.3046 0.3301 13.58E+00 882 0.00000 0.00000 0.12549 0.2899 0.2981 10.49E+00 883 1.00000 1.00000 0.00000 0.4235 0.5046 22.25E+02 884 0.87451 0.87451 0.00000 0.4234 0.5034 13.34E+02 885 0.74902 0.74902 0.00000 0.4168 0.5060 75.46E+01 886 0.62353 0.62353 0.00000 0.4149 0.5032 40.53E+01 887 0.50196 0.50196 0.00000 0.4092 0.4974 19.28E+01 888 0.37647 0.37647 0.00000 0.3958 0.4811 80.68E+00 889 0.25098 0.25098 0.00000 0.3666 0.4355 28.20E+00 890 0.12549 0.12549 0.00000 0.3301 0.3699 13.01E+00 891 0.00000 0.00000 0.00000 0.3177 0.3415 10.05E+00 892 1.00000 1.00000 1.00000 0.3125 0.3289 32.75E+02 893 1.00000 0.87451 1.00000 0.3072 0.2999 21.47E+02 894 1.00000 0.74902 1.00000 0.2963 0.2453 12.01E+02 895 1.00000 0.62353 1.00000 0.2858 0.1979 8.57E+02 896 1.00000 0.50196 1.00000 0.2781 0.1700 7.17E+02 897 1.00000 0.37647 1.00000 0.2755 0.1551 6.40E+02 898 1.00000 0.25098 1.00000 0.2748 0.1482 6.06E+02 899 1.00000 0.12549 1.00000 0.2743 0.1461 5.96E+02 900 1.00000 0.00000 1.00000 0.2742 0.1454 5.93E+02 901 0.87451 1.00000 0.87451 0.3151 0.3583 23.22E+02 902 0.87451 0.87451 0.87451 0.3111 0.3290 18.59E+02 903 0.87451 0.74902 0.87451 0.3006 0.2761 10.26E+02 904 0.87451 0.62353 0.87451 0.2929 0.2235 6.54E+02 905 0.87451 0.50196 0.87451 0.2814 0.1841 5.05E+02 906 0.87451 0.37647 0.87451 0.2789 0.1621 4.29E+02 907 0.87451 0.25098 0.87451 0.2774 0.1513 3.96E+02 908 0.87451 0.12549 0.87451 0.2769 0.1478 3.86E+02 909 0.87451 0.00000 0.87451 0.2765 0.1472 3.84E+02 910 0.74902 1.00000 0.74902 0.3196 0.4150 16.98E+02 911 0.74902 0.87451 0.74902 0.3138 0.3782 12.38E+02 912 0.74902 0.74902 0.74902 0.3044 0.3215 8.07E+02 913 0.74902 0.62353 0.74902 0.2953 0.2614 50.65E+01 914 0.74902 0.50196 0.74902 0.2879 0.2110 34.70E+01 915 0.74902 0.37647 0.74902 0.2830 0.1759 25.98E+01 916 0.74902 0.25098 0.74902 0.2801 0.1566 22.10E+01 917 0.74902 0.12549 0.74902 0.2793 0.1505 20.88E+01 918 0.74902 0.00000 0.74902 0.2791 0.1491 20.63E+01 919 0.62353 1.00000 0.62353 0.3295 0.4712 16.26E+02 920 0.62353 0.87451 0.62353 0.3246 0.4425 11.63E+02 921 0.62353 0.74902 0.62353 0.3161 0.3916 72.42E+01 922 0.62353 0.62353 0.62353 0.3044 0.3218 42.32E+01 923 0.62353 0.50196 0.62353 0.2939 0.2530 25.50E+01 924 0.62353 0.37647 0.62353 0.2860 0.1991 16.85E+01 925 0.62353 0.25098 0.62353 0.2815 0.1663 12.86E+01 926 0.62353 0.12549 0.62353 0.2799 0.1551 11.64E+01 927 0.62353 0.00000 0.62353 0.2795 0.1526 11.40E+01 928 0.50196 1.00000 0.50196 0.3361 0.5140 15.92E+02 929 0.50196 0.87451 0.50196 0.3327 0.4965 11.28E+02 930 0.50196 0.74902 0.50196 0.3269 0.4615 69.10E+01 931 0.50196 0.62353 0.50196 0.3171 0.4041 38.75E+01 932 0.50196 0.50196 0.50196 0.3026 0.3213 20.27E+01 933 0.50196 0.37647 0.50196 0.2895 0.2409 11.22E+01 934 0.50196 0.25098 0.50196 0.2811 0.1848 7.25E+01 935 0.50196 0.12549 0.50196 0.2778 0.1633 6.05E+01 936 0.50196 0.00000 0.50196 0.2771 0.1585 5.80E+01 937 0.37647 1.00000 0.37647 0.3407 0.5415 15.67E+02 938 0.37647 0.87451 0.37647 0.3393 0.5325 11.05E+02 939 0.37647 0.74902 0.37647 0.3358 0.5140 66.51E+01 940 0.37647 0.62353 0.37647 0.3297 0.4798 36.73E+01 941 0.37647 0.50196 0.37647 0.3182 0.4178 18.37E+01 942 0.37647 0.37647 0.37647 0.3009 0.3232 8.57E+01 943 0.37647 0.25098 0.37647 0.2848 0.2293 4.30E+01 944 0.37647 0.12549 0.37647 0.2779 0.1875 31.09E+00 945 0.37647 0.00000 0.37647 0.2762 0.1769 28.46E+00 946 0.25098 1.00000 0.25098 0.3434 0.5554 15.69E+02 947 0.25098 0.87451 0.25098 0.3425 0.5522 11.06E+02 948 0.25098 0.74902 0.25098 0.3412 0.5446 66.03E+01 949 0.25098 0.62353 0.25098 0.3384 0.5296 35.99E+01 950 0.25098 0.50196 0.25098 0.3322 0.4980 17.48E+01 951 0.25098 0.37647 0.25098 0.3192 0.4337 76.55E+00 952 0.25098 0.25098 0.25098 0.2974 0.3216 30.34E+00 953 0.25098 0.12549 0.25098 0.2831 0.2440 17.20E+00 954 0.25098 0.00000 0.25098 0.2794 0.2229 14.65E+00 955 0.12549 1.00000 0.12549 0.3442 0.5600 15.67E+02 956 0.12549 0.87451 0.12549 0.3443 0.5585 11.03E+02 957 0.12549 0.74902 0.12549 0.3435 0.5552 65.72E+01 958 0.12549 0.62353 0.12549 0.3425 0.5483 35.62E+01 959 0.12549 0.50196 0.12549 0.3400 0.5329 17.15E+01 960 0.12549 0.37647 0.12549 0.3332 0.4975 73.69E+00 961 0.12549 0.25098 0.12549 0.3198 0.4172 27.44E+00 962 0.12549 0.12549 0.12549 0.3050 0.3306 13.69E+00 963 0.12549 0.00000 0.12549 0.2986 0.2961 10.71E+00 964 0.00000 1.00000 0.00000 0.3447 0.5611 15.66E+02 965 0.00000 0.87451 0.00000 0.3442 0.5602 11.02E+02 966 0.00000 0.74902 0.00000 0.3442 0.5578 65.61E+01 967 0.00000 0.62353 0.00000 0.3439 0.5532 35.52E+01 968 0.00000 0.50196 0.00000 0.3425 0.5421 17.06E+01 969 0.00000 0.37647 0.00000 0.3386 0.5160 72.79E+00 970 0.00000 0.25098 0.00000 0.3312 0.4518 26.64E+00 971 0.00000 0.12549 0.00000 0.3214 0.3741 13.00E+00 972 0.00000 0.00000 0.00000 0.3179 0.3422 10.15E+00 973 0.00000 0.00000 0.00000 0.3176 0.3415 10.14E+00 974 0.12549 0.12549 0.12549 0.3043 0.3301 13.70E+00 975 0.25098 0.25098 0.25098 0.2973 0.3213 30.29E+00 976 0.37647 0.37647 0.37647 0.3005 0.3227 8.58E+01 977 0.50196 0.50196 0.50196 0.3023 0.3207 20.36E+01 978 0.62353 0.62353 0.62353 0.3042 0.3213 42.50E+01 979 0.74902 0.74902 0.74902 0.3040 0.3213 81.35E+01 980 0.87451 0.87451 0.87451 0.3109 0.3291 18.80E+02 981 1.00000 1.00000 1.00000 0.3125 0.3290 33.17E+02 982 0.00000 0.00000 0.00000 0.3174 0.3413 10.11E+00 983 0.12549 0.12549 0.12549 0.3045 0.3301 13.65E+00 984 0.25098 0.25098 0.25098 0.2973 0.3214 30.25E+00 985 0.37647 0.37647 0.37647 0.3008 0.3227 8.57E+01 986 0.50196 0.50196 0.50196 0.3022 0.3208 20.36E+01 987 0.62353 0.62353 0.62353 0.3042 0.3214 42.52E+01 988 0.74902 0.74902 0.74902 0.3040 0.3213 81.30E+01 989 0.87451 0.87451 0.87451 0.3110 0.3288 18.63E+02 990 1.00000 1.00000 1.00000 0.3126 0.3287 32.88E+02 991 0.00000 0.00000 0.00000 0.3174 0.3415 10.08E+00 992 0.12549 0.12549 0.12549 0.3046 0.3296 13.57E+00 993 0.25098 0.25098 0.25098 0.2973 0.3208 29.95E+00 994 0.37647 0.37647 0.37647 0.3004 0.3220 84.57E+00 995 0.50196 0.50196 0.50196 0.3022 0.3203 20.13E+01 996 0.62353 0.62353 0.62353 0.3042 0.3211 42.08E+01 997 0.74902 0.74902 0.74902 0.3040 0.3210 80.45E+01 998 0.87451 0.87451 0.87451 0.3109 0.3289 18.62E+02 999 1.00000 1.00000 1.00000 0.3126 0.3287 32.85E+02 1000 0.00000 0.00000 0.00000 0.3181 0.3418 10.07E+00 1001 0.12549 0.12549 0.12549 0.3044 0.3296 13.61E+00 1002 0.25098 0.25098 0.25098 0.2972 0.3213 30.06E+00 1003 0.37647 0.37647 0.37647 0.3003 0.3221 84.65E+00 1004 0.50196 0.50196 0.50196 0.3021 0.3204 20.14E+01 1005 0.62353 0.62353 0.62353 0.3042 0.3210 42.04E+01 1006 0.74902 0.74902 0.74902 0.3040 0.3209 80.44E+01 1007 0.87451 0.87451 0.87451 0.3109 0.3288 18.60E+02 1008 1.00000 1.00000 1.00000 0.3126 0.3287 32.83E+02 1009 0.00000 0.00000 0.00000 0.3171 0.3408 10.10E+00 1010 0.06667 0.06667 0.06667 0.3108 0.3348 11.13E+00 1011 0.13333 0.13333 0.13333 0.3042 0.3290 13.56E+00 1012 0.20000 0.20000 0.20000 0.3013 0.3261 19.87E+00 1013 0.26667 0.26667 0.26667 0.2990 0.3217 35.23E+00 1014 0.33333 0.33333 0.33333 0.2987 0.3193 60.64E+00 1015 0.40000 0.40000 0.40000 0.3013 0.3233 10.16E+01 1016 0.46667 0.46667 0.46667 0.3007 0.3193 16.10E+01 1017 0.53333 0.53333 0.53333 0.3020 0.3200 24.34E+01 1018 0.60000 0.60000 0.60000 0.3040 0.3201 35.97E+01 1019 0.66667 0.66667 0.66667 0.3046 0.3220 52.38E+01 1020 0.73333 0.73333 0.73333 0.3046 0.3216 71.64E+01 1021 0.80000 0.80000 0.80000 0.3074 0.3259 11.64E+02 1022 0.86667 0.86667 0.86667 0.3106 0.3280 17.77E+02 1023 0.93333 0.93333 0.93333 0.3123 0.3298 25.20E+02 1024 1.00000 1.00000 1.00000 0.3125 0.3288 32.79E+02 1025 0.00000 0.00000 0.00000 0.3175 0.3416 10.05E+00 1026 0.06667 0.06667 0.06667 0.3111 0.3357 11.08E+00 1027 0.13333 0.13333 0.13333 0.3041 0.3291 13.55E+00 1028 0.20000 0.20000 0.20000 0.3013 0.3261 19.86E+00 1029 0.26667 0.26667 0.26667 0.2990 0.3220 35.29E+00 1030 0.33333 0.33333 0.33333 0.2988 0.3196 60.62E+00 1031 0.40000 0.40000 0.40000 0.3014 0.3234 10.15E+01 1032 0.46667 0.46667 0.46667 0.3007 0.3196 16.11E+01 1033 0.53333 0.53333 0.53333 0.3021 0.3204 24.37E+01 1034 0.60000 0.60000 0.60000 0.3040 0.3204 36.01E+01 1035 0.66667 0.66667 0.66667 0.3047 0.3222 52.43E+01 1036 0.73333 0.73333 0.73333 0.3047 0.3218 71.71E+01 1037 0.80000 0.80000 0.80000 0.3077 0.3261 11.65E+02 1038 0.86667 0.86667 0.86667 0.3106 0.3281 17.77E+02 1039 0.93333 0.93333 0.93333 0.3123 0.3300 25.22E+02 1040 1.00000 1.00000 1.00000 0.3126 0.3290 32.83E+02 1041 0.00000 0.00000 0.00000 0.3180 0.3418 10.05E+00 1042 0.06667 0.06667 0.06667 0.3114 0.3369 11.12E+00 1043 0.13333 0.13333 0.13333 0.3043 0.3301 13.59E+00 1044 0.20000 0.20000 0.20000 0.3015 0.3268 19.94E+00 1045 0.26667 0.26667 0.26667 0.2991 0.3224 35.34E+00 1046 0.33333 0.33333 0.33333 0.2987 0.3198 60.86E+00 1047 0.40000 0.40000 0.40000 0.3013 0.3233 10.17E+01 1048 0.46667 0.46667 0.46667 0.3007 0.3197 16.16E+01 1049 0.53333 0.53333 0.53333 0.3022 0.3207 24.47E+01 1050 0.60000 0.60000 0.60000 0.3040 0.3206 36.15E+01 1051 0.66667 0.66667 0.66667 0.3047 0.3224 52.63E+01 1052 0.73333 0.73333 0.73333 0.3048 0.3220 72.02E+01 1053 0.80000 0.80000 0.80000 0.3077 0.3261 11.69E+02 1054 0.86667 0.86667 0.86667 0.3107 0.3282 17.83E+02 1055 0.93333 0.93333 0.93333 0.3123 0.3301 25.33E+02 1056 1.00000 1.00000 1.00000 0.3125 0.3291 33.08E+02 1057 0.00000 0.00000 0.00000 0.3179 0.3422 10.13E+00 1058 0.06667 0.06667 0.06667 0.3115 0.3362 11.16E+00 1059 0.13333 0.13333 0.13333 0.3045 0.3301 13.68E+00 1060 0.20000 0.20000 0.20000 0.3014 0.3268 20.05E+00 1061 0.26667 0.26667 0.26667 0.2992 0.3227 35.57E+00 1062 0.33333 0.33333 0.33333 0.2989 0.3201 61.14E+00 1063 0.40000 0.40000 0.40000 0.3016 0.3237 10.23E+01 1064 0.46667 0.46667 0.46667 0.3009 0.3200 16.24E+01 1065 0.53333 0.53333 0.53333 0.3023 0.3209 24.58E+01 1066 0.60000 0.60000 0.60000 0.3041 0.3207 36.29E+01 1067 0.66667 0.66667 0.66667 0.3048 0.3224 52.83E+01 1068 0.73333 0.73333 0.73333 0.3047 0.3220 72.27E+01 1069 0.80000 0.80000 0.80000 0.3079 0.3259 11.73E+02 1070 0.86667 0.86667 0.86667 0.3107 0.3284 17.91E+02 1071 0.93333 0.93333 0.93333 0.3123 0.3301 25.41E+02 1072 1.00000 1.00000 1.00000 0.3126 0.3291 33.07E+02 1073 0.00000 0.00000 0.00000 0.3177 0.3425 10.07E+00 1074 1.00000 1.00000 1.00000 0.3125 0.3291 33.08E+02 1075 1.00000 0.00000 0.00000 0.6404 0.3407 33.61E+01 1076 0.00000 1.00000 1.00000 0.2476 0.3239 18.25E+02 1077 1.00000 1.00000 0.00000 0.4233 0.5049 22.52E+02 1078 0.00000 0.00000 1.00000 0.1479 0.0790 2.20E+02 1079 0.00000 1.00000 0.00000 0.3445 0.5608 15.63E+02 1080 1.00000 0.00000 1.00000 0.2740 0.1454 5.97E+02 ] 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 ----------------- % % --- Eingabe (stack): L* a* b* % --- Ausgabe (stack): iR iG iB ; die Indizes des LUT-Wertes mit dem geringsten Delta-E bzgl. Eingabewert % ---- : delta-E ; und das Delta-E dazu % /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 dE dEneu ge { % test ob dEneu < dE /dE dEneu def /opt ii def } if } if } if } if } for /opt opt 3 idiv def 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 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 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 1000 mul put RGB0 j31 xyY0 j02 get 1000 mul put RGB0 j32 xyY0 j03 get 1000 mul put /i70 xchartl 7 mul def /i71 i70 1 add def /i72 i70 2 add def /i73 i70 3 add def nrgbxyY i70 xchartl put nrgbxyY i71 RGB0 j30 get 0.001 mul put nrgbxyY i72 RGB0 j31 get 0.001 mul put nrgbxyY i73 RGB0 j32 get 0.001 mul 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 and {(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 and {(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 and {(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 and {(00) show} if xi 10 ge xi 99 le and {(0) show} if xi cvishow } bind def %BEG aus LG31 /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 /LUT 10800 array def %1080*6 definiert /LAB*Fa0100 24 array def %start output /LAB*Fa1100 24 array def %linearized output /LAB*FaG0100 24 array def %start output/100 /LAB*FaG1100 24 array def %linearized output/100 /LAB*FaGA100 24 array def %either start- or linearized output/100 %********************************************************************* %BEG LG31_LECD display 0..40%_00_LUT.DAT /FileDataen (_LUT.DAT, 243 colours, 100101, Separation olv*, adapted) def /FileDatade (_LUT.DAT, 243 Farben, 100101, Separation olv*, adaptiert) def %include here JE060-7A0.TXT to JE060-7A7.TXT %END LG31_LECD display 0..40%_00_LUT.DAT %********************************************************************* /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 /LAB*ioLmod {%BEG Procedure LAB*ioLmod %requires ISRL*ioL=0,1,3 /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 /LAB* 84 array def %12x3=36 including N,W + 16x3=48 elementary system /LAB*a 84 array def 0 1 11 {/sISO exch def /i30 sISO 3 mul def /i31 i30 1 add def /i32 i30 2 add def sISO 7 le { %sISO=0,7 LAB*a i30 LAB*FaGA100 i30 get put %already adapted range 0..100 LAB*a i31 LAB*FaGA100 i31 get put LAB*a i32 LAB*FaGA100 i32 get put } %sISO=0,7 {%sISO=8,11 %Definition 8 to 11 /jISO sISO 8 sub def /j30 jISO 3 mul def /j31 j30 1 add def /j32 j30 2 add def LAB*a i30 RJGBLAB* j30 get put %already asumed as adapted LAB*a i31 RJGBLAB* j31 get put LAB*a i32 RJGBLAB* j32 get put } ifelse %sISO=0,7 and 8,11 } for /L*Nio LAB*a 18 get def %already adapted /A*Nio LAB*a 19 get def %already adapted, cero! /B*Nio LAB*a 20 get def %already adapted, cero! /L*Wio LAB*a 21 get def %already adapted /A*Wio LAB*a 22 get def %already adapted, cero! /B*Wio LAB*a 23 get def %already adapted, cero! /A*Dio A*Wio A*Nio sub def %cero /B*Dio B*Wio B*Nio sub def %cero /cf1 1 def /cLAB*s0 3 array def %C cyan blue /vLAB*s0 3 array def %V violet blue /mLAB*s0 3 array def %M magenta red /oLAB*s0 3 array def %O orange red /yLAB*s0 3 array def %Y yellow /lLAB*s0 3 array def %L leaf green /nLAB*s0 3 array def %N black /wLAB*s0 3 array def %W white /rLAB*s0 3 array def %R elementary red /jLAB*s0 3 array def %J elementary yellow /gLAB*s0 3 array def %G elementary green /bLAB*s0 3 array def %B elementary blue %Determine Matrix data input or output data oLAB*s0 0 LAB*a 0 get L*Nio sub put oLAB*s0 1 LAB*a 1 get put oLAB*s0 2 LAB*a 2 get put yLAB*s0 0 LAB*a 3 get L*Nio sub put yLAB*s0 1 LAB*a 4 get put yLAB*s0 2 LAB*a 5 get put lLAB*s0 0 LAB*a 6 get L*Nio sub put lLAB*s0 1 LAB*a 7 get put lLAB*s0 2 LAB*a 8 get put cLAB*s0 0 LAB*a 9 get L*Nio sub put cLAB*s0 1 LAB*a 10 get put cLAB*s0 2 LAB*a 11 get put vLAB*s0 0 LAB*a 12 get L*Nio sub put vLAB*s0 1 LAB*a 13 get put vLAB*s0 2 LAB*a 14 get put mLAB*s0 0 LAB*a 15 get L*Nio sub put mLAB*s0 1 LAB*a 16 get put mLAB*s0 2 LAB*a 17 get put nLAB*s0 0 LAB*a 18 get L*Nio sub put nLAB*s0 1 LAB*a 19 get put nLAB*s0 2 LAB*a 20 get put wLAB*s0 0 LAB*a 21 get L*Nio sub put wLAB*s0 1 LAB*a 22 get put wLAB*s0 2 LAB*a 23 get put rLAB*s0 0 LAB*a 24 get L*Nio sub put rLAB*s0 1 LAB*a 25 get put rLAB*s0 2 LAB*a 26 get put jLAB*s0 0 LAB*a 27 get L*Nio sub put jLAB*s0 1 LAB*a 28 get put jLAB*s0 2 LAB*a 29 get put gLAB*s0 0 LAB*a 30 get L*Nio sub put gLAB*s0 1 LAB*a 31 get put gLAB*s0 2 LAB*a 32 get put bLAB*s0 0 LAB*a 33 get L*Nio sub put bLAB*s0 1 LAB*a 34 get put bLAB*s0 2 LAB*a 35 get put % Determine the input or output angle in the A* B* plane % of each of the colours defined above /C*Ang cLAB*s0 2 get cLAB*s0 1 get 0.0001 add atan def /V*Ang vLAB*s0 2 get vLAB*s0 1 get 0.0001 add atan def /M*Ang mLAB*s0 2 get mLAB*s0 1 get 0.0001 add atan def /O*Ang oLAB*s0 2 get oLAB*s0 1 get 0.0001 add atan def /Y*Ang yLAB*s0 2 get yLAB*s0 1 get 0.0001 add atan def /L*Ang lLAB*s0 2 get mLAB*s0 1 get 0.0001 add atan def /N*Ang 0 def /W*Ang 0 def /R*Ang rLAB*s0 2 get rLAB*s0 1 get 0.0001 add atan def /J*Ang jLAB*s0 2 get jLAB*s0 1 get 0.0001 add atan def /G*Ang gLAB*s0 2 get gLAB*s0 1 get 0.0001 add atan def /B*Ang bLAB*s0 2 get bLAB*s0 1 get 0.0001 add atan def } def %END Procedure LAB*ioLmod %*********************************************************** /proc_LAB*Fa_LAB*MaNTABl_olvi3*cmyn3*Ma*ioL { %BEG procedure proc_LAB*Fa_LAB*MaNTABl_olvi3*cmyn3*Ma*ioL %only for calculation without hue tables %input LAB*Fa %input LAB*a (6 adapted colours OYLCVM) %input nLAB*s0 (colour white N for calculation of lab*l) %input wLAB*s0 (colour white W for achromatic axis) %output LAB*Ma %output olvi3*Ma %output cmyn3*Ma /UXF1a wLAB*s0 1 get B*Fa mul wLAB*s0 2 get A*Fa mul sub def /UXF2a wLAB*s0 2 get L*Fa mul wLAB*s0 0 get B*Fa mul sub def /UXF3a wLAB*s0 0 get A*Fa mul wLAB*s0 1 get L*Fa mul sub def /T1 0 def /T2 0 def 0 1 5 {/ia exch def /ia30 ia 3 mul def ia 5 eq {/ia31 0 def} {/ia31 ia30 3 add def} ifelse /T1 LAB*a ia30 get UXF1a mul LAB*a ia30 1 add get UXF2a mul add LAB*a ia30 2 add get UXF3a mul add def /T2 LAB*a ia31 get UXF1a mul LAB*a ia31 1 add get UXF2a mul add LAB*a ia31 2 add get UXF3a mul add def T1 0 le {/T1X (N) def} {/T1X (P) def} ifelse T2 0 gt {/T2X (P) def} {/T2X (N) def} ifelse T1 0 le T2 0 gt and {/ia3END ia30 def exit} if } for /L*11a LAB*a ia3END get def /A*11a LAB*a ia3END 1 add get def /B*11a LAB*a ia3END 2 add get def ia3END 15 ge {/ia3END -3 def} if /L*21a LAB*a ia3END 3 add get def /A*21a LAB*a ia3END 4 add get def /B*21a LAB*a ia3END 5 add get def /NENNER L*21a L*11a sub UXF1a mul A*21a A*11a sub UXF2a mul add B*21a B*11a sub UXF3a mul add def /ZAEHLE L*21a UXF1a mul A*21a UXF2a mul add B*21a UXF3a mul add def NENNER 0 ne {/ALPH ZAEHLE NENNER div def} {/ALPH 99999} ifelse /L*Ma ALPH L*11a mul 1 ALPH sub L*21a mul add def /A*Ma ALPH A*11a mul 1 ALPH sub A*21a mul add def /B*Ma ALPH B*11a mul 1 ALPH sub B*21a mul add def /C*Ma A*Ma dup mul B*Ma dup mul add 0.000001 add sqrt def /H*Ma B*Ma A*Ma 0.0001 add atan def /ia30 ia 3 mul def /iap 1 ALPH sub def /iam ALPH def ia 0 eq {/c3*Ma 0 def %L, c*=0, sector O->Y /m3*Ma iam def %L, m*=1->0 /y3*Ma 1 def %L, y*=1 } if ia 1 eq {/c3*Ma iap def %L, c*=0->1, sector Y->L /m3*Ma 0 def %L, m*=0 /y3*Ma 1 def %L, y*=1 } if ia 2 eq {/c3*Ma 1 def %L, c*=1, sector L->C /m3*Ma 0 def %L, m*=0 /y3*Ma iam def %L, y*=1->0 } if ia 3 eq {/c3*Ma 1 def %L, c*=1, sector C->V /m3*Ma iap def %L, m*=1->0 /y3*Ma 0 def %L, y*=0 } if ia 4 eq {/c3*Ma iam def %L, c*=1->0, sector V->M /m3*Ma 1 def %L, m*=1 /y3*Ma 0 def %L, y*=0 } if ia 5 eq {/c3*Ma 0 def %L, c*=0, sector M->O /m3*Ma 1 def %L, m*=1 /y3*Ma iap def %L, y*=0->1 } if /o3*Ma 1 c3*Ma sub def /l3*Ma 1 m3*Ma sub def /v3*Ma 1 y3*Ma sub def /i3*Ma 1 def /lab*nMa 0.00 def /lab*cMa 1.00 def /lab*wMa 0.00 def /lab*tMa 0.50 def /lab*hMa H*Ma 360 div def /lab*lMa L*Ma nLAB*s0 0 get sub wLAB*s0 0 get nLAB*s0 0 get sub 0.000001 add div def } bind def %END procedure proc_LAB*Fa_LAB*MaNTABl_olvi3*cmyn3*Ma*ioL %******************************************************************* /proc_LAB*Fae_LAB*MaeNTABl_olvi3*cmyn3*Ma*ioL { %BEG procedure proc_LAB*Fae_LAB*MaeNTABl_olvi3*cmyn3*Ma*ioL %only for calculation without hue tables %input LAB*Fae %input LAB*a (4 adapted colours RJGB, No. 8 to 11) %input nLAB*s0 (colour white N for calculation of lab*l) %input wLAB*s0 (colour white W for achromatic axis) %output LAB*Mae %output olvi3*Mae %output cmyn3*Mae /UXF1a wLAB*s0 1 get B*Fae mul wLAB*s0 2 get A*Fae mul sub def /UXF2a wLAB*s0 2 get L*Fae mul wLAB*s0 0 get B*Fae mul sub def /UXF3a wLAB*s0 0 get A*Fae mul wLAB*s0 1 get L*Fae mul sub def /T1 0 def /T2 0 def 0 1 5 {/ia exch def /ia30 ia 3 mul def ia 5 eq {/ia31 0 def} {/ia31 ia30 3 add def} ifelse /T1 LAB*a ia30 get UXF1a mul LAB*a ia30 1 add get UXF2a mul add LAB*a ia30 2 add get UXF3a mul add def /T2 LAB*a ia31 get UXF1a mul LAB*a ia31 1 add get UXF2a mul add LAB*a ia31 2 add get UXF3a mul add def T1 0 le {/T1X (N) def} {/T1X (P) def} ifelse T2 0 gt {/T2X (P) def} {/T2X (N) def} ifelse T1 0 le T2 0 gt and {/ia3END ia30 def exit} if } for /L*11a LAB*a ia3END get def /A*11a LAB*a ia3END 1 add get def /B*11a LAB*a ia3END 2 add get def ia3END 15 ge {/ia3END -3 def} if /L*21a LAB*a ia3END 3 add get def /A*21a LAB*a ia3END 4 add get def /B*21a LAB*a ia3END 5 add get def /NENNER L*21a L*11a sub UXF1a mul A*21a A*11a sub UXF2a mul add B*21a B*11a sub UXF3a mul add def /ZAEHLE L*21a UXF1a mul A*21a UXF2a mul add B*21a UXF3a mul add def NENNER 0 ne {/ALPH ZAEHLE NENNER div def} {/ALPH 99999} ifelse /L*Mae ALPH L*11a mul 1 ALPH sub L*21a mul add def /A*Mae ALPH A*11a mul 1 ALPH sub A*21a mul add def /B*Mae ALPH B*11a mul 1 ALPH sub B*21a mul add def /C*Mae A*Mae dup mul B*Mae dup mul add 0.000001 add sqrt def /H*Mae B*Mae A*Mae 0.0001 add atan def /ia30 ia 3 mul def /iap 1 ALPH sub def /iam ALPH def ia 0 eq {/c3*Mae 0 def %L, c*=0, sector O->Y /m3*Mae iam def %L, m*=1->0 /y3*Mae 1 def %L, y*=1 } if ia 1 eq {/c3*Mae iap def %L, c*=0->1, sector Y->L /m3*Mae 0 def %L, m*=0 /y3*Mae 1 def %L, y*=1 } if ia 2 eq {/c3*Mae 1 def %L, c*=1, sector L->C /m3*Mae 0 def %L, m*=0 /y3*Mae iam def %L, y*=1->0 } if ia 3 eq {/c3*Mae 1 def %L, c*=1, sector C->V /m3*Mae iap def %L, m*=1->0 /y3*Mae 0 def %L, y*=0 } if ia 4 eq {/c3*Mae iam def %L, c*=1->0, sector V->M /m3*Mae 1 def %L, m*=1 /y3*Mae 0 def %L, y*=0 } if ia 5 eq {/c3*Mae 0 def %L, c*=0, sector M->O /m3*Mae 1 def %L, m*=1 /y3*Mae iap def %L, y*=0->1 } if /o3*Mae 1 c3*Mae sub def /l3*Mae 1 m3*Mae sub def /v3*Mae 1 y3*Mae sub def /i3*Mae 1 def /lab*nMae 0.00 def /lab*cMae 1.00 def /lab*wMae 0.00 def /lab*tMae 0.50 def /lab*hMae H*Mae 360 div def /lab*lMae L*Mae nLAB*s0 0 get sub wLAB*s0 0 get nLAB*s0 0 get sub 0.000001 add div def } bind def %END procedure proc_LAB*Fae_LAB*MaeNTABl_olvi3*cmyn3*Ma*ioL %******************************************************************* %END aus LG31 %%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 0 def /lanind2 0 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 %BEG aus LG31 /cvi100show {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 and {(000) show} if xia 10 ge xia 99 le and {(00) show} if xia 100 ge xia 999 le and {(0) show} if % xia 1000 ge xia 9999 le and {() show} if xia cvishow ( ) show } bind def /LUTL* 247 array def %243+4=247 /LUTA* 247 array def /LUTB* 247 array def /LUTr* 247 array def /LUTg* 247 array def /LUTb* 247 array def /C*ab 247 array def /L* 247 array def /LUTl* 247 array def %243+4=247 /LUTc1* 247 array def /LUTc2* 247 array def /LUTt1* 247 array def /LUTt2* 247 array def /LUTc*rgb 247 array def /LUTt*rgb 247 array def /l1* 247 array def %243+4=247 /l2* 247 array def %l* not possible allread used olv* /c1* 247 array def /c2* 247 array def /t1* 247 array def /t2* 247 array def /c1*rgb 247 array def /c2*rgb 247 array def /t1*rgb 247 array def /t2*rgb 247 array def /ColNames [(O) (Y) (L) (C) (V) (M) (N) (W) (R) (J) (G) (B) (R) (R25J) (R50J) (R75J) (J) (J25G) (J50G) (J75G) (G) (G25B) (G50B) (G75B) (B) (B25R) (B50R) (B75R) (R) ] def /o3Ma [1 1 0 0 0 1 0 1 1 1 0 0 1 1.00 1.00 1.00 1 0.75 0.50 0.25 0 0.00 0.00 0.00 0 0.50 1.00 1.00 1] def /l3Ma [0 1 1 1 0 0 0 1 0 1 1 0 0 0.25 0.50 0.75 1 1.00 1.00 1.00 1 1.00 1.00 0.50 0 0.00 0.00 0.00 0] def /v3Ma [0 0 0 1 1 1 0 1 0 0 0 1 0 0.00 0.00 0.00 0 0.00 0.00 0.00 0 0.50 1.00 1.00 1 1.00 1.00 0.50 0] def /yd 340 def %y-Zeilenabstand %Spalten /S1 20 def /S2 450 def /S3 1550 def /S4 2650 def /S5 3750 def /S6 4650 def /S7 5350 def /S8 6400 def /S9 7200 def /S10 8000 def /S11 8800 def /S12 9600 def /yu1 4650 def /yu2 3800 4000 add def /nshow {300 /Times-ISOL1 FS show} bind def /kshow {300 /TimesI-ISOL1 FS show} bind def /bshow {300 /TimesB-ISOL1 FS show} bind def /jshow {300 /TimesBI-ISOL1 FS show} bind def /sshow {300 /Symbol FS show} bind def /ishow {220 /Times-ISOL1 FS -00 -50 rmoveto show 00 50 rmoveto} bind def /eshow {220 /Times-ISOL1 FS 0 100 rmoveto show 0 -100 rmoveto} bind def %72 90 translate %0.01 MM dup scale /L*olv 8 array def /A*olv 8 array def /B*olv 8 array def /C*olv 8 array def /H*olv 8 array def /N*olv 8 array def /o*olv 8 array def /l*olv 8 array def /v*olv 8 array def /L*rgb 8 array def /A*rgb 8 array def /B*rgb 8 array def /C*rgb 8 array def /H*rgb 8 array def /N*rgb 8 array def /o*rgb 8 array def /l*rgb 8 array def /v*rgb 8 array def /angle_olv 7 array def /angle_olvG01 7 array def /angle_olvG11 7 array def /angle_olvGA1 7 array def %either angle_olvG01 or angle_olvG11 /angle_rgb 7 array def /angle_olv [38 96 151 236 305 354 398] def %standard offset /angle_rgb [26 92 162 217 272 329 386] def %CIE-test colors /angle_olvi 28 array def %shift by 00,25,50,75% /angle_olvG01i 28 array def %shift by 00,25,50,75% /angle_olvG11i 28 array def %shift by 00,25,50,75% /angle_olvGA1i 28 array def %either angle_olvG01i or angle_olvG11i /angle_rgbi 28 array def %shift by 00,25,50,75% /xcolor xcolorx def /xchart xchartx def /k30j 8 array def /k30j [648 720 072 080 008 656 000 728] def % O1 Y1 L1 C1 V1 M1 N1 W1 %END aus LG31 %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 /LAB*Cja 1080 array def /LAB*Hja 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 %0 1 0 {/REFLECL exch def %beg REFLECL=0,0 /lut 2187 array def %729x3=2187 /lut1 1080 array def /lut2 1080 array def /lut3 1080 array def /luto1000 1080 array def /lutl1000 1080 array def /lutv1000 1080 array def /OLVhab08 8 array def /OLVhab08d 8 array def /x3D 0 def %0,1 output Faeit or Fae3D on page 2,3 /xtext 1 def %0,1 without/with text output 72 90 translate 0.01 MM dup scale gsave /xchartix xchartx def 00 1 07 {/xchartix exch def %beg xchartix=00,07 /xcharti xchartix 8 idiv 3 add def %range 3...10 /xcharts xchartix def %range 0...7 /FileTex (Fadin) def gsave 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 LAB*Cja j LAB*aja j get dup mul LAB*bja j get dup mul add 0.0001 add sqrt put LAB*Cja j get 0.02 le {%LAB*Cja<=0.02 achromatic LAB*Hja j 0 put } {%LAB*Cja>0.02 chromatic LAB*Hja j LAB*bja j get LAB*aja j get 0.0001 add atan put } ifelse } for %j=0,1079 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