%!PS-Adobe-3.0 EPSF-3.0 OG450-7N.EPS %%BoundingBox: 70 82 785 580 %START PDFDE011.EPS /pdfmark07 where {pop} {userdict /pdfmark07 /cleartomark load put} ifelse /languagelevel where {pop languagelevel} {1} ifelse 2 lt { userdict (<<) cvn ([) cvn load put userdict (>>) cvn (]) cvn load put} if [ /Title (PostScript pictures: http://130.149.60.45/~farbmetrik/OG45/) /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1) /Subject (goto: http://www.ps.bam.de or http://130.149.60.45/~farbmetrik) /Keywords (image reproduction, colour devices, colour vision) /Creator (klaus.richter@mac.com) /CreationDate (D:2011030112000) /ModDate (D:2011030112000) /DOCINFO pdfmark07 [ /View [ /FitB ] /DOCVIEW pdfmark07 %END PDFDE011 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def /str {8 string } bind def /languagelevel where {pop languagelevel} {1} ifelse /PSL12 exch def /dictende {counttomark 2 idiv dup dict begin {def} repeat pop currentdict end} bind def /Times-Roman findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /Times-ISOL1 exch definefont pop /Times-Italic findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /TimesI-ISOL1 exch definefont pop /Times-Bold findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /TimesB-ISOL1 exch definefont pop /Times-BoldItalic findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /TimesBI-ISOL1 exch definefont pop /TS {200 /Times-ISOL1 FS} bind def /TK {250 /Times-ISOL1 FS} bind def /TM {300 /Times-ISOL1 FS} bind def /TG {350 /Times-ISOL1 FS} bind def /TIS {200 /TimesI-ISOL1 FS} bind def /TIK {250 /TimesI-ISOL1 FS} bind def /TIM {300 /TimesI-ISOL1 FS} bind def /TIG {350 /TimesI-ISOL1 FS} bind def /TBS {200 /TimesB-ISOL1 FS} bind def /TBK {250 /TimesB-ISOL1 FS} bind def /TBM {300 /TimesB-ISOL1 FS} bind def /TBG {350 /TimesB-ISOL1 FS} bind def /TBIS {200 /TimesBI-ISOL1 FS} bind def /TBIK {250 /TimesBI-ISOL1 FS} bind def /TBIM {300 /TimesBI-ISOL1 FS} bind def /TBIG {350 /TimesBI-ISOL1 FS} bind def /FileDaten (LCD projector_2, no separation, D65) def /FileDatde (LCD\255Projektor 2, keine Separation, D65) def /xyYA 7560 array def %1080x7 /xyYA [ %produced with the settings of the LCD projector; full white used %FILE LMT_1080_100901_2.TXT %no. r g b x y Y. projector ACER XD1150. measurement 2 1 0.00000 0.00000 0.00000 0.3185 0.3431 10.72E+00 2 0.00000 0.00000 0.12549 0.2904 0.3001 11.14E+00 3 0.00000 0.00000 0.25098 0.2402 0.2221 15.08E+00 4 0.00000 0.00000 0.37647 0.1847 0.1362 18.67E+00 5 0.00000 0.00000 0.50196 0.1633 0.1031 3.12E+01 6 0.00000 0.00000 0.62353 0.1544 0.0890 5.38E+01 7 0.00000 0.00000 0.74902 0.1501 0.0826 9.20E+01 8 0.00000 0.00000 0.87451 0.1486 0.0798 1.52E+02 9 0.00000 0.00000 1.00000 0.1474 0.0785 2.21E+02 10 0.00000 0.12549 0.00000 0.3228 0.3746 13.58E+00 11 0.00000 0.12549 0.12549 0.2985 0.3337 14.13E+00 12 0.00000 0.12549 0.25098 0.2425 0.2390 15.91E+00 13 0.00000 0.12549 0.37647 0.1912 0.1528 21.75E+00 14 0.00000 0.12549 0.50196 0.1666 0.1111 3.42E+01 15 0.00000 0.12549 0.62353 0.1560 0.0933 5.68E+01 16 0.00000 0.12549 0.74902 0.1510 0.0849 9.50E+01 17 0.00000 0.12549 0.87451 0.1488 0.0812 1.55E+02 18 0.00000 0.12549 1.00000 0.1478 0.0796 2.24E+02 19 0.00000 0.25098 0.00000 0.3310 0.4498 27.30E+00 20 0.00000 0.25098 0.12549 0.3150 0.4177 27.95E+00 21 0.00000 0.25098 0.25098 0.2701 0.3279 30.27E+00 22 0.00000 0.25098 0.37647 0.2142 0.2148 36.08E+00 23 0.00000 0.25098 0.50196 0.1801 0.1456 4.85E+01 24 0.00000 0.25098 0.62353 0.1636 0.1121 7.11E+01 25 0.00000 0.25098 0.74902 0.1553 0.0955 10.92E+01 26 0.00000 0.25098 0.87451 0.1515 0.0874 1.69E+02 27 0.00000 0.25098 1.00000 0.1495 0.0837 2.38E+02 28 0.00000 0.37647 0.00000 0.3384 0.5145 73.70E+00 29 0.00000 0.37647 0.12549 0.3307 0.4971 74.45E+00 30 0.00000 0.37647 0.25098 0.3049 0.4385 76.71E+00 31 0.00000 0.37647 0.37647 0.2582 0.3324 8.42E+01 32 0.00000 0.37647 0.50196 0.2136 0.2308 9.66E+01 33 0.00000 0.37647 0.62353 0.1851 0.1659 11.93E+01 34 0.00000 0.37647 0.74902 0.1686 0.1283 15.71E+01 35 0.00000 0.37647 0.87451 0.1597 0.1080 2.17E+02 36 0.00000 0.37647 1.00000 0.1553 0.0976 2.86E+02 37 0.00000 0.50196 0.00000 0.3423 0.5412 17.19E+01 38 0.00000 0.50196 0.12549 0.3386 0.5329 17.25E+01 39 0.00000 0.50196 0.25098 0.3252 0.5006 17.47E+01 40 0.00000 0.50196 0.37647 0.2934 0.4260 18.19E+01 41 0.00000 0.50196 0.50196 0.2532 0.3305 19.78E+01 42 0.00000 0.50196 0.62353 0.2171 0.2451 22.06E+01 43 0.00000 0.50196 0.74902 0.1912 0.1836 25.90E+01 44 0.00000 0.50196 0.87451 0.1752 0.1447 3.18E+02 45 0.00000 0.50196 1.00000 0.1663 0.1248 3.88E+02 46 0.00000 0.62353 0.00000 0.3438 0.5527 35.71E+01 47 0.00000 0.62353 0.12549 0.3420 0.5482 35.80E+01 48 0.00000 0.62353 0.25098 0.3348 0.5312 36.06E+01 49 0.00000 0.62353 0.37647 0.3159 0.4855 36.75E+01 50 0.00000 0.62353 0.50196 0.2859 0.4133 38.37E+01 51 0.00000 0.62353 0.62353 0.2521 0.3321 41.22E+01 52 0.00000 0.62353 0.74902 0.2211 0.2574 45.17E+01 53 0.00000 0.62353 0.87451 0.1976 0.2012 5.13E+02 54 0.00000 0.62353 1.00000 0.1840 0.1679 5.82E+02 55 0.00000 0.74902 0.00000 0.3442 0.5576 66.08E+01 56 0.00000 0.74902 0.12549 0.3432 0.5553 66.27E+01 57 0.00000 0.74902 0.25098 0.3392 0.5455 66.38E+01 58 0.00000 0.74902 0.37647 0.3279 0.5179 67.09E+01 59 0.00000 0.74902 0.50196 0.3072 0.4681 68.75E+01 60 0.00000 0.74902 0.62353 0.2798 0.4017 71.64E+01 61 0.00000 0.74902 0.74902 0.2506 0.3307 76.51E+01 62 0.00000 0.74902 0.87451 0.2240 0.2657 8.27E+02 63 0.00000 0.74902 1.00000 0.2064 0.2228 8.97E+02 64 0.00000 0.87451 0.00000 0.3442 0.5596 11.12E+02 65 0.00000 0.87451 0.12549 0.3439 0.5582 11.12E+02 66 0.00000 0.87451 0.25098 0.3416 0.5528 11.15E+02 67 0.00000 0.87451 0.37647 0.3344 0.5356 11.21E+02 68 0.00000 0.87451 0.50196 0.3205 0.5018 11.38E+02 69 0.00000 0.87451 0.62353 0.3003 0.4518 11.66E+02 70 0.00000 0.87451 0.74902 0.2746 0.3902 12.12E+02 71 0.00000 0.87451 0.87451 0.2489 0.3270 12.80E+02 72 0.00000 0.87451 1.00000 0.2294 0.2795 13.52E+02 73 0.00000 1.00000 0.00000 0.3447 0.5610 15.82E+02 74 0.00000 1.00000 0.12549 0.3443 0.5600 15.81E+02 75 0.00000 1.00000 0.25098 0.3426 0.5560 15.84E+02 76 0.00000 1.00000 0.37647 0.3376 0.5434 15.89E+02 77 0.00000 1.00000 0.50196 0.3272 0.5186 16.07E+02 78 0.00000 1.00000 0.62353 0.3112 0.4788 16.34E+02 79 0.00000 1.00000 0.74902 0.2897 0.4268 16.84E+02 80 0.00000 1.00000 0.87451 0.2658 0.3689 17.58E+02 81 0.00000 1.00000 1.00000 0.2472 0.3232 18.48E+02 82 0.12549 0.00000 0.00000 0.3274 0.3390 10.85E+00 83 0.12549 0.00000 0.12549 0.2995 0.2982 11.31E+00 84 0.12549 0.00000 0.25098 0.2390 0.2105 13.15E+00 85 0.12549 0.00000 0.37647 0.1875 0.1362 18.88E+00 86 0.12549 0.00000 0.50196 0.1646 0.1030 3.14E+01 87 0.12549 0.00000 0.62353 0.1550 0.0891 5.42E+01 88 0.12549 0.00000 0.74902 0.1504 0.0825 9.26E+01 89 0.12549 0.00000 0.87451 0.1488 0.0794 1.52E+02 90 0.12549 0.00000 1.00000 0.1478 0.0783 2.22E+02 91 0.12549 0.12549 0.00000 0.3300 0.3701 13.76E+00 92 0.12549 0.12549 0.12549 0.3047 0.3303 14.32E+00 93 0.12549 0.12549 0.25098 0.2470 0.2379 16.16E+00 94 0.12549 0.12549 0.37647 0.1935 0.1523 21.97E+00 95 0.12549 0.12549 0.50196 0.1678 0.1111 3.45E+01 96 0.12549 0.12549 0.62353 0.1567 0.0934 5.73E+01 97 0.12549 0.12549 0.74902 0.1514 0.0848 9.55E+01 98 0.12549 0.12549 0.87451 0.1490 0.0813 1.56E+02 99 0.12549 0.12549 1.00000 0.1480 0.0793 2.25E+02 100 0.12549 0.25098 0.00000 0.3357 0.4466 27.59E+00 101 0.12549 0.25098 0.12549 0.3191 0.4143 28.20E+00 102 0.12549 0.25098 0.25098 0.2738 0.3266 30.51E+00 103 0.12549 0.25098 0.37647 0.2163 0.2142 36.31E+00 104 0.12549 0.25098 0.50196 0.1813 0.1453 4.88E+01 105 0.12549 0.25098 0.62353 0.1641 0.1120 7.17E+01 106 0.12549 0.25098 0.74902 0.1557 0.0954 11.00E+01 107 0.12549 0.25098 0.87451 0.1514 0.0873 1.70E+02 108 0.12549 0.25098 1.00000 0.1498 0.0834 2.39E+02 109 0.12549 0.37647 0.00000 0.3405 0.5129 74.14E+00 110 0.12549 0.37647 0.12549 0.3327 0.4956 74.90E+00 111 0.12549 0.37647 0.25098 0.3066 0.4371 77.08E+00 112 0.12549 0.37647 0.37647 0.2594 0.3313 8.48E+01 113 0.12549 0.37647 0.50196 0.2146 0.2304 9.72E+01 114 0.12549 0.37647 0.62353 0.1856 0.1656 12.01E+01 115 0.12549 0.37647 0.74902 0.1689 0.1282 15.82E+01 116 0.12549 0.37647 0.87451 0.1600 0.1077 2.18E+02 117 0.12549 0.37647 1.00000 0.1555 0.0976 2.88E+02 118 0.12549 0.50196 0.00000 0.3433 0.5408 17.31E+01 119 0.12549 0.50196 0.12549 0.3398 0.5322 17.37E+01 120 0.12549 0.50196 0.25098 0.3260 0.5001 17.61E+01 121 0.12549 0.50196 0.37647 0.2943 0.4255 18.33E+01 122 0.12549 0.50196 0.50196 0.2539 0.3303 19.91E+01 123 0.12549 0.50196 0.62353 0.2175 0.2449 22.23E+01 124 0.12549 0.50196 0.74902 0.1913 0.1834 26.07E+01 125 0.12549 0.50196 0.87451 0.1749 0.1452 3.22E+02 126 0.12549 0.50196 1.00000 0.1663 0.1248 3.91E+02 127 0.12549 0.62353 0.00000 0.3443 0.5524 35.97E+01 128 0.12549 0.62353 0.12549 0.3424 0.5480 36.04E+01 129 0.12549 0.62353 0.25098 0.3354 0.5310 36.28E+01 130 0.12549 0.62353 0.37647 0.3164 0.4854 36.96E+01 131 0.12549 0.62353 0.50196 0.2862 0.4132 38.58E+01 132 0.12549 0.62353 0.62353 0.2524 0.3321 41.48E+01 133 0.12549 0.62353 0.74902 0.2213 0.2575 45.43E+01 134 0.12549 0.62353 0.87451 0.1980 0.2008 5.14E+02 135 0.12549 0.62353 1.00000 0.1840 0.1679 5.84E+02 136 0.12549 0.74902 0.00000 0.3446 0.5576 66.42E+01 137 0.12549 0.74902 0.12549 0.3436 0.5552 66.46E+01 138 0.12549 0.74902 0.25098 0.3396 0.5455 66.71E+01 139 0.12549 0.74902 0.37647 0.3282 0.5179 67.31E+01 140 0.12549 0.74902 0.50196 0.3076 0.4683 68.96E+01 141 0.12549 0.74902 0.62353 0.2801 0.4018 71.82E+01 142 0.12549 0.74902 0.74902 0.2509 0.3308 76.75E+01 143 0.12549 0.74902 0.87451 0.2240 0.2657 8.28E+02 144 0.12549 0.74902 1.00000 0.2063 0.2227 8.99E+02 145 0.12549 0.87451 0.00000 0.3444 0.5597 11.15E+02 146 0.12549 0.87451 0.12549 0.3438 0.5586 11.16E+02 147 0.12549 0.87451 0.25098 0.3416 0.5526 11.18E+02 148 0.12549 0.87451 0.37647 0.3344 0.5355 11.24E+02 149 0.12549 0.87451 0.50196 0.3209 0.5018 11.40E+02 150 0.12549 0.87451 0.62353 0.3002 0.4518 11.68E+02 151 0.12549 0.87451 0.74902 0.2751 0.3904 12.15E+02 152 0.12549 0.87451 0.87451 0.2491 0.3272 12.82E+02 153 0.12549 0.87451 1.00000 0.2294 0.2795 13.55E+02 154 0.12549 1.00000 0.00000 0.3447 0.5609 15.85E+02 155 0.12549 1.00000 0.12549 0.3443 0.5600 15.86E+02 156 0.12549 1.00000 0.25098 0.3428 0.5558 15.89E+02 157 0.12549 1.00000 0.37647 0.3378 0.5433 15.94E+02 158 0.12549 1.00000 0.50196 0.3274 0.5184 16.10E+02 159 0.12549 1.00000 0.62353 0.3112 0.4791 16.38E+02 160 0.12549 1.00000 0.74902 0.2897 0.4269 16.87E+02 161 0.12549 1.00000 0.87451 0.2660 0.3689 17.61E+02 162 0.12549 1.00000 1.00000 0.2472 0.3230 18.50E+02 163 0.25098 0.00000 0.00000 0.3829 0.3404 13.06E+00 164 0.25098 0.00000 0.12549 0.3522 0.3064 13.52E+00 165 0.25098 0.00000 0.25098 0.2795 0.2248 15.30E+00 166 0.25098 0.00000 0.37647 0.2086 0.1457 21.04E+00 167 0.25098 0.00000 0.50196 0.1750 0.1081 3.36E+01 168 0.25098 0.00000 0.62353 0.1602 0.0917 5.64E+01 169 0.25098 0.00000 0.74902 0.1533 0.0840 9.49E+01 170 0.25098 0.00000 0.87451 0.1501 0.0810 1.56E+02 171 0.25098 0.00000 1.00000 0.1488 0.0788 2.24E+02 172 0.25098 0.12549 0.00000 0.3772 0.3631 15.74E+00 173 0.25098 0.12549 0.12549 0.3511 0.3289 15.98E+00 174 0.25098 0.12549 0.25098 0.2835 0.2459 17.85E+00 175 0.25098 0.12549 0.37647 0.2128 0.1589 23.70E+00 176 0.25098 0.12549 0.50196 0.1772 0.1148 3.62E+01 177 0.25098 0.12549 0.62353 0.1617 0.0952 5.90E+01 178 0.25098 0.12549 0.74902 0.1541 0.0859 9.74E+01 179 0.25098 0.12549 0.87451 0.1507 0.0818 1.58E+02 180 0.25098 0.12549 1.00000 0.1492 0.0797 2.27E+02 181 0.25098 0.25098 0.00000 0.3657 0.4353 29.41E+00 182 0.25098 0.25098 0.12549 0.3486 0.4062 29.63E+00 183 0.25098 0.25098 0.25098 0.2975 0.3221 31.16E+00 184 0.25098 0.25098 0.37647 0.2305 0.2135 36.91E+00 185 0.25098 0.25098 0.50196 0.1890 0.1458 4.95E+01 186 0.25098 0.25098 0.62353 0.1684 0.1123 7.23E+01 187 0.25098 0.25098 0.74902 0.1580 0.0956 11.07E+01 188 0.25098 0.25098 0.87451 0.1532 0.0871 1.70E+02 189 0.25098 0.25098 1.00000 0.1506 0.0837 2.40E+02 190 0.25098 0.37647 0.00000 0.3540 0.5055 75.95E+00 191 0.25098 0.37647 0.12549 0.3462 0.4892 76.27E+00 192 0.25098 0.37647 0.25098 0.3190 0.4329 77.83E+00 193 0.25098 0.37647 0.37647 0.2688 0.3301 8.56E+01 194 0.25098 0.37647 0.50196 0.2206 0.2304 9.80E+01 195 0.25098 0.37647 0.62353 0.1893 0.1658 12.07E+01 196 0.25098 0.37647 0.74902 0.1711 0.1283 15.88E+01 197 0.25098 0.37647 0.87451 0.1616 0.1079 2.19E+02 198 0.25098 0.37647 1.00000 0.1565 0.0975 2.88E+02 199 0.25098 0.50196 0.00000 0.3495 0.5367 17.49E+01 200 0.25098 0.50196 0.12549 0.3459 0.5286 17.53E+01 201 0.25098 0.50196 0.25098 0.3321 0.4976 17.71E+01 202 0.25098 0.50196 0.37647 0.2996 0.4239 18.41E+01 203 0.25098 0.50196 0.50196 0.2580 0.3298 20.01E+01 204 0.25098 0.50196 0.62353 0.2205 0.2452 22.36E+01 205 0.25098 0.50196 0.74902 0.1932 0.1834 26.15E+01 206 0.25098 0.50196 0.87451 0.1762 0.1451 3.22E+02 207 0.25098 0.50196 1.00000 0.1673 0.1245 3.90E+02 208 0.25098 0.62353 0.00000 0.3473 0.5504 36.23E+01 209 0.25098 0.62353 0.12549 0.3456 0.5461 36.25E+01 210 0.25098 0.62353 0.25098 0.3385 0.5294 36.46E+01 211 0.25098 0.62353 0.37647 0.3192 0.4842 37.07E+01 212 0.25098 0.62353 0.50196 0.2888 0.4125 38.73E+01 213 0.25098 0.62353 0.62353 0.2545 0.3319 41.64E+01 214 0.25098 0.62353 0.74902 0.2228 0.2574 45.57E+01 215 0.25098 0.62353 0.87451 0.1988 0.2008 5.15E+02 216 0.25098 0.62353 1.00000 0.1849 0.1682 5.86E+02 217 0.25098 0.74902 0.00000 0.3462 0.5565 66.62E+01 218 0.25098 0.74902 0.12549 0.3452 0.5541 66.67E+01 219 0.25098 0.74902 0.25098 0.3413 0.5446 66.87E+01 220 0.25098 0.74902 0.37647 0.3298 0.5172 67.44E+01 221 0.25098 0.74902 0.50196 0.3091 0.4677 69.14E+01 222 0.25098 0.74902 0.62353 0.2815 0.4015 71.97E+01 223 0.25098 0.74902 0.74902 0.2519 0.3305 76.89E+01 224 0.25098 0.74902 0.87451 0.2250 0.2657 8.30E+02 225 0.25098 0.74902 1.00000 0.2069 0.2227 9.01E+02 226 0.25098 0.87451 0.00000 0.3452 0.5593 11.18E+02 227 0.25098 0.87451 0.12549 0.3450 0.5578 11.19E+02 228 0.25098 0.87451 0.25098 0.3429 0.5517 11.20E+02 229 0.25098 0.87451 0.37647 0.3356 0.5347 11.25E+02 230 0.25098 0.87451 0.50196 0.3215 0.5013 11.43E+02 231 0.25098 0.87451 0.62353 0.3010 0.4516 11.72E+02 232 0.25098 0.87451 0.74902 0.2757 0.3900 12.18E+02 233 0.25098 0.87451 0.87451 0.2496 0.3271 12.86E+02 234 0.25098 0.87451 1.00000 0.2301 0.2793 13.57E+02 235 0.25098 1.00000 0.00000 0.3457 0.5601 15.88E+02 236 0.25098 1.00000 0.12549 0.3453 0.5595 15.88E+02 237 0.25098 1.00000 0.25098 0.3435 0.5556 15.90E+02 238 0.25098 1.00000 0.37647 0.3381 0.5431 15.95E+02 239 0.25098 1.00000 0.50196 0.3280 0.5183 16.12E+02 240 0.25098 1.00000 0.62353 0.3117 0.4787 16.40E+02 241 0.25098 1.00000 0.74902 0.2903 0.4268 16.91E+02 242 0.25098 1.00000 0.87451 0.2665 0.3688 17.63E+02 243 0.25098 1.00000 1.00000 0.2477 0.3231 18.52E+02 244 0.37647 0.00000 0.00000 0.4840 0.3401 21.38E+00 245 0.37647 0.00000 0.12549 0.4559 0.3182 21.89E+00 246 0.37647 0.00000 0.25098 0.3780 0.2568 23.56E+00 247 0.37647 0.00000 0.37647 0.2752 0.1772 29.12E+00 248 0.37647 0.00000 0.50196 0.2104 0.1261 4.17E+01 249 0.37647 0.00000 0.62353 0.1792 0.1015 6.45E+01 250 0.37647 0.00000 0.74902 0.1640 0.0896 10.28E+01 251 0.37647 0.00000 0.87451 0.1564 0.0836 1.62E+02 252 0.37647 0.00000 1.00000 0.1527 0.0814 2.34E+02 253 0.37647 0.12549 0.00000 0.4731 0.3560 24.24E+00 254 0.37647 0.12549 0.12549 0.4481 0.3327 24.47E+00 255 0.37647 0.12549 0.25098 0.3759 0.2711 26.17E+00 256 0.37647 0.12549 0.37647 0.2771 0.1879 31.84E+00 257 0.37647 0.12549 0.50196 0.2119 0.1321 4.44E+01 258 0.37647 0.12549 0.62353 0.1803 0.1048 6.72E+01 259 0.37647 0.12549 0.74902 0.1647 0.0915 10.55E+01 260 0.37647 0.12549 0.87451 0.1568 0.0853 1.66E+02 261 0.37647 0.12549 1.00000 0.1536 0.0818 2.36E+02 262 0.37647 0.25098 0.00000 0.4402 0.4093 37.53E+00 263 0.37647 0.25098 0.12549 0.4227 0.3880 37.76E+00 264 0.37647 0.25098 0.25098 0.3687 0.3221 38.27E+00 265 0.37647 0.25098 0.37647 0.2839 0.2286 43.79E+00 266 0.37647 0.25098 0.50196 0.2198 0.1575 5.64E+01 267 0.37647 0.25098 0.62353 0.1855 0.1196 7.93E+01 268 0.37647 0.25098 0.74902 0.1680 0.1000 11.76E+01 269 0.37647 0.25098 0.87451 0.1590 0.0904 1.78E+02 270 0.37647 0.25098 1.00000 0.1546 0.0857 2.49E+02 271 0.37647 0.37647 0.00000 0.3948 0.4813 83.58E+00 272 0.37647 0.37647 0.12549 0.3868 0.4677 83.90E+00 273 0.37647 0.37647 0.25098 0.3584 0.4192 84.14E+00 274 0.37647 0.37647 0.37647 0.3005 0.3226 8.75E+01 275 0.37647 0.37647 0.50196 0.2413 0.2288 10.02E+01 276 0.37647 0.37647 0.62353 0.2021 0.1658 12.29E+01 277 0.37647 0.37647 0.74902 0.1789 0.1287 16.10E+01 278 0.37647 0.37647 0.87451 0.1664 0.1080 2.20E+02 279 0.37647 0.37647 1.00000 0.1599 0.0979 2.91E+02 280 0.37647 0.50196 0.00000 0.3699 0.5229 18.35E+01 281 0.37647 0.50196 0.12549 0.3663 0.5154 18.39E+01 282 0.37647 0.50196 0.25098 0.3524 0.4869 18.42E+01 283 0.37647 0.50196 0.37647 0.3179 0.4175 18.73E+01 284 0.37647 0.50196 0.50196 0.2721 0.3273 20.33E+01 285 0.37647 0.50196 0.62353 0.2305 0.2445 22.67E+01 286 0.37647 0.50196 0.74902 0.2000 0.1840 26.52E+01 287 0.37647 0.50196 0.87451 0.1806 0.1456 3.25E+02 288 0.37647 0.50196 1.00000 0.1706 0.1248 3.95E+02 289 0.37647 0.62353 0.00000 0.3581 0.5427 37.09E+01 290 0.37647 0.62353 0.12549 0.3562 0.5386 37.12E+01 291 0.37647 0.62353 0.25098 0.3491 0.5226 37.16E+01 292 0.37647 0.62353 0.37647 0.3294 0.4795 37.39E+01 293 0.37647 0.62353 0.50196 0.2976 0.4097 39.06E+01 294 0.37647 0.62353 0.62353 0.2614 0.3305 41.96E+01 295 0.37647 0.62353 0.74902 0.2281 0.2572 45.92E+01 296 0.37647 0.62353 0.87451 0.2026 0.2014 5.19E+02 297 0.37647 0.62353 1.00000 0.1876 0.1679 5.89E+02 298 0.37647 0.74902 0.00000 0.3522 0.5520 67.44E+01 299 0.37647 0.74902 0.12549 0.3512 0.5497 67.49E+01 300 0.37647 0.74902 0.25098 0.3473 0.5404 67.53E+01 301 0.37647 0.74902 0.37647 0.3358 0.5139 67.70E+01 302 0.37647 0.74902 0.50196 0.3146 0.4653 69.42E+01 303 0.37647 0.74902 0.62353 0.2862 0.3999 72.27E+01 304 0.37647 0.74902 0.74902 0.2557 0.3299 77.11E+01 305 0.37647 0.74902 0.87451 0.2280 0.2654 8.31E+02 306 0.37647 0.74902 1.00000 0.2091 0.2221 9.03E+02 307 0.37647 0.87451 0.00000 0.3493 0.5562 11.24E+02 308 0.37647 0.87451 0.12549 0.3488 0.5550 11.25E+02 309 0.37647 0.87451 0.25098 0.3464 0.5496 11.25E+02 310 0.37647 0.87451 0.37647 0.3393 0.5327 11.24E+02 311 0.37647 0.87451 0.50196 0.3250 0.4998 11.44E+02 312 0.37647 0.87451 0.62353 0.3044 0.4503 11.73E+02 313 0.37647 0.87451 0.74902 0.2788 0.3897 12.20E+02 314 0.37647 0.87451 0.87451 0.2521 0.3275 12.90E+02 315 0.37647 0.87451 1.00000 0.2320 0.2792 13.61E+02 316 0.37647 1.00000 0.00000 0.3482 0.5583 15.94E+02 317 0.37647 1.00000 0.12549 0.3478 0.5575 15.95E+02 318 0.37647 1.00000 0.25098 0.3461 0.5536 15.95E+02 319 0.37647 1.00000 0.37647 0.3410 0.5416 15.96E+02 320 0.37647 1.00000 0.50196 0.3306 0.5168 16.15E+02 321 0.37647 1.00000 0.62353 0.3142 0.4777 16.42E+02 322 0.37647 1.00000 0.74902 0.2924 0.4259 16.91E+02 323 0.37647 1.00000 0.87451 0.2684 0.3688 17.66E+02 324 0.37647 1.00000 1.00000 0.2490 0.3224 18.54E+02 325 0.50196 0.00000 0.00000 0.5632 0.3403 39.45E+00 326 0.50196 0.00000 0.12549 0.5439 0.3280 39.95E+00 327 0.50196 0.00000 0.25098 0.4807 0.2879 41.69E+00 328 0.50196 0.00000 0.37647 0.3698 0.2180 47.04E+00 329 0.50196 0.00000 0.50196 0.2756 0.1579 5.91E+01 330 0.50196 0.00000 0.62353 0.2170 0.1207 8.20E+01 331 0.50196 0.00000 0.74902 0.1861 0.1009 12.04E+01 332 0.50196 0.00000 0.87451 0.1698 0.0910 1.81E+02 333 0.50196 0.00000 1.00000 0.1622 0.0859 2.51E+02 334 0.50196 0.12549 0.00000 0.5542 0.3492 42.24E+00 335 0.50196 0.12549 0.12549 0.5362 0.3362 42.50E+00 336 0.50196 0.12549 0.25098 0.4762 0.2961 44.23E+00 337 0.50196 0.12549 0.37647 0.3692 0.2251 49.57E+00 338 0.50196 0.12549 0.50196 0.2764 0.1628 6.17E+01 339 0.50196 0.12549 0.62353 0.2179 0.1235 8.44E+01 340 0.50196 0.12549 0.74902 0.1868 0.1026 12.28E+01 341 0.50196 0.12549 0.87451 0.1706 0.0918 1.83E+02 342 0.50196 0.12549 1.00000 0.1627 0.0865 2.53E+02 343 0.50196 0.25098 0.00000 0.5191 0.3842 55.76E+00 344 0.50196 0.25098 0.12549 0.5053 0.3716 55.97E+00 345 0.50196 0.25098 0.25098 0.4577 0.3282 56.50E+00 346 0.50196 0.25098 0.37647 0.3659 0.2543 61.79E+00 347 0.50196 0.25098 0.50196 0.2798 0.1842 7.39E+01 348 0.50196 0.25098 0.62353 0.2218 0.1369 9.67E+01 349 0.50196 0.25098 0.74902 0.1895 0.1108 13.52E+01 350 0.50196 0.25098 0.87451 0.1723 0.0968 1.95E+02 351 0.50196 0.25098 1.00000 0.1638 0.0902 2.66E+02 352 0.50196 0.37647 0.00000 0.4567 0.4478 10.08E+01 353 0.50196 0.37647 0.12549 0.4495 0.4382 10.11E+01 354 0.50196 0.37647 0.25098 0.4216 0.4021 10.13E+01 355 0.50196 0.37647 0.37647 0.3587 0.3222 10.25E+01 356 0.50196 0.37647 0.50196 0.2886 0.2402 11.43E+01 357 0.50196 0.37647 0.62353 0.2328 0.1759 13.72E+01 358 0.50196 0.37647 0.74902 0.1982 0.1360 17.53E+01 359 0.50196 0.37647 0.87451 0.1781 0.1131 2.35E+02 360 0.50196 0.37647 1.00000 0.1684 0.1014 3.06E+02 361 0.50196 0.50196 0.00000 0.4090 0.4977 19.79E+01 362 0.50196 0.50196 0.12549 0.4053 0.4917 19.85E+01 363 0.50196 0.50196 0.25098 0.3908 0.4676 19.91E+01 364 0.50196 0.50196 0.37647 0.3541 0.4070 20.02E+01 365 0.50196 0.50196 0.50196 0.3018 0.3206 20.66E+01 366 0.50196 0.50196 0.62353 0.2516 0.2418 22.99E+01 367 0.50196 0.50196 0.74902 0.2141 0.1830 26.83E+01 368 0.50196 0.50196 0.87451 0.1902 0.1451 3.28E+02 369 0.50196 0.50196 1.00000 0.1770 0.1249 3.98E+02 370 0.50196 0.62353 0.00000 0.3800 0.5279 38.57E+01 371 0.50196 0.62353 0.12549 0.3781 0.5242 38.60E+01 372 0.50196 0.62353 0.25098 0.3707 0.5098 38.67E+01 373 0.50196 0.62353 0.37647 0.3506 0.4700 38.74E+01 374 0.50196 0.62353 0.50196 0.3167 0.4035 39.46E+01 375 0.50196 0.62353 0.62353 0.2765 0.3271 42.30E+01 376 0.50196 0.62353 0.74902 0.2392 0.2555 46.22E+01 377 0.50196 0.62353 0.87451 0.2104 0.2008 5.23E+02 378 0.50196 0.62353 1.00000 0.1937 0.1679 5.93E+02 379 0.50196 0.74902 0.00000 0.3650 0.5431 68.90E+01 380 0.50196 0.74902 0.12549 0.3641 0.5410 68.92E+01 381 0.50196 0.74902 0.25098 0.3601 0.5322 68.98E+01 382 0.50196 0.74902 0.37647 0.3485 0.5073 69.21E+01 383 0.50196 0.74902 0.50196 0.3267 0.4610 70.22E+01 384 0.50196 0.74902 0.62353 0.2967 0.3970 72.73E+01 385 0.50196 0.74902 0.74902 0.2640 0.3280 77.45E+01 386 0.50196 0.74902 0.87451 0.2343 0.2644 8.35E+02 387 0.50196 0.74902 1.00000 0.2142 0.2218 9.06E+02 388 0.50196 0.87451 0.00000 0.3570 0.5506 11.38E+02 389 0.50196 0.87451 0.12549 0.3565 0.5494 11.39E+02 390 0.50196 0.87451 0.25098 0.3540 0.5442 11.39E+02 391 0.50196 0.87451 0.37647 0.3471 0.5281 11.38E+02 392 0.50196 0.87451 0.50196 0.3329 0.4961 11.46E+02 393 0.50196 0.87451 0.62353 0.3112 0.4476 11.75E+02 394 0.50196 0.87451 0.74902 0.2847 0.3876 12.24E+02 395 0.50196 0.87451 0.87451 0.2570 0.3265 12.97E+02 396 0.50196 0.87451 1.00000 0.2361 0.2789 13.69E+02 397 0.50196 1.00000 0.00000 0.3537 0.5544 16.10E+02 398 0.50196 1.00000 0.12549 0.3535 0.5536 16.10E+02 399 0.50196 1.00000 0.25098 0.3518 0.5500 16.12E+02 400 0.50196 1.00000 0.37647 0.3466 0.5381 16.10E+02 401 0.50196 1.00000 0.50196 0.3362 0.5140 16.19E+02 402 0.50196 1.00000 0.62353 0.3194 0.4756 16.47E+02 403 0.50196 1.00000 0.74902 0.2970 0.4242 16.95E+02 404 0.50196 1.00000 0.87451 0.2723 0.3674 17.70E+02 405 0.50196 1.00000 1.00000 0.2525 0.3217 18.59E+02 406 0.62353 0.00000 0.00000 0.6046 0.3404 7.50E+01 407 0.62353 0.00000 0.12549 0.5931 0.3339 7.55E+01 408 0.62353 0.00000 0.25098 0.5518 0.3102 7.73E+01 409 0.62353 0.00000 0.37647 0.4611 0.2577 8.24E+01 410 0.62353 0.00000 0.50196 0.3581 0.1982 9.43E+01 411 0.62353 0.00000 0.62353 0.2781 0.1516 11.57E+01 412 0.62353 0.00000 0.74902 0.2247 0.1208 15.43E+01 413 0.62353 0.00000 0.87451 0.1945 0.1035 2.14E+02 414 0.62353 0.00000 1.00000 0.1795 0.0949 2.85E+02 415 0.62353 0.12549 0.00000 0.5986 0.3451 7.79E+01 416 0.62353 0.12549 0.12549 0.5875 0.3385 7.83E+01 417 0.62353 0.12549 0.25098 0.5477 0.3147 8.01E+01 418 0.62353 0.12549 0.37647 0.4594 0.2623 8.53E+01 419 0.62353 0.12549 0.50196 0.3582 0.2016 9.71E+01 420 0.62353 0.12549 0.62353 0.2785 0.1543 11.86E+01 421 0.62353 0.12549 0.74902 0.2252 0.1225 15.71E+01 422 0.62353 0.12549 0.87451 0.1948 0.1046 2.17E+02 423 0.62353 0.12549 1.00000 0.1795 0.0957 2.88E+02 424 0.62353 0.25098 0.00000 0.5741 0.3664 9.17E+01 425 0.62353 0.25098 0.12549 0.5649 0.3592 9.18E+01 426 0.62353 0.25098 0.25098 0.5305 0.3329 9.23E+01 427 0.62353 0.25098 0.37647 0.4512 0.2800 9.75E+01 428 0.62353 0.25098 0.50196 0.3572 0.2169 10.95E+01 429 0.62353 0.25098 0.62353 0.2800 0.1654 13.12E+01 430 0.62353 0.25098 0.74902 0.2270 0.1297 16.96E+01 431 0.62353 0.25098 0.87451 0.1963 0.1091 2.29E+02 432 0.62353 0.25098 1.00000 0.1810 0.0987 3.00E+02 433 0.62353 0.37647 0.00000 0.5180 0.4141 13.67E+01 434 0.62353 0.37647 0.12549 0.5118 0.4078 13.69E+01 435 0.62353 0.37647 0.25098 0.4881 0.3841 13.73E+01 436 0.62353 0.37647 0.37647 0.4302 0.3269 13.82E+01 437 0.62353 0.37647 0.50196 0.3543 0.2592 15.01E+01 438 0.62353 0.37647 0.62353 0.2848 0.1981 17.18E+01 439 0.62353 0.37647 0.74902 0.2331 0.1525 20.99E+01 440 0.62353 0.37647 0.87451 0.2014 0.1247 2.70E+02 441 0.62353 0.37647 1.00000 0.1846 0.1095 3.40E+02 442 0.62353 0.50196 0.00000 0.4593 0.4649 23.33E+01 443 0.62353 0.50196 0.12549 0.4557 0.4604 23.37E+01 444 0.62353 0.50196 0.25098 0.4420 0.4422 23.42E+01 445 0.62353 0.50196 0.37647 0.4058 0.3949 23.53E+01 446 0.62353 0.50196 0.50196 0.3505 0.3215 23.88E+01 447 0.62353 0.50196 0.62353 0.2929 0.2522 26.00E+01 448 0.62353 0.50196 0.74902 0.2438 0.1931 29.85E+01 449 0.62353 0.50196 0.87451 0.2104 0.1531 3.58E+02 450 0.62353 0.50196 1.00000 0.1921 0.1310 4.29E+02 451 0.62353 0.62353 0.00000 0.4144 0.5039 41.72E+01 452 0.62353 0.62353 0.12549 0.4125 0.5008 41.77E+01 453 0.62353 0.62353 0.25098 0.4051 0.4886 41.84E+01 454 0.62353 0.62353 0.37647 0.3845 0.4545 41.88E+01 455 0.62353 0.62353 0.50196 0.3491 0.3954 42.23E+01 456 0.62353 0.62353 0.62353 0.3038 0.3212 43.17E+01 457 0.62353 0.62353 0.74902 0.2599 0.2533 47.17E+01 458 0.62353 0.62353 0.87451 0.2256 0.2001 5.32E+02 459 0.62353 0.62353 1.00000 0.2049 0.1679 6.03E+02 460 0.62353 0.74902 0.00000 0.3870 0.5275 72.31E+01 461 0.62353 0.74902 0.12549 0.3859 0.5256 72.36E+01 462 0.62353 0.74902 0.25098 0.3818 0.5178 72.51E+01 463 0.62353 0.74902 0.37647 0.3697 0.4954 72.81E+01 464 0.62353 0.74902 0.50196 0.3477 0.4526 73.20E+01 465 0.62353 0.74902 0.62353 0.3157 0.3911 73.91E+01 466 0.62353 0.74902 0.74902 0.2798 0.3256 79.10E+01 467 0.62353 0.74902 0.87451 0.2467 0.2640 8.52E+02 468 0.62353 0.74902 1.00000 0.2241 0.2220 9.24E+02 469 0.62353 0.87451 0.00000 0.3711 0.5405 11.74E+02 470 0.62353 0.87451 0.12549 0.3706 0.5398 11.74E+02 471 0.62353 0.87451 0.25098 0.3687 0.5344 11.74E+02 472 0.62353 0.87451 0.37647 0.3612 0.5193 11.73E+02 473 0.62353 0.87451 0.50196 0.3468 0.4890 11.76E+02 474 0.62353 0.87451 0.62353 0.3243 0.4424 11.87E+02 475 0.62353 0.87451 0.74902 0.2958 0.3841 12.35E+02 476 0.62353 0.87451 0.87451 0.2666 0.3248 13.11E+02 477 0.62353 0.87451 1.00000 0.2440 0.2781 13.85E+02 478 0.62353 1.00000 0.00000 0.3639 0.5471 16.48E+02 479 0.62353 1.00000 0.12549 0.3638 0.5463 16.47E+02 480 0.62353 1.00000 0.25098 0.3621 0.5425 16.48E+02 481 0.62353 1.00000 0.37647 0.3569 0.5313 16.48E+02 482 0.62353 1.00000 0.50196 0.3466 0.5083 16.53E+02 483 0.62353 1.00000 0.62353 0.3295 0.4711 16.60E+02 484 0.62353 1.00000 0.74902 0.3061 0.4213 17.11E+02 485 0.62353 1.00000 0.87451 0.2800 0.3655 17.86E+02 486 0.62353 1.00000 1.00000 0.2589 0.3203 18.74E+02 487 0.74902 0.00000 0.00000 0.6252 0.3405 13.29E+01 488 0.74902 0.00000 0.12549 0.6184 0.3366 13.33E+01 489 0.74902 0.00000 0.25098 0.5924 0.3224 13.51E+01 490 0.74902 0.00000 0.37647 0.5267 0.2863 13.99E+01 491 0.74902 0.00000 0.50196 0.4350 0.2355 15.23E+01 492 0.74902 0.00000 0.62353 0.3466 0.1864 17.34E+01 493 0.74902 0.00000 0.74902 0.2777 0.1482 20.97E+01 494 0.74902 0.00000 0.87451 0.2301 0.1223 2.70E+02 495 0.74902 0.00000 1.00000 0.2053 0.1082 3.40E+02 496 0.74902 0.12549 0.00000 0.6214 0.3432 13.57E+01 497 0.74902 0.12549 0.12549 0.6146 0.3392 13.60E+01 498 0.74902 0.12549 0.25098 0.5894 0.3248 13.77E+01 499 0.74902 0.12549 0.37647 0.5246 0.2887 14.26E+01 500 0.74902 0.12549 0.50196 0.4345 0.2376 15.47E+01 501 0.74902 0.12549 0.62353 0.3464 0.1881 17.59E+01 502 0.74902 0.12549 0.74902 0.2779 0.1495 21.22E+01 503 0.74902 0.12549 0.87451 0.2300 0.1234 2.73E+02 504 0.74902 0.12549 1.00000 0.2053 0.1089 3.42E+02 505 0.74902 0.25098 0.00000 0.6056 0.3557 14.92E+01 506 0.74902 0.25098 0.12549 0.5997 0.3516 14.94E+01 507 0.74902 0.25098 0.25098 0.5766 0.3359 15.00E+01 508 0.74902 0.25098 0.37647 0.5168 0.2999 15.48E+01 509 0.74902 0.25098 0.50196 0.4312 0.2480 16.71E+01 510 0.74902 0.25098 0.62353 0.3462 0.1966 18.84E+01 511 0.74902 0.25098 0.74902 0.2787 0.1557 22.46E+01 512 0.74902 0.25098 0.87451 0.2314 0.1271 2.84E+02 513 0.74902 0.25098 1.00000 0.2063 0.1121 3.55E+02 514 0.74902 0.37647 0.00000 0.5630 0.3892 19.39E+01 515 0.74902 0.37647 0.12549 0.5585 0.3853 19.40E+01 516 0.74902 0.37647 0.25098 0.5407 0.3702 19.43E+01 517 0.74902 0.37647 0.37647 0.4931 0.3307 19.50E+01 518 0.74902 0.37647 0.50196 0.4212 0.2775 20.72E+01 519 0.74902 0.37647 0.62353 0.3452 0.2217 22.85E+01 520 0.74902 0.37647 0.74902 0.2817 0.1750 26.44E+01 521 0.74902 0.37647 0.87451 0.2348 0.1411 3.25E+02 522 0.74902 0.37647 1.00000 0.2093 0.1221 3.95E+02 523 0.74902 0.50196 0.00000 0.5080 0.4335 29.10E+01 524 0.74902 0.50196 0.12549 0.5049 0.4303 29.15E+01 525 0.74902 0.50196 0.25098 0.4930 0.4176 29.20E+01 526 0.74902 0.50196 0.37647 0.4602 0.3828 29.27E+01 527 0.74902 0.50196 0.50196 0.4066 0.3250 29.66E+01 528 0.74902 0.50196 0.62353 0.3442 0.2652 31.77E+01 529 0.74902 0.50196 0.74902 0.2867 0.2101 35.41E+01 530 0.74902 0.50196 0.87451 0.2416 0.1673 4.14E+02 531 0.74902 0.50196 1.00000 0.2155 0.1420 4.85E+02 532 0.74902 0.62353 0.00000 0.4551 0.4760 47.41E+01 533 0.74902 0.62353 0.12549 0.4532 0.4736 47.45E+01 534 0.74902 0.62353 0.25098 0.4462 0.4639 47.51E+01 535 0.74902 0.62353 0.37647 0.4262 0.4364 47.45E+01 536 0.74902 0.62353 0.50196 0.3906 0.3874 47.89E+01 537 0.74902 0.62353 0.62353 0.3428 0.3218 48.44E+01 538 0.74902 0.62353 0.74902 0.2943 0.2608 51.91E+01 539 0.74902 0.62353 0.87451 0.2516 0.2081 5.79E+02 540 0.74902 0.62353 1.00000 0.2251 0.1746 6.50E+02 541 0.74902 0.74902 0.00000 0.4165 0.5067 77.76E+01 542 0.74902 0.74902 0.12549 0.4155 0.5051 77.80E+01 543 0.74902 0.74902 0.25098 0.4114 0.4983 77.86E+01 544 0.74902 0.74902 0.37647 0.3994 0.4785 77.70E+01 545 0.74902 0.74902 0.50196 0.3769 0.4404 77.93E+01 546 0.74902 0.74902 0.62353 0.3434 0.3856 78.80E+01 547 0.74902 0.74902 0.74902 0.3035 0.3208 82.70E+01 548 0.74902 0.74902 0.87451 0.2661 0.2628 8.87E+02 549 0.74902 0.74902 1.00000 0.2403 0.2229 9.59E+02 550 0.74902 0.87451 0.00000 0.3921 0.5258 12.23E+02 551 0.74902 0.87451 0.12549 0.3912 0.5251 12.24E+02 552 0.74902 0.87451 0.25098 0.3889 0.5202 12.24E+02 553 0.74902 0.87451 0.37647 0.3817 0.5064 12.22E+02 554 0.74902 0.87451 0.50196 0.3669 0.4788 12.28E+02 555 0.74902 0.87451 0.62353 0.3437 0.4354 12.34E+02 556 0.74902 0.87451 0.74902 0.3135 0.3780 12.72E+02 557 0.74902 0.87451 0.87451 0.2815 0.3214 13.46E+02 558 0.74902 0.87451 1.00000 0.2570 0.2771 14.19E+02 559 0.74902 1.00000 0.00000 0.3797 0.5358 16.99E+02 560 0.74902 1.00000 0.12549 0.3791 0.5353 17.00E+02 561 0.74902 1.00000 0.25098 0.3774 0.5319 17.01E+02 562 0.74902 1.00000 0.37647 0.3722 0.5213 16.99E+02 563 0.74902 1.00000 0.50196 0.3616 0.4999 17.03E+02 564 0.74902 1.00000 0.62353 0.3440 0.4646 17.07E+02 565 0.74902 1.00000 0.74902 0.3196 0.4152 17.47E+02 566 0.74902 1.00000 0.87451 0.2919 0.3620 18.23E+02 567 0.74902 1.00000 1.00000 0.2699 0.3191 19.13E+02 568 0.87451 0.00000 0.00000 0.6362 0.3405 22.98E+01 569 0.87451 0.00000 0.12549 0.6321 0.3384 23.04E+01 570 0.87451 0.00000 0.25098 0.6161 0.3296 23.21E+01 571 0.87451 0.00000 0.37647 0.5725 0.3062 23.67E+01 572 0.87451 0.00000 0.50196 0.5011 0.2673 24.91E+01 573 0.87451 0.00000 0.62353 0.4178 0.2224 27.05E+01 574 0.87451 0.00000 0.74902 0.3411 0.1809 30.62E+01 575 0.87451 0.00000 0.87451 0.2755 0.1462 3.91E+02 576 0.87451 0.00000 1.00000 0.2417 0.1281 4.61E+02 577 0.87451 0.12549 0.00000 0.6339 0.3422 23.29E+01 578 0.87451 0.12549 0.12549 0.6300 0.3398 23.32E+01 579 0.87451 0.12549 0.25098 0.6141 0.3312 23.49E+01 580 0.87451 0.12549 0.37647 0.5712 0.3076 23.96E+01 581 0.87451 0.12549 0.50196 0.5001 0.2689 25.21E+01 582 0.87451 0.12549 0.62353 0.4174 0.2237 27.33E+01 583 0.87451 0.12549 0.74902 0.3410 0.1819 30.90E+01 584 0.87451 0.12549 0.87451 0.2755 0.1473 3.95E+02 585 0.87451 0.12549 1.00000 0.2422 0.1287 4.64E+02 586 0.87451 0.25098 0.00000 0.6240 0.3496 24.63E+01 587 0.87451 0.25098 0.12549 0.6203 0.3473 24.66E+01 588 0.87451 0.25098 0.25098 0.6057 0.3378 24.71E+01 589 0.87451 0.25098 0.37647 0.5645 0.3144 25.18E+01 590 0.87451 0.25098 0.50196 0.4965 0.2754 26.41E+01 591 0.87451 0.25098 0.62353 0.4161 0.2296 28.55E+01 592 0.87451 0.25098 0.74902 0.3411 0.1867 32.12E+01 593 0.87451 0.25098 0.87451 0.2765 0.1504 4.04E+02 594 0.87451 0.25098 1.00000 0.2427 0.1312 4.74E+02 595 0.87451 0.37647 0.00000 0.5952 0.3715 29.08E+01 596 0.87451 0.37647 0.12549 0.5919 0.3692 29.13E+01 597 0.87451 0.37647 0.25098 0.5795 0.3598 29.15E+01 598 0.87451 0.37647 0.37647 0.5442 0.3339 29.17E+01 599 0.87451 0.37647 0.50196 0.4845 0.2948 30.46E+01 600 0.87451 0.37647 0.62353 0.4113 0.2475 32.59E+01 601 0.87451 0.37647 0.74902 0.3412 0.2019 36.12E+01 602 0.87451 0.37647 0.87451 0.2780 0.1615 4.39E+02 603 0.87451 0.37647 1.00000 0.2438 0.1393 5.08E+02 604 0.87451 0.50196 0.00000 0.5506 0.4060 38.85E+01 605 0.87451 0.50196 0.12549 0.5481 0.4039 38.90E+01 606 0.87451 0.50196 0.25098 0.5387 0.3955 38.95E+01 607 0.87451 0.50196 0.37647 0.5121 0.3716 38.98E+01 608 0.87451 0.50196 0.50196 0.4647 0.3287 39.37E+01 609 0.87451 0.50196 0.62353 0.4031 0.2798 41.49E+01 610 0.87451 0.50196 0.74902 0.3402 0.2298 45.10E+01 611 0.87451 0.50196 0.87451 0.2804 0.1835 5.17E+02 612 0.87451 0.50196 1.00000 0.2475 0.1567 5.84E+02 613 0.87451 0.62353 0.00000 0.4986 0.4459 57.12E+01 614 0.87451 0.62353 0.12549 0.4971 0.4441 57.16E+01 615 0.87451 0.62353 0.25098 0.4908 0.4371 57.22E+01 616 0.87451 0.62353 0.37647 0.4728 0.4166 57.16E+01 617 0.87451 0.62353 0.50196 0.4394 0.3786 57.62E+01 618 0.87451 0.62353 0.62353 0.3919 0.3249 58.19E+01 619 0.87451 0.62353 0.74902 0.3397 0.2716 61.62E+01 620 0.87451 0.62353 0.87451 0.2915 0.2231 6.72E+02 621 0.87451 0.62353 1.00000 0.2572 0.1885 7.43E+02 622 0.87451 0.74902 0.00000 0.4536 0.4804 87.10E+01 623 0.87451 0.74902 0.12549 0.4526 0.4791 87.17E+01 624 0.87451 0.74902 0.25098 0.4488 0.4737 87.20E+01 625 0.87451 0.74902 0.37647 0.4375 0.4574 86.76E+01 626 0.87451 0.74902 0.50196 0.4152 0.4262 87.31E+01 627 0.87451 0.74902 0.62353 0.3812 0.3798 88.22E+01 628 0.87451 0.74902 0.74902 0.3385 0.3246 9.75E+02 629 0.87451 0.74902 0.87451 0.2998 0.2758 10.54E+02 630 0.87451 0.74902 1.00000 0.2700 0.2370 11.26E+02 631 0.87451 0.87451 0.00000 0.4228 0.5037 13.76E+02 632 0.87451 0.87451 0.12549 0.4222 0.5029 13.77E+02 633 0.87451 0.87451 0.25098 0.4202 0.4989 13.57E+02 634 0.87451 0.87451 0.37647 0.4131 0.4866 13.10E+02 635 0.87451 0.87451 0.50196 0.3958 0.4639 13.09E+02 636 0.87451 0.87451 0.62353 0.3722 0.4256 13.15E+02 637 0.87451 0.87451 0.74902 0.3396 0.3735 14.01E+02 638 0.87451 0.87451 0.87451 0.3107 0.3289 19.15E+02 639 0.87451 0.87451 1.00000 0.2878 0.2941 19.89E+02 640 0.87451 1.00000 0.00000 0.4054 0.5173 20.07E+02 641 0.87451 1.00000 0.12549 0.4053 0.5167 20.07E+02 642 0.87451 1.00000 0.25098 0.4040 0.5138 19.74E+02 643 0.87451 1.00000 0.37647 0.3972 0.5061 19.10E+02 644 0.87451 1.00000 0.50196 0.3861 0.4860 18.01E+02 645 0.87451 1.00000 0.62353 0.3665 0.4550 17.89E+02 646 0.87451 1.00000 0.74902 0.3406 0.4079 18.86E+02 647 0.87451 1.00000 0.87451 0.3150 0.3582 23.92E+02 648 0.87451 1.00000 1.00000 0.2945 0.3248 24.88E+02 649 1.00000 0.00000 0.00000 0.6403 0.3403 34.03E+01 650 1.00000 0.00000 0.12549 0.6374 0.3388 34.05E+01 651 1.00000 0.00000 0.25098 0.6265 0.3328 34.24E+01 652 1.00000 0.00000 0.37647 0.5949 0.3160 34.63E+01 653 1.00000 0.00000 0.50196 0.5391 0.2861 35.96E+01 654 1.00000 0.00000 0.62353 0.4660 0.2469 38.06E+01 655 1.00000 0.00000 0.74902 0.3903 0.2062 41.66E+01 656 1.00000 0.00000 0.87451 0.3167 0.1677 4.91E+02 657 1.00000 0.00000 1.00000 0.2733 0.1447 6.06E+02 658 1.00000 0.12549 0.00000 0.6387 0.3414 34.27E+01 659 1.00000 0.12549 0.12549 0.6360 0.3398 34.28E+01 660 1.00000 0.12549 0.25098 0.6251 0.3338 34.48E+01 661 1.00000 0.12549 0.37647 0.5937 0.3170 34.89E+01 662 1.00000 0.12549 0.50196 0.5383 0.2870 36.18E+01 663 1.00000 0.12549 0.62353 0.4656 0.2478 38.29E+01 664 1.00000 0.12549 0.74902 0.3899 0.2070 41.90E+01 665 1.00000 0.12549 0.87451 0.3166 0.1684 4.94E+02 666 1.00000 0.12549 1.00000 0.2733 0.1452 6.09E+02 667 1.00000 0.25098 0.00000 0.6319 0.3465 35.65E+01 668 1.00000 0.25098 0.12549 0.6294 0.3449 35.65E+01 669 1.00000 0.25098 0.25098 0.6189 0.3382 35.72E+01 670 1.00000 0.25098 0.37647 0.5884 0.3215 36.11E+01 671 1.00000 0.25098 0.50196 0.5348 0.2916 37.43E+01 672 1.00000 0.25098 0.62353 0.4636 0.2520 39.54E+01 673 1.00000 0.25098 0.74902 0.3893 0.2107 43.19E+01 674 1.00000 0.25098 0.87451 0.3165 0.1711 5.05E+02 675 1.00000 0.25098 1.00000 0.2737 0.1472 6.18E+02 676 1.00000 0.37647 0.00000 0.6109 0.3623 40.00E+01 677 1.00000 0.37647 0.12549 0.6085 0.3607 40.06E+01 678 1.00000 0.37647 0.25098 0.5991 0.3540 40.07E+01 679 1.00000 0.37647 0.37647 0.5726 0.3354 40.14E+01 680 1.00000 0.37647 0.50196 0.5234 0.3054 41.37E+01 681 1.00000 0.37647 0.62353 0.4576 0.2654 43.53E+01 682 1.00000 0.37647 0.74902 0.3874 0.2226 47.10E+01 683 1.00000 0.37647 0.87451 0.3172 0.1808 5.39E+02 684 1.00000 0.37647 1.00000 0.2745 0.1542 6.54E+02 685 1.00000 0.50196 0.00000 0.5753 0.3893 49.92E+01 686 1.00000 0.50196 0.12549 0.5734 0.3878 49.93E+01 687 1.00000 0.50196 0.25098 0.5659 0.3817 50.02E+01 688 1.00000 0.50196 0.37647 0.5440 0.3640 49.95E+01 689 1.00000 0.50196 0.50196 0.5037 0.3311 50.46E+01 690 1.00000 0.50196 0.62353 0.4468 0.2903 52.54E+01 691 1.00000 0.50196 0.74902 0.3835 0.2450 56.18E+01 692 1.00000 0.50196 0.87451 0.3253 0.2038 6.17E+02 693 1.00000 0.50196 1.00000 0.2773 0.1693 7.34E+02 694 1.00000 0.62353 0.00000 0.5289 0.4246 68.17E+01 695 1.00000 0.62353 0.12549 0.5274 0.4233 68.17E+01 696 1.00000 0.62353 0.25098 0.5221 0.4178 68.27E+01 697 1.00000 0.62353 0.37647 0.5062 0.4020 68.12E+01 698 1.00000 0.62353 0.50196 0.4759 0.3719 68.67E+01 699 1.00000 0.62353 0.62353 0.4308 0.3270 69.14E+01 700 1.00000 0.62353 0.74902 0.3779 0.2798 72.60E+01 701 1.00000 0.62353 0.87451 0.3260 0.2346 7.82E+02 702 1.00000 0.62353 1.00000 0.2848 0.1972 8.78E+02 703 1.00000 0.74902 0.00000 0.4832 0.4589 9.83E+02 704 1.00000 0.74902 0.12549 0.4821 0.4583 9.84E+02 705 1.00000 0.74902 0.25098 0.4783 0.4539 9.85E+02 706 1.00000 0.74902 0.37647 0.4681 0.4402 9.79E+02 707 1.00000 0.74902 0.50196 0.4469 0.4149 9.85E+02 708 1.00000 0.74902 0.62353 0.4137 0.3751 9.93E+02 709 1.00000 0.74902 0.74902 0.3683 0.3262 10.92E+02 710 1.00000 0.74902 0.87451 0.3271 0.2808 11.64E+02 711 1.00000 0.74902 1.00000 0.2953 0.2449 12.34E+02 712 1.00000 0.87451 0.00000 0.4490 0.4847 14.11E+02 713 1.00000 0.87451 0.12549 0.4482 0.4842 14.12E+02 714 1.00000 0.87451 0.25098 0.4436 0.4822 14.12E+02 715 1.00000 0.87451 0.37647 0.4366 0.4721 14.11E+02 716 1.00000 0.87451 0.50196 0.4220 0.4510 14.17E+02 717 1.00000 0.87451 0.62353 0.3981 0.4172 14.23E+02 718 1.00000 0.87451 0.74902 0.3639 0.3703 15.21E+02 719 1.00000 0.87451 0.87451 0.3282 0.3298 21.11E+02 720 1.00000 0.87451 1.00000 0.3065 0.2997 22.09E+02 721 1.00000 1.00000 0.00000 0.4230 0.5053 22.97E+02 722 1.00000 1.00000 0.12549 0.4228 0.5050 22.93E+02 723 1.00000 1.00000 0.25098 0.4219 0.5022 22.63E+02 724 1.00000 1.00000 0.37647 0.4179 0.4934 21.42E+02 725 1.00000 1.00000 0.50196 0.4077 0.4752 19.77E+02 726 1.00000 1.00000 0.62353 0.3882 0.4454 18.84E+02 727 1.00000 1.00000 0.74902 0.3609 0.4024 19.86E+02 728 1.00000 1.00000 0.87451 0.3302 0.3566 25.83E+02 729 1.00000 1.00000 1.00000 0.3121 0.3287 33.78E+02 730 1.00000 1.00000 1.00000 0.3121 0.3287 33.79E+02 731 0.87451 1.00000 1.00000 0.2946 0.3248 24.93E+02 732 0.74902 1.00000 1.00000 0.2701 0.3190 19.20E+02 733 0.62353 1.00000 1.00000 0.2591 0.3204 18.84E+02 734 0.50196 1.00000 1.00000 0.2527 0.3219 18.76E+02 735 0.37647 1.00000 1.00000 0.2493 0.3223 18.67E+02 736 0.25098 1.00000 1.00000 0.2478 0.3232 18.69E+02 737 0.12549 1.00000 1.00000 0.2475 0.3233 18.68E+02 738 0.00000 1.00000 1.00000 0.2473 0.3233 18.68E+02 739 1.00000 0.87451 0.87451 0.3281 0.3298 21.17E+02 740 0.87451 0.87451 0.87451 0.3106 0.3288 19.19E+02 741 0.74902 0.87451 0.87451 0.2816 0.3215 13.52E+02 742 0.62353 0.87451 0.87451 0.2669 0.3247 13.19E+02 743 0.50196 0.87451 0.87451 0.2572 0.3265 13.10E+02 744 0.37647 0.87451 0.87451 0.2525 0.3278 13.02E+02 745 0.25098 0.87451 0.87451 0.2500 0.3272 12.97E+02 746 0.12549 0.87451 0.87451 0.2493 0.3274 12.96E+02 747 0.00000 0.87451 0.87451 0.2492 0.3275 12.96E+02 748 1.00000 0.74902 0.74902 0.3683 0.3263 10.96E+02 749 0.87451 0.74902 0.74902 0.3384 0.3245 9.80E+02 750 0.74902 0.74902 0.74902 0.3039 0.3212 8.32E+02 751 0.62353 0.74902 0.74902 0.2800 0.3258 7.97E+02 752 0.50196 0.74902 0.74902 0.2645 0.3282 7.84E+02 753 0.37647 0.74902 0.74902 0.2559 0.3302 7.78E+02 754 0.25098 0.74902 0.74902 0.2520 0.3308 7.77E+02 755 0.12549 0.74902 0.74902 0.2511 0.3312 7.77E+02 756 0.00000 0.74902 0.74902 0.2512 0.3309 7.76E+02 757 1.00000 0.62353 0.62353 0.4308 0.3270 69.30E+01 758 0.87451 0.62353 0.62353 0.3919 0.3247 58.28E+01 759 0.74902 0.62353 0.62353 0.3428 0.3217 48.60E+01 760 0.62353 0.62353 0.62353 0.3039 0.3209 43.38E+01 761 0.50196 0.62353 0.62353 0.2766 0.3273 42.71E+01 762 0.37647 0.62353 0.62353 0.2616 0.3305 42.26E+01 763 0.25098 0.62353 0.62353 0.2546 0.3319 42.07E+01 764 0.12549 0.62353 0.62353 0.2527 0.3321 41.91E+01 765 0.00000 0.62353 0.62353 0.2524 0.3323 41.92E+01 766 1.00000 0.50196 0.50196 0.5037 0.3310 50.55E+01 767 0.87451 0.50196 0.50196 0.4647 0.3286 39.51E+01 768 0.74902 0.50196 0.50196 0.4066 0.3249 29.81E+01 769 0.62353 0.50196 0.50196 0.3507 0.3216 24.03E+01 770 0.50196 0.50196 0.50196 0.3019 0.3205 20.83E+01 771 0.37647 0.50196 0.50196 0.2724 0.3272 20.47E+01 772 0.25098 0.50196 0.50196 0.2580 0.3300 20.23E+01 773 0.12549 0.50196 0.50196 0.2541 0.3307 20.16E+01 774 0.00000 0.50196 0.50196 0.2534 0.3308 20.14E+01 775 1.00000 0.37647 0.37647 0.5726 0.3353 40.21E+01 776 0.87451 0.37647 0.37647 0.5443 0.3338 29.22E+01 777 0.74902 0.37647 0.37647 0.4933 0.3306 19.61E+01 778 0.62353 0.37647 0.37647 0.4305 0.3268 13.90E+01 779 0.50196 0.37647 0.37647 0.3591 0.3223 10.35E+01 780 0.37647 0.37647 0.37647 0.3006 0.3229 8.81E+01 781 0.25098 0.37647 0.37647 0.2687 0.3303 8.64E+01 782 0.12549 0.37647 0.37647 0.2600 0.3323 8.59E+01 783 0.00000 0.37647 0.37647 0.2584 0.3329 8.58E+01 784 1.00000 0.25098 0.25098 0.6190 0.3382 35.82E+01 785 0.87451 0.25098 0.25098 0.6057 0.3376 24.79E+01 786 0.74902 0.25098 0.25098 0.5765 0.3357 15.10E+01 787 0.62353 0.25098 0.25098 0.5308 0.3327 9.29E+01 788 0.50196 0.25098 0.25098 0.4579 0.3284 57.13E+00 789 0.37647 0.25098 0.25098 0.3687 0.3221 38.67E+00 790 0.25098 0.25098 0.25098 0.2976 0.3222 31.46E+00 791 0.12549 0.25098 0.25098 0.2742 0.3276 30.90E+00 792 0.00000 0.25098 0.25098 0.2703 0.3284 30.79E+00 793 1.00000 0.12549 0.12549 0.6361 0.3397 34.36E+01 794 0.87451 0.12549 0.12549 0.6301 0.3396 23.39E+01 795 0.74902 0.12549 0.12549 0.6151 0.3393 13.68E+01 796 0.62353 0.12549 0.12549 0.5877 0.3381 7.88E+01 797 0.50196 0.12549 0.12549 0.5361 0.3363 42.91E+00 798 0.37647 0.12549 0.12549 0.4484 0.3330 24.74E+00 799 0.25098 0.12549 0.12549 0.3513 0.3288 16.07E+00 800 0.12549 0.12549 0.12549 0.3049 0.3313 14.47E+00 801 0.00000 0.12549 0.12549 0.2976 0.3336 14.27E+00 802 1.00000 0.00000 0.00000 0.6405 0.3401 34.08E+01 803 0.87451 0.00000 0.00000 0.6364 0.3405 23.06E+01 804 0.74902 0.00000 0.00000 0.6255 0.3404 13.36E+01 805 0.62353 0.00000 0.00000 0.6048 0.3404 7.57E+01 806 0.50196 0.00000 0.00000 0.5635 0.3403 39.82E+00 807 0.37647 0.00000 0.00000 0.4844 0.3401 21.58E+00 808 0.25098 0.00000 0.00000 0.3837 0.3412 13.11E+00 809 0.12549 0.00000 0.00000 0.3276 0.3398 10.92E+00 810 0.00000 0.00000 0.00000 0.3184 0.3437 10.77E+00 811 1.00000 1.00000 1.00000 0.3121 0.3288 33.82E+02 812 0.87451 0.87451 1.00000 0.2880 0.2941 19.94E+02 813 0.74902 0.74902 1.00000 0.2405 0.2233 9.65E+02 814 0.62353 0.62353 1.00000 0.2050 0.1680 6.07E+02 815 0.50196 0.50196 1.00000 0.1773 0.1254 4.03E+02 816 0.37647 0.37647 1.00000 0.1599 0.0983 2.94E+02 817 0.25098 0.25098 1.00000 0.1506 0.0839 2.43E+02 818 0.12549 0.12549 1.00000 0.1479 0.0792 2.27E+02 819 0.00000 0.00000 1.00000 0.1473 0.0784 2.24E+02 820 1.00000 1.00000 0.87451 0.3303 0.3564 25.86E+02 821 0.87451 0.87451 0.87451 0.3107 0.3288 19.19E+02 822 0.74902 0.74902 0.87451 0.2662 0.2629 8.91E+02 823 0.62353 0.62353 0.87451 0.2258 0.2004 5.36E+02 824 0.50196 0.50196 0.87451 0.1901 0.1453 3.31E+02 825 0.37647 0.37647 0.87451 0.1663 0.1088 2.23E+02 826 0.25098 0.25098 0.87451 0.1533 0.0873 1.72E+02 827 0.12549 0.12549 0.87451 0.1490 0.0814 1.58E+02 828 0.00000 0.00000 0.87451 0.1483 0.0796 1.54E+02 829 1.00000 1.00000 0.74902 0.3607 0.4022 19.87E+02 830 0.87451 0.87451 0.74902 0.3397 0.3732 14.04E+02 831 0.74902 0.74902 0.74902 0.3038 0.3212 8.31E+02 832 0.62353 0.62353 0.74902 0.2603 0.2539 4.76E+02 833 0.50196 0.50196 0.74902 0.2142 0.1833 27.05E+01 834 0.37647 0.37647 0.74902 0.1790 0.1289 16.21E+01 835 0.25098 0.25098 0.74902 0.1579 0.0958 11.18E+01 836 0.12549 0.12549 0.74902 0.1514 0.0850 9.66E+01 837 0.00000 0.00000 0.74902 0.1499 0.0826 9.34E+01 838 1.00000 1.00000 0.62353 0.3880 0.4452 18.85E+02 839 0.87451 0.87451 0.62353 0.3721 0.4257 13.18E+02 840 0.74902 0.74902 0.62353 0.3436 0.3856 79.03E+01 841 0.62353 0.62353 0.62353 0.3040 0.3212 43.40E+01 842 0.50196 0.50196 0.62353 0.2518 0.2420 23.15E+01 843 0.37647 0.37647 0.62353 0.2023 0.1660 12.37E+01 844 0.25098 0.25098 0.62353 0.1684 0.1126 7.30E+01 845 0.12549 0.12549 0.62353 0.1566 0.0934 5.78E+01 846 0.00000 0.00000 0.62353 0.1542 0.0891 5.46E+01 847 1.00000 1.00000 0.50196 0.4077 0.4753 19.78E+02 848 0.87451 0.87451 0.50196 0.3957 0.4643 13.13E+02 849 0.74902 0.74902 0.50196 0.3772 0.4405 78.15E+01 850 0.62353 0.62353 0.50196 0.3494 0.3952 42.40E+01 851 0.50196 0.50196 0.50196 0.3020 0.3205 20.80E+01 852 0.37647 0.37647 0.50196 0.2417 0.2290 10.08E+01 853 0.25098 0.25098 0.50196 0.1889 0.1459 4.99E+01 854 0.12549 0.12549 0.50196 0.1678 0.1113 3.48E+01 855 0.00000 0.00000 0.50196 0.1634 0.1030 3.16E+01 856 1.00000 1.00000 0.37647 0.4179 0.4933 21.45E+02 857 0.87451 0.87451 0.37647 0.4132 0.4866 13.12E+02 858 0.74902 0.74902 0.37647 0.3996 0.4785 77.89E+01 859 0.62353 0.62353 0.37647 0.3848 0.4543 42.03E+01 860 0.50196 0.50196 0.37647 0.3544 0.4070 20.14E+01 861 0.37647 0.37647 0.37647 0.3007 0.3231 8.80E+01 862 0.25098 0.25098 0.37647 0.2311 0.2144 3.74E+01 863 0.12549 0.12549 0.37647 0.1945 0.1533 2.23E+01 864 0.00000 0.00000 0.37647 0.1855 0.1366 1.90E+01 865 1.00000 1.00000 0.25098 0.4219 0.5022 22.63E+02 866 0.87451 0.87451 0.25098 0.4204 0.4991 13.58E+02 867 0.74902 0.74902 0.25098 0.4117 0.4982 77.97E+01 868 0.62353 0.62353 0.25098 0.4055 0.4884 41.96E+01 869 0.50196 0.50196 0.25098 0.3910 0.4678 20.04E+01 870 0.37647 0.37647 0.25098 0.3589 0.4193 84.46E+00 871 0.25098 0.25098 0.25098 0.2979 0.3224 31.37E+00 872 0.12549 0.12549 0.25098 0.2477 0.2389 16.33E+00 873 0.00000 0.00000 0.25098 0.2332 0.2110 13.13E+00 874 1.00000 1.00000 0.12549 0.4228 0.5050 22.94E+02 875 0.87451 0.87451 0.12549 0.4226 0.5029 13.77E+02 876 0.74902 0.74902 0.12549 0.4158 0.5050 77.91E+01 877 0.62353 0.62353 0.12549 0.4129 0.5008 41.92E+01 878 0.50196 0.50196 0.12549 0.4054 0.4918 19.99E+01 879 0.37647 0.37647 0.12549 0.3872 0.4678 84.34E+00 880 0.25098 0.25098 0.12549 0.3491 0.4066 29.83E+00 881 0.12549 0.12549 0.12549 0.3056 0.3320 14.49E+00 882 0.00000 0.00000 0.12549 0.2915 0.3011 11.28E+00 883 1.00000 1.00000 0.00000 0.4232 0.5055 22.98E+02 884 0.87451 0.87451 0.00000 0.4229 0.5042 13.77E+02 885 0.74902 0.74902 0.00000 0.4168 0.5066 77.86E+01 886 0.62353 0.62353 0.00000 0.4148 0.5039 41.86E+01 887 0.50196 0.50196 0.00000 0.4091 0.4980 19.94E+01 888 0.37647 0.37647 0.00000 0.3953 0.4813 84.01E+00 889 0.25098 0.25098 0.00000 0.3664 0.4358 29.64E+00 890 0.12549 0.12549 0.00000 0.3306 0.3710 13.94E+00 891 0.00000 0.00000 0.00000 0.3188 0.3436 10.83E+00 892 1.00000 1.00000 1.00000 0.3122 0.3288 33.74E+02 893 1.00000 0.87451 1.00000 0.3065 0.2999 22.11E+02 894 1.00000 0.74902 1.00000 0.2955 0.2449 12.35E+02 895 1.00000 0.62353 1.00000 0.2849 0.1975 8.79E+02 896 1.00000 0.50196 1.00000 0.2774 0.1696 7.34E+02 897 1.00000 0.37647 1.00000 0.2745 0.1544 6.54E+02 898 1.00000 0.25098 1.00000 0.2738 0.1476 6.20E+02 899 1.00000 0.12549 1.00000 0.2734 0.1453 6.09E+02 900 1.00000 0.00000 1.00000 0.2733 0.1447 6.06E+02 901 0.87451 1.00000 0.87451 0.3149 0.3581 23.92E+02 902 0.87451 0.87451 0.87451 0.3107 0.3289 19.16E+02 903 0.87451 0.74902 0.87451 0.3000 0.2755 10.55E+02 904 0.87451 0.62353 0.87451 0.2918 0.2229 6.73E+02 905 0.87451 0.50196 0.87451 0.2807 0.1837 5.19E+02 906 0.87451 0.37647 0.87451 0.2780 0.1616 4.40E+02 907 0.87451 0.25098 0.87451 0.2764 0.1504 4.05E+02 908 0.87451 0.12549 0.87451 0.2757 0.1473 3.96E+02 909 0.87451 0.00000 0.87451 0.2756 0.1466 3.93E+02 910 0.74902 1.00000 0.74902 0.3197 0.4150 17.50E+02 911 0.74902 0.87451 0.74902 0.3135 0.3781 12.75E+02 912 0.74902 0.74902 0.74902 0.3041 0.3211 8.30E+02 913 0.74902 0.62353 0.74902 0.2945 0.2610 52.05E+01 914 0.74902 0.50196 0.74902 0.2869 0.2103 35.53E+01 915 0.74902 0.37647 0.74902 0.2820 0.1752 26.57E+01 916 0.74902 0.25098 0.74902 0.2790 0.1559 22.57E+01 917 0.74902 0.12549 0.74902 0.2781 0.1498 21.33E+01 918 0.74902 0.00000 0.74902 0.2778 0.1484 21.08E+01 919 0.62353 1.00000 0.62353 0.3295 0.4710 16.64E+02 920 0.62353 0.87451 0.62353 0.3245 0.4423 11.91E+02 921 0.62353 0.74902 0.62353 0.3158 0.3910 74.15E+01 922 0.62353 0.62353 0.62353 0.3040 0.3211 43.35E+01 923 0.62353 0.50196 0.62353 0.2931 0.2522 26.12E+01 924 0.62353 0.37647 0.62353 0.2850 0.1982 17.25E+01 925 0.62353 0.25098 0.62353 0.2802 0.1654 13.15E+01 926 0.62353 0.12549 0.62353 0.2785 0.1543 11.91E+01 927 0.62353 0.00000 0.62353 0.2780 0.1519 11.65E+01 928 0.50196 1.00000 0.50196 0.3363 0.5141 16.28E+02 929 0.50196 0.87451 0.50196 0.3335 0.4959 11.54E+02 930 0.50196 0.74902 0.50196 0.3271 0.4610 70.71E+01 931 0.50196 0.62353 0.50196 0.3169 0.4034 39.64E+01 932 0.50196 0.50196 0.50196 0.3019 0.3206 20.78E+01 933 0.50196 0.37647 0.50196 0.2886 0.2406 11.53E+01 934 0.50196 0.25098 0.50196 0.2799 0.1842 7.43E+01 935 0.50196 0.12549 0.50196 0.2766 0.1629 6.20E+01 936 0.50196 0.00000 0.50196 0.2757 0.1582 5.95E+01 937 0.37647 1.00000 0.37647 0.3410 0.5417 16.03E+02 938 0.37647 0.87451 0.37647 0.3396 0.5325 11.29E+02 939 0.37647 0.74902 0.37647 0.3361 0.5140 67.93E+01 940 0.37647 0.62353 0.37647 0.3298 0.4795 37.51E+01 941 0.37647 0.50196 0.37647 0.3182 0.4174 18.80E+01 942 0.37647 0.37647 0.37647 0.3007 0.3232 8.78E+01 943 0.37647 0.25098 0.37647 0.2847 0.2296 4.42E+01 944 0.37647 0.12549 0.37647 0.2776 0.1883 31.99E+00 945 0.37647 0.00000 0.37647 0.2757 0.1777 29.34E+00 946 0.25098 1.00000 0.25098 0.3438 0.5554 15.98E+02 947 0.25098 0.87451 0.25098 0.3428 0.5522 11.26E+02 948 0.25098 0.74902 0.25098 0.3416 0.5446 67.25E+01 949 0.25098 0.62353 0.25098 0.3387 0.5295 36.69E+01 950 0.25098 0.50196 0.25098 0.3325 0.4978 17.83E+01 951 0.25098 0.37647 0.25098 0.3196 0.4335 78.28E+00 952 0.25098 0.25098 0.25098 0.2980 0.3226 31.29E+00 953 0.25098 0.12549 0.25098 0.2838 0.2464 17.93E+00 954 0.25098 0.00000 0.25098 0.2800 0.2253 15.31E+00 955 0.12549 1.00000 0.12549 0.3448 0.5599 15.93E+02 956 0.12549 0.87451 0.12549 0.3448 0.5585 11.21E+02 957 0.12549 0.74902 0.12549 0.3440 0.5552 66.84E+01 958 0.12549 0.62353 0.12549 0.3429 0.5481 36.30E+01 959 0.12549 0.50196 0.12549 0.3403 0.5324 17.49E+01 960 0.12549 0.37647 0.12549 0.3334 0.4965 75.52E+00 961 0.12549 0.25098 0.12549 0.3202 0.4162 28.41E+00 962 0.12549 0.12549 0.12549 0.3057 0.3319 14.43E+00 963 0.12549 0.00000 0.12549 0.2999 0.2989 11.36E+00 964 0.00000 1.00000 0.00000 0.3451 0.5614 15.91E+02 965 0.00000 0.87451 0.00000 0.3450 0.5600 11.20E+02 966 0.00000 0.74902 0.00000 0.3447 0.5578 66.71E+01 967 0.00000 0.62353 0.00000 0.3444 0.5529 36.17E+01 968 0.00000 0.50196 0.00000 0.3431 0.5416 17.38E+01 969 0.00000 0.37647 0.00000 0.3391 0.5152 74.56E+00 970 0.00000 0.25098 0.00000 0.3317 0.4508 27.63E+00 971 0.00000 0.12549 0.00000 0.3228 0.3754 13.72E+00 972 0.00000 0.00000 0.00000 0.3192 0.3441 10.77E+00 973 0.00000 0.00000 0.00000 0.3196 0.3445 10.78E+00 974 0.12549 0.12549 0.12549 0.3059 0.3324 14.44E+00 975 0.25098 0.25098 0.25098 0.2979 0.3223 31.25E+00 976 0.37647 0.37647 0.37647 0.3004 0.3229 8.77E+01 977 0.50196 0.50196 0.50196 0.3020 0.3205 20.75E+01 978 0.62353 0.62353 0.62353 0.3039 0.3210 43.28E+01 979 0.74902 0.74902 0.74902 0.3037 0.3210 82.80E+01 980 0.87451 0.87451 0.87451 0.3107 0.3287 19.12E+02 981 1.00000 1.00000 1.00000 0.3122 0.3287 33.74E+02 982 0.00000 0.00000 0.00000 0.3193 0.3442 10.77E+00 983 0.12549 0.12549 0.12549 0.3058 0.3323 14.44E+00 984 0.25098 0.25098 0.25098 0.2978 0.3224 31.31E+00 985 0.37647 0.37647 0.37647 0.3007 0.3232 8.78E+01 986 0.50196 0.50196 0.50196 0.3020 0.3204 20.74E+01 987 0.62353 0.62353 0.62353 0.3039 0.3211 43.37E+01 988 0.74902 0.74902 0.74902 0.3036 0.3209 82.75E+01 989 0.87451 0.87451 0.87451 0.3107 0.3287 19.10E+02 990 1.00000 1.00000 1.00000 0.3122 0.3287 33.71E+02 991 0.00000 0.00000 0.00000 0.3188 0.3437 10.77E+00 992 0.12549 0.12549 0.12549 0.3056 0.3319 14.41E+00 993 0.25098 0.25098 0.25098 0.2979 0.3222 31.25E+00 994 0.37647 0.37647 0.37647 0.3006 0.3230 8.77E+01 995 0.50196 0.50196 0.50196 0.3020 0.3204 20.71E+01 996 0.62353 0.62353 0.62353 0.3039 0.3211 43.18E+01 997 0.74902 0.74902 0.74902 0.3037 0.3209 82.61E+01 998 0.87451 0.87451 0.87451 0.3106 0.3287 19.08E+02 999 1.00000 1.00000 1.00000 0.3121 0.3286 33.66E+02 1000 0.00000 0.00000 0.00000 0.3192 0.3441 10.77E+00 1001 0.12549 0.12549 0.12549 0.3058 0.3325 14.45E+00 1002 0.25098 0.25098 0.25098 0.2977 0.3220 31.27E+00 1003 0.37647 0.37647 0.37647 0.3007 0.3231 8.77E+01 1004 0.50196 0.50196 0.50196 0.3020 0.3206 20.73E+01 1005 0.62353 0.62353 0.62353 0.3038 0.3211 43.20E+01 1006 0.74902 0.74902 0.74902 0.3037 0.3210 82.58E+01 1007 0.87451 0.87451 0.87451 0.3107 0.3288 19.08E+02 1008 1.00000 1.00000 1.00000 0.3122 0.3287 33.66E+02 1009 0.00000 0.00000 0.00000 0.3189 0.3434 10.78E+00 1010 0.06667 0.06667 0.06667 0.3128 0.3385 11.85E+00 1011 0.13333 0.13333 0.13333 0.3056 0.3321 14.43E+00 1012 0.20000 0.20000 0.20000 0.3018 0.3277 20.87E+00 1013 0.26667 0.26667 0.26667 0.2993 0.3230 36.67E+00 1014 0.33333 0.33333 0.33333 0.2988 0.3201 62.79E+00 1015 0.40000 0.40000 0.40000 0.3012 0.3234 10.46E+01 1016 0.46667 0.46667 0.46667 0.3004 0.3197 16.59E+01 1017 0.53333 0.53333 0.53333 0.3017 0.3202 25.03E+01 1018 0.60000 0.60000 0.60000 0.3036 0.3203 37.00E+01 1019 0.66667 0.66667 0.66667 0.3043 0.3218 53.83E+01 1020 0.73333 0.73333 0.73333 0.3043 0.3215 73.61E+01 1021 0.80000 0.80000 0.80000 0.3074 0.3257 11.95E+02 1022 0.86667 0.86667 0.86667 0.3102 0.3280 18.28E+02 1023 0.93333 0.93333 0.93333 0.3118 0.3297 25.89E+02 1024 1.00000 1.00000 1.00000 0.3122 0.3286 33.69E+02 1025 0.00000 0.00000 0.00000 0.3188 0.3441 10.76E+00 1026 0.06667 0.06667 0.06667 0.3121 0.3377 11.85E+00 1027 0.13333 0.13333 0.13333 0.3054 0.3316 14.41E+00 1028 0.20000 0.20000 0.20000 0.3023 0.3276 20.87E+00 1029 0.26667 0.26667 0.26667 0.2994 0.3228 36.67E+00 1030 0.33333 0.33333 0.33333 0.2986 0.3198 62.80E+00 1031 0.40000 0.40000 0.40000 0.3015 0.3234 10.48E+01 1032 0.46667 0.46667 0.46667 0.3004 0.3196 16.64E+01 1033 0.53333 0.53333 0.53333 0.3017 0.3203 25.13E+01 1034 0.60000 0.60000 0.60000 0.3036 0.3202 37.11E+01 1035 0.66667 0.66667 0.66667 0.3043 0.3219 54.02E+01 1036 0.73333 0.73333 0.73333 0.3043 0.3215 73.85E+01 1037 0.80000 0.80000 0.80000 0.3072 0.3256 11.99E+02 1038 0.86667 0.86667 0.86667 0.3104 0.3277 18.31E+02 1039 0.93333 0.93333 0.93333 0.3119 0.3297 25.97E+02 1040 1.00000 1.00000 1.00000 0.3122 0.3287 33.80E+02 1041 0.00000 0.00000 0.00000 0.3183 0.3434 10.79E+00 1042 0.06667 0.06667 0.06667 0.3121 0.3375 11.84E+00 1043 0.13333 0.13333 0.13333 0.3057 0.3319 14.46E+00 1044 0.20000 0.20000 0.20000 0.3021 0.3275 20.95E+00 1045 0.26667 0.26667 0.26667 0.2993 0.3230 36.85E+00 1046 0.33333 0.33333 0.33333 0.2988 0.3201 63.07E+00 1047 0.40000 0.40000 0.40000 0.3013 0.3234 10.52E+01 1048 0.46667 0.46667 0.46667 0.3002 0.3194 16.67E+01 1049 0.53333 0.53333 0.53333 0.3018 0.3202 25.19E+01 1050 0.60000 0.60000 0.60000 0.3035 0.3201 37.20E+01 1051 0.66667 0.66667 0.66667 0.3043 0.3218 54.12E+01 1052 0.73333 0.73333 0.73333 0.3042 0.3214 74.00E+01 1053 0.80000 0.80000 0.80000 0.3072 0.3257 12.02E+02 1054 0.86667 0.86667 0.86667 0.3103 0.3278 18.35E+02 1055 0.93333 0.93333 0.93333 0.3118 0.3297 26.03E+02 1056 1.00000 1.00000 1.00000 0.3121 0.3286 33.85E+02 1057 0.00000 0.00000 0.00000 0.3185 0.3439 10.80E+00 1058 0.06667 0.06667 0.06667 0.3125 0.3384 11.89E+00 1059 0.13333 0.13333 0.13333 0.3054 0.3320 14.49E+00 1060 0.20000 0.20000 0.20000 0.3021 0.3278 20.97E+00 1061 0.26667 0.26667 0.26667 0.2993 0.3229 36.90E+00 1062 0.33333 0.33333 0.33333 0.2987 0.3199 63.10E+00 1063 0.40000 0.40000 0.40000 0.3013 0.3234 10.53E+01 1064 0.46667 0.46667 0.46667 0.3003 0.3194 16.69E+01 1065 0.53333 0.53333 0.53333 0.3018 0.3203 25.23E+01 1066 0.60000 0.60000 0.60000 0.3035 0.3201 37.22E+01 1067 0.66667 0.66667 0.66667 0.3042 0.3218 54.17E+01 1068 0.73333 0.73333 0.73333 0.3042 0.3215 74.04E+01 1069 0.80000 0.80000 0.80000 0.3073 0.3255 12.02E+02 1070 0.86667 0.86667 0.86667 0.3102 0.3279 18.36E+02 1071 0.93333 0.93333 0.93333 0.3118 0.3297 26.03E+02 1072 1.00000 1.00000 1.00000 0.3122 0.3286 33.84E+02 1073 0.00000 0.00000 0.00000 0.3180 0.3428 10.79E+00 1074 1.00000 1.00000 1.00000 0.3121 0.3286 33.83E+02 1075 1.00000 0.00000 0.00000 0.6404 0.3402 34.07E+01 1076 0.00000 1.00000 1.00000 0.2475 0.3232 18.69E+02 1077 1.00000 1.00000 0.00000 0.4230 0.5055 23.03E+02 1078 0.00000 0.00000 1.00000 0.1480 0.0789 2.26E+02 1079 0.00000 1.00000 0.00000 0.3450 0.5610 16.00E+02 1080 1.00000 0.00000 1.00000 0.2732 0.1448 6.08E+02 ] def %**************************************************************************** /Xrx089 729 array def /Yrx089 729 array def /Zrx089 729 array def /Xrx100 729 array def /Yrx100 729 array def /Zrx100 729 array def /xyY0 4320 array def /RGB0 3240 array def /xyYA_to_XYZ729 { %BEG procedure xyYA_to_XYZ729 0 1 1079 {/xchartl exch def /j00 xchartl 7 mul 0 add def /j04 j00 4 add def /j05 j00 5 add def /j06 j00 6 add def /j40 xchartl 4 mul 0 add def /j41 xchartl 4 mul 1 add def /j42 xchartl 4 mul 2 add def /j43 xchartl 4 mul 3 add def xyY0 j40 xyYA j00 get put xyY0 j41 xyYA j04 get 10000 mul put %integer xyY0 j42 xyYA j05 get 10000 mul put %integer xyY0 j43 xyYA j06 get put } for /jend 728 4 mul 3 add def %White-Measurement /fakt 100 xyY0 jend get div def /IM0 729 def /IM1 IM0 1 sub def 0 1 IM1 {/i exch def %i=0,IM1 /j30 i 4 mul 1 add def /j31 j30 1 add def /j32 j30 2 add def /SUM xyY0 j32 get xyY0 j31 get 0.0001 mul div def Xrx100 i xyY0 j30 get 0.0001 mul SUM mul fakt mul put Yrx100 i xyY0 j32 get fakt mul put Zrx100 i 1 xyY0 j30 get 0.0001 mul sub xyY0 j31 get 0.0001 mul sub SUM mul fakt mul put Xrx089 i Xrx100 i get 0.8859 mul put Yrx089 i Yrx100 i get 0.8859 mul put Zrx089 i Zrx100 i get 0.8859 mul put } for %i=0,IM1 /XLN100 Xrx100 0 get def /YLN100 Yrx100 0 get def /ZLN100 Zrx100 0 get def /XLW100 Xrx100 728 get def /YLW100 Yrx100 728 get def /ZLW100 Zrx100 728 get def /XLN089 Xrx089 0 get def /YLN089 Yrx089 0 get def /ZLN089 Zrx089 0 get def /XLW089 Xrx089 728 get def /YLW089 Yrx089 728 get def /ZLW089 Zrx089 728 get def % achromatic (D65) colours /XLWD65100 95.04 def /YLWD65100 100.00 def /ZLWD65100 108.88 def /XLN001 XLWD65100 100 div def /YLN001 YLWD65100 100 div def /ZLN001 ZLWD65100 100 div def } bind def %END procedure xyYA_to_XYZ729 %*********************************************************** /r*d50M 50 array def /r*d50M [1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %R 1.000 0.875 0.750 0.625 0.500 0.375 0.250 0.125 %J 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %G 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %C 0.000 0.125 0.250 0.375 0.500 0.625 0.750 0.875 %B 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %M 1.000 1.000 ] def /g*d50M 50 array def /g*d50M [0.000 0.125 0.250 0.375 0.500 0.625 0.750 0.875 %R 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %J 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %G 1.000 0.875 0.750 0.625 0.500 0.375 0.250 0.125 %C 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %B 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %M 0.000 0.125 ] def /b*d50M 50 array def /b*d50M [0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %R 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %J 0.000 0.125 0.250 0.375 0.500 0.625 0.750 0.875 %G 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %C 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %B 1.000 0.875 0.750 0.625 0.500 0.375 0.250 0.125 %M 0.000 0.000 ] def %/habs50M 50 array def %/habs50M [030.0 037.5 045.0 052.5 060.0 067.5 075.0 082.5 % 090.0 097.5 105.0 112.5 120.0 127.5 135.0 142.5 % 150.0 157.5 165.0 172.5 180.0 187.5 195.0 202.5 % 210.0 217.5 225.0 232.5 240.0 247.5 255.0 262.5 % 270.0 277.5 285.0 292.5 300.0 307.5 315.0 322.5 % 330.0 337.5 345.0 352.5 360.0 367.5 375.0 382.5 % 390.0 397.5 % ] def %*********************************************************** /XD65W 95.04 def /YD65W 100.00 def /ZD65W 108.88 def /XD50W 96.42 def /YD50W 100.00 def /ZD50W 82.51 def /DecodeXYZ* {dup 6 29 div ge {dup dup mul mul} {4 29 div sub 108 841 div mul} ifelse} bind def /cvishow {cvi 6 string cvs show} def /cvsshow1 {10 mul cvi 0.1 mul 7 string cvs show} def /cvsshow2 {100 mul cvi 0.01 mul 7 string cvs show} def /cvsshow3 {1000 mul cvi 0.001 mul 7 string cvs show} def /cvishowb {cvi 6 string cvs show ( ) show} def /cvsshow1b {10 mul cvi 0.1 mul 7 string cvs show ( ) show} def /cvsshow2b {100 mul cvi 0.01 mul 7 string cvs show ( ) show} def /cvsshow3b {1000 mul cvi 0.001 mul 7 string cvs show ( ) show} def /cvsshow1r {0.05 add 10 mul cvi 0.1 mul 7 string cvs show} def /cvsshow2r {0.005 add 100 mul cvi 0.01 mul 7 string cvs show} def /cvsshow3r {0.0005 add 1000 mul cvi 0.001 mul 7 string cvs show} def /cvsshow1br {0.05 add 10 mul cvi 0.1 mul 7 string cvs show ( ) show} def /cvsshow2br {0.005 add 100 mul cvi 0.01 mul 7 string cvs show ( ) show} def /cvsshow3br {0.0005 add 1000 mul cvi 0.001 mul 7 string cvs show ( ) show} def /cvi100 {100 mul cvi /xi exch def xi 0 lt {/vorz -1 def} {/vorz 1 def} ifelse /xia xi abs def vorz -1 eq {(\255) show} {(0) show} ifelse xia 0 ge xia 9 le {(0000) show} if xia 10 ge xia 99 le and {(000) show} if xia 100 ge xia 999 le and {(00) show} if xia 1000 ge xia 9999 le and {(0) show} if xia cvishow } bind def %*********************************************************** /LAB*He_Hs { %BEG procedure LAB*He_Hs /LAB*e 35 array def %7x5=35 /LAB*e[39.92 58.74 27.99 0.0 0.0 % 00_04 R CIE No.09 elementary colours in LAB, D65 81.26 -2.89 71.56 0.0 0.0 % 05_09 J CIE No.10 52.23 -42.42 13.60 0.0 0.0 % 10_14 G CIE No.11 0.0 0.0 0.0 0.0 0.0 % 15_19 Cgb 30.57 1.41 -46.47 0.0 0.0 % 20_24 B CIE No.12 0.0 0.0 0.0 0.0 0.0 % 25_29 Mbr 39.92 58.74 27.99 0.0 0.0 % 30_34 R+360 CIE No.09 elementary colours in LAB, D65 ] def 0 1 5 {/j exch def %j=0,5 j 0 eq {LAB*e 03 LAB*e 01 get dup mul LAB*e 02 get dup mul add sqrt put LAB*e 04 LAB*e 02 get LAB*e 01 get 0.0001 add atan put } if j 1 eq {LAB*e 08 LAB*e 06 get dup mul LAB*e 07 get dup mul add sqrt put LAB*e 09 LAB*e 07 get LAB*e 06 get 0.0001 add atan put } if j 2 eq {LAB*e 13 LAB*e 11 get dup mul LAB*e 12 get dup mul add sqrt put LAB*e 14 LAB*e 12 get LAB*e 11 get 0.0001 add atan put } if j 4 eq {LAB*e 23 LAB*e 21 get dup mul LAB*e 22 get dup mul add sqrt put LAB*e 24 LAB*e 22 get LAB*e 21 get 0.0001 add atan put } if } for %j=0,5 3 1 4 {/i exch def %i=3,4 30_34 R+360 LAB*e i 30 add LAB*e i get put i 4 eq {LAB*e i 30 add LAB*e i get 360 add put} if } for %i=3,4 3 2 5 {/i exch def %i=3,5,2 Cgb+Cbr i 3 eq {LAB*e 19 LAB*e 14 get LAB*e 24 get add 0.5 mul put %hab LAB*e 18 LAB*e 13 get LAB*e 23 get add 0.5 mul put %C*ab LAB*e 15 LAB*e 10 get LAB*e 20 get add 0.5 mul put %L* LAB*e 16 LAB*e 18 get LAB*e 19 get cos mul put %a* LAB*e 17 LAB*e 18 get LAB*e 19 get sin mul put %b* } if i 5 eq {LAB*e 29 LAB*e 24 get LAB*e 34 get add 0.5 mul put %hab LAB*e 28 LAB*e 23 get LAB*e 33 get add 0.5 mul put %C*ab LAB*e 25 LAB*e 20 get LAB*e 30 get add 0.5 mul put %L* LAB*e 26 LAB*e 28 get LAB*e 29 get cos mul put %a* LAB*e 27 LAB*e 28 get LAB*e 29 get sin mul put %b* } if } for %i=3,5,2 /LAB*He 7 array def 0 1 6 {/i exch def %i=0,5 LAB*He i LAB*e i 5 mul 4 add get put } for %i=0,5 /habe50M 50 array def 0 1 47 {/i exch def %i=0,47 /i8 i 8 idiv def /i8d i i8 8 mul sub def /dLAB*He LAB*He i8 1 add get LAB*He i8 get sub 8 div def habe50M i LAB*He i8 get dLAB*He i8d mul add put } for %i=0,47 habe50M 48 habe50M 0 get 360 add put habe50M 49 habe50M 1 get 360 add put /LAB*Hs 7 array def /LAB*Hs [30. 90. 150. 210. 270. 330. 390.] def /habs50M 50 array def 0 1 47 {/i exch def %i=0,47 /i8 i 8 idiv def /i8d i i8 8 mul sub def /dLAB*Hs LAB*Hs i8 1 add get LAB*Hs i8 get sub 8 div def habs50M i LAB*Hs i8 get dLAB*Hs i8d mul add put } for %i=0,47 habs50M 48 habs50M 0 get 360 add put habs50M 49 habs50M 1 get 360 add put /habs361M 361 array def 0 1 359 {/i exch def %i=0,359 habs361M i 30 i add put %range 30..390 } for %i=0,359 habs361M 360 habs361M 0 get 360 add put /habe361M 361 array def 0 1 359 {/i exch def %i=0,359 /i60 i 60 idiv def %range 0..6 /i60d i i60 60 mul sub def %range 0..59 /dLAB*He LAB*He i60 1 add get LAB*He i60 get sub 60 div def habe361M i LAB*He i60 get dLAB*He i60d mul add round cvi put %range 25..385 } for %i=0,359 habe361M 360 habe361M 0 get 360 add put } bind def %END procedure LAB*He_Hs %****************************************************************** /habs361i 361 array def /habe361i 361 array def /habd361i 361 array def /hab*sM_to_hab*eM { %BEG Procedure hab*sM_to_hab*eM %transfer from hab*s to hab*e %360 steps used for the range 0 <= hab*s <= 360 %requires /habs361i 361 array def, /habe361i 361 array def 0 1 359 {/i exch def %i=0,359 /habs i def habs361i i i put %alpha = [habs - LAB*Hs(h)]/[LAB*Hs(n+1) - LAB*Hs(n)] % = [habs - LAB*Hs(h)]/60 %habe = alpha [LAB*He(n+1) - LAB*He(n)] + LAB*He(n) i 000 ge i 029 le and {/ipan0 5 def /ipan1 6 def /habs habs 360 add def} if i 030 ge i 089 le and {/ipan0 0 def /ipan1 1 def} if i 090 ge i 149 le and {/ipan0 1 def /ipan1 2 def} if i 150 ge i 209 le and {/ipan0 2 def /ipan1 3 def} if i 210 ge i 269 le and {/ipan0 3 def /ipan1 4 def} if i 270 ge i 329 le and {/ipan0 4 def /ipan1 5 def} if i 330 ge i 359 le and {/ipan0 5 def /ipan1 6 def} if /alpha {habs LAB*Hs ipan0 get sub 60 div} bind def /habe {LAB*He ipan1 get LAB*He ipan0 get sub alpha mul LAB*He ipan0 get add} bind def habe 360 ge {/habe habe 360 sub def} if habe361i i habe round cvi put } for %i=0,359 habs361i 360 360 put habe361i 360 habe361i 0 get put } bind def %END hab*sM_to_hab*eM %****************************************************************** /r*s361Mi 361 array def /g*s361Mi 361 array def /b*s361Mi 361 array def /r*e361Mi 361 array def /g*e361Mi 361 array def /b*e361Mi 361 array def /hab*sM_to_rgb*s361Mi_rgb*e361Mi { %BEG Procedure hab*sM_to_rgb*s361Mi_rgb*e361Mi %transfer from hab*sM_to_rgb*s361Mi_rgb*e361Mi %360 steps used for the range 0 <= hab*s <= 360 %requires /habs361i 361 array def, /habe361i 361 array def 0 1 359 {/i exch def %i=0,359 i 000 ge i 029 le and {r*s361Mi i 1.00 put %Mbr_R, part 2 g*s361Mi i 0.00 put b*s361Mi i 1.00 i 30 add 60 div sub put} if i 030 ge i 089 le and {r*s361Mi i 1.00 put %R_J g*s361Mi i 0.00 i 30 sub 60 div add put b*s361Mi i 0.00 put} if i 090 ge i 149 le and {r*s361Mi i 1.00 i 90 sub 60 div sub put %J_G g*s361Mi i 1.00 put b*s361Mi i 0.00 put} if i 150 ge i 209 le and {r*s361Mi i 0.00 put %G_Cgb g*s361Mi i 1.00 put b*s361Mi i 0.00 i 150 sub 60 div add put} if i 210 ge i 269 le and {r*s361Mi i 0.00 put %Cgb_B g*s361Mi i 1.00 i 210 sub 60 div sub put b*s361Mi i 1.00 put} if i 270 ge i 329 le and {r*s361Mi i 0.00 i 270 sub 60 div add put %B_Mbr g*s361Mi i 0.00 put b*s361Mi i 1.00 put} if i 330 ge i 359 le and {r*s361Mi i 1.00 put %Mbr_R, part 1 g*s361Mi i 0.00 put b*s361Mi i 1.00 i 330 sub 60 div sub put} if } for %i=0,359 r*s361Mi 360 r*s361Mi 0 get put g*s361Mi 360 g*s361Mi 0 get put b*s361Mi 360 b*s361Mi 0 get put 0 1 360 {/i exch def %i=0,360 r*e361Mi i r*s361Mi i get put g*e361Mi i g*s361Mi i get put b*e361Mi i b*s361Mi i get put } for %i=0,359 } bind def %END hab*sM_to_rgb*s361Mi_rgb*e361Mi %****************************************************************** /XIEi 361 array def /x361i 361 array def /r*d361Mi 361 array def /g*d361Mi 361 array def /b*d361Mi 361 array def /LAB*L361Mi 361 array def /LAB*a361Mi 361 array def /LAB*b361Mi 361 array def /LAB*C361Mi 361 array def /LAB*h361Mi 361 array def /LAB*x50M_to_LAB*_rgb*x361Mi { %BEG Procedure LAB*x50M_to_LAB*_rgb*x361Mi %transfer from LAB*x50M_to_LAB*_rgb*x361Mi %360 steps used for the range 0 <= LAb*50hM <= 360 %requires /LAB*x361M 361 array def (x=L,a,b,C,h) %requires /rgb*d361Mi 361 array def %requires in addition %/LAB*x50M 50 array def (x=L,a,b,C,h) defined in LAB729a_to_LAB*x50M %/rgb*d50M 50 array def defined allways as table /hmin LAB*h50M 0 get def /hmax LAB*h50M 48 get def /hmini LAB*h50M 0 get cvi def /hmaxi LAB*h50M 48 get cvi def 0 1 360 {/i0 exch def %i=0,360 %default /i1 i0 1 add def /XIE -1 def LAB*L361Mi i0 -1 put LAB*C361Mi i0 -1 put LAB*h361Mi i0 -1 put LAB*a361Mi i0 -1 put LAB*b361Mi i0 -1 put r*d361Mi i0 -1 put g*d361Mi i0 -1 put b*d361Mi i0 -1 put XIEi i0 -1 put x361i i0 -1 put } for %i=0,360 hmini 1 hmaxi {/i0 exch def %i=40,400 0 1 48 {/ix0 exch def %ix0=0,48 /ix1 ix0 1 add def i0 LAB*h50M ix0 get sub 0 ge i0 LAB*h50M ix1 get sub 0 lt and { /im i0 def i0 360 ge {/im i0 360 sub def} if XIEi im i0 LAB*h50M ix0 get sub LAB*h50M ix1 get LAB*h50M ix0 get sub div put /XIE XIEi im get def LAB*L361Mi im LAB*L50M ix0 get LAB*L50M ix1 get LAB*L50M ix0 get sub XIE mul add put LAB*C361Mi im LAB*C50M ix0 get LAB*C50M ix1 get LAB*C50M ix0 get sub XIE mul add put LAB*h361Mi im LAB*h50M ix0 get LAB*h50M ix1 get LAB*h50M ix0 get sub XIE mul add dup 360 ge {360 sub} if put habd361i im LAB*h361Mi im get put LAB*a361Mi im LAB*C361Mi im get LAB*h361Mi im get cos mul put LAB*b361Mi im LAB*C361Mi im get LAB*h361Mi im get sin mul put r*d361Mi im r*d50M ix0 get r*d50M ix1 get r*d50M ix0 get sub XIE mul add put g*d361Mi im g*d50M ix0 get g*d50M ix1 get g*d50M ix0 get sub XIE mul add put b*d361Mi im b*d50M ix0 get b*d50M ix1 get b*d50M ix0 get sub XIE mul add put ix0 00 ge ix0 07 le and {x361i im 0 put} if ix0 08 ge ix0 15 le and {x361i im 1 put} if ix0 16 ge ix0 23 le and {x361i im 2 put} if ix0 24 ge ix0 31 le and {x361i im 3 put} if ix0 32 ge ix0 39 le and {x361i im 4 put} if ix0 40 ge ix0 47 le and {x361i im 5 put} if exit } if } for %ix0=0,48 } for %i=40,400 LAB*L361Mi 360 LAB*L361Mi 0 get put LAB*a361Mi 360 LAB*a361Mi 0 get put LAB*b361Mi 360 LAB*b361Mi 0 get put LAB*C361Mi 360 LAB*C361Mi 0 get put LAB*h361Mi 360 LAB*h361Mi 0 get 360 add put habd361i 360 LAB*h361Mi 360 get put r*d361Mi 360 r*d361Mi 0 get put g*d361Mi 360 g*d361Mi 0 get put b*d361Mi 360 b*d361Mi 0 get put XIEi 360 XIEi 0 get put x361i 360 x361i 0 get put } bind def %END LAB*x50M_to_LAB*_rgb*x361Mi %****************************************************************** /LAB*L50M 50 array def /LAB*a50M 50 array def /LAB*b50M 50 array def /LAB*C50M 50 array def /LAB*h50M 50 array def /habd50M 50 array def /LAB729a_to_LAB*x50M { %BEG Procedure LAB729a_to_LAB*x50M %transfer from LAB729a_to_LAB*x50M, %9x9x9=729 steps used for LAB729a %requires /LAB*x50M 50 array def %requires in addition /LAB729a 729 array def 0 1 5 {/xtonj exch def %xtonj=0,5 0 1 7 {/j exch def %j=0,7 /ja xtonj 8 mul j add def xtonj 0 eq {/jx 648 j 09 mul add def} if %see O00Y-O83Y, -0 xtonj 1 eq {/jx 720 j 81 mul sub def} if %see Y00L-Y83L, -81 xtonj 2 eq {/jx 072 j add def} if %see L00C-L83C, +01 xtonj 3 eq {/jx 080 j 09 mul sub def} if %see C00V-C83V, -09 xtonj 4 eq {/jx 008 j 81 mul add def} if %see V00M-V83M, -81 xtonj 5 eq {/jx 656 j sub def} if %see M00O-M83O, +01 LAB*L50M ja L729a jx get put LAB*a50M ja a729a jx get put LAB*b50M ja b729a jx get put LAB*C50M ja LAB*a50M ja get dup mul LAB*b50M ja get dup mul add sqrt put LAB*h50M ja LAB*b50M ja get LAB*a50M ja get 0.0001 add atan put xtonj 5 eq LAB*h50M ja get 90 le and {LAB*h50M ja LAB*h50M ja get 360 add put} if } for %j=0,7 } for %xtonj=0,5 LAB*L50M 48 LAB*L50M 0 get put LAB*a50M 48 LAB*a50M 0 get put LAB*b50M 48 LAB*b50M 0 get put LAB*C50M 48 LAB*C50M 0 get put LAB*h50M 48 LAB*h50M 0 get 360 add put LAB*L50M 49 LAB*L50M 1 get put LAB*a50M 49 LAB*a50M 1 get put LAB*b50M 49 LAB*b50M 1 get put LAB*C50M 49 LAB*C50M 1 get put LAB*h50M 49 LAB*h50M 1 get 360 add put 0 1 49 {/i exch def %i=0,49 habd50M i LAB*h50M i get put } for %i=0,49 %data test according to increasing hue angle and appropriate correction /xtesthuea -1 def /xtesthuei 50 array def 0 1 48 {/i exch def %i=0,49 habd50M i get habd50M i 1 add get gt {/xtesthuea xtesthuea 1 add def xtesthuei xtesthuea i put habd50M i 1 add habd50M i get put LAB*L50M i 1 add LAB*L50M i get put LAB*a50M i 1 add LAB*a50M i get put LAB*b50M i 1 add LAB*b50M i get put LAB*C50M i 1 add LAB*C50M i get put LAB*h50M i 1 add LAB*h50M i get put } if } for %i=0,49 %/LAB*Hd 7 array def %0 1 6 {/i exch def %i=0,6 % LAB*Hd i LAB*h50M i 8 mul get put % } for %i=0,6 } bind def %END LAB729a_to_LAB*x50M %************************************************************************ /Lrc089 729 array def /arc089 729 array def /brc089 729 array def /Xrc089 729 array def /Yrc089 729 array def /Zrc089 729 array def /Lra089 729 array def /ara089 729 array def /bra089 729 array def /Xra089 729 array def /Yra089 729 array def /Zra089 729 array def /Lna089 729 array def /ana089 729 array def /bna089 729 array def /Xna089 729 array def /Yna089 729 array def /Zna089 729 array def /Lla089 729 array def /ala089 729 array def /bla089 729 array def /Xla089 729 array def /Yla089 729 array def /Zla089 729 array def /X729 729 array def /Y729 729 array def /Z729 729 array def /L729 729 array def %not adapted /a729 729 array def /b729 729 array def /L729a 729 array def %adapted /a729a 729 array def /b729a 729 array def /ilf 8 array def /ilf [0.00 0.25 0.50 1.00 2.00 4.00 8.00 16.00] def /Lrefl 11 array def /Lrefl [(0%) (0%) (0%) (0%) (0,6%) (1,2%) (2,5%) (5%) (10%) (20%) (40%)] def /xcharti_XYZ_LAB729a { %BEG Procedure xcharti_LAB729a %transfer from xcharti_LAB729a, %9x9x9=729 steps used for LAB729a %requires 0<= xcharti <=10 %requires /(Lab)x089 3240 array def (x=rc,ra,na,la) %requires /(XYZ)x089 3240 array def (x=rc,ra,na,la) %requires /x729 729 array def (x=X,Y,Z) %not adapted %requires /x729 729 array def (x=L,a,b) %not adapted %requires /x729a 729 array def (x=L,a,b) %adapted xcharti 2 le {/il 0 def} {/il xcharti 3 sub def} ifelse %Reference black and factors /YrN 2.52 def /Xtref089 YrN ilf il get mul XLN001 mul def /Ytref089 YrN ilf il get mul def /Ztref089 YrN ilf il get mul ZLN001 mul def /YNil Ytref089 def /YNil001 YNil 100 div def YNil001 6 29 div 3 exp ge {/FYYn YNil001 0.3333 exp def} {/FYYn 841 108 div YNil001 mul 4 29 div add def} ifelse /L*Nil 116 FYYn mul 16 sub def /IM1 728 def 0 1 IM1 {/i exch def %i=0,IM1 Xrc089 i Xrx089 i get put Yrc089 i Yrx089 i get put Zrc089 i Zrx089 i get put /XQ Xrc089 i get XLWD65100 div def /YQ Yrc089 i get YLWD65100 div def /ZQ Zrc089 i get ZLWD65100 div def XQ 0 lt {/XQ 0.00000001 def} if YQ 0 lt {/YQ 0.00000001 def} if ZQ 0 lt {/ZQ 0.00000001 def} if Lrc089 i YQ 0.008856 lt {903.3 YQ mul} {YQ 0.33333333 exp 116 mul 16 sub} ifelse put arc089 i XQ 0.008856 lt {7.787 XQ mul 16 116 div add} {XQ 0.33333333 exp} ifelse YQ 0.008856 lt {7.787 YQ mul 16 116 div add} {YQ 0.33333333 exp} ifelse sub 500 mul put brc089 i YQ 0.008856 lt {7.787 YQ mul 16 116 div add} {YQ 0.33333333 exp} ifelse ZQ 0.008856 lt {7.787 ZQ mul 16 116 div add} {ZQ 0.33333333 exp} ifelse sub 200 mul put } for %i=0,IM1 /L*N Lrc089 0 get def /A*N arc089 0 get def /B*N brc089 0 get def /L*W Lrc089 728 get def /A*W arc089 728 get def /B*W brc089 728 get def 0 1 IM1 {/i exch def %i=0,IM1 Lra089 i Lrc089 i get put /l*CIE Lrc089 i get L*N sub L*W L*N sub div def %system rel. lightn. /a*s A*W A*N sub l*CIE mul def /b*s B*W B*N sub l*CIE mul def ara089 i arc089 i get A*N sub a*s sub put bra089 i brc089 i get B*N sub b*s sub put } for %i=0,IM1 0 1 IM1 {/i exch def %i=0,IM1 /X* {Lra089 i get 16 add 116 div ara089 i get 500 div add} bind def /Y* {Lra089 i get 16 add 116 div} bind def /Z* {Lra089 i get 16 add 116 div bra089 i get 200 div sub} bind def Xra089 i X* DecodeXYZ* XLWD65100 mul put Yra089 i Y* DecodeXYZ* YLWD65100 mul put Zra089 i Z* DecodeXYZ* ZLWD65100 mul put } for %i=0,IM1 xcharti 2 ge {%xcharti>=2 %for white X data /Xwref089 Xra089 728 get def /Ywref089 Yra089 728 get def /Zwref089 Zra089 728 get def %for black X data /YrN Yra089 0 get def /Xnref089 YrN XLN001 mul def /Ynref089 YrN def /Znref089 YrN ZLN001 mul def /IM1 728 def 0 1 IM1 {/i exch def %i=1,IM1 Xna089 i Xra089 i get Xnref089 sub Xwref089 Xwref089 Xnref089 sub div mul put Yna089 i Yra089 i get Ynref089 sub Ywref089 Ywref089 Ynref089 sub div mul put Zna089 i Zra089 i get Znref089 sub Zwref089 Zwref089 Znref089 sub div mul put } for %i=1,IM1 0 1 IM1 {/i exch def %i=1,IM1 /XQ Xna089 i get XLWD65100 div def /YQ Yna089 i get YLWD65100 div def /ZQ Zna089 i get ZLWD65100 div def XQ 0 lt {/XQ 0.00000001 def} if YQ 0 lt {/YQ 0.00000001 def} if ZQ 0 lt {/ZQ 0.00000001 def} if Lna089 i YQ 0.008856 lt {903.3 YQ mul} {YQ 0.33333333 exp 116 mul 16 sub} ifelse put ana089 i XQ 0.008856 lt {7.787 XQ mul 16 116 div add} {XQ 0.33333333 exp} ifelse YQ 0.008856 lt {7.787 YQ mul 16 116 div add} {YQ 0.33333333 exp} ifelse sub 500 mul put bna089 i YQ 0.008856 lt {7.787 YQ mul 16 116 div add} {YQ 0.33333333 exp} ifelse ZQ 0.008856 lt {7.787 ZQ mul 16 116 div add} {ZQ 0.33333333 exp} ifelse sub 200 mul put } for %i=1,IM1 } if %xchart>=2 xcharti 3 ge {%xchart>=3 %for white X data /Xwref089 Xra089 728 get def /Ywref089 Yra089 728 get def /Zwref089 Zra089 728 get def /kn Ywref089 Ywref089 Ytref089 sub div def 0 1 IM1 {/i exch def %i=1,IM1 Xla089 i Xna089 i get kn div Xtref089 add put Yla089 i Yna089 i get kn div Ytref089 add put Zla089 i Zna089 i get kn div Ztref089 add put } for %i=1,IM1 0 1 IM1 {/i exch def %i=1,IM1 /XQ Xla089 i get XLWD65100 div def /YQ Yla089 i get YLWD65100 div def /ZQ Zla089 i get ZLWD65100 div def XQ 0 lt {/XQ 0.00000001 def} if YQ 0 lt {/YQ 0.00000001 def} if ZQ 0 lt {/ZQ 0.00000001 def} if Lla089 i YQ 0.008856 lt {903.3 YQ mul} {YQ 0.33333333 exp 116 mul 16 sub} ifelse put ala089 i XQ 0.008856 lt {7.787 XQ mul 16 116 div add} {XQ 0.33333333 exp} ifelse YQ 0.008856 lt {7.787 YQ mul 16 116 div add} {YQ 0.33333333 exp} ifelse sub 500 mul put bla089 i YQ 0.008856 lt {7.787 YQ mul 16 116 div add} {YQ 0.33333333 exp} ifelse ZQ 0.008856 lt {7.787 ZQ mul 16 116 div add} {ZQ 0.33333333 exp} ifelse sub 200 mul put } for %i=1,IM1 } if %xchart>=3 xcharti 0 eq {%xcharti=0 (1x) 0 1 IM1 {/i exch def %i=0,IM1 L729 i Lrc089 i get put a729 i arc089 i get put b729 i brc089 i get put X729 i Xrc089 i get put Y729 i Yrc089 i get put Z729 i Zrc089 i get put } for %i=0,IM1 } if %xcharti=0 (1x) xcharti 1 eq {%xcharti=1 (1x) 0 1 IM1 {/i exch def %i=0,IM1 L729 i Lra089 i get put a729 i ara089 i get put b729 i bra089 i get put X729 i Xra089 i get put Y729 i Yra089 i get put Z729 i Zra089 i get put } for %i=0,IM1 } if %xcharti=1 (1x) xcharti 2 eq {%xcharti=2 (1x) 0 1 IM1 {/i exch def %i=0,IM1 L729 i Lna089 i get put a729 i ana089 i get put b729 i bna089 i get put X729 i Xna089 i get put Y729 i Yna089 i get put Z729 i Zna089 i get put } for %i=0,IM1 } if %xcharti=2 (1x) xcharti 3 ge {%xcharti=3,4,5,6,7,8,9,10 (8x) 0 1 728 {/i exch def %i=0,IM1 L729 i Lla089 i get put a729 i ala089 i get put b729 i bla089 i get put X729 i Xla089 i get put Y729 i Yla089 i get put Z729 i Zla089 i get put } for %i=0,IM1 } if %xcharti=3,4,5,6,7,8,9,10 (8x) %Adaptation /L*Nio L729 000 get def /A*Nio a729 000 get def /B*Nio b729 000 get def /L*Wio L729 728 get def /A*Wio a729 728 get def /B*Wio b729 728 get def /A*Dio A*Wio A*Nio sub def /B*Dio B*Wio B*Nio sub def 0 1 728 {/j exch def %j=0,728 L729a j L729 j get put /l*CIE L729 j get L*Nio sub L*Wio L*Nio sub div def %system rel. lightn. /a*s A*Wio A*Nio sub l*CIE mul def /b*s B*Wio B*Nio sub l*CIE mul def a729a j a729 j get A*Nio sub a*s sub put b729a j b729 j get B*Nio sub b*s sub put } for %j=0,728 xcharti 0 eq {/Xprint 0 def /FileData (LAB*rc) def} if xcharti 1 eq {/Xprint 1 def /FileData (LAB*ra) def} if xcharti 2 eq {/Xprint 1 def /FileData (LAB*na) def} if xcharti 3 eq {/Xprint 1 def /FileData (LAB*la0) def} if xcharti 4 eq {/Xprint 1 def /FileData (LAB*la1) def} if xcharti 5 eq {/Xprint 1 def /FileData (LAB*la2) def} if xcharti 6 eq {/Xprint 1 def /FileData (LAB*la3) def} if xcharti 7 eq {/Xprint 1 def /FileData (LAB*la4) def} if xcharti 8 eq {/Xprint 1 def /FileData (LAB*la5) def} if xcharti 9 eq {/Xprint 1 def /FileData (LAB*la6) def} if xcharti 10 eq {/Xprint 1 def /FileData (LAB*la7) def} if } bind def %END xcharti_XYZ_LAB729a %*************************************************************************** /nshow {300 /Times-ISOL1 FS show} bind def /kshow {300 /TimesI-ISOL1 FS show} bind def /bshow {300 /TimesB-ISOL1 FS show} bind def /jshow {300 /TimesBI-ISOL1 FS show} bind def /sshow {300 /Symbol FS show} bind def /ishow {220 /Times-ISOL1 FS -00 -50 rmoveto show 00 50 rmoveto} bind def /eshow {220 /Times-ISOL1 FS 0 100 rmoveto show 0 -100 rmoveto} bind def %%EndProlog gsave /lanind 0 def /lantex [(G) (E) (S) (N) (I) (J) (M)] def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind eq {show} {pop} ifelse} bind def /showes {2 lanind eq {show} {pop} ifelse} bind def /showfr {3 lanind eq {show} {pop} ifelse} bind def /showit {4 lanind eq {show} {pop} ifelse} bind def /showjp {5 lanind eq {show} {pop} ifelse} bind def /showm {6 lanind eq {show} {pop} ifelse} bind def /lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def} {/lanind1 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 /xchart xchartg def} {/xchart 0 def} ifelse /xcolorg where {pop /xcolor xcolorg def} {/xcolor 1 def} ifelse /ymax 16600 def /ydel 203 def 72 90 translate 0.010 MM dup scale /TSYSIO (LECD display, non glossy) def xyYA_to_XYZ729 %0 <=xchart <=109 /xcharti xchart 10 idiv def %range 0...10 /xchartl xchart xchart 10 idiv 10 mul sub def %j=0...9 %00 1 10 {/xcharti exch def %xcharti=00,10 gsave xcharti_XYZ_LAB729a %00 1 09 {/xchartl exch def %xchartl=00,09 /xchart xchartl def gsave 1.0 setgray 20 setlinewidth 0 0 moveto 25000 0 rlineto 0 17000 rlineto -25000 0 rlineto closepath fill 0.0 setgray 0 0 moveto 25000 0 rlineto 0 17000 rlineto -25000 0 rlineto closepath stroke TK 0 setgray 200 -200 moveto (OG450-7N) show (, Page of series ) showen (, Seite der Serie ) showde xchartl 1 add xcharti 10 mul add cvishow (/110, ) show FileData show xcharti 3 ge {(, YN=) show Lrefl xcharti get show} if (, XYZnw=) show X729 000 get cvsshow1r (, ) show Y729 000 get cvsshow1r (, ) show Z729 000 get cvsshow1r (, ) show X729 728 get cvsshow1r (, ) show Y729 728 get cvsshow1r (, ) show Z729 728 get cvsshow1r (, LAB*nw=) show L729 000 get cvsshow1r (, ) show a729 000 get cvsshow1r (, ) show b729 000 get cvsshow1r (, ) show L729 728 get cvsshow1r (, ) show a729 728 get cvsshow1r (, ) show b729 728 get cvsshow1r xcharti 0 eq {(, not adapted) showen (, nicht adaptiert) showde } {(, adapted) showen (, adaptiert) showde } ifelse LAB*He_Hs LAB729a_to_LAB*x50M hab*sM_to_hab*eM hab*sM_to_rgb*s361Mi_rgb*e361Mi LAB*x50M_to_LAB*_rgb*x361Mi /habd361M 361 array def %LAB*h50M i %i=0,48 %360:48=7,5 wie interpolieren ? %360:24=15 %LAB*h50M i i=0,2,48 = 25 Werte 0 1 359 {/i exch def %i=0,359 /i15 i 15 idiv def %range 0..23 /i15d i i15 15 mul sub def %range 0..14 /dLAB*Hd LAB*h50M i15 2 mul 1 add get LAB*h50M i15 2 mul get sub 15 div def habd361M i LAB*h50M i15 2 mul get dLAB*Hd i15d mul add put % habd361M i get 360 ge {habd361M i habd361M i get 360 sub put} if } for %i=0,359 habd361M 360 habd361M 0 get 360 add put %LAB*h50M i %i=0,48 %360:48=7,5 wie interpolieren ? %360:48=7,5 %LAB*h50M i i=0,1,2,..47,48 = 49 Werte 0 1 359 {/i exch def %i=0,359 /i075 i 7.5 div def %range 0..47 /i075d i i075 7.5 mul sub def %range 0..7 /dLAB*Hd LAB*h50M i075 1 add cvi get LAB*h50M i075 cvi get sub 7.5 div def habd361M i LAB*h50M i075 cvi get dLAB*Hd i075d mul add put % habd361M i get 360 ge {habd361M i habd361M i get 360 sub put} if } for %i=0,359 habd361M 360 habd361M 0 get 360 add put TK 16500 -200 moveto %(CIELAB diagram and tables ) showen (CIELAB\255Diagramm und Tabellen ) showde %(CIELAB -> ) show (Output: ) showen (Ausgabe: ) showde FileDaten showen FileDatde showde (, page ) showen (, Seite ) showde xchartl 1 add xcharti 10 mul add cvishow (/110) show TBK /xi 000 def xi 100 add 16700 moveto (Data of Maximum color M in colorimetric system ) showen (Daten der Maximalfarbe M im Farbmetrik\255Sytem ) showde FileDaten showen FileDatde showde ( for input or output; ) showen ( f\374r Ein\255 oder Ausgabe; ) showde (Six hue angles of the 60 degree standard colours) showen (Sechs Bunttonwinkel der 60\255Grad Standardfarben) showde TBIK ( s: h) show TBS 0 -50 rmoveto (ab,s) show 0 50 rmoveto TBK ( = ) show LAB*Hs 0 get cvsshow1r (, ) show LAB*Hs 1 get cvsshow1r (, ) show LAB*Hs 2 get cvsshow1r (, ) show LAB*Hs 3 get cvsshow1r (, ) show LAB*Hs 4 get cvsshow1r (, ) show LAB*Hs 5 get cvsshow1r (; ) show xi 100 add 16400 moveto (Six hue angles of the device colours) showen (Sechs Bunttonwinkel der Ger\344tefarben) showde TBIK ( d: h) show TBS 0 -50 rmoveto (ab,d) show 0 50 rmoveto TBK ( = ) show LAB*h50M 00 get cvsshow1r (, ) show LAB*h50M 08 get cvsshow1r (, ) show LAB*h50M 16 get cvsshow1r (, ) show LAB*h50M 24 get cvsshow1r (, ) show LAB*h50M 32 get cvsshow1r (, ) show LAB*h50M 40 get cvsshow1r (; ) show (Six hue angles of the elementary colours) showen (Sechs Bunttonwinkel der Elementarfarben) showde TBIK ( e: h) show TBS 0 -50 rmoveto (ab,e) show 0 50 rmoveto TBK ( = ) show LAB*He 0 get cvsshow1r (, ) show LAB*He 1 get cvsshow1r (, ) show LAB*He 2 get cvsshow1r (, ) show LAB*He 3 get cvsshow1r (, ) show LAB*He 4 get cvsshow1r (, ) show LAB*He 5 get cvsshow1r xchartl 0 eq {%xchartl=0,>0 /ToutenN0 (Colorimetric data of Natural Colour System NCS) def /ToutdeN0 (Farbmetrische Daten des Nat\374rliches Farbsystems NCS) def /ToutenL0 (Colorimetric data of Natural Luminous System NLS) def /ToutdeL0 (Farbmetrische Daten des Nat\374rliches\255Lichtfarbensystem NLS) def 8 /Times-ISOL1 FS 72 82.5 moveto ( OG450-7N, ) show xchart 8 le {ToutdeN0 showde ToutenN0 showen} {ToutdeL0 showde ToutenL0 showen} ifelse /yhoe 8500 def /xhoe 12300 def % 0 1 2 3 4 5 /Dcol [(O=R) (Y=J) (L=G) (C=C) (V=B) (M=M) ] def /Dcolen [(Orange red) (Yellow) (Leaf green) (Cyan blue) (Violet blue) (Magenta red)] def /Dcolde [(Orangerot) (Gelb) (Laubgr\374n) (Cyanblau) (Violettblau) (Magentarot)] def /xshifd [ 2800 -4000 -5400 -5100 2700 2900 ] def /yshifd [ 2500 3700 1800 -1000 -2600 -0850 ] def /Ecol [(R) (J) (G) (C) (B) (M) ] def /Ecolen [(Red) (Yellow) (Green) (Blue green) (Blue) (Blue red)] def /Ecolde [(Rot) (Gelb) (Gr\374n) (Blaugr\374n) (Blau) (Blaurot)] def /xshife [ 2800 -3000 -5400 -5100 -3000 2900 ] def /yshife [ 2000 3700 1800 -1000 -2600 -0850 ] def /Scol [(R) (J) (G) (C) (B) (M) ] def /Scolen [(Red) (Yellow) (Green) (Blue green) (Blue) (Blue red)] def /Scolde [(Rot) (Gelb) (Gr\374n) (Blaugr\374n) (Blau) (Blaurot)] def /xshifs [ 2800 -3000 -5400 -5100 -3000 2900 ] def /yshifs [ 2000 3700 1800 -1000 -2600 -0850 ] def 2500 8200 moveto 20000 0 rlineto stroke 12500 2000 moveto 0 13000 rlineto stroke 0 1 3 {/ibild exch def %ibild=0,3 ibild 0 eq {xhoe 0.5 mul 600 sub yhoe 1.47 mul 400 sub translate} if ibild 1 eq {xhoe 1.1 mul yhoe 0.0 mul translate} if ibild 2 eq {xhoe 1.1 mul neg yhoe 0.97 mul neg translate} if ibild 3 eq {xhoe 1.1 mul yhoe 0.0 mul translate} if ibild 2 le {%ibild<=2 0 setgray -4000 0 moveto 8000 0 rlineto stroke 0 -3500 moveto 0 7500 rlineto stroke 3800 70 moveto 200 -70 rlineto -200 -70 rlineto closepath fill -70 3800 moveto 70 200 rlineto 70 -200 rlineto closepath fill /fak0 28 def /fakt 25 def 0 1 48 {/i exch def %i=0,48 LAB*a50M i get fakt mul LAB*b50M i get fakt mul moveto LAB*a50M i 1 add get fakt mul LAB*b50M i 1 add get fakt mul lineto stroke newpath r*d50M i get g*d50M i get b*d50M i get setrgbcolor LAB*a50M i get fakt mul LAB*b50M i get fakt mul 100 0 360 arc fill } for %i=0,48 0 setgray 0 8 48 {/i exch def %i=0,8,48 RJGCBMd 0 0 moveto LAB*a50M i get fak0 mul LAB*b50M i get fak0 mul rlineto stroke } for %i=0,8,48 } if %ibild<=2 ibild 0 eq {%ibild=0 %device (d) 0 setgray 0300 3900 moveto TBIK (device ) showen (Ger\344te\255) showde TBK (CIELAB) show TBIK ( \050 a*) show TBS 0 -50 rmoveto (d) show 0 50 rmoveto TBIK (, b*) show TBS 0 -50 rmoveto (d) show 0 50 rmoveto TBIK (\051) show TBK ( chroma diagram) showen (\255Diagramm) showde TBIK 3500 0150 moveto (a*) show TBS 0 -50 rmoveto (d) show 0 50 rmoveto -500 4000 moveto (b*) show TBS 0 -50 rmoveto (d) show 0 50 rmoveto 0 8 40 {/kn exch def %kn=0,8,40 0 setgray /kn8 kn 8 idiv def xshifd kn8 get yshifd kn8 get moveto TBIK Dcol kn8 get show TBS 0 -50 rmoveto (d) show 0 50 rmoveto TBK ( ) show Dcolen kn8 get showen Dcolde kn8 get showde TIK xshifd kn8 get yshifd kn8 get 350 sub moveto (LCH*) show TK -30 -50 rmoveto (d) show 0 50 rmoveto TK ( = ) show LAB*L50M kn get cvsshow1 ( ) show LAB*C50M kn get cvsshow1 ( ) show LAB*h50M kn get cvsshow1 TIK xshifd kn8 get yshifd kn8 get 700 sub moveto (LAB*) show TK -30 -50 rmoveto (d) show 0 50 rmoveto TK ( = ) show LAB*L50M kn get cvsshow1 ( ) show LAB*a50M kn get cvsshow1 ( ) show LAB*b50M kn get cvsshow1 TIK xshifd kn8 get yshifd kn8 get 1050 sub moveto (rgb*) show TK -30 -50 rmoveto (d) show 0 50 rmoveto TK ( = ) show r*d50M kn get cvsshow3 ( ) show g*d50M kn get cvsshow3 ( ) show b*d50M kn get cvsshow3 0 8 48 {/i exch def %i=0,8,48 RJGCBMe /i361d habd50M i get round cvi def i361d 360 ge {/i361d i361d 360 sub def} if % r*d361Mi i361d get g*d361Mi i361d get b*d361Mi i361d get setrgbcolor % 0 0 moveto LAB*a361Mi i361d get fak0 mul % LAB*b361Mi i361d get fak0 mul rlineto stroke 0 1 8 {/l exch def %l=0,8 newpath /alpha l 0.125 mul def /beta 1 alpha sub def 1.0 beta mul r*d361Mi i361d get alpha mul add 1.0 beta mul g*d361Mi i361d get alpha mul add 1.0 beta mul b*d361Mi i361d get alpha mul add setrgbcolor LAB*a361Mi i361d get fakt mul alpha mul LAB*b361Mi i361d get fakt mul alpha mul 100 0 360 arc fill l 0 eq {%l=0 0 setgray LAB*a361Mi i361d get fakt mul alpha mul LAB*b361Mi i361d get fakt mul alpha mul 100 0 360 arc stroke } if %l=0 } for %l=0,8 } for %i=0,8,48 } for %kn=0,8,40 } if %ibild=0 ibild 1 eq {%ibild=1 %elementary (e) 0 setgray 0300 3900 moveto TBIK (elementary ) showen (Elementar\255) showde TBK (CIELAB) show TBIK ( \050 a*) show TBS 0 -50 rmoveto (e) show 0 50 rmoveto TBIK (, b*) show TBS 0 -50 rmoveto (e) show 0 50 rmoveto TBIK (\051) show TBK ( chroma diagram) showen (\255Diagramm) showde TBIK 3500 0150 moveto (a*) show TBS 0 -50 rmoveto (e) show 0 50 rmoveto -500 4000 moveto (b*) show TBS 0 -50 rmoveto (e) show 0 50 rmoveto 0 setgray 0 8 40 {/kn exch def %kn=0,8,40 /kn8 kn 8 idiv def xshife kn8 get yshife kn8 get moveto TBIK Ecol kn8 get show TBS 0 -50 rmoveto (e) show 0 50 rmoveto TBK ( ) show Ecolen kn8 get showen Ecolde kn8 get showde /i361e habe50M kn get round cvi def i361e 360 ge {/i361e i361e 360 sub def} if TIK xshife kn8 get yshife kn8 get 350 sub moveto (LCH*) show TK -30 -50 rmoveto (e) show 0 50 rmoveto TK ( = ) show LAB*L361Mi i361e get cvsshow1 ( ) show LAB*C361Mi i361e get cvsshow1 ( ) show LAB*h361Mi i361e get cvsshow1 TIK xshife kn8 get yshife kn8 get 700 sub moveto (LAB*) show TK -30 -50 rmoveto (e) show 0 50 rmoveto TK ( = ) show LAB*L361Mi i361e get cvsshow1 ( ) show LAB*a361Mi i361e get cvsshow1 ( ) show LAB*b361Mi i361e get cvsshow1 TIK xshife kn8 get yshife kn8 get 1050 sub moveto (rgb*) show TK -30 -50 rmoveto (e) show 0 50 rmoveto TK ( = ) show r*d361Mi i361e get cvsshow3 ( ) show g*d361Mi i361e get cvsshow3 ( ) show b*d361Mi i361e get cvsshow3 } for %kn=0,8,40 0 8 48 {/i exch def %i=0,8,48 RJGCBMe /i361e habe50M i get round cvi def i361e 360 ge {/i361e i361e 360 sub def} if r*d361Mi i361e get g*d361Mi i361e get b*d361Mi i361e get setrgbcolor 0 0 moveto LAB*a361Mi i361e get fakt mul LAB*b361Mi i361e get fakt mul rlineto stroke 0 1 8 {/l exch def %l=0,8 newpath /alpha l 0.125 mul def /beta 1 alpha sub def 1.0 beta mul r*d361Mi i361e get alpha mul add 1.0 beta mul g*d361Mi i361e get alpha mul add 1.0 beta mul b*d361Mi i361e get alpha mul add setrgbcolor LAB*a361Mi i361e get fakt mul alpha mul LAB*b361Mi i361e get fakt mul alpha mul 100 0 360 arc fill } for %l=0,8 } for %i=0,8,48 } if %ibild=1 ibild 2 eq {%ibild=2 %standard (s) 0 setgray 0300 3900 moveto TBIK (standard ) showen (Standard\255) showde TBK (CIELAB) show TBIK ( \050 a*) show TBS 0 -50 rmoveto (s) show 0 50 rmoveto TBIK (, b*) show TBS 0 -50 rmoveto (s) show 0 50 rmoveto TBIK (\051) show TBK ( chroma diagram) showen (\255Diagramm) showde TBIK 3500 0150 moveto (a*) show TBS 0 -50 rmoveto (s) show 0 50 rmoveto -500 4000 moveto (b*) show TBS 0 -50 rmoveto (s) show 0 50 rmoveto 0 setgray 0 8 40 {/kn exch def %kn=0,8,40 /kn8 kn 8 idiv def xshifs kn8 get yshifs kn8 get moveto TBIK Scol kn8 get show TBS 0 -50 rmoveto (s) show 0 50 rmoveto TBK ( ) show Scolen kn8 get showen Scolde kn8 get showde /i361s habs50M kn get round cvi def i361s 360 ge {/i361s i361s 360 sub def} if TIK xshifs kn8 get yshifs kn8 get 350 sub moveto (LCH*) show TK -30 -50 rmoveto (s) show 0 50 rmoveto TK ( = ) show LAB*L361Mi i361s get cvsshow1 ( ) show LAB*C361Mi i361s get cvsshow1 ( ) show LAB*h361Mi i361s get cvsshow1 TIK xshifs kn8 get yshifs kn8 get 700 sub moveto (LAB*) show TK -30 -50 rmoveto (s) show 0 50 rmoveto TK ( = ) show LAB*L361Mi i361s get cvsshow1 ( ) show LAB*a361Mi i361s get cvsshow1 ( ) show LAB*b361Mi i361s get cvsshow1 TIK xshifs kn8 get yshifs kn8 get 1050 sub moveto (rgb*) show TK -30 -50 rmoveto (s) show 0 50 rmoveto TK ( = ) show r*d361Mi i361s get cvsshow3 ( ) show g*d361Mi i361s get cvsshow3 ( ) show b*d361Mi i361s get cvsshow3 } for %kn=0,8,40 0 8 48 {/i exch def %i=0,8,48 RJGCBMe /i361s habs50M i get round cvi def i361s 360 ge {/i361s i361s 360 sub def} if r*d361Mi i361s get g*d361Mi i361s get b*d361Mi i361s get setrgbcolor 0 0 moveto LAB*a361Mi i361s get fakt mul LAB*b361Mi i361s get fakt mul rlineto stroke 0 1 8 {/l exch def %l=0,8 newpath /alpha l 0.125 mul def /beta 1 alpha sub def 1.0 beta mul r*d361Mi i361s get alpha mul add 1.0 beta mul g*d361Mi i361s get alpha mul add 1.0 beta mul b*d361Mi i361s get alpha mul add setrgbcolor LAB*a361Mi i361s get fakt mul alpha mul LAB*b361Mi i361s get fakt mul alpha mul 100 0 360 arc fill } for %l=0,8 } for %i=0,8,48 } if %ibild=2 ibild 3 eq {%ibild=3 0 setgray -6500 3900 moveto TBK (Notes to the CIELAB chroma diagrams) showen (Anmerkung zu den CIELAB\255Buntheits\255Diagrammen) showde TBIK ( \050 a*) show TBS -30 -50 rmoveto (d) show 0 50 rmoveto TBIK (, b*) show TBS -30 -50 rmoveto (d) show 0 50 rmoveto TBIK ( \051, ) show TBIK ( \050 a*) show TBS -30 -50 rmoveto (s) show 0 50 rmoveto TBIK (, b*) show TBS -30 -50 rmoveto (s) show 0 50 rmoveto TBIK ( \051, ) show TBIK ( \050 a*) show TBS -30 -50 rmoveto (e) show 0 50 rmoveto TBIK (, b*) show TBS -30 -50 rmoveto (e) show 0 50 rmoveto TBIK ( \051) show -6500 3400 moveto TK (1. For the) showen (1. F\374r die) showde TIK ( rgb*) show TS -30 -50 rmoveto (d) show 0 50 rmoveto TK (\255input values the CIELAB data) showen (\255Eingabedaten wurden die CIELAB-Daten) showde TIK ( LCH*) show TS -30 -50 rmoveto (d) show 0 50 rmoveto TK ( and) showen ( und) showde TIK ( LAB*) show TS -30 -50 rmoveto (d) show 0 50 rmoveto TK ( have been measured.) showen ( gemessen.) showde -6500 3000 moveto TK (2. For the calculation of the standard hue angle ) showen TIK (h) show TS -30 -50 rmoveto (ab,s) show 0 50 rmoveto TK ( use for any device values) showen TIK ( rgb*) show TS -30 -50 rmoveto (d) show 0 50 rmoveto TK ( the equation:) showen -6000 2650 moveto TBIK (h) show TBS -30 -50 rmoveto (ab,s) show 0 50 rmoveto TBK ( = ) show TBIK (atan) show TBK ( [ ) show TBIK (r*) show TBS -30 -50 rmoveto (d) show 0 50 rmoveto TBIK ( cos(30)) show TBK ( + ) show TBIK (g*) show TBS -30 -50 rmoveto (d) show 0 50 rmoveto TBIK ( cos(150)) show TBK ( ] / [ ) show TBIK (r*) show TBS -30 -50 rmoveto (d) show 0 50 rmoveto TBIK ( sin(30)) show TBK ( + ) show TBIK (g*) show TBS -30 -50 rmoveto (d) show 0 50 rmoveto TBIK ( sin(150)) show TBK ( + ) show TBIK (b*) show TBS -30 -50 rmoveto (d) show 0 50 rmoveto TBIK ( sin(270)) show TBK ( ] ) show 5000 2650 moveto TK ((1)) show -6500 2200 moveto TK (3. For the 48 or 360 equally spaced standard hue angles ) showen (3. F\374r die 48 oder 360 gleichabst\344ndig gestuften Standard\255Bunttonwinkel ) showde TIK (h) show TS -30 -50 rmoveto (ab,s) show 0 50 rmoveto TK ( of the colours of maximum chroma use) showen ( der Farben von maximaler Buntheit benutze) showde -6250 1900 moveto (the seven hue angles of the 60 degree colours) showen (die sieben Bunttonwinkel der 60\Grad\255Farben) showde TIK ( s: h) show TS 0 -50 rmoveto (ab,si) show 0 50 rmoveto TK ( = ) show LAB*Hs 0 get cvsshow1r (, ) show LAB*Hs 1 get cvsshow1r (, ) show LAB*Hs 2 get cvsshow1r (, ) show LAB*Hs 3 get cvsshow1r (, ) show LAB*Hs 4 get cvsshow1r (, ) show LAB*Hs 5 get cvsshow1r (, ) show LAB*Hs 6 get cvsshow1r ( (i=0,6) ) show -6250 1600 moveto (and the equations for a 48 and 360 step hue circle: ) showen (und die Gleichungen f\374r einen 48\255 und 360\255stufigen Bunttonkreis: ) showde -6000 1250 moveto TBIK (h) show TBS 0 -50 rmoveto (48ab,sij) show 0 50 rmoveto TBK ( = ) show TBIK (h) show TBS 0 -50 rmoveto (ab,si) show 0 50 rmoveto ( + ) show TBIK (j) show TBK ( [) show TBIK (h) show TBS 0 -50 rmoveto (ab,si+1) show 0 50 rmoveto ( - ) show TBIK (h) show TBS 0 -50 rmoveto (ab,si) show 0 50 rmoveto TBK ( ] /8 \050 ) show TBIK (i) show TBK ( = 0, 1, ..., 5; ) show TBIK (j) show TBK ( = 0, 1, ..., 7\051) show 5000 1250 moveto TK ((2)) show -6000 0850 moveto TBIK (h) show TBS 0 -50 rmoveto (360ab,sij) show 0 50 rmoveto TBK ( = ) show TBIK (h) show TBS 0 -50 rmoveto (ab,si) show 0 50 rmoveto ( + ) show TBIK (j) show TBK ( [) show TBIK (h) show TBS 0 -50 rmoveto (ab,si+1) show 0 50 rmoveto ( - ) show TBIK (h) show TBS 0 -50 rmoveto (ab,si) show 0 50 rmoveto TBK ( ] /60 \050 ) show TBIK (i) show TBK ( = 0, 1, ..., 5; ) show TBIK (j) show TBK ( = 0, 1, ..., 59\051) show 5000 0850 moveto TK ((3)) show -6500 0400 moveto TK (4. For the 48 or 360 elementary hue angles ) showen (4. F\374r die 48 oder 360 Elementar\255Bunttonwinkel ) showde TIK (h) show TS -30 -50 rmoveto (ab,e) show 0 50 rmoveto TK ( of the colours of maximum chroma use) showen ( der Farben von maximaler Buntheit benutze) showde -6250 0100 moveto (the seven hue angles of the elementary colours) showen (die sieben Bunttonwinkel der Elementar\255Farben) showde TIK ( e: h) show TS 0 -50 rmoveto (ab,ei) show 0 50 rmoveto TK ( = ) show LAB*He 0 get cvsshow1r (, ) show LAB*He 1 get cvsshow1r (, ) show LAB*He 2 get cvsshow1r (, ) show LAB*He 3 get cvsshow1r (, ) show LAB*He 4 get cvsshow1r (, ) show LAB*He 5 get cvsshow1r (, ) show LAB*He 6 get cvsshow1r ( (i=0,6) ) show -6250 -200 moveto (and the equations for a 48 and 360 step elementary hue circle: ) showen (und die Gleichungen f\374r einen 48\255 und 360\255stufigen Elementar\255Bunttonkreis: ) showde -6000 -550 moveto TBIK (h) show TBS 0 -50 rmoveto (48ab,eij) show 0 50 rmoveto TBK ( = ) show TBIK (h) show TBS 0 -50 rmoveto (ab,ei) show 0 50 rmoveto ( + ) show TBIK (j) show TBK ( [) show TBIK (h) show TBS 0 -50 rmoveto (ab,ei+1) show 0 50 rmoveto ( - ) show TBIK (h) show TBS 0 -50 rmoveto (ab,ei) show 0 50 rmoveto TBK ( ] /8 \050 ) show TBIK (i) show TBK ( = 0, 1, ..., 5; ) show TBIK (j) show TBK ( = 0, 1, ..., 7\051) show 5000 -550 moveto TK ((4)) show -6000 -0950 moveto TBIK (h) show TBS 0 -50 rmoveto (360ab,eij) show 0 50 rmoveto TBK ( = ) show TBIK (h) show TBS 0 -50 rmoveto (ab,ei) show 0 50 rmoveto ( + ) show TBIK (j) show TBK ( [) show TBIK (h) show TBS 0 -50 rmoveto (ab,ei+1) show 0 50 rmoveto ( - ) show TBIK (h) show TBS 0 -50 rmoveto (ab,ei) show 0 50 rmoveto TBK ( ] /60 \050 ) show TBIK (i) show TBK ( = 0, 1, ..., 5; ) show TBIK (j) show TBK ( = 0, 1, ..., 59\051) show 5000 -950 moveto TK ((5)) show -6500 -1400 moveto TK (5. For any elementary hue angle ) showen (5. F\374r jeden Elementar\255Bunttonwinkel ) showde TIK (h) show TS -30 -50 rmoveto (ab,e) show 0 50 rmoveto TK ( there is a well defined device hue angle ) showen ( gibt es einem genau definierten Ger\344te\255Bunttonwinkel ) showde TIK (h) show TS -30 -50 rmoveto (ab,d) show 0 50 rmoveto -6250 -1700 moveto TK (see the following tables, columns 1 to 3.) showen (siehe die folgenden Tabellen, Spalten 1 bis 3.) showde -6500 -2100 moveto TK (6. The values ) showen (6. Die Werte ) showde TIK (rgb*) show TS -30 -50 rmoveto (de) show 0 50 rmoveto TK ( produce the output of the device\255independent elementary hues) showen ( erzeugen die Ausgabe der ger\344teunabh\344ngigen Elemetar\255Buntt\366ne) showde } if %ibild=3 } for %ibild=0,3 }%xchartl=0 {%xchartl>0 /x0x 0000 def /x1x 5700 def /x2x 13300 def /x01 2200 def %rgb /x02 2900 def /x03 3600 def /x04 4300 def %LabCh /x05 5000 def /x06 5700 def /x07 6400 def /x08 7100 def /x09 7700 def /x10 8400 def /x11 9100 def /xd0 0100 def /xs0 0800 def /xe0 1500 def /xd1 23050 def /xs1 23700 def /xe1 24350 def x0x x01 add 50 sub 0 moveto 0 16200 rlineto stroke x1x x01 add 50 sub 0 moveto 0 16200 rlineto stroke x2x x01 add 50 sub 0 moveto 0 16200 rlineto stroke /ymax 16100 def TBIK xd0 ymax moveto (h) show TBK -00 -80 rmoveto (ab,d) show 00 80 rmoveto TBIK xs0 ymax moveto (h) show TBK -00 -80 rmoveto (ab,s) show 00 80 rmoveto TBIK xe0 ymax moveto (h) show TBK -00 -80 rmoveto (ab,e) show 00 80 rmoveto TBIK xchartl 1 eq {%xchartl=1,>01 x0x x01 add ymax moveto (rgb*) show TBK -00 -80 rmoveto (dd50M) show 00 80 rmoveto TBIK x0x x04 add ymax moveto (LAB*) show TBK -00 -80 rmoveto (dd50Mx (x=LabCh)) show 00 80 rmoveto TBIK x1x x01 add ymax moveto (rgb*) show TBK -00 -80 rmoveto (ds50M) show 00 80 rmoveto TBIK x1x x04 add ymax moveto (LAB*) show TBK -00 -80 rmoveto (ds50Mx (x=LabCh)) show 00 80 rmoveto TBIK x1x x09 add ymax moveto (rgb*) show TBK -00 -80 rmoveto (s50M) show 00 80 rmoveto TBIK x2x x01 add ymax moveto (rgb*) show TBK -00 -80 rmoveto (de50M) show 00 80 rmoveto TBIK x2x x04 add ymax moveto (LAB*) show TBK -00 -80 rmoveto (de50Mx (x=LabCh)) show 00 80 rmoveto TBIK x2x x09 add ymax moveto (rgb*) show TBK -00 -80 rmoveto (e50M) show 00 80 rmoveto TBIK }%xchartl=1 {%xchartl>1 x0x x01 add ymax moveto (rgb*) show TBK -00 -80 rmoveto (dd361Mi) show 00 80 rmoveto TBIK x0x x04 add ymax moveto (LAB*) show TBK -00 -80 rmoveto (dd361Mix (x=LabCh)) show 00 80 rmoveto TBIK x1x x01 add ymax moveto (rgb*) show TBK -00 -80 rmoveto (ds361Mi) show 00 80 rmoveto TBIK x1x x04 add ymax moveto (LAB*) show TBK -00 -80 rmoveto (ds361Mix (x=LabCh)) show 00 80 rmoveto TBIK x1x x09 add ymax moveto (rgb*) show TBK -00 -80 rmoveto (s50M) show 00 80 rmoveto TBIK x2x x01 add ymax moveto (rgb*) show TBK -00 -80 rmoveto (de361Mi) show 00 80 rmoveto TBIK x2x x04 add ymax moveto (LAB*) show TBK -00 -80 rmoveto (de361Mix (x=LabCh)) show 00 80 rmoveto TBIK x2x x09 add ymax moveto (rgb*) show TBK -00 -80 rmoveto (e50M) show 00 80 rmoveto TBIK } ifelse %xchartl=1,>1 xd1 ymax moveto (rgb*) show TBK -100 -100 rmoveto (dd) show 100 100 rmoveto TBIK xs1 ymax moveto (rgb*) show TBK -100 -100 rmoveto (ds) show 100 100 rmoveto TBIK xe1 ymax moveto (rgb*) show TBK -100 -100 rmoveto (de) show 100 100 rmoveto TBIK /ymax 15700 def /ydel0 310 def /ydel1 345 def /ys 50 def /RJGCBMs 9 array def /RJGCBMs [( ) (R) (J) (G) (C) (C) (B) (M) (R)] def /RJGCBM 7 array def /RJGCBM [(R) (J) (G) (C) (B) (M) (R)] def xchartl 1 eq {%xchartl=01 TK 0 1 48 {/i exch def %i=0,48 /i8 i 8 idiv def /yi ymax i ydel0 mul sub i8 ydel0 0.4 mul mul sub def xd0 yi moveto habd50M i get cvsshow1r xs0 yi moveto habs50M i get cvsshow1r xe0 yi moveto habe50M i get cvsshow1r x0x x01 add yi moveto r*d50M i get cvsshow3r x0x x02 add yi moveto g*d50M i get cvsshow3r x0x x03 add yi moveto b*d50M i get cvsshow3r x0x x04 add yi moveto LAB*L50M i get cvsshow1r x0x x05 add yi moveto LAB*a50M i get cvsshow1r x0x x06 add yi moveto LAB*b50M i get cvsshow1r x0x x07 add yi moveto LAB*C50M i get cvsshow1r x0x x08 add yi moveto LAB*h50M i get cvsshow1r /i361s habs50M i get round cvi def i361s 360 ge {/i361s i361s 360 sub def} if x1x x01 add yi moveto r*d361Mi i361s get cvsshow3r x1x x02 add yi moveto g*d361Mi i361s get cvsshow3r x1x x03 add yi moveto b*d361Mi i361s get cvsshow3r x1x x04 add yi moveto LAB*L361Mi i361s get cvsshow1r x1x x05 add yi moveto LAB*a361Mi i361s get cvsshow1r x1x x06 add yi moveto LAB*b361Mi i361s get cvsshow1r x1x x07 add yi moveto LAB*C361Mi i361s get cvsshow1r x1x x08 add yi moveto LAB*h361Mi i361s get cvishow x1x x09 add yi moveto r*d50M i get cvsshow3r x1x x10 add yi moveto g*d50M i get cvsshow3r x1x x11 add yi moveto b*d50M i get cvsshow3r /i361e habe50M i get round cvi def i361e 360 ge {/i361e i361e 360 sub def} if x2x x01 add yi moveto r*d361Mi i361e get cvsshow3r x2x x02 add yi moveto g*d361Mi i361e get cvsshow3r x2x x03 add yi moveto b*d361Mi i361e get cvsshow3r x2x x04 add yi moveto LAB*L361Mi i361e get cvsshow1r x2x x05 add yi moveto LAB*a361Mi i361e get cvsshow1r x2x x06 add yi moveto LAB*b361Mi i361e get cvsshow1r x2x x07 add yi moveto LAB*C361Mi i361e get cvsshow1r x2x x08 add yi moveto LAB*h361Mi i361e get cvishow x2x x09 add yi moveto r*d50M i get cvsshow3r x2x x10 add yi moveto g*d50M i get cvsshow3r x2x x11 add yi moveto b*d50M i get cvsshow3r r*d50M i get g*d50M i get b*d50M i get setrgbcolor xd1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath fill r*d361Mi i361s get g*d361Mi i361s get b*d361Mi i361s get setrgbcolor xs1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath fill r*d361Mi i361e get g*d361Mi i361e get b*d361Mi i361e get setrgbcolor xe1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath fill 0 setgray xd1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath stroke xs1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath stroke xe1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath stroke } for %i=0,48 xtesthuea 0 ge {600 /TimesB-ISOL1 FS 8000 2100 moveto 30 rotate 0 setgray (no continues hue change of device near ) showen (keine kontinuiertliche Buntton\344nderung nahe ) showde 600 /TimesBI-ISOL1 FS (h) show 500 /TimesB-ISOL1 FS 0 -100 rmoveto (ab,d) show 0 100 rmoveto 600 /TimesB-ISOL1 FS ( = ) show 0 1 xtesthuea {/in exch def %in=0,xtesthuea LAB*h50M xtesthuei in get get cvishow in xtesthuea ne {(, ) show} if } for %in=0,xtesthuea -30 rotate 8000 1100 moveto 30 rotate (or ) showen ( oder ) showde 600 /TimesBI-ISOL1 FS (rgb*) show 500 /TimesBI-ISOL1 FS 0 -100 rmoveto (d) show 0 100 rmoveto 600 /TimesB-ISOL1 FS ( = ) show 0 1 xtesthuea {/in exch def %in=0,xtesthuea r*d50M xtesthuei in get get cvsshow3r (, ) show g*d50M xtesthuei in get get cvsshow3r (, ) show b*d50M xtesthuei in get get cvsshow3r in xtesthuea ne {(; ) show} if } for %in=0,xtesthuea -30 rotate 8000 0100 moveto 30 rotate 600 /TimesB-ISOL1 FS (appropriate correction done) showen (plausible Korrektur erfolgt) showde -30 rotate } if }%xchartl=1 {%xchartl>1 TK 0 1 45 {/i exch def %i=0,45 /ik45 xchartl 2 sub 45 mul i add def %range 0...359 /yi ymax i ydel1 mul sub def /hmini LAB*h50M 0 get cvi def /hmaxi LAB*h50M 48 get cvi def /ik45d ik45 hmini add def ik45d 360 ge {/ik45d ik45d 360 sub def} if /i361d LAB*h361Mi ik45 get round cvi def xd0 yi moveto LAB*h361Mi ik45d get cvishow xs0 yi moveto habs361M ik45 get cvishow xe0 yi moveto habe361M ik45 get cvishow x0x x01 add yi moveto r*d361Mi ik45d get cvsshow3r x0x x02 add yi moveto g*d361Mi ik45d get cvsshow3r x0x x03 add yi moveto b*d361Mi ik45d get cvsshow3r x0x x04 add yi moveto LAB*L361Mi ik45d get cvsshow1r x0x x05 add yi moveto LAB*a361Mi ik45d get cvsshow1r x0x x06 add yi moveto LAB*b361Mi ik45d get cvsshow1r x0x x07 add yi moveto LAB*C361Mi ik45d get cvsshow1r x0x x08 add yi moveto LAB*h361Mi ik45d get cvishow /i361s habs361M ik45 get def i361s 360 ge {/i361s i361s 360 sub def} if /ik45ds i361s def /ik45s ik45 30 add def ik45s 360 ge {/ik45s ik45s 360 sub def} if x1x x01 add yi moveto r*d361Mi ik45ds get cvsshow3r x1x x02 add yi moveto g*d361Mi ik45ds get cvsshow3r x1x x03 add yi moveto b*d361Mi ik45ds get cvsshow3r x1x x04 add yi moveto LAB*L361Mi ik45ds get cvsshow1r x1x x05 add yi moveto LAB*a361Mi ik45ds get cvsshow1r x1x x06 add yi moveto LAB*b361Mi ik45ds get cvsshow1r x1x x07 add yi moveto LAB*C361Mi ik45ds get cvsshow1r x1x x08 add yi moveto LAB*h361Mi ik45ds get cvishow x1x x09 add yi moveto r*s361Mi ik45s get cvsshow3r x1x x10 add yi moveto g*s361Mi ik45s get cvsshow3r x1x x11 add yi moveto b*s361Mi ik45s get cvsshow3r /i361e habe361M ik45 get def i361e 360 ge {/i361e i361e 360 sub def} if /ik45de i361e def /ik45e ik45 30 add def ik45e 360 ge {/ik45e ik45e 360 sub def} if x2x x01 add yi moveto r*d361Mi ik45de get cvsshow3r x2x x02 add yi moveto g*d361Mi ik45de get cvsshow3r x2x x03 add yi moveto b*d361Mi ik45de get cvsshow3r x2x x04 add yi moveto LAB*L361Mi ik45de get cvsshow1r x2x x05 add yi moveto LAB*a361Mi ik45de get cvsshow1r x2x x06 add yi moveto LAB*b361Mi ik45de get cvsshow1r x2x x07 add yi moveto LAB*C361Mi ik45de get cvsshow1r x2x x08 add yi moveto LAB*h361Mi ik45de get cvishow x2x x09 add yi moveto r*e361Mi ik45e get cvsshow3r x2x x10 add yi moveto g*e361Mi ik45e get cvsshow3r x2x x11 add yi moveto b*e361Mi ik45e get cvsshow3r r*e361Mi ik45e get g*e361Mi ik45e get b*e361Mi ik45e get setrgbcolor xd1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath fill r*d361Mi ik45ds get g*d361Mi ik45ds get b*d361Mi ik45ds get setrgbcolor xs1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath fill r*d361Mi ik45de get g*d361Mi ik45de get b*d361Mi ik45de get setrgbcolor xe1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath fill 0 setgray xd1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath stroke xs1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath stroke xe1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath stroke xchartl 2 eq ik45 000 eq and xchartl 3 eq ik45 060 eq and or xchartl 4 eq ik45 120 eq and or xchartl 5 eq ik45 180 eq and or xchartl 6 eq ik45 180 eq and or xchartl 7 eq ik45 240 eq and or xchartl 8 eq ik45 300 eq and or xchartl 9 eq ik45 360 eq and or {/ik 1 def} {/ik 0 def} ifelse ik 1 eq {x1x x01 add yi ydel1 0.7 mul add moveto x2x x11 add 600 add yi ydel1 0.7 mul add lineto stroke x1x x01 add yi ydel1 0.3 mul sub moveto x2x x11 add 600 add yi ydel1 0.3 mul sub lineto stroke} if ik 1 eq {TBIK x1x x11 add 320 add yi moveto RJGCBMs xchartl 1 sub get show TBS 0 -80 rmoveto (s) show 0 80 rmoveto TK TBIK x2x x11 add 320 add yi moveto RJGCBMs xchartl 1 sub get show TBS 0 -80 rmoveto (e) show 0 80 rmoveto TK} if 0 8 48 {/it exch def %it=0,8,48 LAB*h50M it get LAB*h361Mi ik45d get ge LAB*h50M it get LAB*h361Mi ik45d 1 add get lt and {x0x x01 add yi ydel1 0.3 mul sub moveto x1x x01 add yi ydel1 0.3 mul sub lineto stroke TBIK x1x x01 add 400 sub yi moveto RJGCBM it 8 idiv get show TBS 0 -80 rmoveto (d) show 0 80 rmoveto TK} if } for %it=0,8,48 } for i%=0,45 } ifelse %xchartl=1,>1 } ifelse %xchartl=0,>0 showpage grestore %} for %xchartl=00,09 grestore %} for %xcharti=00,10 %%Trailer