%!PS-Adobe-3.0 EPSF-3.0 130.149.60.45/~farbmetrik/HE99/HE99L00XX.PS 20091101 %%BoundingBox: 14 08 828 584 /pdfmark where {pop} {userdict /pdfmark /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: www.ps.bam.de/HE99/HE99.HTM) /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1) /Subject (goto: http://www.ps.bam.de or http://130.149.60.445/~farbmetrik) /Keywords (image reproduction, colour devices, colour vision, colorimetry) /Creator (klaus.richter@mac.com) /CreationDate (D:2009110112000) /ModDate (D:2009110112000) /DOCINFO pdfmark [ /View [ /Fit ] /DOCVIEW pdfmark /ColSpxG 0 def /ColSpx ColSpxG def /DEintp 1 def /rgb_cmy 0 def /LAB*ioG { } bind def /ColSepG { } bind def /VisTol*ioG 1.0 def %BEG HK0X->HE99/OUTLIN10.PS Output Linearization (OL) LAB*->cmyolvnw* 20090201 %Early Binding: needed for colour separation /sgcmykcolor {setcmykcolor} bind def /sggray {setgray} bind def /sgrgbcolor {setrgbcolor} bind def %FILE PREPARED FOR MIXED MODE, e. g. input ORS18 and output TLS00 /IMES 0 def %0=LAB* used, no reflection factor necessary %/IMES 1 def /Yre 2.52 def %1=XYZ measurement and standard device reflection %/i*ptrsc 0 def %LAB* setcolor to cmy0* / 000n* setcmykcolor /i*ptrsc 1 def %LAB* setcolor to olv* setrgbcolor / w* setgray %/i*ptrsc 2 def %LAB* setcolor to cmy0* / nnn0* setcmykcolor %/i*ptrsc 3 def %LAB* setcolor to olv* / www* setrgbcolor %/i*ptrsc 4 def %LAB* setcolor to lab* setcolor %/i*ptrsc 5 def %LAB* setcolor to LAB* setcolor %/i*ptrsc 6 def %LAB* setcolor to 000n* setcmykcolor %/i*ptrsc 7 def %LAB* setcolor to w* setgray /ISIN*ioG 0 def %default input for Offset Reflective System (ORS18/FRS09) /ISOU*ioG 0 def %default output dto. %/ISIN*ioG 1 def %input for Television Luminous System (TLS00) %/ISOU*ioG 1 def %output dto. %/ISIN*ioG 2 def %input for Device Reflective measurement system (FRS09) %/ISOU*ioG 2 def %output dto. %/ISIN*ioG 3 def %input for Television Luminous Reflection System (TLS18) %/ISOU*ioG 3 def %output dto. %/ISIN*ioG 4 def %input for Natural Luminous System (NLS00) %/ISOU*ioG 4 def %output dto. %/ISIN*ioG 5 def %input for Natural Reflective System (NRS11) %/ISOU*ioG 5 def %output dto. %/ISIN*ioG 6 def %input for Standard Reflective System (CIE18) %/ISOU*ioG 6 def %output dto. %/ISIN*ioG 7 def %input for Standard Reflective System (TLS70) %/ISOU*ioG 7 def %output dto. /iLAB 0 def /ISIO*ioG 0 def /ISRL*ioG 0 def % for io-System, only once /auszg 8 def /ausz 8 def %END GK0X->HE99/OUTLIN10.PS Output Linearization (OL) LAB*->cmyolvnw* 20090201 %***************************************************************************** %BEG HK0X->HE99/10L/OUTLIN1X.PS, ident. for NP-(*ioG), FP-files (*ioG) 20090201 %***************************************************************************** %Data (ORS18_95, L*=18_95) /proc_LAB*ioG {%BEG Procedure proc_LAB*ioG %requires ISRL*ioG=0,1,3 /RJGBLAB* 12 array def /RJGBLAB*[ 39.92 58.74 27.99 % R CIE No.09 elementary colours in LAB, D65 81.26 -2.89 71.56 % J CIE No.10 52.23 -42.42 13.60 % G CIE No.11 30.57 1.41 -46.47 % B CIE No.12 ] def /LAB* 132 array def %12x3=36 including N,W + 16x3=48 elementary system + 16x3=48 device system /LAB*a 132 array def /LAB*Hx 13 array def %0_to_6 8_to_12 for device and elemetary colours /LAB*00 24 array def /LAB*01 24 array def /LAB*02 24 array def /LAB*03 24 array def /LAB*04 24 array def /LAB*05 24 array def /LAB*06 24 array def /LAB*07 24 array def /LAB*TE %used in file and frame [(ORS18_95, L*=18_95) (TLS00) (FRS06) (TSL18) (NLS00) (NLS18) (SRS18) (TLS70) (TLS00) (TLS06) (TLS11) (TLS18) (TLS27) (TLS38) (TLS52) (TLS70) (OLS00) (OLS06) (OLS11) (OLS18) (OLS27) (OLS38) (OLS52) (OLS70)] def %ORS18_950_D65_ALM_GK00_G.DAT, Model or transfer to Real data, 55 lines, 141:195 ISRL*ioG 0 eq { %ISRL*ioG=0 /LAB*00 [%D=Device OYLCVMO+NW %for Offset Reflective System (ORS18) %LAB* %#1000 x (r g b c m y 0) (ORS18_95A_D65_ALM) %047.94 65.31 52.07 %O 0 %090.37 -11.16 96.17 %Y 1 %050.90 -62.97 36.71 %L 2 %058.62 -30.63 -42.75 %C 3 %see TABle 1 of ISO/IEC 15775:1999-12 %025.72 31.45 -44.36 %V 4 %048.13 75.20 -6.80 %M 5 %018.01 0.50 -0.47 %N 7 %095.41 -0.99 4.76 %W 8 %From LUT_De740-7N_3_4_ORS18_95.DAT 20080625 %Data output of De74/10L/De740-7N.EPS -> De740_3_4_Model.log %(ORS18_950_D65_ALM_GK00), line 15-34 %LAB* %#1000 x (r g b c m y 0) not adapted %z04794 06531 05207 %O 0 %z09037 -1116 09617 %Y 1 %z05090 -6297 03671 %L 2 %z05862 -3063 -4275 %C 3 %see TABle 1 of ISO/IEC 15775:1999-12 %z02572 03145 -4436 %V 4 %z04813 07520 -0680 %M 5 %z01801 00050 -0047 %N 6 %z09541 -0099 00476 %W 7 %$ 04794 06531 05207 %O 0 09037 -1116 09617 %Y 1 05090 -6297 03671 %L 2 05862 -3063 -4275 %C 3 %see TABle 1 of ISO/IEC 15775:1999-12 02572 03145 -4436 %V 4 04813 07520 -0680 %M 5 01801 00050 -0047 %N 6 09541 -0099 00476 %W 7 %$ %(ORS18_95A_D65_ALM_GK00), line 35-54 %LAB*a %#1000 x (r g b c m y 0), adapted %04794 06537 05050 %#1000 0000 0000 0000 1000 1000 0000 %1074 l26 $O %09036 -1026 09173 %#1000 1000 0000 0000 0000 1000 0000 %1076 m26 $Y %05090 -6282 03495 %#0000 1000 0000 1000 0000 1000 0000 %1078 n26 $L %05861 -3034 -4501 %#0000 1000 1000 1000 0000 0000 0000 %1075 l27 $C %02572 03109 -4440 %#0000 0000 1000 1000 1000 0000 0000 %1077 m27 $V %04813 07526 -0836 %#1000 0000 1000 0000 1000 0000 0000 %1079 n27 $M %01802 00000 00000 %#0000 0000 0000 1000 1000 1000 0000 %1072 k26 $N %09540 00000 00000 %#1000 1000 1000 0000 0000 0000 0000 %1073 k27 $W %$ %04794 06537 05050 %#1000 0000 0000 0000 1000 1000 0000 %1074 l26 $O %09036 -1026 09173 %#1000 1000 0000 0000 0000 1000 0000 %1076 m26 $Y %05090 -6282 03495 %#0000 1000 0000 1000 0000 1000 0000 %1078 n26 $L %05861 -3034 -4501 %#0000 1000 1000 1000 0000 0000 0000 %1075 l27 $C %02572 03109 -4440 %#0000 0000 1000 1000 1000 0000 0000 %1077 m27 $V %04813 07526 -0836 %#1000 0000 1000 0000 1000 0000 0000 %1079 n27 $M %01802 00000 00000 %#0000 0000 0000 1000 1000 1000 0000 %1072 k26 $N %09540 00000 00000 %#1000 1000 1000 0000 0000 0000 0000 %1073 k27 $W %$ ] def %OYLCVMO+NW /LAB*01 [%D=Device OYLCVMO+NW %for Television Luminous System (TLS00) 50.50 76.92 64.55 %O 0 92.66 -20.70 90.75 %Y 1 83.63 -82.76 79.90 %L 2 86.88 -46.17 -13.56 %C 3 %see TABle 1 of ISO/IEC 15775:1999-12 30.39 76.06 -103.6 %V 4 corected 57.30 94.35 -58.42 %M 5 corected 00.01 0.00 0.00 %N 7 corected 95.41 0.00 0.00 %W 8 ] def %OYLCVMO+NW /LAB*02 [%D=Device OYLCVMO+NW %for Device Reflective System (FRS06. FUJI) 32.57 61.14 43.72 %8-0-0 O-W 0 olv* setrgbcolor 64 82.73 -3.51 109.24 %8-8-0 Y-W 1 olv* setrgbcolor 32 39.43 -62.87 42.80 %0-8-0 L-W 2 olv* setrgbcolor 80 47.86 -27.73 -37.62 %0-8-8 C-W 3 olv* setrgbcolor 0 actual printer 10.16 53.56 -62.92 %0-0-8 V-W 4 olv* setrgbcolor 96 34.50 79.53 -36.77 %8-0-8 M-W 5 olv* setrgbcolor 16 06.25 -1.63 -1.73 %0-0-0 N-W 6 olv* setrgbcolor 48 91.97 -0.18 -5.11 %8-8-8 A-W 7 olv* setrgbcolor ] def %OYLCVMO+NW /LAB*03 [%D=Device OYLCVMO+NW %for Television Luminous System (TLS18) 52.76 71.63 49.88 %O 0 92.74 -20.03 84.97 %Y 1 84.00 -78.99 73.94 %L 2 87.14 -44.42 -13.12 %C 3 %see TABle 1 of ISO/IEC 15775:1999-12 35.47 64.92 -95.07 %V 4 %see TABle X of ISO/IEC TR 24705:2005-10 59.01 89.33 -55.68 %M 5 %see Annex A, www.ps.bam.de/RLABE.PDF 18.01 0.00 0.00 %N 6 Yr=2.52 95.41 0.00 0.00 %W 7 ] def %OYLCVMO+NW /LAB*04 [%Natural symmetric Luminous System OYLCVMO+NW (NLS00) 31.81 82.62 47.70 %O 0 95.40/2 = 47.70 63.61 00.00 95.40 %Y 1 C*ab = 95.40 31.81 -82.62 47.70 %L 2 0.866 C*ab = 0.866 * 95.40 = 82.62 63.61 -82.62 -47.70 %C 3 delta L*=25.8 31.81 00.00 -95.40 %V 4 43.81=00.01+31.80 63.61 82.62 -47.70 %M 5 69.61=00.01+2*31.80 00.01 0.00 0.00 %N 6 95.40/3 = 31.80 95.41 0.00 0.00 %W 7 95.40*(2/3) = 63.60 ] def %CVMOYLC+NW /LAB*05 [%Natural symmetric Luminous System OYLCVMO+NW (NLS18) 43.81 67.03 38.70 %O 0 77.40/2 = 38.70 69.61 00.00 77.40 %Y 1 C*ab = 77.40 43.81 -67.03 38.70 %L 2 0.866 C*ab = 67.03 69.61 -67.03 -38.70 %C 3 delta L*=25.8 43.81 00.00 -77.40 %V 4 43.81=18.01+25.80 69.61 67.03 -38.70 %M 5 69.61=18.01+2*25.80 18.01 0.00 0.00 %N 6 18.01+77.40/3 = 18.01+25.80=43.81 95.41 0.00 0.00 %W 7 18.01+77.40*(2/3) = 18.01+51.60=69.61 ] def %CVMOYLC+NW /LAB*06 [%Symmetric Reflective System OYLCVMO+NW (SRS18) 56.71 67.03 38.70 %O 0 18.01 + 77.40*0.5 = 18.01 + 38.70 = 56.71 56.71 00.00 77.40 %Y 1 C*ab = 77.40 56.71 -67.03 38.70 %L 2 0.866 C*ab = 67.03 56.71 -67.03 -38.70 %C 3 delta L*=25.8 56.71 00.00 -77.40 %V 4 43.81=18.01+25.80 56.71 67.03 -38.70 %M 5 69.61=18.01+2*25.80 18.01 0.00 0.00 %N 6 95.41 0.00 0.00 %W 7 95.41=18.01+3*25.80 ] def %CVMOYLC+NW /LAB*07 [%D=Device OYLCVMO+NW %for Television Luminous System (TLS70) 76.43 26.27 10.57 %O 0 93.93 -10.77 34.63 %Y 1 89.32 -35.81 27.64 %L 2 90.93 -21.96 -7.08 %C 3 %see Annex A, www.ps.bam.de/RLABE.PDF 72.10 15.76 -35.64 %V 4 78.50 37.52 -25.24 %M 5 69.70 0.00 0.00 %N 6 Yr=40.32 95.41 0.00 0.00 %W 7 ] def %OYLCVMO+NW } if %ISRL*ioG=0 ISRL*ioG 1 eq { %ISRL*ioG=1 /LAB*00 [%D=Device CVMOYLC+NW %for Television Luminous System (TLS00) 50.50 76.91 64.55 %O 0 92.66 -20.68 90.75 %Y 1 83.62 -82.74 79.90 %L 2 86.88 -46.15 -13.54 %C 3 %see TABle 1 of ISO/IEC 15775:1999-12 30.39 76.06 -103.6 %V 4 %see TABle X of ISO/IEC TR 24705:2005-10 57.31 94.35 -58.40 %M 5 %see Annex A, www.ps.bam.de/RLABE.PDF 00.01 0.00 0.00 %N 6 Yr=0.00 95.41 0.00 0.00 %W 7 ] def %CVMOYLC+NW /LAB*01 [%D=Device CVMOYLC+NW %for Television Luminous System (TLS06) 51.08 75.54 59.69 %O 0 92.68 -20.51 89.24 %Y 1 83.72 -81.79 78.32 %L 2 86.94 -45.72 -13.43 %C 3 %see Annex A, www.ps.bam.de/RLABE.PDF 31.77 72.91 -101.3 %V 4 57.74 93.06 -57.71 %M 5 05.69 0.00 0.00 %N 6 Yr=0.63 95.41 0.00 0.00 %W 7 ] def %CVMOYLC+NW /LAB*02 [%D=Device CVMOYLC+NW %for Television Luminous System (TLS11) 51.65 74.20 55.83 %O 0 92.70 -20.35 87.77 %Y 1 83.81 -80.85 76.81 %L 2 87.01 -45.28 -13.33 %C 3 %see Annex A, www.ps.bam.de/RLABE.PDF 33.06 70.03 -99.09 %V 4 58.17 91.80 -57.03 %M 5 10.99 0.00 0.00 %N 6 Yr=1.26 95.41 0.00 0.00 %W 7 ] def %CVMOYLC+NW /LAB*03 [%D=Device CVMOYLC+NW %for Television Luminous System (TLS18) 52.76 71.63 49.88 %O 0 92.74 -20.03 84.97 %Y 1 84.00 -78.99 73.94 %L 2 87.14 -44.42 -13.12 %C 3 %see TABle 1 of ISO/IEC 15775:1999-12 35.47 64.92 -95.07 %V 4 %see TABle X of ISO/IEC TR 24705:2005-10 59.01 89.33 -55.68 %M 5 %see Annex A, www.ps.bam.de/RLABE.PDF 18.01 0.00 0.00 %N 6 Yr=2.52 95.41 0.00 0.00 %W 7 ] def %CVMOYLC+NW /LAB*04 [%D=Device CVMOYLC+NW %for Television Luminous System (TLS27) 54.88 66.84 41.69 %O 0 92.82 -19.39 79.81 %Y 1 84.37 -75.39 68.76 %L 2 87.40 -42.72 -12.70 %C 3 %see Annex A, www.ps.bam.de/RLABE.PDF 39.70 56.66 -88.02 %V 4 60.64 84.61 -53.08 %M 5 26.85 0.00 0.00 %N 6 Yr=5.04 95.41 0.00 0.00 %W 7 ] def %CVMOYLC+NW /LAB*05 [%D=Device CVMOYLC+NW %for Television Luminous System (TLS38) 58.77 58.45 31.73 %O 0 92.98 -18.11 70.81 %Y 1 85.11 -68.58 60.02 %L 2 87.92 -39.42 -11.87 %C 3 %see Annex A, www.ps.bam.de/RLABE.PDF 46.64 44.93 -76.56 %V 4 63.71 75.92 -48.22 %M 5 37.99 0.00 0.00 %N 6 Yr=10.08 95.41 0.00 0.00 %W 7 ] def %CVMOYLC+NW /LAB*06 [%D=Device CVMOYLC+NW %for Television Luminous System (TLS52) 65.53 45.06 20.98 %O 0 93.30 -15.61 56.27 %Y 1 86.55 -56.31 46.52 %L 2 88.94 -33.19 -10.24 %C 3 %see Annex A, www.ps.bam.de/RLABE.PDF 57.17 30.66 -59.40 %V 4 69.22 60.95 -39.57 %M 5 52.02 0.00 0.00 %N 6 Yr=20.16 95.41 0.00 0.00 %W 7 ] def %CVMOYLC+NW /LAB*07 [%D=Device CVMOYLC+NW %for Television Luminous System (TLS70) 76.43 26.27 10.57 %O 0 93.93 -10.77 34.63 %Y 1 89.32 -35.81 27.64 %L 2 90.93 -21.96 -7.08 %C 3 %see Annex A, www.ps.bam.de/RLABE.PDF 72.10 15.76 -35.64 %V 4 78.50 37.52 -25.24 %M 5 69.70 0.00 0.00 %N 6 Yr=40.32 95.41 0.00 0.00 %W 7 ] def %CVMOYLC+NW } if %ISRL*ioG=1 ISRL*ioG 2 eq { %ISRL*ioG=2 /LAB*00 [%D=Device OYLCVMO+NW %for Offset Luminous System (OLS00) 45.14 71.37 75.54 %O 0 90.22 -10.60 99.51 %Y 1 48.45 -73.19 42.21 %L 2 56.88 -33.11 -47.41 %C 3 %see TABle 1 of ISO/IEC 15775:1999-12 16.48 45.84 -56.22 %V 4 %see TABle X of ISO/IEC TR 24705:2005-10 45.36 81.85 -9.29 %M 5 %see Annex A, www.ps.bam.de/RLABE.PDF 00.01 0.00 0.00 %N 6 Yr=0.00 95.41 0.00 0.00 %W 7 ] def %OYLCVMO+NW /LAB*01 [%D=Device OYLCVMO+NW %for Offset Luminous System (OLS06) 45.87 69.79 66.99 %O 0 90.25 -10.51 97.42 %Y 1 49.08 -70.28 40.08 %L 2 57.33 -32.38 -46.80 %C 3 %see Annex A, www.ps.bam.de/RLABE.PDF 19.26 40.73 -52.47 %V 4 46.07 80.12 -9.04 %M 5 05.69 0.00 0.00 %N 6 Yr=0.63 95.41 0.00 0.00 %W 7 ] def %OYLCVMO+NW /LAB*02 [%D=Device OYLCVMO+NW %for Offset Luminous System (OLS11) 46.57 68.27 59.62 %O 0 90.29 -10.43 95.45 %Y 1 49.70 -67.60 38.19 %L 2 57.76 -31.68 -46.19 %C 3 %see Annex A, www.ps.bam.de/RLABE.PDF 21.67 36.81 -49.37 %V 4 46.77 78.45 -8.80 %M 5 10.99 0.00 0.00 %N 6 Yr=1.26 95.41 0.00 0.00 %W 7 ] def %OYLCVMO+NW /LAB*03 [%D=Device OYLCVMO+NW %for Offset Luminous System (OLS18) 47.94 65.39 50.52 %O 0 90.37 -10.26 91.75 %Y 1 50.90 -62.83 34.96 %L 2 58.62 -30.34 -45.01 %C 3 %see TABle 1 of ISO/IEC 15775:1999-12 25.72 31.10 -44.40 %V 4 %see TABle X of ISO/IEC TR 24705:2005-10 48.13 75.28 -8.36 %M 5 %see Annex A, www.ps.bam.de/RLABE.PDF 18.01 0.00 0.00 %N 6 Yr=2.52 95.41 0.00 0.00 %W 7 ] def %OYLCVMO+NW /LAB*04 [%D=Device OYLCVMO+NW %for Offset Luminous System (OLS27) 50.51 60.17 40.13 %O 0 90.52 -9.92 85.20 %Y 1 53.18 -55.04 30.00 %L 2 60.28 -27.91 -42.75 %C 3 %see Annex A, www.ps.bam.de/RLABE.PDF 32.06 24.02 -37.32 %V 4 50.68 69.50 -7.57 %M 5 26.85 0.00 0.00 %N 6 Yr=5.04 95.41 0.00 0.00 %W 7 ] def %OYLCVMO+NW /LAB*05 [%D=Device OYLCVMO+NW %for Offset Luminous System (OLS38) 55.13 51.42 29.16 %O 0 90.83 -9.25 74.37 %Y 1 57.35 -43.84 23.35 %L 2 63.39 -23.83 -38.56 %C 3 %see Annex A, www.ps.bam.de/RLABE.PDF 41.26 16.67 -28.49 %V 4 55.27 59.74 -6.32 %M 5 37.99 0.00 0.00 %N 6 Yr=10.08 95.41 0.00 0.00 %W 7 ] def %OYLCVMO+NW /LAB*06 [%D=Device OYLCVMO+NW %for Offset Luminous System (OLS52) 62.90 38.38 18.55 %O 0 91.44 -7.95 57.91 %Y 1 64.49 -30.06 15.67 %L 2 68.98 -17.74 -31.24 %C 3 %see Annex A, www.ps.bam.de/RLABE.PDF 53.87 10.09 -18.84 %V 4 63.00 44.96 -4.56 %M 5 52.02 0.00 0.00 %N 6 Yr=20.16 95.41 0.00 0.00 %W 7 ] def %OYLCVMO+NW /LAB*07 [%D=Device OYLCVMO+NW %for Offset Luminous System (OLS70) 75.01 21.53 9.07 %O 0 92.64 -5.45 34.85 %Y 1 75.86 -15.50 7.96 %L 2 78.37 -9.90 -19.51 %C 3 %see Annex A, www.ps.bam.de/RLABE.PDF 70.54 4.74 -9.47 %V 4 75.07 25.47 -2.46 %M 5 69.70 0.00 0.00 %N 6 Yr=40.32 95.41 0.00 0.00 %W 7 ] def %OYLCVMO+NW } if %ISRL*ioG=2 0 1 11 {/sISO exch def %sISO=0,11 /i30 sISO 3 mul def /i31 i30 1 add def /i32 i30 2 add def sISO 7 le { %sISO=0,7 ISIO*ioG 0 eq { %ORS18/TLS00/OLS00 LAB* i30 LAB*00 i30 get 100 div put LAB* i31 LAB*00 i31 get 100 div put LAB* i32 LAB*00 i32 get 100 div put } if ISIO*ioG 1 eq { %TLS00/TLS06/OLS06 LAB* i30 LAB*01 i30 get put LAB* i31 LAB*01 i31 get put LAB* i32 LAB*01 i32 get put } if ISIO*ioG 2 eq { %FRS06/TLS11/OLS11 LAB* i30 LAB*02 i30 get put LAB* i31 LAB*02 i31 get put LAB* i32 LAB*02 i32 get put } if ISIO*ioG 3 eq { %TLS18/TLS18/OLS18 LAB* i30 LAB*03 i30 get put LAB* i31 LAB*03 i31 get put LAB* i32 LAB*03 i32 get put } if ISIO*ioG 4 eq { %NLS00/TSL28/OLS28 LAB* i30 LAB*04 i30 get put LAB* i31 LAB*04 i31 get put LAB* i32 LAB*04 i32 get put } if ISIO*ioG 5 eq { %NRS18/TLS38/OLS38 LAB* i30 LAB*05 i30 get put LAB* i31 LAB*05 i31 get put LAB* i32 LAB*05 i32 get put } if ISIO*ioG 6 eq { %SRS18/TLS50/OLS50 LAB* i30 LAB*06 i30 get put LAB* i31 LAB*06 i31 get put LAB* i32 LAB*06 i32 get put } if ISIO*ioG 7 eq { %TLS70/TLS70/OLS70 LAB* i30 LAB*07 i30 get put LAB* i31 LAB*07 i31 get put LAB* i32 LAB*07 i32 get put } if } %sISO=0,7 {%sISO=8,11 %Definition 8 to 11 (24 to 35=33+2) /jISO sISO 8 sub def /j30 jISO 3 mul def /j31 j30 1 add def /j32 j30 2 add def LAB* i30 RJGBLAB* j30 get put LAB* i31 RJGBLAB* j31 get put LAB* i32 RJGBLAB* j32 get put LAB*a i30 LAB* i30 get put LAB*a i31 LAB* i31 get put LAB*a i32 LAB* i32 get put } ifelse } for %sISO=0,11 % possible change of LAB*a according to reduced gamut %LAB* = 20 for Black N %LAB* = 95 for White W %cfakt = (95 - 20)/(95.41 - 18.01) = 0.969 %LAB*L*Nn = 20 for Black N instead of LAB*L*N = 18,01 %LAB*L*Wn = 95 for White W instead of LAB*L*W = 95,41 %LAB*L*Zn = 20+(95-20)/2=57,5 for Grey Z instead of %LAB*L*Z = 18,01+(95,41-18,01)/2=56,71 %L*neu = L*alt + (1 - cfakt %For achromatic %deltaLmean = 57,5 (1-c*neu); 56,71 (1-c*alt) %deltaLmimu = 20,0 (1-c*neu); 18,01 (1-c*alt) %deltaLplus = 95,0 (1-c*neu); 95,41 (1-c*alt) %For chromatic M %deltaLmean = L*Ma,neu; L*Ma,alt = known %C*Ma,alt known, C*Ma,neu known /L*Nio LAB* 18 get def /A*Nio LAB* 19 get def /B*Nio LAB* 20 get def /L*Wio LAB* 21 get def /A*Wio LAB* 22 get def /B*Wio LAB* 23 get def /L*Wioref 95.0 def /L*Nioref 18.0 def /cfakt 1 def %/cfakt L*Wioref L*Nioref sub L*Wio L*Nio sub div def cfakt 1 ne {%cfakt#1 %change of lightness for Maximum colour /l*CIEN L*Nioref L*Nio sub L*Wio L*Nio sub div def /l*CIEW L*Wioref L*Nio sub L*Wio L*Nio sub div def %LAB* 18 L*Nioref put %defined change of lightness and chroma a*,b* for N LAB* 19 A*Nio A*Wio A*Nio sub l*CIEN mul add put LAB* 20 B*Nio B*Wio B*Nio sub l*CIEN mul add put %LAB* 21 L*Wioref put %defined change of lightness and chroma a*,b* for W LAB* 22 A*Nio A*Wio A*Nio sub l*CIEW mul add put LAB* 23 B*Nio B*Wio B*Nio sub l*CIEW mul add put %change of chroma by factor cfakt 0 1 07 {/iISO exch def /i30 iISO 3 mul def /i31 i30 1 add def /i32 i30 2 add def /l*CIEL LAB* i30 get L*Nio sub L*Wio L*Nio sub div def LAB* i30 L*Nioref L*Wioref L*Nioref sub l*CIEL mul add put LAB* i31 LAB* i31 get cfakt mul put LAB* i32 LAB* i32 get cfakt mul put } for } if %cfakt#1 /L*Nior LAB* 18 get def %r=reference for reverse transform /A*Nior LAB* 19 get def /B*Nior LAB* 20 get def /L*Wior LAB* 21 get def /A*Wior LAB* 22 get def /B*Wior LAB* 23 get def /cf1 1.00 def 0 1 7 {/iISO exch def %iISO=0,7 /i30 iISO 3 mul def /i31 i30 1 add def /i32 i30 2 add def /l*CIE LAB* i30 get L*Nior sub L*Wior L*Nior sub div def /a*sr A*Wior A*Nior sub l*CIE mul def /b*sr B*Wior B*Nior sub l*CIE mul def /L*Z L*Nior L*Wior L*Nior sub 0.5 mul add def LAB*a i30 LAB* i30 get L*Z sub cf1 mul L*Z add put LAB*a i31 LAB* i31 get A*Nior sub a*sr sub cf1 mul put LAB*a i32 LAB* i32 get B*Nior sub b*sr sub cf1 mul put } for /L*Nio LAB*a 18 get def %=18.01 /A*Nio LAB*a 19 get def %=0 /B*Nio LAB*a 20 get def %=0 /L*Wio LAB*a 21 get def %=95.41 /A*Wio LAB*a 22 get def %=0 /B*Wio LAB*a 23 get def %=0 /A*Dio A*Wio A*Nio sub def %=0 /B*Dio B*Wio B*Nio sub def %=0 /cLAB*s0 3 array def %C cyan blue /vLAB*s0 3 array def %V violet blue /mLAB*s0 3 array def %M magenta red /oLAB*s0 3 array def %O orange red /yLAB*s0 3 array def %Y yellow /lLAB*s0 3 array def %L leaf green /nLAB*s0 3 array def %N black /wLAB*s0 3 array def %W white /rLAB*s0 3 array def %R elementary red /jLAB*s0 3 array def %J elementary yellow /gLAB*s0 3 array def %G elementary green /bLAB*s0 3 array def %B elementary blue %Determine Matrix data input or output data oLAB*s0 0 LAB*a 0 get L*Nio sub put oLAB*s0 1 LAB*a 1 get put oLAB*s0 2 LAB*a 2 get put yLAB*s0 0 LAB*a 3 get L*Nio sub put yLAB*s0 1 LAB*a 4 get put yLAB*s0 2 LAB*a 5 get put lLAB*s0 0 LAB*a 6 get L*Nio sub put lLAB*s0 1 LAB*a 7 get put lLAB*s0 2 LAB*a 8 get put cLAB*s0 0 LAB*a 9 get L*Nio sub put cLAB*s0 1 LAB*a 10 get put cLAB*s0 2 LAB*a 11 get put vLAB*s0 0 LAB*a 12 get L*Nio sub put vLAB*s0 1 LAB*a 13 get put vLAB*s0 2 LAB*a 14 get put mLAB*s0 0 LAB*a 15 get L*Nio sub put mLAB*s0 1 LAB*a 16 get put mLAB*s0 2 LAB*a 17 get put nLAB*s0 0 LAB*a 18 get L*Nio sub put nLAB*s0 1 LAB*a 19 get put nLAB*s0 2 LAB*a 20 get put wLAB*s0 0 LAB*a 21 get L*Nio sub put wLAB*s0 1 LAB*a 22 get put wLAB*s0 2 LAB*a 23 get put rLAB*s0 0 LAB*a 24 get L*Nio sub put rLAB*s0 1 LAB*a 25 get put rLAB*s0 2 LAB*a 26 get put jLAB*s0 0 LAB*a 27 get L*Nio sub put jLAB*s0 1 LAB*a 28 get put jLAB*s0 2 LAB*a 29 get put gLAB*s0 0 LAB*a 30 get L*Nio sub put gLAB*s0 1 LAB*a 31 get put gLAB*s0 2 LAB*a 32 get put bLAB*s0 0 LAB*a 33 get L*Nio sub put bLAB*s0 1 LAB*a 34 get put bLAB*s0 2 LAB*a 35 get put % Determine the input or output angle in the A* B* plane % of each of the colours defined above /C*Ang cLAB*s0 2 get cLAB*s0 1 get 0.0001 add atan def /V*Ang vLAB*s0 2 get vLAB*s0 1 get 0.0001 add atan def /M*Ang mLAB*s0 2 get mLAB*s0 1 get 0.0001 add atan def /O*Ang oLAB*s0 2 get oLAB*s0 1 get 0.0001 add atan def /Y*Ang yLAB*s0 2 get yLAB*s0 1 get 0.0001 add atan def /L*Ang lLAB*s0 2 get mLAB*s0 1 get 0.0001 add atan def /N*Ang 0 def /W*Ang 0 def /R*Ang rLAB*s0 2 get rLAB*s0 1 get 0.0001 add atan def /J*Ang jLAB*s0 2 get jLAB*s0 1 get 0.0001 add atan def /G*Ang gLAB*s0 2 get gLAB*s0 1 get 0.0001 add atan def /B*Ang bLAB*s0 2 get bLAB*s0 1 get 0.0001 add atan def %6+1 hue angles for 6 device colour (index 0 to 06) %4+1 hue angles for 4 elementary colours (index 8 to 12) %no. 6 and 7 originaly achromatic 0 1 11 {/iHx exch def /i1x iHx 3 mul 1 add def /i2x i1x 1 add def LAB*Hx iHx LAB*a i2x get LAB*a i1x get 0.000001 add atan put } for LAB*Hx 06 LAB*Hx 00 get 360 add put LAB*Hx 12 LAB*Hx 08 get 360 add put %6 Hue angles of elementary and intermediate colours e=RJGCgbBMbr /LAB*He 7 array def LAB*He 0 LAB*Hx 08 get put %R LAB*He 1 LAB*Hx 09 get put %J LAB*He 2 LAB*Hx 10 get put %G LAB*He 3 LAB*Hx 10 get LAB*Hx 11 get add 0.5 mul put %Cgb LAB*He 4 LAB*Hx 11 get put %B LAB*He 5 LAB*Hx 11 get LAB*Hx 08 get 360 add add 0.5 mul put %Mbr LAB*He 6 LAB*Hx 08 get 360 add put %R(+360) %6 Hue angles of device and intermediate colours d=OYLCVMO /LAB*Hd 7 array def LAB*Hd 0 LAB*Hx 00 get put %O LAB*Hd 1 LAB*Hx 01 get put %Y LAB*Hd 2 LAB*Hx 02 get put %L LAB*Hd 3 LAB*Hx 03 get put %C LAB*Hd 4 LAB*Hx 04 get put %V LAB*Hd 5 LAB*Hx 05 get put %M LAB*Hd 6 LAB*Hx 00 get 360 add put %O(+360) /ColeiNames 16 array def /ColeiNames [(r00j) (r25j) (r50j) (r75j) (j00g) (j25g) (j50g) (j75g) (g00b) (g25b) (g50b) (g75b) (b00r) (b25r) (b50r) (b75r) ] def /ColdiNames 16 array def /ColdiNames [(o00y) (o25y) (o50y) (o75y) (y00l) (y25l) (y50l) (y75l) (l00c) (l50c) (c00v) (c50v) (v00m) (v50m) (m00o) (m50o) ] def /L*diMa 16 array def %LAB*diMa /A*diMa 16 array def /B*diMa 16 array def /o3*ddiMa 16 array def %olv3*ddiMa /l3*ddiMa 16 array def /v3*ddiMa 16 array def /u*ddiMa1 16 array def %u*ddiMax /u*ddiMai 16 array def /u*ddiMa2 16 array def /o3*deiMa 16 array def %olv3*deiMa /l3*deiMa 16 array def /v3*deiMa 16 array def /u*deiMa1 16 array def %u*deiMax /u*deiMai 16 array def /u*deiMa2 16 array def /L*eiMa 16 array def %LAB*eiMa /A*eiMa 16 array def /B*eiMa 16 array def /o3*eeiMa 16 array def %olv3*eeiMa /l3*eeiMa 16 array def /v3*eeiMa 16 array def /u*eeiMa1 16 array def %u*eeiMax /u*eeiMai 16 array def /u*eeiMa2 16 array def /o3*ediMa 16 array def %olv3*ediMa /l3*ediMa 16 array def /v3*ediMa 16 array def /u*ediMa1 16 array def %u*ediMax /u*ediMai 16 array def /u*ediMa2 16 array def %/L*xiMa 16 array def %LAB*xiMa x=d/e %/A*xiMa 16 array def %/B*xiMa 16 array def %/o3*xxiMa 16 array def %olv3*xxiMa xx=dd/ee %/l3*xxiMa 16 array def %/v3*xxiMa 16 array def /u*xxiMa1 16 array def %u*xxiMax xx=dd/ee /u*xxiMai 16 array def /u*xxiMa2 16 array def %/o3*xyiMa 16 array def %olv3*xxiMa xy=de/ed %/l3*xyiMa 16 array def %/v3*xyiMa 16 array def %/u*xyiMa1 16 array def %u*xxiMax xy=de/ed %/u*xyiMai 16 array def %/u*xyiMa2 16 array def %Definition LAB*diMa, olv3*deiMa, u*deiMax (all 00 to 15) by equal device (d) hue angle difference %between O and Y, Y and L, L and C, C and V, V and M, and M and O %Definition of OYLCVMO, 4 steps between OYL, 2 steps between LCVMO 0 1 15 {/iinx exch def %iinx=0,15 %define device hue angle H*M of 16 hues iinx 00 eq {/H*M LAB*a 0 3 mul 2 add get LAB*a 0 3 mul 1 add get atan def} if iinx 01 eq {/H*M LAB*a 0 3 mul 2 add get LAB*a 0 3 mul 1 add get atan 0.75 mul LAB*a 1 3 mul 2 add get LAB*a 1 3 mul 1 add get atan 0.25 mul add def} if iinx 02 eq {/H*M LAB*a 0 3 mul 2 add get LAB*a 0 3 mul 1 add get atan 0.50 mul LAB*a 1 3 mul 2 add get LAB*a 1 3 mul 1 add get atan 0.50 mul add def} if iinx 03 eq {/H*M LAB*a 0 3 mul 2 add get LAB*a 0 3 mul 1 add get atan 0.25 mul LAB*a 1 3 mul 2 add get LAB*a 1 3 mul 1 add get atan 0.75 mul add def} if iinx 04 eq {/H*M LAB*a 1 3 mul 2 add get LAB*a 1 3 mul 1 add get atan def} if iinx 05 eq {/H*M LAB*a 1 3 mul 2 add get LAB*a 1 3 mul 1 add get atan 0.75 mul LAB*a 2 3 mul 2 add get LAB*a 2 3 mul 1 add get atan 0.25 mul add def} if iinx 06 eq {/H*M LAB*a 1 3 mul 2 add get LAB*a 1 3 mul 1 add get atan 0.50 mul LAB*a 2 3 mul 2 add get LAB*a 2 3 mul 1 add get atan 0.50 mul add def} if iinx 07 eq {/H*M LAB*a 1 3 mul 2 add get LAB*a 1 3 mul 1 add get atan 0.25 mul LAB*a 2 3 mul 2 add get LAB*a 2 3 mul 1 add get atan 0.75 mul add def} if iinx 08 eq {/H*M LAB*a 2 3 mul 2 add get LAB*a 2 3 mul 1 add get atan def} if iinx 09 eq {/H*M LAB*a 2 3 mul 2 add get LAB*a 2 3 mul 1 add get atan 0.5 mul LAB*a 3 3 mul 2 add get LAB*a 3 3 mul 1 add get atan 0.5 mul add def} if iinx 10 eq {/H*M LAB*a 3 3 mul 2 add get LAB*a 3 3 mul 1 add get atan def} if iinx 11 eq {/H*M LAB*a 3 3 mul 2 add get LAB*a 3 3 mul 1 add get atan 0.5 mul LAB*a 4 3 mul 2 add get LAB*a 4 3 mul 1 add get atan 0.5 mul add def} if iinx 12 eq {/H*M LAB*a 4 3 mul 2 add get LAB*a 4 3 mul 1 add get atan def} if iinx 13 eq {/H*M LAB*a 4 3 mul 2 add get LAB*a 4 3 mul 1 add get atan 0.5 mul LAB*a 5 3 mul 2 add get LAB*a 5 3 mul 1 add get atan 0.5 mul add def} if iinx 14 eq {/H*M LAB*a 5 3 mul 2 add get LAB*a 5 3 mul 1 add get atan def} if iinx 15 eq {/H*M LAB*a 5 3 mul 2 add get LAB*a 5 3 mul 1 add get atan 0.5 mul LAB*a 0 3 mul 2 add get LAB*a 0 3 mul 1 add get atan 360 add 0.5 mul add def} if proc_H*M_LAB*MaNTABl_olvi3*cmyn3*u*deMa*ioG %stores LAB*diMa L*diMa iinx L*Ma put A*diMa iinx A*Ma put B*diMa iinx B*Ma put %stores olv3*ddiMa o3*ddiMa iinx o3*ddMa put l3*ddiMa iinx l3*ddMa put v3*ddiMa iinx v3*ddMa put %stores u*ddiMax u*ddiMa1 iinx u*ddMa1 put u*ddiMai iinx u*ddMai put u*ddiMa2 iinx u*ddMa2 put %stores olv3*deiMa o3*deiMa iinx o3*deMa put l3*deiMa iinx l3*deMa put v3*deiMa iinx v3*deMa put %stores u*deiMax u*deiMa1 iinx u*deMa1 put u*deiMai iinx u*deMai put u*deiMa2 iinx u*deMa2 put } for %iinx=0,15 %Definition LAB*eiMa, olv3*ediMa, u*ediMax (all 00 to 15) by equal elementary (e) hue angle difference %between R and J, J and G, G and B, and B and R 0 1 03 {/ik exch def %ik=0,3 /H*1 RJGBLAB* ik 3 mul 2 add get RJGBLAB* ik 3 mul 1 add get 0.00001 add atan def ik 2 le {/ik2b ik 3 mul 5 add def} {/ik2b 2 def} ifelse /ik2a ik2b 1 sub def /H*2 RJGBLAB* ik2b get RJGBLAB* ik2a get 0.00001 add atan def ik 3 eq {/H*2 H*2 360 add def} if 0 1 03 {/ij exch def %ij=1,3 ij 0 eq {/a0 1.00 def /b0 0.00 def} if ij 1 eq {/a0 0.75 def /b0 0.25 def} if ij 2 eq {/a0 0.50 def /b0 0.50 def} if ij 3 eq {/a0 0.25 def /b0 0.75 def} if /H*M a0 H*1 mul b0 H*2 mul add def H*M 360 ge {/H*M H*M 360 sub def} if proc_H*M_LAB*MaNTABl_olvi3*cmyn3*u*deMa*ioG /iinx ik 4 mul ij add def %stores LAB*eiMa L*eiMa iinx L*Ma put A*eiMa iinx A*Ma put B*eiMa iinx B*Ma put %stores olv3*eeiMa o3*eeiMa iinx o3*deMa put l3*eeiMa iinx l3*deMa put v3*eeiMa iinx v3*deMa put %stores u*eeiMax u*eeiMa1 iinx u*deMa1 put u*eeiMai iinx u*deMai put u*eeiMa2 iinx u*deMa2 put %stores olv3*ediMa o3*ediMa iinx o3*ddMa put l3*ediMa iinx l3*ddMa put v3*ediMa iinx v3*ddMa put %stores u*eeiMax u*ediMa1 iinx u*ddMa1 put u*ediMai iinx u*ddMai put u*ediMa2 iinx u*ddMa2 put } for %ik=0,3 } for %ij=0,3 0 1 15 {/i exch def %i=0,15 %L*xiMa i DEintp 0 eq {L*diMa}{L*eiMa} ifelse i get put %LAB*xiMa x=d/e %A*xiMa i DEintp 0 eq {A*diMa}{A*eiMa} ifelse i get put %B*xiMa i DEintp 0 eq {B*diMa}{B*eiMa} ifelse i get put %o3*xxiMa i DEintp 0 eq {o3*ddiMa}{o3*eeiMa} ifelse i get put %olv3*xxiMa xx=dd/ee %l3*xxiMa i DEintp 0 eq {l3*ddiMa}{l3*eeiMa} ifelse i get put %v3*xxiMa i DEintp 0 eq {v3*ddiMa}{v3*eeiMa} ifelse i get put u*xxiMa1 i DEintp 0 eq {u*ddiMa1}{u*eeiMa1} ifelse i get put %u*xxiMax xx=dd/ee u*xxiMai i DEintp 0 eq {u*ddiMai}{u*eeiMai} ifelse i get put u*xxiMa2 i DEintp 0 eq {u*ddiMa2}{u*eeiMa2} ifelse i get put %o3*xyiMa i DEintp 0 eq {o3*deiMa}{o3*ediMa} ifelse i get put %olv3*xxiMa xy=de/ed %l3*xyiMa i DEintp 0 eq {l3*deiMa}{l3*ediMa} ifelse i get put %v3*xyiMa i DEintp 0 eq {v3*deiMa}{v3*ediMa} ifelse i get put %u*xyiMa1 i DEintp 0 eq {u*deiMa1}{u*ediMa1} ifelse i get put %u*xxiMax xy=de/ed %u*xyiMai i DEintp 0 eq {u*deiMai}{u*ediMai} ifelse i get put %u*xyiMa2 i DEintp 0 eq {u*deiMa2}{u*ediMa2} ifelse i get put } for %i=0,15 } bind def %END Procedure proc_LAB*ioG %*********************************************************** /proc_H*M_LAB*MaNTABl_olvi3*cmyn3*u*deMa*ioG { %BEG procedure proc_H*M_LAB*MaNTABl_olvi3*cmyn3*u*deMa*ioG %only for calculation without hue tables %input H*M (only hue (H) of Fa/Ma) %input LAB*a (6 adapted colours OYLCVM) %input nLAB*s0 (colour Black N for calculation of lab*l) %input wLAB*s0 (colour White W for achromatic axis) %output LAB*Ma %output olvi3*Ma %output cmyn3*Ma /L*Ha 50 def /A*Ha 75 H*M cos mul def /B*Ha 75 H*M sin mul def /UXF1a wLAB*s0 1 get B*Ha mul wLAB*s0 2 get A*Ha mul sub def /UXF2a wLAB*s0 2 get L*Ha mul wLAB*s0 0 get B*Ha mul sub def /UXF3a wLAB*s0 0 get A*Ha mul wLAB*s0 1 get L*Ha mul sub def /T1 0 def /T2 0 def 0 1 5 {/ia exch def /ia30 ia 3 mul def ia 5 eq {/ia31 0 def} {/ia31 ia30 3 add def} ifelse /T1 LAB*a ia30 get UXF1a mul LAB*a ia30 1 add get UXF2a mul add LAB*a ia30 2 add get UXF3a mul add def /T2 LAB*a ia31 get UXF1a mul LAB*a ia31 1 add get UXF2a mul add LAB*a ia31 2 add get UXF3a mul add def T1 0 le {/T1X (N) def} {/T1X (P) def} ifelse T2 0 gt {/T2X (P) def} {/T2X (N) def} ifelse T1 0 le T2 0 gt and {/ia3END ia30 def exit} if } for /L*11a LAB*a ia3END get def /A*11a LAB*a ia3END 1 add get def /B*11a LAB*a ia3END 2 add get def ia3END 15 ge {/ia3END -3 def} if /L*21a LAB*a ia3END 3 add get def /A*21a LAB*a ia3END 4 add get def /B*21a LAB*a ia3END 5 add get def /NENNER L*21a L*11a sub UXF1a mul A*21a A*11a sub UXF2a mul add B*21a B*11a sub UXF3a mul add def /ZAEHLE L*21a UXF1a mul A*21a UXF2a mul add B*21a UXF3a mul add def NENNER 0 ne {/ALPH ZAEHLE NENNER div def} {/ALPH 99999} ifelse /L*Ma ALPH L*11a mul 1 ALPH sub L*21a mul add def /A*Ma ALPH A*11a mul 1 ALPH sub A*21a mul add def /B*Ma ALPH B*11a mul 1 ALPH sub B*21a mul add def /C*Ma A*Ma dup mul B*Ma dup mul add 0.000001 add sqrt def /H*Ma B*Ma A*Ma atan def /H*abd B*Ha A*Ha 0.0001 add atan def /H*abe H*abd def %faktor and section in actual System (for example ORS18) /jsecd -1 def %main equations %faktd = [col_angh - LAB*Hd(n)]/[LAB*Hd(n+1) - LAB*Hd(n)] %col_angh = faktd [LAB*Hd(n+1) - LAB*Hd(n)] + LAB*Hd(n) H*abd LAB*Hd 0 get lt {/H*abd H*abd 360 add def} if 0 1 5 {/nx exch def /np nx 1 add def H*abd LAB*Hd nx get ge H*abd LAB*Hd np get lt and {/jsecd nx def /faktd H*abd LAB*Hd nx get sub LAB*Hd np get LAB*Hd nx get sub div def} if } for %nx=0,5 %1 0 0 %O jsecd=0 %1 1 0 %Y jsecd=1 %0 1 0 %L jsecd=2 %0 1 1 %C jsecd=3 %0 0 1 %V jsecd=4 %1 0 1 %M jsecd=5 jsecd -1 eq {STOPjsecd} if /fakmd 1 faktd sub def /o3*ddMa -1 def /l3*ddMa -1 def /v3*ddMa -1 def jsecd 0 eq {%sector O->Y, o3*=1, l3*=0->1, v3*=0 /o3*ddMa 1 def /l3*ddMa faktd def /v3*ddMa 0 def /u*ddMa1 (o) def /u*ddMai faktd 99 mul cviht def /u*ddMa2 (y) def} if jsecd 1 eq {%sector Y->L, o3*=1->0, l3*=1, v3*=0 /o3*ddMa fakmd def /l3*ddMa 1 def /v3*ddMa 0 def /u*ddMa1 (y) def /u*ddMai faktd 99 mul cviht def /u*ddMa2 (l) def} if jsecd 2 eq {%sector L->C, o3*=0, l3*=1, v3*=0->1 /o3*ddMa 0 def /l3*ddMa 1 def /v3*ddMa faktd def /u*ddMa1 (l) def /u*ddMai faktd 99 mul cviht def /u*ddMa2 (c) def} if jsecd 3 eq {%sector C->V, o3*=0, l3*=0->1, v3*=1 /o3*ddMa 0 def /l3*ddMa fakmd def /v3*ddMa 1 def /u*ddMa1 (c) def /u*ddMai faktd 99 mul cviht def /u*ddMa2 (v) def} if jsecd 4 eq {%sector V->M, o3*=0->1, l3*=0, v3*=1 /o3*ddMa faktd def /l3*ddMa 0 def /v3*ddMa 1 def /u*ddMa1 (v) def /u*ddMai faktd 99 mul cviht def /u*ddMa2 (m) def} if jsecd 5 eq {%sector M->O, o3*=1, l3*=0, v3*=1->0 /o3*ddMa 1 def /l3*ddMa 0 def /v3*ddMa fakmd def /u*ddMa1 (m) def /u*ddMai faktd 99 mul cviht def /u*ddMa2 (o) def} if o3*ddMa -1 eq {STOPo3*ddMa1} if l3*ddMa -1 eq {STOPl3*ddMa1} if v3*ddMa -1 eq {STOPv3*ddMa1} if /i3*ddMa 1 def /c3*ddMa 1 o3*ddMa sub def /m3*ddMa 1 l3*ddMa sub def /y3*ddMa 1 v3*ddMa sub def /n3*ddMa 0 def %calculations for elementary (e) system: %faktor and section in actual System (for example ORS18) /jsece -1 def %main equations %fakte = [col_angh - LAB*He(n)]/[LAB*He(n+1) - LAB*He(n)] %col_angh = fakte [LAB*He(n+1) - LAB*He(n)] + LAB*He(n) H*abe LAB*He 0 get lt {/H*abe H*abe 360 add def} if 0 1 5 {/nx exch def /np nx 1 add def H*abe LAB*He nx get ge H*abe LAB*He np get lt and {/jsece nx def /fakte H*abe LAB*He nx get sub LAB*He np get LAB*He nx get sub div def} if } for %nx=0,5 %1 0 0 %R jsece=0 %1 1 0 %J jsece=1 %0 1 0 %G jsece=2 %0 1 1 %C' jsece=3 %0 0 1 %B jsece=4 %1 0 1 %R jsece=5 jsece -1 eq {STOPjsece} if /fakme 1 fakte sub def /o3*deMa -1 def /l3*deMa -1 def /v3*deMa -1 def jsece 0 eq {%sector O->Y, o3*=1, l3*=0->1, v*=0 /o3*deMa 1 def /l3*deMa fakte def /v3*deMa 0 def /u*dtMa1 (r) def /u*dtMai fakte 99 mul cviht def /u*dtMa2 (j) def /u*deMa1 (r) def /u*deMai fakte 99 mul cviht def /u*deMa2 (j) def} if jsece 1 eq {%sector Y->L, o3*=1->0, l3*=1, v*=0 /o3*deMa fakme def /l3*deMa 1 def /v3*deMa 0 def /u*dtMa1 (j) def /u*dtMai fakte 99 mul cviht def /u*dtMa2 (g) def /u*deMa1 (j) def /u*deMai fakte 99 mul cviht def /u*deMa2 (g) def} if jsece 2 eq {%sector L->C, o3*=0, l3*=1, v*=0->1 /o3*deMa 0 def /l3*deMa 1 def /v3*deMa fakte def /u*dtMa1 (g) def /u*dtMai fakte 99 mul cviht def /u*dtMa2 (c') def /u*deMa1 (g) def /u*deMai fakte 99 mul 0.5 mul cviht def /u*deMa2 (b) def} if jsece 3 eq {%sector C->V, o3*=0, l3*=0->1, v*=1 /o3*deMa 0 def /l3*deMa fakme def /v3*deMa 1 def /u*dtMa1 (c') def /u*dtMai fakte 99 mul cviht def /u*dtMa2 (b) def /u*deMa1 (g) def /u*deMai fakte 99 mul 0.5 mul 50 add cviht def /u*deMa2 (b) def} if jsece 4 eq {%sector V->M, o3*=0->1, l3*=0, v*=1 /o3*deMa fakte def /l3*deMa 0 def /v3*deMa 1 def /u*dtMa1 (b) def /u*dtMai fakte 99 mul cviht def /u*dtMa2 (m') def /u*deMa1 (b) def /u*deMai fakte 99 mul 0.5 mul cviht def /u*deMa2 (r) def} if jsece 5 eq {%sector M->O, o3*=1, l3*=0, v*=1->0 /o3*deMa 1 def /l3*deMa 0 def /v3*deMa fakme def /u*dtMa1 (m') def /u*dtMai fakte 99 mul cviht def /u*dtMa2 (r) def /u*deMa1 (b) def /u*deMai fakte 99 mul 0.5 mul 50 add cviht def /u*deMa2 (r) def} if o3*deMa -1 eq {STOPo3*Ma0} if l3*deMa -1 eq {STOPl3*Ma0} if v3*deMa -1 eq {STOPv3*Ma0} if /i3*deMa 1 def /c3*deMa 1 o3*deMa sub def /m3*deMa 1 l3*deMa sub def /y3*deMa 1 v3*deMa sub def /n3*deMa 0 def /lab*nMa 0.00 def /lab*cMa 1.00 def /lab*wMa 0.00 def /lab*tMa 0.50 def /lab*hMa H*Ma 360 div def /lab*lMa L*Ma nLAB*s0 0 get sub wLAB*s0 0 get nLAB*s0 0 get sub 0.000001 add div def } bind def %END procedure proc_H*M_LAB*MaNTABl_olvi3*cmyn3*u*deMa*ioG %************************************************************* /proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG { %BEG Procedure proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %transfer from elementary data to device (ed) and elementary data (ee) %For tLAB=1 Transfer to LAB*Ma and LAB*Fa /v*s exch def /l*s exch def /o*s exch def /i*p 0 def %test if achromatic %W special case %W: o*s, l*s, v*s = 1.00 1.0 o*s sub abs 0.001 le 1.0 l*s sub abs 0.001 le and 1.0 v*s sub abs 0.001 le and %W special case {/i*p 6 def %W /c*rs 0 def /n*s 0 def /w*s 1 def /t*s 1 def } if %Test if achromatic %N special case %N: o*n, l*n, v*n <= 0.01 o*s abs 0.001 le l*s abs 0.001 le and v*s abs 0.001 le and %N special case {/i*p 6 def %N /c*rs 0 def /n*s 1 def /w*s 0 def /t*s 0 def } if %test if achromatic Grey sample o*s l*s sub abs 0.001 le l*s v*s sub abs 0.001 le and %Achromatic grey special case {/i*p 6 def %Grey /c*rs 0 def /n*s 1 o*s sub def /w*s o*s def /t*s 1 n*s sub c*rs 0.5 mul sub def } if i*p 6 eq {%achromatic,chromatic colours /o3*edMa 1 def /l3*edMa 1 def /v3*edMa 1 def /o3*eeMa 1 def /l3*eeMa 1 def /v3*eeMa 1 def /u*edMa1 (o) def /u*edMai 0 def /u*edMa2 (y) def /u*etMa1 (r) def /u*etMai 0 def /u*etMa2 (j) def /u*eeMa1 (r) def /u*eeMai 0 def /u*eeMa2 (j) def /o3*ed o*s def /l3*ed l*s def /v3*ed v*s def /o3*ee o*s def /l3*ee l*s def /v3*ee v*s def } %achromatic i*p=6 { %chromatic i*p#6 o*s l*s ge o*s v*s ge and {/olv*smax o*s def l*s v*s ge {%sector O->Y, o3*=1, l3*=0->1, v3*=0 /olv*smin v*s def /olv*smean l*s def /jsecs 0 def} {%sector M->O, o3*=1, l3*=0, v3*=1->0 /olv*smin l*s def /olv*smean v*s def /jsecs 5 def} ifelse } if l*s v*s ge l*s o*s ge and {/olv*smax l*s def v*s o*s ge {%sector L->C, o3*=0, l3*=1, v3*=0->1 /olv*smin o*s def /olv*smean v*s def /jsecs 2 def} {%sector Y->L, o3*=1->0, l3*=1, v3*=0 /olv*smin v*s def /olv*smean o*s def /jsecs 1 def} ifelse } if v*s o*s ge v*s l*s ge and {/olv*smax v*s def o*s l*s ge {%sector V->M, o3*=0->1, l3*=0, v3*=1 /olv*smin l*s def /olv*smean o*s def /jsecs 4 def} {%sector C->V, o3*=0, l3*=0->1, v3*=1 /olv*smin o*s def /olv*smean l*s def /jsecs 3 def } ifelse } if /c*rs olv*smax olv*smin sub def /n*s 1 olv*smax sub def /w*s 1 n*s sub c*rs sub def /t*s 1 n*s sub c*rs 0.5 mul sub def /b_a olv*smean olv*smax div def /c_a olv*smin olv*smax div def /alpha 1 c_a sub def /fakts b_a c_a sub alpha 0.00001 add div def /fakms 1 fakts sub def %jsecs interpreted as elementary hue angle jsecs 0 eq {%sector O->Y, o3*=1, l3*=0->1, v3*=0 /o3*eeMa 1 def /l3*eeMa fakts def /v3*eeMa 0 def /H*Me LAB*He 0 get LAB*He 1 get LAB*He 0 get sub fakts mul add def /u*eeMa1 (r) def /u*eeMai fakts 99 mul cviht def /u*eeMa2 (j) def} if jsecs 1 eq {%sector Y->L, o3*=1->0, l3*=1, v3*=0 /o3*eeMa fakts def /l3*eeMa 1 def /v3*eeMa 0 def /H*Me LAB*He 1 get LAB*He 2 get LAB*He 1 get sub fakms mul add def /u*eeMa1 (j) def /u*eeMai fakms 99 mul cviht def /u*eeMa2 (g) def} if jsecs 2 eq {%sector L->C, o3*=0, l3*=1, v3*=0->1 /o3*eeMa 0 def /l3*eeMa 1 def /v3*eeMa fakts def /H*Me LAB*He 2 get LAB*He 3 get LAB*He 2 get sub fakts mul add def /u*etMa1 (g) def /u*etMai fakts 99 mul cviht def /u*etMa2 (C) def /u*eeMa1 (g) def /u*eeMai fakts 99 mul 0.5 mul cviht def /u*eeMa2 (b) def} if jsecs 3 eq {%sector C->V, o3*=0, l3*=0->1, v3*=1 /o3*eeMa 0 def /l3*eeMa fakts def /v3*eeMa 1 def /H*Me LAB*He 3 get LAB*He 4 get LAB*He 3 get sub fakms mul add def /u*etMa1 (C) def /u*etMai fakms 99 mul cviht def /u*etMa2 (b) def /u*eeMa1 (g) def /u*eeMai fakms 99 mul 0.5 mul 50 add cviht def /u*eeMa2 (b) def} if jsecs 4 eq {%sector V->M, o3*=0->1, l3*=0, v3*=1 /o3*eeMa fakts def /l3*eeMa 0 def /v3*eeMa 1 def /H*Me LAB*He 4 get LAB*He 5 get LAB*He 4 get sub fakts mul add def /u*etMa1 (b) def /u*etMai fakts 99 mul cviht def /u*etMa2 (M) def /u*eeMa1 (b) def /u*eeMai fakts 99 mul 0.5 mul cviht def /u*eeMa2 (r) def} if jsecs 5 eq {%sector M->O, o3*=1, l3*=0, v3*=1->0 /o3*eeMa 1 def /l3*eeMa 0 def /v3*eeMa fakts def /H*Me LAB*He 5 get LAB*He 6 get LAB*He 5 get sub fakms mul add def /u*etMa1 (M) def /u*etMai fakms 99 mul cviht def /u*etMa2 (r) def /u*eeMa1 (b) def /u*eeMai fakms 99 mul 0.5 mul 50 add cviht def /u*eeMa2 (r) def} if /i3*eeMa 1 def /c3*eeMa 1 o3*eeMa sub def /m3*eeMa 1 l3*eeMa sub def /y3*eeMa 1 v3*eeMa sub def /n3*eeMa 0 def H*Me 360 ge {/H*Me H*Me 360 sub def} if %H*Me = H*abd = H*abe for all hue angles /H*abd H*Me def %calculations for device (d) system: %faktor and section in actual System (for example ORS18) /jsece -1 def %main equations %faktd = [col_angh - LAB*Hd(n)]/[LAB*Hd(n+1) - LAB*Hd(n)] %col_angh = faktd [LAB*Hd(n+1) - LAB*Hd(n)] + LAB*Hd(n) H*abd LAB*Hd 0 get lt {/H*abd H*abd 360 add def} if 0 1 5 {/nx exch def /np nx 1 add def H*abd LAB*Hd nx get ge H*abd LAB*Hd np get lt and {/jsecd nx def /faktd H*abd LAB*Hd nx get sub LAB*Hd np get LAB*Hd nx get sub div def} if } for %nx=0,5 %1 0 0 %O jsecd=0 %1 1 0 %Y jsecd=1 %0 1 0 %L jsecd=2 %0 1 1 %C jsecd=3 %0 0 1 %V jsecd=4 %1 0 1 %O jsecd=5 jsecd -1 eq {STOPjsecd} if /fakmd 1 faktd sub def /o3*edMa -1 def /l3*edMa -1 def /v3*edMa -1 def jsecd 0 eq {%sector O->Y, o3*=1, l3*=0->1, v*=0 /o3*edMa 1 def /l3*edMa faktd def /v3*edMa 0 def /u*dtMa1 (o) def /u*dtMai faktd 99 mul cviht def /u*dtMa2 (y) def /u*edMa1 (o) def /u*edMai faktd 99 mul cviht def /u*edMa2 (y) def} if jsecd 1 eq {%sector Y->L, o3*=1->0, l3*=1, v*=0 /o3*edMa fakmd def /l3*edMa 1 def /v3*edMa 0 def /u*dtMa1 (y) def /u*dtMai faktd 99 mul cviht def /u*dtMa2 (l) def /u*edMa1 (y) def /u*edMai faktd 99 mul cviht def /u*edMa2 (l) def} if jsecd 2 eq {%sector L->C, o3*=0, l3*=1, v*=0->1 /o3*edMa 0 def /l3*edMa 1 def /v3*edMa faktd def /u*dtMa1 (l) def /u*dtMai faktd 99 mul cviht def /u*dtMa2 (c) def /u*edMa1 (l) def /u*edMai faktd 99 mul cviht def /u*edMa2 (c) def} if jsecd 3 eq {%sector C->V, o3*=0, l3*=0->1, v*=1 /o3*edMa 0 def /l3*edMa fakmd def /v3*edMa 1 def /u*dtMa1 (c) def /u*dtMai faktd 99 mul cviht def /u*dtMa2 (v) def /u*edMa1 (c) def /u*edMai faktd 99 mul cviht def /u*edMa2 (v) def} if jsecd 4 eq {%sector V->M, o3*=0->1, l3*=0, v*=1 /o3*edMa faktd def /l3*edMa 0 def /v3*edMa 1 def /u*dtMa1 (v) def /u*dtMai faktd 99 mul cviht def /u*dtMa2 (m) def /u*edMa1 (v) def /u*edMai faktd 99 mul cviht def /u*edMa2 (m) def} if jsecd 5 eq {%sector M->O, o3*=1, l3*=0, v*=1->0 /o3*edMa 1 def /l3*edMa 0 def /v3*edMa fakmd def /u*dtMa1 (m) def /u*dtMai faktd 99 mul cviht def /u*dtMa2 (o) def /u*edMa1 (v) def /u*edMai faktd 99 mul cviht def /u*edMa2 (o) def} if o3*edMa -1 eq {STOPo3*Ma0} if l3*edMa -1 eq {STOPl3*Ma0} if v3*edMa -1 eq {STOPv3*Ma0} if /i3*edMa 1 def /c3*edMa 1 o3*edMa sub def /m3*edMa 1 l3*edMa sub def /y3*edMa 1 v3*edMa sub def /n3*edMa 0 def /lab*nMa 0.00 def /lab*cMa 1.00 def /lab*wMa 0.00 def /lab*tMa 0.50 def /lab*hMa H*Ma 360 div def /lab*lMa L*Ma nLAB*s0 0 get sub wLAB*s0 0 get nLAB*s0 0 get sub 0.000001 add div def %/o3*ee o*s def %/o3*ee w*s o3*eeMa c*rs mul add def %/l3*ee l*s def %/l3*ee w*s l3*eeMa c*rs mul add def %/v3*ee v*s def %/v3*ee w*s v3*eeMa c*rs mul add def /o3*ee w*s o3*eeMa c*rs mul add def /l3*ee w*s l3*eeMa c*rs mul add def /v3*ee w*s v3*eeMa c*rs mul add def /o3*ed w*s o3*edMa c*rs mul add def /l3*ed w*s l3*edMa c*rs mul add def /v3*ed w*s v3*edMa c*rs mul add def } ifelse %chromatic colour i*p#6 %For tLAB=1 Transfer to LAB*Ma and LAB*Fa tLAB 1 eq {%tLAB = 1 i*p 6 eq { %achromatic,chromatic colours /L*Ma L*Wio def /A*Ma 0 def /B*Ma 0 def /H*Ma B*Ma A*Ma 0.0001 add atan def /C*Ma 0 def /L*Fa L*Nio L*Wio L*Nio sub w*s mul add def /A*Fa 0 def /B*Fa 0 def /H*Fa B*Fa A*Fa 0.0001 add atan def /C*Fa 0 def /l*rs w*s def } %achromatic i*p=6 {%chromatic i*p#6 /H*M H*Me def %H*M allready defined /L*Ha 50 def /A*Ha 75 H*M cos mul def /B*Ha 75 H*M sin mul def /UXF1a wLAB*s0 1 get B*Ha mul wLAB*s0 2 get A*Ha mul sub def /UXF2a wLAB*s0 2 get L*Ha mul wLAB*s0 0 get B*Ha mul sub def /UXF3a wLAB*s0 0 get A*Ha mul wLAB*s0 1 get L*Ha mul sub def /T1 0 def /T2 0 def 0 1 5 {/ia exch def /ia30 ia 3 mul def ia 5 eq {/ia31 0 def} {/ia31 ia30 3 add def} ifelse /T1 LAB*a ia30 get UXF1a mul LAB*a ia30 1 add get UXF2a mul add LAB*a ia30 2 add get UXF3a mul add def /T2 LAB*a ia31 get UXF1a mul LAB*a ia31 1 add get UXF2a mul add LAB*a ia31 2 add get UXF3a mul add def T1 0 le {/T1X (N) def} {/T1X (P) def} ifelse T2 0 gt {/T2X (P) def} {/T2X (N) def} ifelse T1 0 le T2 0 gt and {/ia3END ia30 def exit} if } for /L*11a LAB*a ia3END get def /A*11a LAB*a ia3END 1 add get def /B*11a LAB*a ia3END 2 add get def ia3END 15 ge {/ia3END -3 def} if /L*21a LAB*a ia3END 3 add get def /A*21a LAB*a ia3END 4 add get def /B*21a LAB*a ia3END 5 add get def /NENNER L*21a L*11a sub UXF1a mul A*21a A*11a sub UXF2a mul add B*21a B*11a sub UXF3a mul add def /ZAEHLE L*21a UXF1a mul A*21a UXF2a mul add B*21a UXF3a mul add def NENNER 0 ne {/ALPH ZAEHLE NENNER div def} {/ALPH 99999} ifelse /L*Ma ALPH L*11a mul 1 ALPH sub L*21a mul add def /A*Ma ALPH A*11a mul 1 ALPH sub A*21a mul add def /B*Ma ALPH B*11a mul 1 ALPH sub B*21a mul add def /C*Ma A*Ma dup mul B*Ma dup mul add 0.000001 add sqrt def /H*Ma B*Ma A*Ma 0.0001 add atan def %equations %/c*rs olv*smax olv*smin sub def %/n*s 1 olv*smax sub def %/w*s 1 n*s sub c*rs sub def %/t*s 1 n*s sub c*rs 0.5 mul sub def %l* = t* + c* [L*M - L*N]/[L*W - L*N] - 0.5 c* %l* = (L*Fa - L*Na) / (L*Wa - L*Na) %L*Fa = l* (L*Wa - L*Na) + L*Na %given L*Nio, L*Wio /l*rs t*s L*Ma L*Nio sub L*Wio L*Nio sub div c*rs mul add c*rs 0.5 mul sub def /L*Fa L*Nio L*Wio L*Nio sub l*rs mul add def /C*Fa C*Ma c*rs mul def /H*Fa H*Ma def /A*Fa C*Fa H*Ma cos mul def /B*Fa C*Fa H*Ma sin mul def } ifelse %chromatic colour i*p#6 } if %tLAB = 1 } bind def %END Procedure proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %******************************************************************** /proc_olv3*s_to_olv3*u*dd_de_H*M_LAB*Ma_Fa*ioG { %BEG Procedure proc_olv3*s_to_olv3*u*dd_de_H*M_LAB*Ma_Fa*ioG %transfer from device data to device (dd) and elementary data (de) %For tLAB=1 Transfer to LAB*Ma and LAB*Fa /v*s exch def /l*s exch def /o*s exch def /i*p 0 def %test if achromatic %W special case %W: o*s, l*s, v*s = 1.00 1.0 o*s sub abs 0.001 le 1.0 l*s sub abs 0.001 le and 1.0 v*s sub abs 0.001 le and %W special case {/i*p 6 def %W /c*rs 0 def /n*s 0 def /w*s 1 def /t*s 1 def } if %Test if achromatic %N special case %N: o*n, l*n, v*n <= 0.01 o*s abs 0.001 le l*s abs 0.001 le and v*s abs 0.001 le and %N special case {/i*p 6 def %N /c*rs 0 def /n*s 1 def /w*s 0 def /t*s 0 def } if %test if achromatic Grey sample o*s l*s sub abs 0.001 le l*s v*s sub abs 0.001 le and %Achromatic grey special case {/i*p 6 def %Grey /c*rs 0 def /n*s 1 o*s sub def /w*s o*s def /t*s 1 n*s sub c*rs 0.5 mul sub def } if i*p 6 eq {%achromatic,chromatic colours /o3*ddMa 1 def /l3*ddMa 1 def /v3*ddMa 1 def /o3*deMa 1 def /l3*deMa 1 def /v3*deMa 1 def /u*ddMa1 (o) def /u*ddMai 0 def /u*ddMa2 (y) def /u*dtMa1 (r) def /u*dtMai 0 def /u*dtMa2 (j) def /u*deMa1 (r) def /u*deMai 0 def /u*deMa2 (j) def /o3*dd o*s def /l3*dd l*s def /v3*dd v*s def /o3*de o*s def /l3*de l*s def /v3*de v*s def } %achromatic i*p=6 { %chromatic i*p#6 o*s l*s ge o*s v*s ge and {/olv*smax o*s def l*s v*s ge {%sector O->Y, o3*=1, l3*=0->1, v3*=0 /olv*smin v*s def /olv*smean l*s def /jsecd 0 def} {%sector M->O, o3*=1, l3*=0, v3*=1->0 /olv*smin l*s def /olv*smean v*s def /jsecd 5 def} ifelse } if l*s v*s ge l*s o*s ge and {/olv*smax l*s def v*s o*s ge {%sector L->C, o3*=0, l3*=1, v3*=0->1 /olv*smin o*s def /olv*smean v*s def /jsecd 2 def} {%sector Y->L, o3*=1->0, l3*=1, v3*=0 /olv*smin v*s def /olv*smean o*s def /jsecd 1 def} ifelse } if v*s o*s ge v*s l*s ge and {/olv*smax v*s def o*s l*s ge {%sector V->M, o3*=0->1, l3*=0, v3*=1 /olv*smin l*s def /olv*smean o*s def /jsecd 4 def} {%sector C->V, o3*=0, l3*=0->1, v3*=1 /olv*smin o*s def /olv*smean l*s def /jsecd 3 def } ifelse } if /c*rs olv*smax olv*smin sub def /n*s 1 olv*smax sub def /w*s 1 n*s sub c*rs sub def /t*s 1 n*s sub c*rs 0.5 mul sub def /b_a olv*smean olv*smax div def /c_a olv*smin olv*smax div def /alpha 1 c_a sub def /faktd b_a c_a sub alpha 0.00001 add div def /fakmd 1 faktd sub def %jsecd interpreted as device angle jsecd 0 eq {%sector O->Y, o3*=1, l3*=0->1, v3*=0 /o3*ddMa 1 def /l3*ddMa faktd def /v3*ddMa 0 def /H*M LAB*Hd 0 get LAB*Hd 1 get LAB*Hd 0 get sub faktd mul add def /u*ddMa1 (o) def /u*ddMai faktd 99 mul cviht def /u*ddMa2 (y) def} if jsecd 1 eq {%sector Y->L, o3*=1->0, l3*=1, v3*=0 /o3*ddMa faktd def /l3*ddMa 1 def /v3*ddMa 0 def /H*M LAB*Hd 1 get LAB*Hd 2 get LAB*Hd 1 get sub fakmd mul add def /u*ddMa1 (y) def /u*ddMai fakmd 99 mul cviht def /u*ddMa2 (l) def} if jsecd 2 eq {%sector L->C, o3*=0, l3*=1, v3*=0->1 /o3*ddMa 0 def /l3*ddMa 1 def /v3*ddMa faktd def /H*M LAB*Hd 2 get LAB*Hd 3 get LAB*Hd 2 get sub faktd mul add def /u*ddMa1 (l) def /u*ddMai faktd 99 mul cviht def /u*ddMa2 (c) def} if jsecd 3 eq {%sector C->V, o3*=0, l3*=0->1, v3*=1 /o3*ddMa 0 def /l3*ddMa faktd def /v3*ddMa 1 def /H*M LAB*Hd 3 get LAB*Hd 4 get LAB*Hd 3 get sub fakmd mul add def /u*ddMa1 (c) def /u*ddMai fakmd 99 mul cviht def /u*ddMa2 (v) def} if jsecd 4 eq {%sector V->M, o3*=0->1, l3*=0, v3*=1 /o3*ddMa faktd def /l3*ddMa 0 def /v3*ddMa 1 def /H*M LAB*Hd 4 get LAB*Hd 5 get LAB*Hd 4 get sub faktd mul add def /u*ddMa1 (v) def /u*ddMai faktd 99 mul cviht def /u*ddMa2 (m) def} if jsecd 5 eq {%sector M->O, o3*=1, l3*=0, v3*=1->0 /o3*ddMa 1 def /l3*ddMa 0 def /v3*ddMa faktd def /H*M LAB*Hd 5 get LAB*Hd 6 get LAB*Hd 5 get sub fakmd mul add def /u*ddMa1 (m) def /u*ddMai fakmd 99 mul cviht def /u*ddMa2 (o) def} if /i3*ddMa 1 def /c3*ddMa 1 o3*ddMa sub def /m3*ddMa 1 l3*ddMa sub def /y3*ddMa 1 v3*ddMa sub def /n3*ddMa 0 def H*M 360 ge {/H*M H*M 360 sub def} if %H*M = H*abd = H*abe for all hue angles /H*abe H*M def %calculations for elementary (e) system: %faktor and section in actual System (for example ORS18) /jsece -1 def %main equations %fakte = [col_angh - LAB*He(n)]/[LAB*He(n+1) - LAB*He(n)] %col_angh = fakte [LAB*He(n+1) - LAB*He(n)] + LAB*He(n) H*abe LAB*He 0 get lt {/H*abe H*abe 360 add def} if 0 1 5 {/nx exch def /np nx 1 add def H*abe LAB*He nx get ge H*abe LAB*He np get lt and {/jsece nx def /fakte H*abe LAB*He nx get sub LAB*He np get LAB*He nx get sub div def} if } for %nx=0,5 %1 0 0 %R jsece=0 %1 1 0 %J jsece=1 %0 1 0 %G jsece=2 %0 1 1 %C' jsece=3 %0 0 1 %B jsece=4 %1 0 1 %R jsece=5 jsece -1 eq {STOPjsece} if /fakme 1 fakte sub def /o3*deMa -1 def /l3*deMa -1 def /v3*deMa -1 def jsece 0 eq {%sector O->Y, o3*=1, l3*=0->1, v*=0 /o3*deMa 1 def /l3*deMa fakte def /v3*deMa 0 def /u*dtMa1 (r) def /u*dtMai fakte 99 mul cviht def /u*dtMa2 (j) def /u*deMa1 (r) def /u*deMai fakte 99 mul cviht def /u*deMa2 (j) def} if jsece 1 eq {%sector Y->L, o3*=1->0, l3*=1, v*=0 /o3*deMa fakme def /l3*deMa 1 def /v3*deMa 0 def /u*dtMa1 (j) def /u*dtMai fakte 99 mul cviht def /u*dtMa2 (g) def /u*deMa1 (j) def /u*deMai fakte 99 mul cviht def /u*deMa2 (g) def} if jsece 2 eq {%sector L->C, o3*=0, l3*=1, v*=0->1 /o3*deMa 0 def /l3*deMa 1 def /v3*deMa fakte def /u*dtMa1 (g) def /u*dtMai fakte 99 mul cviht def /u*dtMa2 (C) def /u*deMa1 (g) def /u*deMai fakte 99 mul 0.5 mul cviht def /u*deMa2 (b) def} if jsece 3 eq {%sector C->V, o3*=0, l3*=0->1, v*=1 /o3*deMa 0 def /l3*deMa fakme def /v3*deMa 1 def /u*dtMa1 (C) def /u*dtMai fakte 99 mul cviht def /u*dtMa2 (b) def /u*deMa1 (g) def /u*deMai fakte 99 mul 0.5 mul 50 add cviht def /u*deMa2 (b) def} if jsece 4 eq {%sector V->M, o3*=0->1, l3*=0, v*=1 /o3*deMa fakte def /l3*deMa 0 def /v3*deMa 1 def /u*dtMa1 (b) def /u*dtMai fakte 99 mul cviht def /u*dtMa2 (M) def /u*deMa1 (b) def /u*deMai fakte 99 mul 0.5 mul cviht def /u*deMa2 (r) def} if jsece 5 eq {%sector M->O, o3*=1, l3*=0, v*=1->0 /o3*deMa 1 def /l3*deMa 0 def /v3*deMa fakme def /u*dtMa1 (M) def /u*dtMai fakte 99 mul cviht def /u*dtMa2 (r) def /u*deMa1 (b) def /u*deMai fakte 99 mul 0.5 mul 50 add cviht def /u*deMa2 (r) def} if o3*deMa -1 eq {STOPo3*Ma0} if l3*deMa -1 eq {STOPl3*Ma0} if v3*deMa -1 eq {STOPv3*Ma0} if /i3*deMa 1 def /c3*deMa 1 o3*deMa sub def /m3*deMa 1 l3*deMa sub def /y3*deMa 1 v3*deMa sub def /n3*deMa 0 def /lab*nMa 0.00 def /lab*cMa 1.00 def /lab*wMa 0.00 def /lab*tMa 0.50 def /lab*hMa H*Ma 360 div def /lab*lMa L*Ma nLAB*s0 0 get sub wLAB*s0 0 get nLAB*s0 0 get sub 0.000001 add div def /o3*dd o*s def /o3*dd w*s o3*ddMa c*rs mul add def /l3*dd l*s def /l3*dd w*s l3*ddMa c*rs mul add def /v3*dd v*s def /v3*dd w*s v3*ddMa c*rs mul add def /o3*de w*s o3*deMa c*rs mul add def /l3*de w*s l3*deMa c*rs mul add def /v3*de w*s v3*deMa c*rs mul add def } ifelse %chromatic colour i*p#6 %For tLAB=1 Transfer to LAB*Ma and LAB*Fa tLAB 1 eq {%tLAB = 1 i*p 6 eq {%achromatic,chromatic colours /L*Ma L*Wio def /A*Ma 0 def /B*Ma 0 def /H*Ma B*Ma A*Ma 0.0001 add atan def /C*Ma 0 def /L*Fa L*Nio L*Wio L*Nio sub w*s mul add def /A*Fa 0 def /B*Fa 0 def /H*Fa B*Fa A*Fa 0.0001 add atan def /C*Fa 0 def /l*rs w*s def } %achromatic i*p=6 { %chromatic i*p#6 %H*M allready defined /L*Ha 50 def /A*Ha 75 H*M cos mul def /B*Ha 75 H*M sin mul def /UXF1a wLAB*s0 1 get B*Ha mul wLAB*s0 2 get A*Ha mul sub def /UXF2a wLAB*s0 2 get L*Ha mul wLAB*s0 0 get B*Ha mul sub def /UXF3a wLAB*s0 0 get A*Ha mul wLAB*s0 1 get L*Ha mul sub def /T1 0 def /T2 0 def 0 1 5 {/ia exch def /ia30 ia 3 mul def ia 5 eq {/ia31 0 def} {/ia31 ia30 3 add def} ifelse /T1 LAB*a ia30 get UXF1a mul LAB*a ia30 1 add get UXF2a mul add LAB*a ia30 2 add get UXF3a mul add def /T2 LAB*a ia31 get UXF1a mul LAB*a ia31 1 add get UXF2a mul add LAB*a ia31 2 add get UXF3a mul add def T1 0 le {/T1X (N) def} {/T1X (P) def} ifelse T2 0 gt {/T2X (P) def} {/T2X (N) def} ifelse T1 0 le T2 0 gt and {/ia3END ia30 def exit} if } for /L*11a LAB*a ia3END get def /A*11a LAB*a ia3END 1 add get def /B*11a LAB*a ia3END 2 add get def ia3END 15 ge {/ia3END -3 def} if /L*21a LAB*a ia3END 3 add get def /A*21a LAB*a ia3END 4 add get def /B*21a LAB*a ia3END 5 add get def /NENNER L*21a L*11a sub UXF1a mul A*21a A*11a sub UXF2a mul add B*21a B*11a sub UXF3a mul add def /ZAEHLE L*21a UXF1a mul A*21a UXF2a mul add B*21a UXF3a mul add def NENNER 0 ne {/ALPH ZAEHLE NENNER div def} {/ALPH 99999} ifelse /L*Ma ALPH L*11a mul 1 ALPH sub L*21a mul add def /A*Ma ALPH A*11a mul 1 ALPH sub A*21a mul add def /B*Ma ALPH B*11a mul 1 ALPH sub B*21a mul add def /C*Ma A*Ma dup mul B*Ma dup mul add 0.000001 add sqrt def /H*Ma B*Ma A*Ma 0.0001 add atan def %equations %/c*rs olv*smax olv*smin sub def %/n*s 1 olv*smax sub def %/w*s 1 n*s sub c*rs sub def %/t*s 1 n*s sub c*rs 0.5 mul sub def %l* = t* + c* [L*M - L*N]/[L*W - L*N] - 0.5 c* %l* = (L*Fa - L*Na) / (L*Wa - L*Na) %L*Fa = l* (L*Wa - L*Na) + L*Na %given L*Nio, L*Wio /l*rs t*s L*Ma L*Nio sub L*Wio L*Nio sub div c*rs mul add c*rs 0.5 mul sub def /L*Fa L*Nio L*Wio L*Nio sub l*rs mul add def /C*Fa C*Ma c*rs mul def /H*Fa H*Ma def /A*Fa C*Fa H*Ma cos mul def /B*Fa C*Fa H*Ma sin mul def } ifelse %chromatic colour i*p#6 } if %tLAB = 1 } bind def %END Procedure proc_olv3*s_to_olv3*u*dd_de_H*M_LAB*Ma_Fa*ioG %******************************************************************* from De990-7N04.PS /proc_ColSep*ioG {%BEG Procedure proc_ColSep*ioG ColourSeparation for NP-file 20090201 /setgc {pop pop pop 1 exch sub sggray} bind def /setgm {pop pop 1 exch sub sggray pop} bind def /setgy {pop 1 exch sub sggray pop pop} bind def /setgn {1 exch sub sggray pop pop pop} bind def /setgf {/ncolor exch def /ycolor exch def /mcolor exch def /ccolor exch def 0 ccolor eq 0 mcolor eq and 0 ycolor eq and {1 ncolor sub sggray} {1 ccolor sub 0.71 mul 1 mcolor sub 0.22 mul add 1 ycolor sub 0.07 mul add sggray} ifelse } bind def /setcmykcolorf { sgcmykcolor} bind def %fuer PSL1/2-Farbgeraet /setcmyknew { %Ersatz setcolornew durch setcmykcolor1 ausz 1 eq {setgc} if %C ausz 2 eq {setgm} if %M ausz 3 eq {setgy} if %Y ausz 4 eq {pop pop pop /ccolor exch def ccolor 0 0 0 /setcmykcolor where %Abfrage Farb-/SW-Geraet {pop setcmykcolorf} %PSL1/2-Farb-Geraet {setgc} %PSL1-SW-Geraet ifelse } if %Cbunt ausz 5 eq {pop pop /mcolor exch def pop 0 mcolor 0 0 /setcmykcolor where %Abfrage Farb-/SW-Geraet {pop setcmykcolorf} %PSL1/2-Farb-Geraet {setgm} %PSL1-SW-Geraet ifelse } if %Mbunt ausz 6 eq {pop /ycolor exch def pop pop 0 0 ycolor 0 /setcmykcolor where %Abfrage Farb-/SW-Geraet {pop setcmykcolorf} %PSL1/2-Farb-Geraet {setgy} %PSL1-SW-Geraet ifelse } if %Ybunt ausz 7 eq {setgn} if %N ausz 8 ge { /setcmykcolor where %Abfrage Farb-/SW-Geraet {pop setcmykcolorf} %PSL1/2-Farb-Geraet {setgf} %PSL1-SW-Geraet ifelse } if %bei ausz=8: Farb- oder SW-Ausdruck je nach Drucker } bind def %********************************************************************* /rgb_LAB_Interp_olv*ioG {%BEG Procedure rgb_LAB_Interp_olv*ioG zm60'LABINPLT.PS %assumes input of rgb, LAB_Interpolation and calculation of olv* %split in chromatic and achromatic colours %two special cases black N and white W /b exch def /g exch def /r exch def r g sub abs 0.001 le r b sub abs 0.001 le and {%achromatic case /Case 0 def r abs 0.001 le g abs 0.001 le and b abs 0.001 le and {%N special case /Case 1 def } if %N special case 1 r sub abs 0.001 le 1 g sub abs 0.001 le and 1 b sub abs 0.001 le and {%W special case /Case 2 def } if }%achromatic {%chromatic /Case 3 def } ifelse %chromatic Case 1 eq {%Black N /o* 0 def /l* 0 def /v* 0 def } if %N special case Case 2 eq {%White W /o* 1 def /l* 1 def /v* 1 def } if %W special case Case 0 eq Case 3 eq or {%chromatic or gray /tLAB 1 def r g b proc_olv3*s_to_olv3*u*dd_de_H*M_LAB*Ma_Fa*ioG L*Fa A*Fa B*Fa Lab2RGBinterpolation /v* exch def /l* exch def /o* exch def } if %chromatic or gray } bind def %END Procedure rgb_LAB_Interp_olv*ioG 'zm60'LABINPLT.PS %********************************************************************* /trans_rgb3*_cmyn4*ioG {%BEG Procedure trans_rgb3*_cmyn4*ioG %assumes input of olv* o* 0 le {/o* 0.0000 def} if l* 0 le {/l* 0.0000 def} if v* 0 le {/v* 0.0000 def} if o* 1 ge {/o* 1.0000 def} if l* 1 ge {/l* 1.0000 def} if v* 1 ge {/v* 1.0000 def} if /tdel 0 def v* l* ge l* o* ge and tdel 0 eq and % v* >= l* >= o* equal y* <= m* <= c* %sector C-V of C-M, C>=M: i*p=0 {/n*n 1 v* sub def /w*w o* def /tdel 1 def } if % v* >= l* >= o* v* o* ge o* l* ge and tdel 0 eq and % v* >= o* >= l* equal y* <= c* <= m* %sector V-M of C-M, M>=C: i*p=1 {/n*n 1 v* sub def /w*w l* def /tdel 1 def } if % v* >= o* >= l* o* v* ge v* l* ge and tdel 0 eq and % o* >= v* >= l* equal c* <= y* <= m* %sector M-O of M-Y, M>=Y: i*p=2 {/n*n 1 o* sub def /w*w l* def /tdel 1 def } if % o* >= v* >= l* o* l* ge l* v* ge and tdel 0 eq and % o* >= l* >= v* equal c* <= m* <= y* %sector O-Y of M-Y, Y>=M: i*p=3 {/n*n 1 o* sub def /w*w v* def /tdel 1 def } if % o* >= l* >= v* l* o* ge o* v* ge and tdel 0 eq and % l* >= o* >= v* equal m* <= c* <= y* %sector Y-L of Y-C, Y>=C: i*p=4 {/n*n 1 l* sub def /w*w v* def /tdel 1 def } if % l* >= o* >= v* l* v* ge v* o* ge and tdel 0 eq and % l* >= v* >= o* equal m* <= y* <= c* %sector L-C of Y-C, C>=Y: i*p=5 {/n*n 1 l* sub def /w*w o* def /tdel 1 def } if % l* >= v* >= o* %achromatic %W: o*, l*, v* = 1.00 1.0 o* sub abs 0.001 le 1.0 l* sub abs 0.001 le and 1.0 v* sub abs 0.001 le and %W special case {/n*n 0 def /w*w 1 def %W } if %N: o*, l*, v* <= 0.001 o* abs 0.001 le l* abs 0.001 le and v* abs 0.001 le and %N special case {/n*n 1 def /w*w 0 def %N } if %Achromatic o* l* sub abs 0.001 le l* v* sub abs 0.001 le and %Achromatic special case {/n*n 1 o* sub def /w*w o* def %grey } if /lab*wFa w*w def /lab*nFa n*n def /c3*Fa 1 o* sub def /m3*Fa 1 l* sub def /y3*Fa 1 v* sub def /c4*Fa c3*Fa lab*nFa sub def %at least one of cmy will be cero /m4*Fa m3*Fa lab*nFa sub def /y4*Fa y3*Fa lab*nFa sub def /n4*Fa lab*nFa def %cmyn4* /o4*Fa 1 c4*Fa sub def /l4*Fa 1 m4*Fa sub def /v4*Fa 1 y4*Fa sub def /i4*Fa 1 n4*Fa sub def } bind def %END Procedure trans_rgb3*_cmyn4*ioG %******************************************************************* /trans_rgb3*_cmyn5*ioG {%BEG Procedure trans_rgb3*_cmyn5*ioG %assumes input of olv*, 'zm60'CMYN559LT.PS o* 0 le {/o* 0.0000 def} if l* 0 le {/l* 0.0000 def} if v* 0 le {/v* 0.0000 def} if o* 1 ge {/o* 1.0000 def} if l* 1 ge {/l* 1.0000 def} if v* 1 ge {/v* 1.0000 def} if /ok* o* def /lk* l* def /vk* v* def /tdel 0 def vk* lk* ge lk* ok* ge and tdel 0 eq and % v* >= l* >= o* equal y* <= m* <= c* %sector C-V of C-M, C>=M: i*p=0 {/n*n 1 vk* sub def /w*w ok* def /m*w lk* def /tdel 1 def /isec 3 def } if % v* >= l* >= o* vk* ok* ge ok* lk* ge and tdel 0 eq and % v* >= o* >= l* equal y* <= c* <= m* %sector V-M of C-M, M>=C: i*p=1 {/n*n 1 vk* sub def /w*w lk* def /m*w ok* def /tdel 1 def /isec 4 def } if % v* >= o* >= l* ok* vk* ge vk* lk* ge and tdel 0 eq and % o* >= v* >= l* equal c* <= y* <= m* %sector M-O of M-Y, M>=Y: i*p=2 {/n*n 1 ok* sub def /w*w lk* def /m*w vk* def /tdel 1 def /isec 5 def } if % o* >= v* >= l* ok* lk* ge lk* vk* ge and tdel 0 eq and % o* >= l* >= v* equal c* <= m* <= y* %sector O-Y of M-Y, Y>=M: i*p=3 {/n*n 1 ok* sub def /w*w vk* def /m*w lk* def /tdel 1 def /isec 0 def } if % o* >= l* >= v* lk* ok* ge ok* vk* ge and tdel 0 eq and % l* >= o* >= v* equal m* <= c* <= y* %sector Y-L of Y-C, Y>=C: i*p=4 {/n*n 1 lk* sub def /w*w vk* def /m*w ok* def /tdel 1 def /isec 1 def } if % l* >= o* >= v* lk* vk* ge vk* ok* ge and tdel 0 eq and % l* >= v* >= o* equal m* <= y* <= c* %sector L-C of Y-C, C>=Y: i*p=5 {/n*n 1 lk* sub def /w*w ok* def /m*w vk* def /tdel 1 def /isec 2 def } if % l* >= v* >= o* %achromatic %W: ok*, lk*, vk* = 1.00 1.0 ok* sub abs 0.001 le 1.0 lk* sub abs 0.001 le and 1.0 vk* sub abs 0.001 le and %W special case {/n*n 0 def /w*w 1 def /m*w 1 def %W /isec 6 def } if %N: ok*, lk*, vk* <= 0.001 ok* abs 0.001 le lk* abs 0.001 le and vk* abs 0.001 le and %N special case {/n*n 1 def /w*w 0 def /m*w 0 def %N /isec 6 def } if %Achromatic ok* lk* sub abs 0.001 le lk* vk* sub abs 0.001 le and %Achromatic special case {/n*n 1 ok* sub def /w*w ok* def /m*w ok* def %grey /isec 6 def } if /lab*wFa w*w def /lab*nFa n*n def /lab*cFa 1 n*n sub w*w sub def /argb 1 lab*nFa sub def /brgb m*w def /crgb lab*wFa def /c* lab*cFa def /lab*tFa 1 lab*nFa sub lab*cFa 0.5 mul sub def isec 6 eq {%BEG isec=6 achromatic /o*1 1 def /l*1 1 def /v*1 1 def }%END isec=6 achromatic {%BEG isec#6 chromatic /o*1 ok* argb 0.000001 add div def /l*1 lk* argb 0.000001 add div def /v*1 vk* argb 0.000001 add div def } ifelse %END isec#6 /c3*Fa 1 o*1 sub def /m3*Fa 1 l*1 sub def /y3*Fa 1 v*1 sub def /c4*Fa c3*Fa def %at least one of cmy will be cero /m4*Fa m3*Fa def /y4*Fa y3*Fa def /n4*Fa lab*nFa def %cmyn5* /o4*Fa 1 c4*Fa sub def /l4*Fa 1 m4*Fa sub def /v4*Fa 1 y4*Fa sub def /i4*Fa 1 n4*Fa sub def } bind def %END Procedure trans_rgb3*_cmyn5*ioG 'zm60'CMYN559LT.PS %********************************************************************* /trans_rgb3*_cmyn6*ioG {%BEG Procedure trans_rgb3*_cmyn6*ioG %assumes input of olv*, 'zm60'CMYN559LT.PS o* 0 le {/o* 0.0000 def} if l* 0 le {/l* 0.0000 def} if v* 0 le {/v* 0.0000 def} if o* 1 ge {/o* 1.0000 def} if l* 1 ge {/l* 1.0000 def} if v* 1 ge {/v* 1.0000 def} if /ok* o* def /lk* l* def /vk* v* def /tdel 0 def vk* lk* ge lk* ok* ge and tdel 0 eq and % v* >= l* >= o* equal y* <= m* <= c* %sector C-V of C-M, C>=M: i*p=0 {/n*n 1 vk* sub def /w*w ok* def /m*w lk* def /tdel 1 def /isec 3 def } if % v* >= l* >= o* vk* ok* ge ok* lk* ge and tdel 0 eq and % v* >= o* >= l* equal y* <= c* <= m* %sector V-M of C-M, M>=C: i*p=1 {/n*n 1 vk* sub def /w*w lk* def /m*w ok* def /tdel 1 def /isec 4 def } if % v* >= o* >= l* ok* vk* ge vk* lk* ge and tdel 0 eq and % o* >= v* >= l* equal c* <= y* <= m* %sector M-O of M-Y, M>=Y: i*p=2 {/n*n 1 ok* sub def /w*w lk* def /m*w vk* def /tdel 1 def /isec 5 def } if % o* >= v* >= l* ok* lk* ge lk* vk* ge and tdel 0 eq and % o* >= l* >= v* equal c* <= m* <= y* %sector O-Y of M-Y, Y>=M: i*p=3 {/n*n 1 ok* sub def /w*w vk* def /m*w lk* def /tdel 1 def /isec 0 def } if % o* >= l* >= v* lk* ok* ge ok* vk* ge and tdel 0 eq and % l* >= o* >= v* equal m* <= c* <= y* %sector Y-L of Y-C, Y>=C: i*p=4 {/n*n 1 lk* sub def /w*w vk* def /m*w ok* def /tdel 1 def /isec 1 def } if % l* >= o* >= v* lk* vk* ge vk* ok* ge and tdel 0 eq and % l* >= v* >= o* equal m* <= y* <= c* %sector L-C of Y-C, C>=Y: i*p=5 {/n*n 1 lk* sub def /w*w ok* def /m*w vk* def /tdel 1 def /isec 2 def } if % l* >= v* >= o* %achromatic %W: ok*, lk*, vk* = 1.00 1.0 ok* sub abs 0.001 le 1.0 lk* sub abs 0.001 le and 1.0 vk* sub abs 0.001 le and %W special case {/n*n 0 def /w*w 1 def /m*w 1 def %W /isec 6 def } if %N: ok*, lk*, vk* <= 0.001 ok* abs 0.001 le lk* abs 0.001 le and vk* abs 0.001 le and %N special case {/n*n 1 def /w*w 0 def /m*w 0 def %N /isec 6 def } if %Achromatic ok* lk* sub abs 0.001 le lk* vk* sub abs 0.001 le and %Achromatic special case {/n*n 1 ok* sub def /w*w ok* def /m*w ok* def %grey /isec 6 def } if /lab*wFa w*w def /lab*nFa n*n def /lab*cFa 1 n*n sub w*w sub def /argb 1 lab*nFa sub def /brgb m*w def /crgb lab*wFa def /c* lab*cFa def /lab*tFa 1 lab*nFa sub lab*cFa 0.5 mul sub def isec 6 eq {%BEG isec=6 achromatic /o*1 1 def /l*1 1 def /v*1 1 def }%END isec=6 achromatic {%BEG isec#6 chromatic /o*1 ok* argb 0.000001 add div def /l*1 lk* argb 0.000001 add div def /v*1 vk* argb 0.000001 add div def } ifelse %END isec#6 /c3*Fa 1 o*1 sub def /m3*Fa 1 l*1 sub def /y3*Fa 1 v*1 sub def /c41*Fa c3*Fa def %at least one of cmy will be cero /m41*Fa m3*Fa def /y41*Fa y3*Fa def /n4*Fa lab*nFa 1.0 exp def %cmyn6* %change by deepness difference delta d* = c*S1 - c*S2 %use lab*cFa, lab*tFa for correction %equations of three lines %t* = 1 - 0.5 c* %t* = [t* / c*] c* %t* = [(t* + 0,18) / c*] c* - 0,18 %cut point S1 for nt=0,18: %c*s1 = 1 /[ t*F / c*F + 0,5 ] %cut point S2 for n=0,18: %c*s1 = (1 + nt) / [ (t*F + nt) / c*F + 0,5 ] %special case lab*cFa=0 and n=0,18 /nt 0.18 def lab*cFa 0 eq { %lab*cFa=0,#0 /c*S1 0 def /c*S2 0 def } %lab*cFa=0 { %lab*cFa#0 /c*S1 1 lab*tFa lab*cFa div 0.5 add div def /c*S2 1 nt add lab*tFa nt add lab*cFa div 0.5 add div def } ifelse %lab*cFa=0,#0 /c4*Fa c41*Fa c41*Fa c*S1 c*S2 sub mul sub def /m4*Fa m41*Fa m41*Fa c*S1 c*S2 sub mul sub def /y4*Fa y41*Fa y41*Fa c*S1 c*S2 sub mul sub def /o4*Fa 1 c4*Fa sub def /l4*Fa 1 m4*Fa sub def /v4*Fa 1 y4*Fa sub def /i4*Fa 1 n4*Fa sub def } bind def %END Procedure trans_rgb3*_cmyn6*ioG 'zm60'CMYN559LT.PS %********************************************************************* %BEG 'zm60'COLM57_590415LT.PS 20090201 ColSpx 0 eq {%ColSpx=0 /tLAB 0 def xcharti 1 ge {%xcharti>=1 'zm60'COLM57LT.PS cmy0* 20090201 colorm 0 eq {%BEG colorm=0 /setrgbcolor {/v* exch def /l* exch def /o* exch def %DEintp 1 eq {o* l* v* %proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %/o* o3*ed def /l* l3*ed def /v* v3*ed def} if %standard cmy0* for input /c4*Fa 1 o* sub def /m4*Fa 1 l* sub def /y4*Fa 1 v* sub def /n4*Fa 0 def rgb_cmy 1 eq {c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew} {o* l* v* sgrgbcolor} ifelse } def /setgray {dup dup /v* exch def /l* exch def /o* exch def %DEintp 1 eq {o* l* v* %proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %/o* o3*ed def /l* l3*ed def /v* v3*ed def} if %standard cmy0* for input /c4*Fa 1 o* sub def /m4*Fa 1 l* sub def /y4*Fa 1 v* sub def /n4*Fa 0 def rgb_cmy 1 eq {c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew} {o* l* v* sgrgbcolor} ifelse } def /setcmykcolor {/n*n exch def /y*n exch def /m*n exch def /c*n exch def %standard cmy0* for input n*n 0 eq {/o* 1 c*n sub def /l* 1 m*n sub def /v* 1 y*n sub def /i* 0 def } {/o* 1 n*n sub def /l* 1 n*n sub def /v* 1 n*n sub def /i* 0 def } ifelse %DEintp 1 eq {o* l* v* %proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %/o* o3*ed def /l* l3*ed def /v* v3*ed def} if /c4*Fa 1 o* sub def /m4*Fa 1 l* sub def /y4*Fa 1 v* sub def /n4*Fa 0 def rgb_cmy 1 eq {c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew} {o* l* v* sgrgbcolor} ifelse } def }%END colorm=0 {%BEG colorm=1 /setrgbcolor {/v* exch def /l* exch def /o* exch def %DEintp 1 eq {o* l* v* %proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %/o* o3*ed def /l* l3*ed def /v* v3*ed def} if o* l* v* rgb_LAB_Interp_olv*ioG /c4*Fa 1 o* sub def /m4*Fa 1 l* sub def /y4*Fa 1 v* sub def /n4*Fa 0 def rgb_cmy 1 eq {c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew} {o* l* v* sgrgbcolor} ifelse } def /setgray {/w*w exch def /o* w*w def /l* w*w def /v* w*w def %DEintp 1 eq {o* l* v* %proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %/o* o3*ed def /l* l3*ed def /v* v3*ed def} if o* l* v* rgb_LAB_Interp_olv*ioG /c4*Fa 1 o* sub def /m4*Fa 1 l* sub def /y4*Fa 1 v* sub def /n4*Fa 0 def rgb_cmy 1 eq {c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew} {o* l* v* sgrgbcolor} ifelse } def /setcmykcolor {/n*n exch def /y*n exch def /m*n exch def /c*n exch def %standard cmy0* or 000n* for input n*n 0 eq {/o* 1 c*n sub def /l* 1 m*n sub def /v* 1 y*n sub def} {/o* 1 n*n sub def /l* 1 n*n sub def /v* 1 n*n sub def} ifelse %DEintp 1 eq {o* l* v* %proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %/o* o3*ed def /l* l3*ed def /v* v3*ed def} if o* l* v* rgb_LAB_Interp_olv*ioG /c4*Fa 1 o* sub def /m4*Fa 1 l* sub def /y4*Fa 1 v* sub def /n4*Fa 0 def rgb_cmy 1 eq {c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew} {o* l* v* sgrgbcolor} ifelse } def } ifelse %END colorm=1 }%END %xcharti>=1 {%BEG %xcharti=0 /setrgbcolor {/v* exch def /l* exch def /o* exch def /c4*Fa 1 o* sub def /m4*Fa 1 l* sub def /y4*Fa 1 v* sub def /n4*Fa 0 def o* l* v* sgrgbcolor } def /setgray {dup dup /v* exch def /l* exch def /o* exch def /c4*Fa 1 o* sub def /m4*Fa 1 l* sub def /y4*Fa 1 v* sub def /n4*Fa 0 def o* sggray } def /setcmykcolor {/n*n exch def /y*n exch def /m*n exch def /c*n exch def n*n 0 eq {/o* 1 c*n sub def /l* 1 m*n sub def /v* 1 y*n sub def /n4*Fa 0 def} {/o* 1 def /l* 1 def /v* 1 def /n4*Fa n*n def} ifelse /c4*Fa 1 o* sub def /m4*Fa 1 l* sub def /y4*Fa 1 v* sub def c4*Fa m4*Fa y4*Fa n4*Fa sgcmykcolor } def } ifelse %END %xcharti=0 'zm60'COLM57LT.PS cmy0* 20090201 } if %ColSpx=0 %********************************************************************* ColSpx 1 eq {%ColSpx=1 /tLAB 0 def xcharti 1 ge {%xcharti>=1 'zm60'COLM559LT.PS cmyn6* 20080201 colorm 0 eq {%BEG colorm=0 /olvtrans 1 def %changes olv* to olvk* /setrgbcolor {/v* exch def /l* exch def /o* exch def %DEintp 1 eq {o* l* v* %proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %/o* o3*ed def /l* l3*ed def /v* v3*ed def} if trans_rgb3*_cmyn6*ioG %in: olv*, out: cmyn6 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def /setgray {/w*w exch def /v* w*w def /l* w*w def /o* w*w def %DEintp 1 eq {o* l* v* %proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %/o* o3*ed def /l* l3*ed def /v* v3*ed def} if trans_rgb3*_cmyn6*ioG %in: olv*, out: cmyn6 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def /setcmykcolor {/n*n exch def /y*n exch def /m*n exch def /c*n exch def %standard cmy0* or 000n* for input n*n 0 eq {/o* 1 c*n sub def /l* 1 m*n sub def /v* 1 y*n sub def} {/o* 1 n*n sub def /l* 1 n*n sub def /v* 1 n*n sub def} ifelse %DEintp 1 eq {o* l* v* %proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %/o* o3*ed def /l* l3*ed def /v* v3*ed def} if trans_rgb3*_cmyn6*ioG %in: olv*, out: cmyn6 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def }%END colorm=0 {%BEG colorm=1 /olvtrans 0 def %no change of olv* /setrgbcolor {/v* exch def /l* exch def /o* exch def %DEintp 1 eq {o* l* v* %proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %/o* o3*ed def /l* l3*ed def /v* v3*ed def} if o* l* v* rgb_LAB_Interp_olv*ioG trans_rgb3*_cmyn6*ioG %in: olv*, out: cmyn6 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def /setgray {dup dup /v* exch def /l* exch def /o* exch def %DEintp 1 eq {o* l* v* %proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %/o* o3*ed def /l* l3*ed def /v* v3*ed def} if o* l* v* rgb_LAB_Interp_olv*ioG trans_rgb3*_cmyn6*ioG %in: olv*, out: cmyn6 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def /setcmykcolor {/n*n exch def /y*n exch def /m*n exch def /c*n exch def %standard cmy0* or 000n* for input n*n 0 eq {/o* 1 c*n sub def /l* 1 m*n sub def /v* 1 y*n sub def} {/o* 1 n*n sub def /l* 1 n*n sub def /v* 1 n*n sub def} ifelse %DEintp 1 eq {o* l* v* %proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %/o* o3*ed def /l* l3*ed def /v* v3*ed def} if o* l* v* rgb_LAB_Interp_olv*ioG trans_rgb3*_cmyn6*ioG %in: olv*, out: cmyn6 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def } ifelse %END colorm=1 }%END %xcharti>=0 {%BEG %xcharti=0 /setrgbcolor {/v* exch def /l* exch def /o* exch def /c4*Fa 1 o* sub def /m4*Fa 1 l* sub def /y4*Fa 1 v* sub def /n4*Fa 0 def o* l* v* sgrgbcolor } def /setgray {dup dup /v* exch def /l* exch def /o* exch def /c4*Fa 1 o* sub def /m4*Fa 1 l* sub def /y4*Fa 1 v* sub def /n4*Fa 0 def o* sggray } def /setcmykcolor {/n*n exch def /y*n exch def /m*n exch def /c*n exch def n*n 0 eq {/o* 1 c*n sub def /l* 1 m*n sub def /v* 1 y*n sub def /n4*Fa 0 def} {/o* 1 def /l* 1 def /v* 1 def /n4*Fa n*n def} ifelse /c4*Fa 1 o* sub def /m4*Fa 1 l* sub def /y4*Fa 1 v* sub def c4*Fa m4*Fa y4*Fa n4*Fa sgcmykcolor } def } ifelse %END %xcharti=0 'zm60'COLM559LT.PS cmyn6* 20080201 } if %ColSpx=1 %*************************************************************** ColSpx 2 eq {%ColSpx=2 /tLAB 0 def xcharti 1 ge {%xcharti>=1 'zm60'COLM58LT.PS cmyn4* 20090201 colorm 0 eq {%BEG colorm=0 /setrgbcolor {/v* exch def /l* exch def /o* exch def %DEintp 1 eq {o* l* v* %proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %/o* o3*ed def /l* l3*ed def /v* v3*ed def} if trans_rgb3*_cmyn4*ioG %in: olv*, out: cmyn4 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def /setgray {dup dup /v* exch def /l* exch def /o* exch def %DEintp 1 eq {o* l* v* %proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %/o* o3*ed def /l* l3*ed def /v* v3*ed def} if trans_rgb3*_cmyn4*ioG %in: olv*, out: cmyn4 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def /setcmykcolor {/n*n exch def /y*n exch def /m*n exch def /c*n exch def %standard cmy0* or 000n* for input n*n 0 eq {/o* 1 c*n sub def /l* 1 m*n sub def /v* 1 y*n sub def} {/o* 1 n*n sub def /l* 1 n*n sub def /v* 1 n*n sub def} ifelse %DEintp 1 eq {o* l* v* %proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %/o* o3*ed def /l* l3*ed def /v* v3*ed def} if trans_rgb3*_cmyn4*ioG %in: olv*, out: cmyn4 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def }%END colorm=0 {%BEG colorm=1 /setrgbcolor {/v* exch def /l* exch def /o* exch def %DEintp 1 eq {o* l* v* %proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %/o* o3*ed def /l* l3*ed def /v* v3*ed def} if o* l* v* rgb_LAB_Interp_olv*ioG trans_rgb3*_cmyn4*ioG %needs olv* for input %produces cmyn4*ioG as output c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def /setgray {dup dup /v* exch def /l* exch def /o* exch def %DEintp 1 eq {o* l* v* %proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %/o* o3*ed def /l* l3*ed def /v* v3*ed def} if o* l* v* rgb_LAB_Interp_olv*ioG trans_rgb3*_cmyn4*ioG %in: olv*, out: cmyn4 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def /setcmykcolor {/n*n exch def /y*n exch def /m*n exch def /c*n exch def %standard cmy0* or 000n* for input n*n 0 eq {/o* 1 c*n sub def /l* 1 m*n sub def /v* 1 y*n sub def} {/o* 1 n*n sub def /l* 1 n*n sub def /v* 1 n*n sub def} ifelse %DEintp 1 eq {o* l* v* %proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %/o* o3*ed def /l* l3*ed def /v* v3*ed def} if o* l* v* rgb_LAB_Interp_olv*ioG trans_rgb3*_cmyn4*ioG %in: olv*, out: cmyn4 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def } ifelse %END colorm=1 }%END %xcharti>=0 {%BEG %xcharti=0 /setrgbcolor {/v* exch def /l* exch def /o* exch def /c4*Fa 1 o* sub def /m4*Fa 1 l* sub def /y4*Fa 1 v* sub def /n4*Fa 0 def o* l* v* sgrgbcolor } def /setgray {dup dup /v* exch def /l* exch def /o* exch def /c4*Fa 1 o* sub def /m4*Fa 1 l* sub def /y4*Fa 1 v* sub def /n4*Fa 0 def o* sggray } def /setcmykcolor {/n*n exch def /y*n exch def /m*n exch def /c*n exch def n*n 0 eq {/o* 1 c*n sub def /l* 1 m*n sub def /v* 1 y*n sub def /n4*Fa 0 def} {/o* 1 def /l* 1 def /v* 1 def /n4*Fa n*n def} ifelse /c4*Fa 1 o* sub def /m4*Fa 1 l* sub def /y4*Fa 1 v* sub def c4*Fa m4*Fa y4*Fa n4*Fa sgcmykcolor } def } ifelse %END %xcharti=0 'zm60'COLM58LT.PS cmyn4* 20090201 } if %ColSpx=2 %************************************************************* ColSpx 3 eq {%ColSpx=3 /tLAB 0 def xcharti 1 ge {%xcharti>=1 'zm60'COLM559LT.PS cmyn5* 20090201 colorm 0 eq {%BEG colorm=0 /setrgbcolor {/v* exch def /l* exch def /o* exch def %DEintp 1 eq {o* l* v* %proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %/o* o3*ed def /l* l3*ed def /v* v3*ed def} if trans_rgb3*_cmyn5*ioG %in: olv*, out: cmyn5 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def /setgray {dup dup /v* exch def /l* exch def /o* exch def %DEintp 1 eq {o* l* v* %proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %/o* o3*ed def /l* l3*ed def /v* v3*ed def} if trans_rgb3*_cmyn5*ioG %in: olv*, out: cmyn5 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def /setcmykcolor {/n*n exch def /y*n exch def /m*n exch def /c*n exch def %standard cmy0* or 000n* for input n*n 0 eq {/o* 1 c*n sub def /l* 1 m*n sub def /v* 1 y*n sub def} {/o* 1 n*n sub def /l* 1 n*n sub def /v* 1 n*n sub def} ifelse %DEintp 1 eq {o* l* v* %proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %/o* o3*ed def /l* l3*ed def /v* v3*ed def} if trans_rgb3*_cmyn5*ioG %in: olv*, out: cmyn5 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def }%END colorm=0 {%BEG colorm=1 /olvtrans 0 def %no change of olv* /setrgbcolor {/v* exch def /l* exch def /o* exch def %DEintp 1 eq {o* l* v* %proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %/o* o3*ed def /l* l3*ed def /v* v3*ed def} if o* l* v* rgb_LAB_Interp_olv*ioG trans_rgb3*_cmyn5*ioG %in: olv*, out: cmyn5 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def /setgray {dup dup /v* exch def /l* exch def /o* exch def %DEintp 1 eq {o* l* v* %proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %/o* o3*ed def /l* l3*ed def /v* v3*ed def} if o* l* v* rgb_LAB_Interp_olv*ioG trans_rgb3*_cmyn5*ioG %in: olv*, out: cmyn5 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def /setcmykcolor {/n*n exch def /y*n exch def /m*n exch def /c*n exch def %standard cmy0* or 000n* for input n*n 0 eq {/o* 1 c*n sub def /l* 1 m*n sub def /v* 1 y*n sub def} {/o* 1 n*n sub def /l* 1 n*n sub def /v* 1 n*n sub def} ifelse %DEintp 1 eq {o* l* v* %proc_olv3*s_to_olv3*u*ed_ee_H*M_LAB*Ma_Fa*ioG %/o* o3*ed def /l* l3*ed def /v* v3*ed def} if o* l* v* rgb_LAB_Interp_olv*ioG trans_rgb3*_cmyn5*ioG %in: olv*, out: cmyn5 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def } ifelse %END colorm=1 }%END %xcharti>=0 {%BEG %xcharti=0 /setrgbcolor {/v* exch def /l* exch def /o* exch def /c4*Fa 1 o* sub def /m4*Fa 1 l* sub def /y4*Fa 1 v* sub def /n4*Fa 0 def o* l* v* sgrgbcolor } def /setgray {dup dup /v* exch def /l* exch def /o* exch def /c4*Fa 1 o* sub def /m4*Fa 1 l* sub def /y4*Fa 1 v* sub def /n4*Fa 0 def o* sggray } def /setcmykcolor {/n*n exch def /y*n exch def /m*n exch def /c*n exch def n*n 0 eq {/o* 1 c*n sub def /l* 1 m*n sub def /v* 1 y*n sub def /n4*Fa 0 def} {/o* 1 def /l* 1 def /v* 1 def /n4*Fa n*n def} ifelse /c4*Fa 1 o* sub def /m4*Fa 1 l* sub def /y4*Fa 1 v* sub def c4*Fa m4*Fa y4*Fa n4*Fa sgcmykcolor } def } ifelse %END %xcharti=0 'zm60'COLM559LT.PS cmyn5* 20090201 } if %ColSpx=3 } bind def %BEG Procedure proc_ColSep*ioG ColourSeparation for NP-file 20090201 %***************************************************************************** %END HK0X->HE99/10L/OUTLIN1X.PS, ident. for NP-(*ioG), FP-files (*ioG) 20090201 /CFilenameS1g %START output of step S1g (130.149.60.45/~farbmetrik/HE99/HE99L0N) def %Link file name for data /CDateS1g (2006-01-01, Name) def %Date of calculation, Tester /CDeviceS1g (unknown ) def %Device name /CMeasS1g (HE99/HE99L0N) def %File name measured in step S1g %change scount2g from 2 to 10 for 10 series %change pcount2g from 8 to 240 for 240 pages of each series /scount1g 1 def /scount2g 1 def /scountg 1 def /pcount1g 1 def /pcount2g 10 def /pcountg 1 def %start=1, one more 9+1! /xchart1g 0 def /xchart2g 9 def /xchartg 0 def /BeginEPSF { % def % Prepare for EPS file /b4_Inc_state save def % Save state for cleanup /dict_count countdictstack def /op_count count 1 sub def % Count objects on op stack userdict begin % Make userdict current dict /showpage {} def 0 setgray 0 setlinecap 1 setlinewidth 0 setlinejoin 10 setmiterlimit [] 0 setdash newpath /languagelevel where % If level not equal to 1 then {pop languagelevel where % If level not equal to 1 then 1 ne {false setstrokeadjust false setoverprint } if } if } bind def /EndEPSF { % def count op_count sub {pop} repeat countdictstack dict_count sub {end} repeat % Clean up dict stack b4_Inc_state restore } bind def /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 % !AUSTAUSCH Times-Roman -> Times-Roman-ISOLatin1=Times-I /Times-Roman findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /Times-ISOL1 exch definefont pop /Times-Italic findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /TimesI-ISOL1 exch definefont pop /Times-Bold findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /TimesB-ISOL1 exch definefont pop /Times-BoldItalic findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /TimesBI-ISOL1 exch definefont pop /TK {250 /Times-ISOL1 FS} bind def /TM {300 /Times-ISOL1 FS} bind def /TG {350 /Times-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 /TBK {250 /TimesB-ISOL1 FS} bind def /TBM {300 /TimesB-ISOL1 FS} bind def /TBG {350 /TimesB-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 %ANFA CMYKDEF %CMYKDEA0 (A0=Standard-Drucker-CMYKDEF) 15.3.97 /tzac [1.000 0.933 0.867 0.800 0.733 0.667 0.600 0.533 0.467 0.400 0.333 0.267 0.200 0.132 0.067 0.000 1.000 0.750 0.500 0.250 0.000] def /tzam [1.000 0.933 0.867 0.800 0.733 0.667 0.600 0.533 0.467 0.400 0.333 0.267 0.200 0.132 0.067 0.000 1.000 0.750 0.500 0.250 0.000] def /tzay [1.000 0.933 0.867 0.800 0.733 0.667 0.600 0.533 0.467 0.400 0.333 0.267 0.200 0.132 0.067 0.000 1.000 0.750 0.500 0.250 0.000] def /tzan [1.000 0.933 0.867 0.800 0.733 0.667 0.600 0.533 0.467 0.400 0.333 0.267 0.200 0.132 0.067 0.000 1.000 0.750 0.500 0.250 0.000] def /tza0 [0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000] def /tza1 [1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000] def %ENDE CMYKD /rec %x, y width heigth {/heigth exch def /width exch def moveto width 0 rlineto 0 heigth rlineto width neg 0 rlineto closepath } bind def /colrecfiLAB* %x y width heigth LAB* { setcolor rec fill} bind def /colrecstLAB* %x y width heigth LAB* { setcolor rec stroke} bind def /colrecficmyn* %x y width heigth cmy0* or 000n* { setcmykcolor rec fill} bind def /colrecstcmyn* %x y width heigth cmy0* or 000n* { setcmykcolor rec stroke} bind def /colrecfiw* %x y width heigth w* { setgray rec fill} bind def /colrecstw* %x y width heigth w* { setgray rec stroke} bind def /colrecfiolv* %x y width heigth olv* { setrgbcolor rec fill} bind def /colrecstolv* %x y width heigth olv* { setrgbcolor rec stroke} bind def /tzocmy0* {0.0 1.0 1.0 0.0} bind def %Reproduction colours /tzlcmy0* {1.0 0.0 1.0 0.0} bind def %cmyn* setcmykcolor /tzvcmy0* {1.0 1.0 0.0 0.0} bind def /tzccmy0* {1.0 0.0 0.0 0.0} bind def /tzmcmy0* {0.0 1.0 0.0 0.0} bind def /tzycmy0* {0.0 0.0 1.0 0.0} bind def /tzoolv* {1.0 0.0 0.0} bind def %Reproduction colours /tzlolv* {0.0 1.0 0.0} bind def %olv* setrgbcolor /tzvolv* {0.0 0.0 1.0} bind def /tzcolv* {0.0 1.0 1.0} bind def /tzmolv* {1.0 0.0 1.0} bind def /tzyolv* {1.0 1.0 0.0} bind def /tzoLAB* [53.34 72.46 50.66] def %Reproduction colours /tzlLAB* [84.93 -79.83 74.80] def %LAB* setcolor /tzvLAB* [32.20 24.88 -37.89] def /tzcLAB* [88.10 -44.88 -13.36] def /tzmLAB* [59.66 90.32 -19.65] def /tzyLAB* [93.76 -20.24 85.93] def /tzncmy0* {1.00 1.00 1.00 0.00} bind def %grey series /tzdcmy0* {0.75 0.75 0.75 0.00} bind def %cmy0* setcmykcolor /tzzcmy0* {0.50 0.50 0.50 0.00} bind def /tzhcmy0* {0.25 0.25 0.25 0.00} bind def /tzwcmy0* {0.00 0.00 0.00 0.00} bind def /tzn000n* {0.00 0.00 0.00 1.00} bind def %grey series 000n* /tzd000n* {0.00 0.00 0.00 0.75} bind def %000n* setcmykcolor /tzz000n* {0.00 0.00 0.00 0.50} bind def /tzh000n* {0.00 0.00 0.00 0.25} bind def /tzw000n* {0.00 0.00 0.00 0.00} bind def /tznw* {0.00} bind def %grey series /tzdw* {0.25} bind def %w* setgray /tzzw* {0.50} bind def /tzhw* {0.75} bind def /tzww* {1.00} bind def /tznolv* {0.00 0.00 0.00} bind def %grey series /tzdolv* {0.25 0.25 0.25} bind def %olv* setrgbcolor /tzzolv* {0.50 0.50 0.50} bind def /tzholv* {0.75 0.75 0.75} bind def /tzwolv* {1.00 1.00 1.00} bind def /tznLAB* [18.01 0.00 0.00] def %grey series /tzdLAB* [37.36 0.00 0.00] def %LAB* setcolor /tzzLAB* [56.71 0.00 0.00] def /tzhLAB* [76.06 0.00 0.00] def /tzwLAB* [95.41 0.00 0.00] def /tfn {0 setgray} bind def /tfw {1 setgray} bind def /A4quer {598 0 translate 90 rotate} def %0 %1 /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 /tzank [1.000 0.933 0.867 0.800 0.733 0.667 0.600 0.533 0.467 0.400 0.333 0.267 0.200 0.132 0.067 0.000 1.000 0.750 0.500 0.250 0.000] def /LAB*TE [(FRS09_92, L*=09_92) (TLS00) (FRS06) (TSL18) (NLS00) (NLS18) (SRS18) (TLS70) (TLS00) (TLS06) (TLS11) (TLS18) (TLS27) (TLS38) (TLS52) (TLS70) (OLS00) (OLS06) (OLS11) (OLS18) (OLS27) (OLS38) (OLS52) (OLS70)] def %BEG 61 lines comment or new PS operators possible %01 %02 %03 %04 %05 %06 %07 %08 %09 %11 %END 38 lines comment or new PS operators possible %%EndProlog %%BeginPageSetup /#copies 1 def %A4quer 1.0 1.0 scale /pgsave save def %%EndPageSetup 0.0 MM 0.0 MM translate %Verschiebung nach oben und links fuer Belichter gsave /SS$ [(g) (e) (S) (F) (I) (J) (M)] def /SC$ [(N) (F) (S) (D) (T) (E) (C)] def /SX$ [(0) (1) (2) (3) (4) (5) (6) (7) (8) (9) (A) (B) (C) (D) (E) (F)%max 32 (G) (H) (I) (J) (K) (L) (M) (N) (O) (P) (Q) (R) (S) (T) (U) (V)] def /SY$ [(0) (1) (2) (3) (4) (5) (6) (7) (8) (9) (A) (B) (C) (D) (E) (F)%max 32 (G) (H) (I) (J) (K) (L) (M) (N) (O) (P) (Q) (R) (S) (T) (U) (V)] def % 0 1 2 3 4 5 % 6 7 8 /EX$ [(A.PS /.TXT) (B.PS /.BMP) (G.PS /.GIF) (H.PS /.HTM) (I.PS /.HTM) (J.PS /.JPE) (P.PS /.PDF) (T.PS /.TIF)] def /EY$ [(A.DAT) (B.DAT) (G.DAT) (H.DAT) (I.DAT) (J.DAT) (P.DAT) (T.DAT)] def /lanindg1 1 def /lanindg2 1 def /colormg1 0 def /colormg2 0 def /xcolorg1 0 def /xcolorg2 0 def /xchartg1 0 def /xchartg2 0 def /lanindg lanindg1 def %no loops /colormg colormg1 def /xcolorg xcolorg1 def /xchartg xchartg1 def /pcount2x pcount2g xchart2g sub 2 add def /xcolor10 0 def /xcolor20 1 def %scount1g 1 scount2g {/scountg exch def %s=serie, e. g. 1,1,10 %pcount1g 1 pcount2x {/pcountg exch def %p=page, e. g. 1,1,250 /xchart10 0 def /xchart20 0 def %pcountg pcount1g eq {/xchart10 0 def /xchart20 0 def} % {/xchart10 1 def /xchart20 1 def} ifelse %pcountg pcount2x eq {/xchart10 2 def /xchart20 9 def} if xcolor10 1 xcolor20 {/xcolorg exch def xchart10 1 xchart20 {/xchartg exch def /ausz 8 def /xcharti 0 def %xchartg 2 eq xchartg 3 eq or xchartg 5 eq or {/xcharti 1 def} % {/xcharti 0 def} ifelse /colorm colormg def /xchart xchartg def /xchartg0 0 def %needs Definition of xcharti, is only in OUTLIN1X.PS %to be deleted for tests of Y.. on VAX LAB*ioG ColSepG %2 MM /Times-Roman FS %274 MM 82 MM moveto -90 rotate (/HE99/ ) show (Form: ) show %xchartg 1 add cvi 6 string cvs show (/) show %xchart2g 1 add cvi 6 string cvs show (,) show 90 rotate %274 MM 65 MM moveto -90 rotate (Serie: ) show %scountg cvi 6 string cvs show (/) show %scount2g cvi 6 string cvs show (,) show 90 rotate %274 MM 55 MM moveto -90 rotate %lanindg 0 eq {(Seite: )}{(Page: )} ifelse show %pcountg xchartg xchart10 sub add cvi 6 string cvs show 90 rotate %274 MM 45 MM moveto %-90 rotate %lanindg 0 eq {(Seitenz\344hlung )}{(Page: count: )} ifelse show %scountg 1 sub pcount2g mul pcountg add %pcountg pcount2x eq {xchartg add pcount1g pcount2x ne {2 sub } if} if %cvi 6 string cvs show %90 rotate /GSS$ SS$ lanindg get def /GSC$ SC$ colormg get def /GSX$ SX$ 0 get def %special /GSY$ SY$ 0 get def %special /GEX$ EX$ 6 get def /GEY$ EY$ 6 get def %gsave BeginEPSF 28 MM 197 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto 1 1 scale -77 -91 translate %%BeginDocument: Bild 10 %line 329 %%EndDocument EndEPSF grestore gsave BeginEPSF 28 MM 152 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto 1 1 scale -77 -91 translate %%BeginDocument: Bild 11 %line 339 %!PS-Adobe-3.0 EPSF-3.0 HE990-1, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (HE990-1,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 86 MM 152 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 12 %line 349 %!PS-Adobe-3.0 EPSF-3.0 HE990-2, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (HE990-2,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 28 MM 108 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 13 %line 359 %!PS-Adobe-3.0 EPSF-3.0 HE990-3, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (HE990-3,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 86 MM 108 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 14 %line 369 %!PS-Adobe-3.0 EPSF-3.0 HE990-4, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (HE990-4,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 28 MM 064 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 15 %line 379 %!PS-Adobe-3.0 EPSF-3.0 HE990-5, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (HE990-5,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 86 MM 064 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 16 %line 389 %!PS-Adobe-3.0 EPSF-3.0 HE990-6, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (HE990-6,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 28 MM 3.0 MM sub 20 MM 0.0 MM add translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 17 %line 399 %!PS-Adobe-3.0 EPSF-3.0 HE990-7N %%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: B2410-2, B8710_5, E8370-1, B6_15_1, N=6_15_1) /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1) /Subject (goto: http://www.ps.bam.de or http://www.li.tu-berlin.de) /Keywords (image reproduction, colour devices) /Creator (klaus.richter@mac.com) /CreationDate (D:2009020112000) /ModDate (D:2009020112000) /DOCINFO pdfmark07 [ /View [ /FitB ] /DOCVIEW pdfmark07 %END PDFDE011 % !Change to ISOLatin1 fonts /Times-Roman findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /Times-ISOL1 exch definefont pop /Times-Italic findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /TimesI-ISOL1 exch definefont pop /Times-Bold findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /TimesB-ISOL1 exch definefont pop /Times-BoldItalic findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /TimesBI-ISOL1 exch definefont pop /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def /str {8 string } bind def /TL {160 /Times-ISOL1 FS} bind def /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 /TIL {160 /TimesI-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 /TBL {160 /TimesB-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 /TBIL {160 /TimesBI-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 /rec %x, y width heigth {/heigth exch def /width exch def moveto width 0 rlineto 0 heigth rlineto width neg 0 rlineto closepath } bind def /colrecfi %x y width heigth c m y k {setcmykcolor rec fill} bind def /colrecst %x y width heigth c m y k {setcmykcolor rec stroke} bind def /LUT 10800 array def /LUTG 10800 array def /LUT_LAB0 10800 array def %10x1080 /LUT_LAB1 10800 array def %10x1080 /LUT_LAB2 10800 array def %10x1080 /LUT_LAB3 10800 array def %10x1080 /LUT_LAB4 10800 array def %10x1080 /LUT_LAB5 10800 array def %10x1080 /LUT_LAB6 10800 array def %10x1080 /LUT_LAB7 10800 array def %10x1080 /LAB*Fa0000 96 array def /LAB*Fa0100 96 array def /LAB*Fa1100 96 array def %********************************************************************* %BEG HE99_FRS09_92_D65_LUT.DAT /FileDataen (_LU.DAT, 243 colours, 090115, Separation olv*, adapted) def /FileDatade (_LU.DAT, 243 Farben, 090115, Separation olv*, adaptiert) def /FileData0Na (HE99_FRS09_92_D65_00%_O0) def /LUT_LAB0 [ %HE390-7A, Page 7 /24, %BEG HE29(7)_22.TXT, Separation olv*, D65; cf1=1.00; nt=0.18; nx=1.0, adapted %BEG HE29(7)_22.TXT, Separation olv*, D65, adapted %100 x LAB*a 1000 x (r g b c m y 0) %nr. pos 009293 -00018 000016 1000 1000 1000 0000 0000 0000 0000 %0729 b01 009241 -00089 -00048 0875 1000 1000 0125 0000 0000 0000 %0730 b02 008827 -00926 -00549 0750 1000 1000 0250 0000 0000 0000 %0731 b03 008239 -01696 -01160 0625 1000 1000 0375 0000 0000 0000 %0732 b04 007668 -02244 -01635 0500 1000 1000 0500 0000 0000 0000 %0733 b05 007153 -02643 -01930 0375 1000 1000 0625 0000 0000 0000 %0734 b06 006598 -02975 -02213 0250 1000 1000 0750 0000 0000 0000 %0735 b07 005921 -03204 -02493 0125 1000 1000 0875 0000 0000 0000 %0736 b08 005192 -03244 -02691 0000 1000 1000 1000 0000 0000 0000 %0737 b09 009252 000053 -00030 1000 0875 0875 0000 0125 0125 0000 %0738 c01 009199 -00067 000038 0875 0875 0875 0125 0125 0125 0000 %0739 c02 008765 -00972 -00308 0750 0875 0875 0250 0125 0125 0000 %0740 c03 008163 -01812 -00803 0625 0875 0875 0375 0125 0125 0000 %0741 c04 007609 -02433 -01172 0500 0875 0875 0500 0125 0125 0000 %0742 c05 007064 -02884 -01485 0375 0875 0875 0625 0125 0125 0000 %0743 c06 006516 -03263 -01727 0250 0875 0875 0750 0125 0125 0000 %0744 c07 005853 -03539 -02000 0125 0875 0875 0875 0125 0125 0000 %0745 c08 005121 -03658 -02138 0000 0875 0875 1000 0125 0125 0000 %0746 c09 008550 001112 -00384 1000 0750 0750 0000 0250 0250 0000 %0747 d01 008483 000933 -00180 0875 0750 0750 0125 0250 0250 0000 %0748 d02 008085 -00013 -00376 0750 0750 0750 0250 0250 0250 0000 %0749 d03 007552 -01016 -00718 0625 0750 0750 0375 0250 0250 0000 %0750 d04 007051 -01814 -00989 0500 0750 0750 0500 0250 0250 0000 %0751 d05 006584 -02449 -01181 0375 0750 0750 0625 0250 0250 0000 %0752 d06 006096 -02987 -01368 0250 0750 0750 0750 0250 0250 0000 %0753 d07 005502 -03462 -01550 0125 0750 0750 0875 0250 0250 0000 %0754 d08 004830 -03749 -01627 0000 0750 0750 1000 0250 0250 0000 %0755 d09 007787 002120 -00525 1000 0625 0625 0000 0375 0375 0000 %0756 e01 007730 001929 -00239 0875 0625 0625 0125 0375 0375 0000 %0757 e02 007367 000918 -00320 0750 0625 0625 0250 0375 0375 0000 %0758 e03 006858 -00201 -00515 0625 0625 0625 0375 0375 0375 0000 %0759 e04 006389 -01133 -00720 0500 0625 0625 0500 0375 0375 0000 %0760 e05 005976 -01910 -00834 0375 0625 0625 0625 0375 0375 0000 %0761 e06 005554 -02596 -00966 0250 0625 0625 0750 0375 0375 0000 %0762 e07 005014 -03218 -01132 0125 0625 0625 0875 0375 0375 0000 %0763 e08 004430 -03602 -01241 0000 0625 0625 1000 0375 0375 0000 %0764 e09 007004 003063 -00504 1000 0500 0500 0000 0500 0500 0000 %0765 f01 006965 002837 -00142 0875 0500 0500 0125 0500 0500 0000 %0766 f02 006613 001827 -00164 0750 0500 0500 0250 0500 0500 0000 %0767 f03 006115 000637 -00336 0625 0500 0500 0375 0500 0500 0000 %0768 f04 005668 -00372 -00491 0500 0500 0500 0500 0500 0500 0000 %0769 f05 005297 -01211 -00628 0375 0500 0500 0625 0500 0500 0000 %0770 f06 004901 -01992 -00762 0250 0500 0500 0750 0500 0500 0000 %0771 f07 004419 -02729 -00878 0125 0500 0500 0875 0500 0500 0000 %0772 f08 003909 -03231 -00948 0000 0500 0500 1000 0500 0500 0000 %0773 f09 006172 004019 -00398 1000 0375 0375 0000 0625 0625 0000 %0774 g01 006134 003817 -00063 0875 0375 0375 0125 0625 0625 0000 %0775 g02 005792 002860 -00141 0750 0375 0375 0250 0625 0625 0000 %0776 g03 005287 001666 -00323 0625 0375 0375 0375 0625 0625 0000 %0777 g04 004834 000631 -00453 0500 0375 0375 0500 0625 0625 0000 %0778 g05 004484 -00285 -00540 0375 0375 0375 0625 0625 0625 0000 %0779 g06 004101 -01132 -00685 0250 0375 0375 0750 0625 0625 0000 %0780 g07 003640 -01929 -00758 0125 0375 0375 0875 0625 0625 0000 %0781 g08 003199 -02475 -00850 0000 0375 0375 1000 0625 0625 0000 %0782 g09 005377 004957 -00317 1000 0250 0250 0000 0750 0750 0000 %0783 h01 005333 004774 000012 0875 0250 0250 0125 0750 0750 0000 %0784 h02 004969 003878 -00018 0750 0250 0250 0250 0750 0750 0000 %0785 h03 004442 002711 -00231 0625 0250 0250 0375 0750 0750 0000 %0786 h04 003978 001657 -00368 0500 0250 0250 0500 0750 0750 0000 %0787 h05 003616 000729 -00542 0375 0250 0250 0625 0750 0750 0000 %0788 h06 003246 -00160 -00703 0250 0250 0250 0750 0750 0750 0000 %0789 h07 002853 -01038 -00726 0125 0250 0250 0875 0750 0750 0000 %0790 h08 002434 -01661 -00767 0000 0250 0250 1000 0750 0750 0000 %0791 h09 004500 005913 -00193 1000 0125 0125 0000 0875 0875 0000 %0792 i01 004452 005748 000184 0875 0125 0125 0125 0875 0875 0000 %0793 i02 004091 004959 000095 0750 0125 0125 0250 0875 0875 0000 %0794 i03 003554 003866 -00217 0625 0125 0125 0375 0875 0875 0000 %0795 i04 003094 002871 -00439 0500 0125 0125 0500 0875 0875 0000 %0796 i05 002696 001895 -00565 0375 0125 0125 0625 0875 0875 0000 %0797 i06 002320 000977 -00700 0250 0125 0125 0750 0875 0875 0000 %0798 i07 001936 000092 -00751 0125 0125 0125 0875 0875 0875 0000 %0799 i08 001593 -00664 -00663 0000 0125 0125 1000 0875 0875 0000 %0800 i09 003614 006614 000074 1000 0000 0000 0000 1000 1000 0000 %0801 j01 003587 006462 000395 0875 0000 0000 0125 1000 1000 0000 %0802 j02 003237 005752 000420 0750 0000 0000 0250 1000 1000 0000 %0803 j03 002722 004728 000112 0625 0000 0000 0375 1000 1000 0000 %0804 j04 002256 003773 -00198 0500 0000 0000 0500 1000 1000 0000 %0805 j05 001840 002824 -00346 0375 0000 0000 0625 1000 1000 0000 %0806 j06 001451 001842 -00293 0250 0000 0000 0750 1000 1000 0000 %0807 j07 001097 000854 -00183 0125 0000 0000 0875 1000 1000 0000 %0808 j08 000827 000005 -00046 0000 0000 0000 1000 1000 1000 0000 %0809 j09 009243 000015 -00009 1000 1000 1000 0000 0000 0000 0000 %0810 b10 009193 -00050 -00069 0875 0875 1000 0125 0125 0000 0000 %0811 b11 008764 -00817 -00592 0750 0750 1000 0250 0250 0000 0000 %0812 b12 007915 -01027 -01490 0625 0625 1000 0375 0375 0000 0000 %0813 b13 007113 -01097 -02222 0500 0500 1000 0500 0500 0000 0000 %0814 b14 006391 -01044 -02803 0375 0375 1000 0625 0625 0000 0000 %0815 b15 005669 -00974 -03314 0250 0250 1000 0750 0750 0000 0000 %0816 b16 004905 -00883 -03753 0125 0125 1000 0875 0875 0000 0000 %0817 b17 004072 -00450 -04126 0000 0000 1000 1000 1000 0000 0000 %0818 b18 009229 -00021 000106 1000 1000 0875 0000 0000 0125 0000 %0819 c10 009151 -00035 000013 0875 0875 0875 0125 0125 0125 0000 %0820 c11 008470 -00326 -00798 0750 0750 0875 0250 0250 0125 0000 %0821 c12 007612 -00534 -01688 0625 0625 0875 0375 0375 0125 0000 %0822 c13 006804 -00608 -02420 0500 0500 0875 0500 0500 0125 0000 %0823 c14 006095 -00591 -02985 0375 0375 0875 0625 0625 0125 0000 %0824 c15 005390 -00524 -03486 0250 0250 0875 0750 0750 0125 0000 %0825 c16 004599 -00326 -03957 0125 0125 0875 0875 0875 0125 0000 %0826 c17 003781 000107 -04301 0000 0000 0875 1000 1000 0125 0000 %0827 c18 009170 -00276 000996 1000 1000 0750 0000 0000 0250 0000 %0828 d10 009072 -00254 000871 0875 0875 0750 0125 0125 0250 0000 %0829 d11 008106 -00041 -00338 0750 0750 0750 0250 0250 0250 0000 %0830 d12 007262 -00318 -01266 0625 0625 0750 0375 0375 0250 0000 %0831 d13 006472 -00412 -02066 0500 0500 0750 0500 0500 0250 0000 %0832 d14 005773 -00420 -02683 0375 0375 0750 0625 0625 0250 0000 %0833 d15 005051 -00302 -03275 0250 0250 0750 0750 0750 0250 0000 %0834 d16 004248 -00060 -03809 0125 0125 0750 0875 0875 0250 0000 %0835 d17 003395 000491 -04229 0000 0000 0750 1000 1000 0250 0000 %0836 d18 009091 -00548 002245 1000 1000 0625 0000 0000 0375 0000 %0837 e10 008965 -00487 002099 0875 0875 0625 0125 0125 0375 0000 %0838 e11 007984 -00362 000851 0750 0750 0625 0250 0250 0375 0000 %0839 e12 006881 -00228 -00469 0625 0625 0625 0375 0375 0375 0000 %0840 e13 006101 -00432 -01321 0500 0500 0625 0500 0500 0375 0000 %0841 e14 005363 -00377 -02072 0375 0375 0625 0625 0625 0375 0000 %0842 e15 004638 -00268 -02751 0250 0250 0625 0750 0750 0375 0000 %0843 e16 003798 000078 -03421 0125 0125 0625 0875 0875 0375 0000 %0844 e17 003039 000498 -03827 0000 0000 0625 1000 1000 0375 0000 %0845 e18 008994 -00741 003606 1000 1000 0500 0000 0000 0500 0000 %0846 f10 008833 -00637 003420 0875 0875 0500 0125 0125 0500 0000 %0847 f11 007877 -00622 002171 0750 0750 0500 0250 0250 0500 0000 %0848 f12 006750 -00632 000767 0625 0625 0500 0375 0375 0500 0000 %0849 f13 005681 -00395 -00481 0500 0500 0500 0500 0500 0500 0000 %0850 f14 004974 -00427 -01274 0375 0375 0500 0625 0625 0500 0000 %0851 f15 004171 -00260 -02081 0250 0250 0500 0750 0750 0500 0000 %0852 f16 003397 -00077 -02759 0125 0125 0500 0875 0875 0500 0000 %0853 f17 002597 000421 -03241 0000 0000 0500 1000 1000 0500 0000 %0854 f18 008904 -00841 004953 1000 1000 0375 0000 0000 0625 0000 %0855 g10 008703 -00690 004724 0875 0875 0375 0125 0125 0625 0000 %0856 g11 007777 -00790 003489 0750 0750 0375 0250 0250 0625 0000 %0857 g12 006635 -00934 002054 0625 0625 0375 0375 0375 0625 0000 %0858 g13 005560 -00816 000732 0500 0500 0375 0500 0500 0625 0000 %0859 g14 004475 -00296 -00529 0375 0375 0375 0625 0625 0625 0000 %0860 g15 003720 -00273 -01375 0250 0250 0375 0750 0750 0625 0000 %0861 g16 002898 -00035 -02139 0125 0125 0375 0875 0875 0625 0000 %0862 g17 002138 000416 -02677 0000 0000 0375 1000 1000 0625 0000 %0863 g18 008808 -00859 006301 1000 1000 0250 0000 0000 0750 0000 %0864 h10 008569 -00657 005986 0875 0875 0250 0125 0125 0750 0000 %0865 h11 007634 -00834 004786 0750 0750 0250 0250 0250 0750 0000 %0866 h12 006521 -01116 003311 0625 0625 0250 0375 0375 0750 0000 %0867 h13 005414 -01093 001928 0500 0500 0250 0500 0500 0750 0000 %0868 h14 004306 -00673 000572 0375 0375 0250 0625 0625 0750 0000 %0869 h15 003226 -00140 -00722 0250 0250 0250 0750 0750 0750 0000 %0870 h16 002413 000036 -01535 0125 0125 0250 0875 0875 0750 0000 %0871 h17 001631 000574 -02183 0000 0000 0250 1000 1000 0750 0000 %0872 h18 008678 -00783 007977 1000 1000 0125 0000 0000 0875 0000 %0873 i10 008418 -00558 007631 0875 0875 0125 0125 0125 0875 0000 %0874 i11 007498 -00804 006390 0750 0750 0125 0250 0250 0875 0000 %0875 i12 006384 -01240 004903 0625 0625 0125 0375 0375 0875 0000 %0876 i13 005288 -01302 003440 0500 0500 0125 0500 0500 0875 0000 %0877 i14 004141 -01002 001950 0375 0375 0125 0625 0625 0875 0000 %0878 i15 003043 -00604 000569 0250 0250 0125 0750 0750 0875 0000 %0879 i16 001909 000097 -00733 0125 0125 0125 0875 0875 0875 0000 %0880 i17 001170 000543 -01477 0000 0000 0125 1000 1000 0875 0000 %0881 i18 008434 -00481 010576 1000 1000 0000 0000 0000 1000 0000 %0882 j10 008183 -00262 010228 0875 0875 0000 0125 0125 1000 0000 %0883 j11 007312 -00594 008972 0750 0750 0000 0250 0250 1000 0000 %0884 j12 006181 -01155 007346 0625 0625 0000 0375 0375 1000 0000 %0885 j13 005050 -01375 005751 0500 0500 0000 0500 0500 1000 0000 %0886 j14 003904 -01244 004148 0375 0375 0000 0625 0625 1000 0000 %0887 j15 002814 -01030 002648 0250 0250 0000 0750 0750 1000 0000 %0888 j16 001675 -00550 001120 0125 0125 0000 0875 0875 1000 0000 %0889 j17 000809 000001 -00021 0000 0000 0000 1000 1000 1000 0000 %0890 j18 009240 000002 -00007 1000 1000 1000 0000 0000 0000 0000 %0891 b19 009197 000084 -00059 1000 0875 1000 0000 0125 0000 0000 %0892 b20 008477 001185 -00841 1000 0750 1000 0000 0250 0000 0000 %0893 b21 007564 002067 -01760 1000 0625 1000 0000 0375 0000 0000 %0894 b22 006617 002895 -02585 1000 0500 1000 0000 0500 0000 0000 %0895 b23 005544 003738 -03392 1000 0375 1000 0000 0625 0000 0000 %0896 b24 004522 004629 -04057 1000 0250 1000 0000 0750 0000 0000 %0897 b25 003441 005573 -04621 1000 0125 1000 0000 0875 0000 0000 %0898 b26 002476 006242 -04843 1000 0000 1000 0000 1000 0000 0000 %0899 b27 009200 -00097 -00027 0875 1000 0875 0125 0000 0125 0000 %0900 c19 009147 -00057 000032 0875 0875 0875 0125 0125 0125 0000 %0901 c20 008312 000741 -00919 0875 0750 0875 0125 0250 0125 0000 %0902 c21 007364 001597 -01865 0875 0625 0875 0125 0375 0125 0000 %0903 c22 006374 002378 -02736 0875 0500 0875 0125 0500 0125 0000 %0904 c23 005320 003304 -03533 0875 0375 0875 0125 0625 0125 0000 %0905 c24 004313 004253 -04212 0875 0250 0875 0125 0750 0125 0000 %0906 c25 003249 005292 -04772 0875 0125 0875 0125 0875 0125 0000 %0907 c26 002283 006023 -05036 0875 0000 0875 0125 1000 0125 0000 %0908 c27 008742 -01158 000141 0750 1000 0750 0250 0000 0250 0000 %0909 d19 008689 -01141 000238 0750 0875 0750 0250 0125 0250 0000 %0910 d20 008061 -00030 -00313 0750 0750 0750 0250 0250 0250 0000 %0911 d21 007120 000760 -01341 0750 0625 0750 0250 0375 0250 0000 %0912 d22 006135 001590 -02288 0750 0500 0750 0250 0500 0250 0000 %0913 d23 005106 002584 -03188 0750 0375 0750 0250 0625 0250 0000 %0914 d24 004115 003648 -03952 0750 0250 0750 0250 0750 0250 0000 %0915 d25 003069 004779 -04609 0750 0125 0750 0250 0875 0250 0000 %0916 d26 002107 005634 -04943 0750 0000 0750 0250 1000 0250 0000 %0917 d27 008098 -02308 000469 0625 1000 0625 0375 0000 0375 0000 %0918 e19 008044 -02312 000596 0625 0875 0625 0375 0125 0375 0000 %0919 e20 007467 -01319 000082 0625 0750 0625 0375 0250 0375 0000 %0920 e21 006792 -00204 -00473 0625 0625 0625 0375 0375 0375 0000 %0921 e22 005840 000621 -01483 0625 0500 0625 0375 0500 0375 0000 %0922 e23 004864 001709 -02481 0625 0375 0625 0375 0625 0375 0000 %0923 e24 003869 002818 -03367 0625 0250 0625 0375 0750 0375 0000 %0924 e25 002844 004046 -04124 0625 0125 0625 0375 0875 0375 0000 %0925 e26 001882 005005 -04591 0625 0000 0625 0375 1000 0375 0000 %0926 e27 007410 -03311 000943 0500 1000 0500 0500 0000 0500 0000 %0927 f19 007368 -03333 001145 0500 0875 0500 0500 0125 0500 0000 %0928 f20 006859 -02530 000710 0500 0750 0500 0500 0250 0500 0000 %0929 f21 006257 -01504 000148 0500 0625 0500 0500 0375 0500 0000 %0930 f22 005578 -00376 -00445 0500 0500 0500 0500 0500 0500 0000 %0931 f23 004620 000719 -01534 0500 0375 0500 0500 0625 0500 0000 %0932 f24 003643 001859 -02509 0500 0250 0500 0500 0750 0500 0000 %0933 f25 002610 003106 -03383 0500 0125 0500 0500 0875 0500 0000 %0934 f26 001643 004172 -04000 0500 0000 0500 0500 1000 0500 0000 %0935 f27 006792 -04137 001465 0375 1000 0375 0625 0000 0625 0000 %0936 g19 006766 -04135 001576 0375 0875 0375 0625 0125 0625 0000 %0937 g20 006331 -03479 001256 0375 0750 0375 0625 0250 0625 0000 %0938 g21 005778 -02612 000815 0375 0625 0375 0625 0375 0625 0000 %0939 g22 005127 -01537 000167 0375 0500 0375 0625 0500 0625 0000 %0940 g23 004346 -00214 -00561 0375 0375 0375 0625 0625 0625 0000 %0941 g24 003376 000862 -01581 0375 0250 0375 0625 0750 0625 0000 %0942 g25 002324 002129 -02588 0375 0125 0375 0625 0875 0625 0000 %0943 g26 001402 003236 -03275 0375 0000 0375 0625 1000 0625 0000 %0944 g27 006121 -04899 001946 0250 1000 0250 0750 0000 0750 0000 %0945 h19 006077 -04937 002095 0250 0875 0250 0750 0125 0750 0000 %0946 h20 005733 -04410 001850 0250 0750 0250 0750 0250 0750 0000 %0947 h21 005248 -03688 001457 0250 0625 0250 0750 0375 0750 0000 %0948 h22 004648 -02702 000826 0250 0500 0250 0750 0500 0750 0000 %0949 h23 003882 -01431 000057 0250 0375 0250 0750 0625 0750 0000 %0950 h24 003096 -00076 -00708 0250 0250 0250 0750 0750 0750 0000 %0951 h25 002050 001176 -01780 0250 0125 0250 0750 0875 0750 0000 %0952 h26 001180 002343 -02526 0250 0000 0250 0750 1000 0750 0000 %0953 h27 005367 -05587 002234 0125 1000 0125 0875 0000 0875 0000 %0954 i19 005331 -05623 002404 0125 0875 0125 0875 0125 0875 0000 %0955 i20 005056 -05253 002308 0125 0750 0125 0875 0250 0875 0000 %0956 i21 004655 -04647 001973 0125 0625 0125 0875 0375 0875 0000 %0957 i22 004098 -03805 001484 0125 0500 0125 0875 0500 0875 0000 %0958 i23 003390 -02633 000769 0125 0375 0125 0875 0625 0875 0000 %0959 i24 002641 -01326 000023 0125 0250 0125 0875 0750 0875 0000 %0960 i25 001815 000166 -00720 0125 0125 0125 0875 0875 0875 0000 %0961 i26 000985 001269 -01527 0125 0000 0125 0875 1000 0875 0000 %0962 i27 004576 -06105 002634 0000 1000 0000 1000 0000 1000 0000 %0963 j19 004539 -06146 002886 0000 0875 0000 1000 0125 1000 0000 %0964 j20 004345 -05891 002882 0000 0750 0000 1000 0250 1000 0000 %0965 j21 004018 -05446 002757 0000 0625 0000 1000 0375 1000 0000 %0966 j22 003537 -04728 002407 0000 0500 0000 1000 0500 1000 0000 %0967 j23 002884 -03714 001883 0000 0375 0000 1000 0625 1000 0000 %0968 j24 002178 -02561 001275 0000 0250 0000 1000 0750 1000 0000 %0969 j25 001423 -01173 000566 0000 0125 0000 1000 0875 1000 0000 %0970 j26 000813 -00007 000067 0000 0000 0000 1000 1000 1000 0000 %0971 j27 ] def /LAB*Fa0100 [ %BEG HE29(7)_22.TXT, Separation olv*, D65, adapted %100 x LAB*a %#1000 x (r g b c m y 0) %nr. pos %z003577 006571 000167 %#1000 0000 0000 0000 1000 1000 0000 %0648 S19 %O1 0 %z008430 -00494 010689 %#1000 1000 0000 0000 0000 1000 0000 %0720 a19 %Y1 1 %z004600 -06112 002664 %#0000 1000 0000 1000 0000 1000 0000 %0072 I01 %L1 2 %z005168 -03209 -02700 %#0000 1000 1000 1000 0000 0000 0000 %0080 I09 %C1 3 %z004037 -00376 -04157 %#0000 0000 1000 1000 1000 0000 0000 %0008 A09 %V1 4 %z002459 006276 -04862 %#1000 0000 1000 0000 1000 0000 0000 %0656 S27 %M1 5 %z000813 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0000 A01 %N1 6 %z009207 000000 000000 %#1000 1000 1000 0000 0000 0000 0000 %0728 a27 %W1 7 %$ 003614 006614 000074 %#1000 0000 0000 0000 1000 1000 0000 %0801 j01 %O2 0 008434 -00481 010576 %#1000 1000 0000 0000 0000 1000 0000 %0882 j10 %Y2 1 004576 -06105 002634 %#0000 1000 0000 1000 0000 1000 0000 %0963 j19 %L2 2 005192 -03244 -02691 %#0000 1000 1000 1000 0000 0000 0000 %0737 b09 %C2 3 004072 -00450 -04126 %#0000 0000 1000 1000 1000 0000 0000 %0818 b18 %V2 4 002476 006242 -04843 %#1000 0000 1000 0000 1000 0000 0000 %0899 b27 %M2 5 000816 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0809 j09 %N2 6 009259 000000 000000 %#1000 1000 1000 0000 0000 0000 0000 %0729 b01 %W2 7 %$ ] def /FileData1Na (HE99_FRS09_92_D65_00%_O1) def /LUT_LAB1 [ %HE790-7A, Page 7 /24, %BEG HE69_22.TXT, Separation olv*, cf1=0.70, D65; cf1=1.00; nt=0.18; nx=1.0, adapted %BEG HE69_22.TXT, Separation olv*, cf1=0.70, D65, adapted %100 x LAB*a 1000 x (r g b c m y 0) %nr. pos 008057 000017 -00028 1000 1000 1000 0000 0000 0000 0000 %0729 b01 007643 -00294 -00252 0875 1000 1000 0125 0000 0000 0000 %0730 b02 007214 -00515 -00451 0750 1000 1000 0250 0000 0000 0000 %0731 b03 006843 -00793 -00684 0625 1000 1000 0375 0000 0000 0000 %0732 b04 006505 -01052 -00848 0500 1000 1000 0500 0000 0000 0000 %0733 b05 006143 -01382 -01023 0375 1000 1000 0625 0000 0000 0000 %0734 b06 005817 -01716 -01155 0250 1000 1000 0750 0000 0000 0000 %0735 b07 005431 -02030 -01365 0125 1000 1000 0875 0000 0000 0000 %0736 b08 005081 -02336 -01567 0000 1000 1000 1000 0000 0000 0000 %0737 b09 007564 000576 000216 1000 0875 0875 0000 0125 0125 0000 %0738 c01 007242 -00014 000009 0875 0875 0875 0125 0125 0125 0000 %0739 c02 006812 -00240 -00203 0750 0875 0875 0250 0125 0125 0000 %0740 c03 006478 -00535 -00429 0625 0875 0875 0375 0125 0125 0000 %0741 c04 006166 -00829 -00580 0500 0875 0875 0500 0125 0125 0000 %0742 c05 005806 -01160 -00763 0375 0875 0875 0625 0125 0125 0000 %0743 c06 005447 -01444 -00939 0250 0875 0875 0750 0125 0125 0000 %0744 c07 005062 -01753 -01145 0125 0875 0875 0875 0125 0125 0000 %0745 c08 004708 -02039 -01407 0000 0875 0875 1000 0125 0125 0000 %0746 c09 007103 001019 000547 1000 0750 0750 0000 0250 0250 0000 %0747 d01 006781 000472 000288 0875 0750 0750 0125 0250 0250 0000 %0748 d02 006459 -00023 000063 0750 0750 0750 0250 0250 0250 0000 %0749 d03 006112 -00339 -00160 0625 0750 0750 0375 0250 0250 0000 %0750 d04 005833 -00545 -00371 0500 0750 0750 0500 0250 0250 0000 %0751 d05 005429 -00844 -00580 0375 0750 0750 0625 0250 0250 0000 %0752 d06 005077 -01125 -00789 0250 0750 0750 0750 0250 0250 0000 %0753 d07 004706 -01460 -00949 0125 0750 0750 0875 0250 0250 0000 %0754 d08 004337 -01748 -01240 0000 0750 0750 1000 0250 0250 0000 %0755 d09 006595 001610 000765 1000 0625 0625 0000 0375 0375 0000 %0756 e01 006270 001051 000527 0875 0625 0625 0125 0375 0375 0000 %0757 e02 005970 000570 000267 0750 0625 0625 0250 0375 0375 0000 %0758 e03 005754 -00017 000022 0625 0625 0625 0375 0375 0375 0000 %0759 e04 005465 -00239 -00168 0500 0625 0625 0500 0375 0375 0000 %0760 e05 005084 -00594 -00351 0375 0625 0625 0625 0375 0375 0000 %0761 e06 004714 -00866 -00541 0250 0625 0625 0750 0375 0375 0000 %0762 e07 004329 -01226 -00719 0125 0625 0625 0875 0375 0375 0000 %0763 e08 003956 -01467 -01021 0000 0625 0625 1000 0375 0375 0000 %0764 e09 006083 002132 001024 1000 0500 0500 0000 0500 0500 0000 %0765 f01 005758 001593 000843 0875 0500 0500 0125 0500 0500 0000 %0766 f02 005466 001077 000593 0750 0500 0500 0250 0500 0500 0000 %0767 f03 005263 000530 000313 0625 0500 0500 0375 0500 0500 0000 %0768 f04 005064 000001 000115 0500 0500 0500 0500 0500 0500 0000 %0769 f05 004669 -00325 -00111 0375 0500 0500 0625 0500 0500 0000 %0770 f06 004286 -00561 -00301 0250 0500 0500 0750 0500 0500 0000 %0771 f07 003893 -00846 -00537 0125 0500 0500 0875 0500 0500 0000 %0772 f08 003579 -01251 -00700 0000 0500 0500 1000 0500 0500 0000 %0773 f09 005554 002721 001370 1000 0375 0375 0000 0625 0625 0000 %0774 g01 005218 002183 001174 0875 0375 0375 0125 0625 0625 0000 %0775 g02 004946 001637 000942 0750 0375 0375 0250 0625 0625 0000 %0776 g03 004719 001098 000659 0625 0375 0375 0375 0625 0625 0000 %0777 g04 004520 000567 000443 0500 0375 0375 0500 0625 0625 0000 %0778 g05 004256 -00053 000173 0375 0375 0375 0625 0625 0625 0000 %0779 g06 003914 -00255 -00083 0250 0375 0375 0750 0625 0625 0000 %0780 g07 003540 -00621 -00309 0125 0375 0375 0875 0625 0625 0000 %0781 g08 003188 -00951 -00562 0000 0375 0375 1000 0625 0625 0000 %0782 g09 005042 003280 001686 1000 0250 0250 0000 0750 0750 0000 %0783 h01 004722 002702 001443 0875 0250 0250 0125 0750 0750 0000 %0784 h02 004464 002205 001190 0750 0250 0250 0250 0750 0750 0000 %0785 h03 004244 001624 000960 0625 0250 0250 0375 0750 0750 0000 %0786 h04 004017 001152 000697 0500 0250 0250 0500 0750 0750 0000 %0787 h05 003758 000514 000411 0375 0250 0250 0625 0750 0750 0000 %0788 h06 003526 -00003 000159 0250 0250 0250 0750 0750 0750 0000 %0789 h07 003150 -00345 -00046 0125 0250 0250 0875 0750 0750 0000 %0790 h08 002795 -00668 -00303 0000 0250 0250 1000 0750 0750 0000 %0791 h09 004527 003822 001894 1000 0125 0125 0000 0875 0875 0000 %0792 i01 004219 003301 001629 0875 0125 0125 0125 0875 0875 0000 %0793 i02 003971 002761 001406 0750 0125 0125 0250 0875 0875 0000 %0794 i03 003753 002185 001199 0625 0125 0125 0375 0875 0875 0000 %0795 i04 003513 001657 000959 0500 0125 0125 0500 0875 0875 0000 %0796 i05 003272 001055 000644 0375 0125 0125 0625 0875 0875 0000 %0797 i06 003039 000549 000384 0250 0125 0125 0750 0875 0875 0000 %0798 i07 002786 -00033 000077 0125 0125 0125 0875 0875 0875 0000 %0799 i08 002398 -00303 -00161 0000 0125 0125 1000 0875 0875 0000 %0800 i09 004013 004421 002233 1000 0000 0000 0000 1000 1000 0000 %0801 j01 003735 003837 001933 0875 0000 0000 0125 1000 1000 0000 %0802 j02 003482 003326 001693 0750 0000 0000 0250 1000 1000 0000 %0803 j03 003270 002765 001423 0625 0000 0000 0375 1000 1000 0000 %0804 j04 003014 002237 001183 0500 0000 0000 0500 1000 1000 0000 %0805 j05 002753 001627 000865 0375 0000 0000 0625 1000 1000 0000 %0806 j06 002524 001124 000561 0250 0000 0000 0750 1000 1000 0000 %0807 j07 002247 000577 000256 0125 0000 0000 0875 1000 1000 0000 %0808 j08 002018 000000 -00021 0000 0000 0000 1000 1000 1000 0000 %0809 j09 008013 -00013 000008 1000 1000 1000 0000 0000 0000 0000 %0810 b10 007490 000002 -00382 0875 0875 1000 0125 0125 0000 0000 %0811 b11 006949 000027 -00702 0750 0750 1000 0250 0250 0000 0000 %0812 b12 006437 000024 -01039 0625 0625 1000 0375 0375 0000 0000 %0813 b13 006001 000020 -01362 0500 0500 1000 0500 0500 0000 0000 %0814 b14 005544 000090 -01714 0375 0375 1000 0625 0625 0000 0000 %0815 b15 005027 000090 -02060 0250 0250 1000 0750 0750 0000 0000 %0816 b16 004537 000068 -02421 0125 0125 1000 0875 0875 0000 0000 %0817 b17 003992 000102 -02792 0000 0000 1000 1000 1000 0000 0000 %0818 b18 007972 -00076 000994 1000 1000 0875 0000 0000 0125 0000 %0819 c10 007229 -00033 000069 0875 0875 0875 0125 0125 0125 0000 %0820 c11 006697 -00029 -00263 0750 0750 0875 0250 0250 0125 0000 %0821 c12 006194 -00006 -00667 0625 0625 0875 0375 0375 0125 0000 %0822 c13 005765 000006 -00976 0500 0500 0875 0500 0500 0125 0000 %0823 c14 005283 000013 -01352 0375 0375 0875 0625 0625 0125 0000 %0824 c15 004786 000032 -01674 0250 0250 0875 0750 0750 0125 0000 %0825 c16 004280 000024 -02027 0125 0125 0875 0875 0875 0125 0000 %0826 c17 003762 000086 -02461 0000 0000 0875 1000 1000 0125 0000 %0827 c18 007898 -00093 001877 1000 1000 0750 0000 0000 0250 0000 %0828 d10 007158 -00048 000947 0875 0875 0750 0125 0125 0250 0000 %0829 d11 006448 -00062 000119 0750 0750 0750 0250 0250 0250 0000 %0830 d12 005968 -00024 -00290 0625 0625 0750 0375 0375 0250 0000 %0831 d13 005542 000015 -00626 0500 0500 0750 0500 0500 0250 0000 %0832 d14 005081 000009 -00981 0375 0375 0750 0625 0625 0250 0000 %0833 d15 004542 000061 -01378 0250 0250 0750 0750 0750 0250 0000 %0834 d16 004009 000135 -01769 0125 0125 0750 0875 0875 0250 0000 %0835 d17 003532 000030 -02104 0000 0000 0750 1000 1000 0250 0000 %0836 d18 007838 -00128 002747 1000 1000 0625 0000 0000 0375 0000 %0837 e10 007131 -00064 001819 0875 0875 0625 0125 0125 0375 0000 %0838 e11 006403 -00055 001009 0750 0750 0625 0250 0250 0375 0000 %0839 e12 005730 -00048 000038 0625 0625 0625 0375 0375 0375 0000 %0840 e13 005312 000007 -00303 0500 0500 0625 0500 0500 0375 0000 %0841 e14 004784 000006 -00676 0375 0375 0625 0625 0625 0375 0000 %0842 e15 004238 000086 -01028 0250 0250 0625 0750 0750 0375 0000 %0843 e16 003772 000059 -01367 0125 0125 0625 0875 0875 0375 0000 %0844 e17 003288 000015 -01715 0000 0000 0625 1000 1000 0375 0000 %0845 e18 007780 -00160 003759 1000 1000 0500 0000 0000 0500 0000 %0846 f10 007062 -00153 002841 0875 0875 0500 0125 0125 0500 0000 %0847 f11 006348 -00126 001957 0750 0750 0500 0250 0250 0500 0000 %0848 f12 005648 -00080 001002 0625 0625 0500 0375 0375 0500 0000 %0849 f13 005051 -00011 000097 0500 0500 0500 0500 0500 0500 0000 %0850 f14 004496 000023 -00289 0375 0375 0500 0625 0625 0500 0000 %0851 f15 004000 000022 -00615 0250 0250 0500 0750 0750 0500 0000 %0852 f16 003522 000011 -00934 0125 0125 0500 0875 0875 0500 0000 %0853 f17 003007 000001 -01301 0000 0000 0500 1000 1000 0500 0000 %0854 f18 007700 -00215 004795 1000 1000 0375 0000 0000 0625 0000 %0855 g10 006989 -00183 003839 0875 0875 0375 0125 0125 0625 0000 %0856 g11 006294 -00195 002981 0750 0750 0375 0250 0250 0625 0000 %0857 g12 005560 -00134 001989 0625 0625 0375 0375 0375 0625 0000 %0858 g13 004976 -00093 001091 0500 0500 0375 0500 0500 0625 0000 %0859 g14 004208 -00045 000177 0375 0375 0375 0625 0625 0625 0000 %0860 g15 003743 000025 -00247 0250 0250 0375 0750 0750 0625 0000 %0861 g16 003225 000035 -00600 0125 0125 0375 0875 0875 0625 0000 %0862 g17 002777 -00038 -00963 0000 0000 0375 1000 1000 0625 0000 %0863 g18 007604 -00247 005694 1000 1000 0250 0000 0000 0750 0000 %0864 h10 006920 -00230 004768 0875 0875 0250 0125 0125 0750 0000 %0865 h11 006217 -00219 003931 0750 0750 0250 0250 0250 0750 0000 %0866 h12 005500 -00144 002964 0625 0625 0250 0375 0375 0750 0000 %0867 h13 004868 -00121 002043 0500 0500 0250 0500 0500 0750 0000 %0868 h14 004154 -00041 001056 0375 0375 0250 0625 0625 0750 0000 %0869 h15 003473 000021 000139 0250 0250 0250 0750 0750 0750 0000 %0870 h16 002990 000033 -00235 0125 0125 0250 0875 0875 0750 0000 %0871 h17 002516 -00062 -00580 0000 0000 0250 1000 1000 0750 0000 %0872 h18 007538 -00299 006681 1000 1000 0125 0000 0000 0875 0000 %0873 i10 006847 -00252 005747 0875 0875 0125 0125 0125 0875 0000 %0874 i11 006142 -00266 004834 0750 0750 0125 0250 0250 0875 0000 %0875 i12 005409 -00197 003864 0625 0625 0125 0375 0375 0875 0000 %0876 i13 004792 -00118 002940 0500 0500 0125 0500 0500 0875 0000 %0877 i14 004125 -00017 001971 0375 0375 0125 0625 0625 0875 0000 %0878 i15 003412 -00033 001048 0250 0250 0125 0750 0750 0875 0000 %0879 i16 002747 000001 000065 0125 0125 0125 0875 0875 0875 0000 %0880 i17 002273 -00044 -00280 0000 0000 0125 1000 1000 0875 0000 %0881 i18 007468 -00340 007572 1000 1000 0000 0000 0000 1000 0000 %0882 j10 006772 -00353 006628 0875 0875 0000 0125 0125 1000 0000 %0883 j11 006078 -00277 005714 0750 0750 0000 0250 0250 1000 0000 %0884 j12 005366 -00260 004735 0625 0625 0000 0375 0375 1000 0000 %0885 j13 004762 -00190 003852 0500 0500 0000 0500 0500 1000 0000 %0886 j14 004043 -00093 002855 0375 0375 0000 0625 0625 1000 0000 %0887 j15 003346 -00081 001943 0250 0250 0000 0750 0750 1000 0000 %0888 j16 002659 -00030 000948 0125 0125 0000 0875 0875 1000 0000 %0889 j17 002003 -00004 000003 0000 0000 0000 1000 1000 1000 0000 %0890 j18 007996 -00004 000019 1000 1000 1000 0000 0000 0000 0000 %0891 b19 007406 000602 -00322 1000 0875 1000 0000 0125 0000 0000 %0892 b20 006829 001210 -00678 1000 0750 1000 0000 0250 0000 0000 %0893 b21 006243 001783 -01009 1000 0625 1000 0000 0375 0000 0000 %0894 b22 005645 002392 -01364 1000 0500 1000 0000 0500 0000 0000 %0895 b23 005002 003104 -01757 1000 0375 1000 0000 0625 0000 0000 %0896 b24 004375 003733 -02160 1000 0250 1000 0000 0750 0000 0000 %0897 b25 003840 004250 -02505 1000 0125 1000 0000 0875 0000 0000 %0898 b26 003277 004861 -02822 1000 0000 1000 0000 1000 0000 0000 %0899 b27 007540 -00454 000172 0875 1000 0875 0125 0000 0125 0000 %0900 c19 007185 -00015 000067 0875 0875 0875 0125 0125 0125 0000 %0901 c20 006586 000586 -00264 0875 0750 0875 0125 0250 0125 0000 %0902 c21 005958 001200 -00659 0875 0625 0875 0125 0375 0125 0000 %0903 c22 005354 001833 -01017 0875 0500 0875 0125 0500 0125 0000 %0904 c23 004789 002467 -01412 0875 0375 0875 0125 0625 0125 0000 %0905 c24 004234 003119 -01805 0875 0250 0875 0125 0750 0125 0000 %0906 c25 003683 003692 -02155 0875 0125 0875 0125 0875 0125 0000 %0907 c26 003119 004269 -02465 0875 0000 0875 0125 1000 0125 0000 %0908 c27 007056 -00873 000334 0750 1000 0750 0250 0000 0250 0000 %0909 d19 006707 -00457 000229 0750 0875 0750 0250 0125 0250 0000 %0910 d20 006369 -00050 000113 0750 0750 0750 0250 0250 0250 0000 %0911 d21 005821 000569 -00288 0750 0625 0750 0250 0375 0250 0000 %0912 d22 005255 001189 -00672 0750 0500 0750 0250 0500 0250 0000 %0913 d23 004672 001884 -01097 0750 0375 0750 0250 0625 0250 0000 %0914 d24 004101 002496 -01464 0750 0250 0750 0250 0750 0250 0000 %0915 d25 003536 003080 -01797 0750 0125 0750 0250 0875 0250 0000 %0916 d26 002950 003658 -02103 0750 0000 0750 0250 1000 0250 0000 %0917 d27 006703 -01335 000490 0625 1000 0625 0375 0000 0375 0000 %0918 e19 006381 -00905 000352 0625 0875 0625 0375 0125 0375 0000 %0919 e20 006050 -00497 000206 0625 0750 0625 0375 0250 0375 0000 %0920 e21 005674 -00018 000036 0625 0625 0625 0375 0375 0375 0000 %0921 e22 005121 000571 -00294 0625 0500 0625 0375 0500 0375 0000 %0922 e23 004546 001293 -00720 0625 0375 0625 0375 0625 0375 0000 %0923 e24 003962 001946 -01077 0625 0250 0625 0375 0750 0375 0000 %0924 e25 003393 002468 -01398 0625 0125 0625 0375 0875 0375 0000 %0925 e26 002796 003009 -01710 0625 0000 0625 0375 1000 0375 0000 %0926 e27 006349 -01703 000624 0500 1000 0500 0500 0000 0500 0000 %0927 f19 006035 -01313 000516 0500 0875 0500 0500 0125 0500 0000 %0928 f20 005715 -00882 000342 0500 0750 0500 0500 0250 0500 0000 %0929 f21 005337 -00417 000193 0500 0625 0500 0500 0375 0500 0000 %0930 f22 004995 000023 000117 0500 0500 0500 0500 0500 0500 0000 %0931 f23 004374 000708 -00333 0500 0375 0500 0500 0625 0500 0000 %0932 f24 003768 001241 -00651 0500 0250 0500 0500 0750 0500 0000 %0933 f25 003171 001800 -00974 0500 0125 0500 0500 0875 0500 0000 %0934 f26 002612 002391 -01335 0500 0000 0500 0500 1000 0500 0000 %0935 f27 005939 -02177 000738 0375 1000 0375 0625 0000 0625 0000 %0936 g19 005615 -01781 000675 0375 0875 0375 0625 0125 0625 0000 %0937 g20 005265 -01303 000544 0375 0750 0375 0625 0250 0625 0000 %0938 g21 004918 -00910 000425 0375 0625 0375 0625 0375 0625 0000 %0939 g22 004540 -00464 000312 0375 0500 0375 0625 0500 0625 0000 %0940 g23 004152 000001 000139 0375 0375 0375 0625 0625 0625 0000 %0941 g24 003579 000647 -00259 0375 0250 0375 0625 0750 0625 0000 %0942 g25 003019 001212 -00598 0375 0125 0375 0625 0875 0625 0000 %0943 g26 002455 001769 -00923 0375 0000 0375 0625 1000 0625 0000 %0944 g27 005569 -02657 000984 0250 1000 0250 0750 0000 0750 0000 %0945 h19 005210 -02249 000901 0250 0875 0250 0750 0125 0750 0000 %0946 h20 004856 -01799 000763 0250 0750 0250 0750 0250 0750 0000 %0947 h21 004499 -01375 000631 0250 0625 0250 0750 0375 0750 0000 %0948 h22 004127 -00851 000442 0250 0500 0250 0750 0500 0750 0000 %0949 h23 003775 -00412 000279 0250 0375 0250 0750 0625 0750 0000 %0950 h24 003407 000031 000154 0250 0250 0250 0750 0750 0750 0000 %0951 h25 002855 000593 -00190 0250 0125 0250 0750 0875 0750 0000 %0952 h26 002283 001229 -00602 0250 0000 0250 0750 1000 0750 0000 %0953 h27 005132 -03145 001177 0125 1000 0125 0875 0000 0875 0000 %0954 i19 004794 -02695 001035 0125 0875 0125 0875 0125 0875 0000 %0955 i20 004453 -02247 000858 0125 0750 0125 0875 0250 0875 0000 %0956 i21 004084 -01786 000716 0125 0625 0125 0875 0375 0875 0000 %0957 i22 003729 -01284 000551 0125 0500 0125 0875 0500 0875 0000 %0958 i23 003377 -00874 000438 0125 0375 0125 0875 0625 0875 0000 %0959 i24 003013 -00368 000215 0125 0250 0125 0875 0750 0875 0000 %0960 i25 002702 -00018 000102 0125 0125 0125 0875 0875 0875 0000 %0961 i26 002106 000559 -00274 0125 0000 0125 0875 1000 0875 0000 %0962 i27 004775 -03578 001238 0000 1000 0000 1000 0000 1000 0000 %0963 j19 004419 -03159 001092 0000 0875 0000 1000 0125 1000 0000 %0964 j20 004092 -02737 000944 0000 0750 0000 1000 0250 1000 0000 %0965 j21 003731 -02234 000789 0000 0625 0000 1000 0375 1000 0000 %0966 j22 003371 -01779 000643 0000 0500 0000 1000 0500 1000 0000 %0967 j23 003043 -01348 000506 0000 0375 0000 1000 0625 1000 0000 %0968 j24 002673 -00882 000364 0000 0250 0000 1000 0750 1000 0000 %0969 j25 002330 -00451 000213 0000 0125 0000 1000 0875 1000 0000 %0970 j26 001965 000004 000017 0000 0000 0000 1000 1000 1000 0000 %0971 j27 ] def /LAB*Fa1100 [ %BEG HE69_22.TXT, Separation olv*, cf1=0.70, D65, adapted %100 x LAB*a %#1000 x (r g b c m y 0) %nr. pos %z003888 004409 002210 %#1000 0000 0000 0000 1000 1000 0000 %0648 S19 %O1 0 %z007425 -00348 007568 %#1000 1000 0000 0000 0000 1000 0000 %0720 a19 %Y1 1 %z004718 -03549 001207 %#0000 1000 0000 1000 0000 1000 0000 %0072 I01 %L1 2 %z005014 -02313 -01640 %#0000 1000 1000 1000 0000 0000 0000 %0080 I09 %C1 3 %z003927 000162 -02878 %#0000 0000 1000 1000 1000 0000 0000 %0008 A09 %V1 4 %z003231 004828 -02830 %#1000 0000 1000 0000 1000 0000 0000 %0656 S27 %M1 5 %z001973 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0000 A01 %N1 6 %z007893 000000 000000 %#1000 1000 1000 0000 0000 0000 0000 %0728 a27 %W1 7 %$ 004013 004421 002233 %#1000 0000 0000 0000 1000 1000 0000 %0801 j01 %O2 0 007468 -00340 007572 %#1000 1000 0000 0000 0000 1000 0000 %0882 j10 %Y2 1 004775 -03578 001238 %#0000 1000 0000 1000 0000 1000 0000 %0963 j19 %L2 2 005081 -02336 -01567 %#0000 1000 1000 1000 0000 0000 0000 %0737 b09 %C2 3 003992 000102 -02792 %#0000 0000 1000 1000 1000 0000 0000 %0818 b18 %V2 4 003277 004861 -02822 %#1000 0000 1000 0000 1000 0000 0000 %0899 b27 %M2 5 001995 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0809 j09 %N2 6 008022 000000 000000 %#1000 1000 1000 0000 0000 0000 0000 %0729 b01 %W2 7 %$ ] def %END HE99_FRS09_92_D65_LUT.DAT %********************************************************************* %BEG HE99_FRS09_92_D65_00%_00_LUT.DAT /FileDataGen (_LUT.DAT, 971 colours, 090115, Separation olv*, adapted) def /FileDataGde (_LUT.DAT, 971 Farben, 090115, Separation olv*, adaptiert) def /LUT_LABG0 10800 array def /LUT_LABG1 10800 array def /FileDataG0Na (HE99_FRS09_92_D65_00%_G0) def /LUT_LABG0 [ %GE390-7A, Page 7 /24, %BEG GE29(7)_22_REM.TXT, Separation cmyn62*, D65; cf1=1.00; nt=0.18; nx=1.0, adapted %BEG GE29(7)_22_REM.TXT, Separation cmyn62*, D65, adapted %100 x LAB*a 1000 x (r g b c m y 0) %nr. pos 000823 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0000 A01 000912 001121 -01690 0000 0000 0125 1000 1000 0875 0000 %0001 A02 000987 002039 -02739 0000 0000 0250 1000 1000 0750 0000 %0002 A03 001062 002830 -03554 0000 0000 0375 1000 1000 0625 0000 %0003 A04 001144 003622 -04321 0000 0000 0500 1000 1000 0500 0000 %0004 A05 001248 004329 -04999 0000 0000 0625 1000 1000 0375 0000 %0005 A06 001304 004847 -05471 0000 0000 0750 1000 1000 0250 0000 %0006 A07 001347 005071 -05683 0000 0000 0875 1000 1000 0125 0000 %0007 A08 001340 005118 -05715 0000 0000 1000 1000 1000 0000 0000 %0008 A09 001477 -01363 000820 0000 0125 0000 1000 0875 1000 0000 %0009 B01 001602 -00405 -00987 0000 0125 0125 1000 0875 0875 0000 %0010 B02 001692 000490 -02162 0000 0125 0250 1000 0875 0750 0000 %0011 B03 001780 001267 -03040 0000 0125 0375 1000 0875 0625 0000 %0012 B04 001869 002099 -03893 0000 0125 0500 1000 0875 0500 0000 %0013 B05 001975 002892 -04684 0000 0125 0625 1000 0875 0375 0000 %0014 B06 002041 003460 -05227 0000 0125 0750 1000 0875 0250 0000 %0015 B07 002077 003746 -05492 0000 0125 0875 1000 0875 0125 0000 %0016 B08 002071 003801 -05528 0000 0125 1000 1000 0875 0000 0000 %0017 B09 002217 -02778 001799 0000 0250 0000 1000 0750 1000 0000 %0018 C01 002348 -02012 -00108 0000 0250 0125 1000 0750 0875 0000 %0019 C02 002426 -01167 -01360 0000 0250 0250 1000 0750 0750 0000 %0020 C03 002513 -00421 -02319 0000 0250 0375 1000 0750 0625 0000 %0021 C04 002614 000397 -03237 0000 0250 0500 1000 0750 0500 0000 %0022 C05 002709 001242 -04120 0000 0250 0625 1000 0750 0375 0000 %0023 C06 002791 001862 -04740 0000 0250 0750 1000 0750 0250 0000 %0024 C07 002819 002194 -05054 0000 0250 0875 1000 0750 0125 0000 %0025 C08 002816 002255 -05105 0000 0250 1000 1000 0750 0000 0000 %0026 C09 002874 -03925 002672 0000 0375 0000 1000 0625 1000 0000 %0027 D01 003019 -03334 000717 0000 0375 0125 1000 0625 0875 0000 %0028 D02 003115 -02662 -00499 0000 0375 0250 1000 0625 0750 0000 %0029 D03 003199 -01937 -01546 0000 0375 0375 1000 0625 0625 0000 %0030 D04 003307 -01133 -02547 0000 0375 0500 1000 0625 0500 0000 %0031 D05 003415 -00305 -03507 0000 0375 0625 1000 0625 0375 0000 %0032 D06 003491 000338 -04183 0000 0375 0750 1000 0625 0250 0000 %0033 D07 003514 000702 -04540 0000 0375 0875 1000 0625 0125 0000 %0034 D08 003517 000762 -04594 0000 0375 1000 1000 0625 0000 0000 %0035 D09 003486 -04911 003485 0000 0500 0000 1000 0500 1000 0000 %0036 E01 003636 -04476 001505 0000 0500 0125 1000 0500 0875 0000 %0037 E02 003733 -03906 000250 0000 0500 0250 1000 0500 0750 0000 %0038 E03 003827 -03248 -00840 0000 0500 0375 1000 0500 0625 0000 %0039 E04 003935 -02516 -01861 0000 0500 0500 1000 0500 0500 0000 %0040 E05 004035 -01697 -02872 0000 0500 0625 1000 0500 0375 0000 %0041 E06 004134 -01059 -03612 0000 0500 0750 1000 0500 0250 0000 %0042 E07 004157 -00676 -04006 0000 0500 0875 1000 0500 0125 0000 %0043 E08 004162 -00612 -04065 0000 0500 1000 1000 0500 0000 0000 %0044 E09 003922 -05594 004050 0000 0625 0000 1000 0375 1000 0000 %0045 F01 004081 -05276 002111 0000 0625 0125 1000 0375 0875 0000 %0046 F02 004195 -04791 000845 0000 0625 0250 1000 0375 0750 0000 %0047 F03 004296 -04212 -00249 0000 0625 0375 1000 0375 0625 0000 %0048 F04 004396 -03502 -01333 0000 0625 0500 1000 0375 0500 0000 %0049 F05 004509 -02724 -02370 0000 0625 0625 1000 0375 0375 0000 %0050 F06 004594 -02074 -03155 0000 0625 0750 1000 0375 0250 0000 %0051 F07 004633 -01695 -03577 0000 0625 0875 1000 0375 0125 0000 %0052 F08 004637 -01634 -03645 0000 0625 1000 1000 0375 0000 0000 %0053 F09 004200 -06026 004430 0000 0750 0000 1000 0250 1000 0000 %0054 G01 004394 -05816 002529 0000 0750 0125 1000 0250 0875 0000 %0055 G02 004516 -05387 001260 0000 0750 0250 1000 0250 0750 0000 %0056 G03 004612 -04849 000134 0000 0750 0375 1000 0250 0625 0000 %0057 G04 004732 -04212 -00937 0000 0750 0500 1000 0250 0500 0000 %0058 G05 004845 -03451 -02013 0000 0750 0625 1000 0250 0375 0000 %0059 G06 004934 -02827 -02802 0000 0750 0750 1000 0250 0250 0000 %0060 G07 004985 -02459 -03246 0000 0750 0875 1000 0250 0125 0000 %0061 G08 004991 -02393 -03316 0000 0750 1000 1000 0250 0000 0000 %0062 G09 004363 -06265 004655 0000 0875 0000 1000 0125 1000 0000 %0063 H01 004573 -06132 002791 0000 0875 0125 1000 0125 0875 0000 %0064 H02 004719 -05766 001531 0000 0875 0250 1000 0125 0750 0000 %0065 H03 004822 -05266 000404 0000 0875 0375 1000 0125 0625 0000 %0066 H04 004953 -04651 -00695 0000 0875 0500 1000 0125 0500 0000 %0067 H05 005069 -03940 -01752 0000 0875 0625 1000 0125 0375 0000 %0068 H06 005168 -03325 -02562 0000 0875 0750 1000 0125 0250 0000 %0069 H07 005213 -02953 -03024 0000 0875 0875 1000 0125 0125 0000 %0070 H08 005221 -02891 -03096 0000 0875 1000 1000 0125 0000 0000 %0071 H09 004369 -06270 004687 0000 1000 0000 1000 0000 1000 0000 %0072 I01 004583 -06140 002800 0000 1000 0125 1000 0000 0875 0000 %0073 I02 004723 -05778 001546 0000 1000 0250 1000 0000 0750 0000 %0074 I03 004826 -05297 000444 0000 1000 0375 1000 0000 0625 0000 %0075 I04 004960 -04684 -00659 0000 1000 0500 1000 0000 0500 0000 %0076 I05 005076 -03970 -01725 0000 1000 0625 1000 0000 0375 0000 %0077 I06 005175 -03344 -02553 0000 1000 0750 1000 0000 0250 0000 %0078 I07 005221 -02970 -03015 0000 1000 0875 1000 0000 0125 0000 %0079 I08 005222 -02908 -03087 0000 1000 1000 1000 0000 0000 0000 %0080 I09 001066 000641 000360 0125 0000 0000 0875 1000 1000 0000 %0081 J01 001154 001590 -01448 0125 0000 0125 0875 1000 0875 0000 %0082 J02 001252 002396 -02570 0125 0000 0250 0875 1000 0750 0000 %0083 J03 001330 003110 -03411 0125 0000 0375 0875 1000 0625 0000 %0084 J04 001417 003885 -04257 0125 0000 0500 0875 1000 0500 0000 %0085 J05 001512 004604 -04991 0125 0000 0625 0875 1000 0375 0000 %0086 J06 001562 005090 -05467 0125 0000 0750 0875 1000 0250 0000 %0087 J07 001594 005314 -05685 0125 0000 0875 0875 1000 0125 0000 %0088 J08 001601 005336 -05708 0125 0000 1000 0875 1000 0000 0000 %0089 J09 001759 -00681 001255 0125 0125 0000 0875 0875 1000 0000 %0090 K01 001879 000103 -00694 0125 0125 0125 0875 0875 0875 0000 %0091 K02 001989 000887 -01925 0125 0125 0250 0875 0875 0750 0000 %0092 K03 002076 001600 -02864 0125 0125 0375 0875 0875 0625 0000 %0093 K04 002175 002370 -03774 0125 0125 0500 0875 0875 0500 0000 %0094 K05 002290 003167 -04639 0125 0125 0625 0875 0875 0375 0000 %0095 K06 002347 003730 -05209 0125 0125 0750 0875 0875 0250 0000 %0096 K07 002387 003997 -05484 0125 0125 0875 0875 0875 0125 0000 %0097 K08 002390 004030 -05513 0125 0125 1000 0875 0875 0000 0000 %0098 K09 002530 -02071 002265 0125 0250 0000 0875 0750 1000 0000 %0099 L01 002667 -01454 000239 0125 0250 0125 0875 0750 0875 0000 %0100 L02 002764 -00712 -01097 0125 0250 0250 0875 0750 0750 0000 %0101 L03 002858 -00065 -02076 0125 0250 0375 0875 0750 0625 0000 %0102 L04 002958 000732 -03100 0125 0250 0500 0875 0750 0500 0000 %0103 L05 003081 001535 -04042 0125 0250 0625 0875 0750 0375 0000 %0104 L06 003150 002146 -04698 0125 0250 0750 0875 0750 0250 0000 %0105 L07 003175 002477 -05030 0125 0250 0875 0875 0750 0125 0000 %0106 L08 003175 002528 -05076 0125 0250 1000 0875 0750 0000 0000 %0107 L09 003208 -03229 003166 0125 0375 0000 0875 0625 1000 0000 %0108 M01 003364 -02769 001138 0125 0375 0125 0875 0625 0875 0000 %0109 M02 003482 -02200 -00154 0125 0375 0250 0875 0625 0750 0000 %0110 M03 003585 -01547 -01279 0125 0375 0375 0875 0625 0625 0000 %0111 M04 003682 -00805 -02339 0125 0375 0500 0875 0625 0500 0000 %0112 M05 003807 -00001 -03372 0125 0375 0625 0875 0625 0375 0000 %0113 M06 003877 000641 -04102 0125 0375 0750 0875 0625 0250 0000 %0114 M07 003918 001002 -04496 0125 0375 0875 0875 0625 0125 0000 %0115 M08 003919 001065 -04551 0125 0375 1000 0875 0625 0000 0000 %0116 M09 003907 -04299 004103 0125 0500 0000 0875 0500 1000 0000 %0117 N01 004062 -03966 002034 0125 0500 0125 0875 0500 0875 0000 %0118 N02 004171 -03488 000700 0125 0500 0250 0875 0500 0750 0000 %0119 N03 004282 -02895 -00481 0125 0500 0375 0875 0500 0625 0000 %0120 N04 004391 -02215 -01585 0125 0500 0500 0875 0500 0500 0000 %0121 N05 004509 -01447 -02661 0125 0500 0625 0875 0500 0375 0000 %0122 N06 004594 -00787 -03474 0125 0500 0750 0875 0500 0250 0000 %0123 N07 004634 -00403 -03922 0125 0500 0875 0875 0500 0125 0000 %0124 N08 004637 -00351 -03981 0125 0500 1000 0875 0500 0000 0000 %0125 N09 004414 -05035 004788 0125 0625 0000 0875 0375 1000 0000 %0126 O01 004599 -04811 002690 0125 0625 0125 0875 0375 0875 0000 %0127 O02 004718 -04404 001346 0125 0625 0250 0875 0375 0750 0000 %0128 O03 004834 -03916 000184 0125 0625 0375 0875 0375 0625 0000 %0129 O04 004952 -03285 -00967 0125 0625 0500 0875 0375 0500 0000 %0130 O05 005066 -02537 -02097 0125 0625 0625 0875 0375 0375 0000 %0131 O06 005161 -01904 -02946 0125 0625 0750 0875 0375 0250 0000 %0132 O07 005205 -01517 -03431 0125 0625 0875 0875 0375 0125 0000 %0133 O08 005206 -01469 -03491 0125 0625 1000 0875 0375 0000 0000 %0134 O09 004764 -05532 005250 0125 0750 0000 0875 0250 1000 0000 %0135 P01 004982 -05425 003214 0125 0750 0125 0875 0250 0875 0000 %0136 P02 005125 -05088 001834 0125 0750 0250 0875 0250 0750 0000 %0137 P03 005239 -04653 000677 0125 0750 0375 0875 0250 0625 0000 %0138 P04 005369 -04073 -00495 0125 0750 0500 0875 0250 0500 0000 %0139 P05 005489 -03387 -01637 0125 0750 0625 0875 0250 0375 0000 %0140 P06 005589 -02773 -02512 0125 0750 0750 0875 0250 0250 0000 %0141 P07 005641 -02389 -03029 0125 0750 0875 0875 0250 0125 0000 %0142 P08 005640 -02330 -03101 0125 0750 1000 0875 0250 0000 0000 %0143 P09 004976 -05831 005545 0125 0875 0000 0875 0125 1000 0000 %0144 Q01 005224 -05814 003534 0125 0875 0125 0875 0125 0875 0000 %0145 Q02 005384 -05544 002175 0125 0875 0250 0875 0125 0750 0000 %0146 Q03 005512 -05156 001026 0125 0875 0375 0875 0125 0625 0000 %0147 Q04 005637 -04644 -00118 0125 0875 0500 0875 0125 0500 0000 %0148 Q05 005775 -03971 -01311 0125 0875 0625 0875 0125 0375 0000 %0149 Q06 005882 -03373 -02213 0125 0875 0750 0875 0125 0250 0000 %0150 Q07 005929 -03004 -02738 0125 0875 0875 0875 0125 0125 0000 %0151 Q08 005928 -02943 -02812 0125 0875 1000 0875 0125 0000 0000 %0152 Q09 004988 -05837 005558 0125 1000 0000 0875 0000 1000 0000 %0153 R01 005237 -05828 003554 0125 1000 0125 0875 0000 0875 0000 %0154 R02 005393 -05568 002232 0125 1000 0250 0875 0000 0750 0000 %0155 R03 005526 -05175 001047 0125 1000 0375 0875 0000 0625 0000 %0156 R04 005660 -04659 -00109 0125 1000 0500 0875 0000 0500 0000 %0157 R05 005790 -03995 -01292 0125 1000 0625 0875 0000 0375 0000 %0158 R06 005895 -03389 -02205 0125 1000 0750 0875 0000 0250 0000 %0159 R07 005952 -03027 -02726 0125 1000 0875 0875 0000 0125 0000 %0160 R08 005945 -02968 -02799 0125 1000 1000 0875 0000 0000 0000 %0161 R09 001390 001481 000858 0250 0000 0000 0750 1000 1000 0000 %0162 S01 001479 002230 -01054 0250 0000 0125 0750 1000 0875 0000 %0163 S02 001558 002908 -02253 0250 0000 0250 0750 1000 0750 0000 %0164 S03 001627 003544 -03154 0250 0000 0375 0750 1000 0625 0000 %0165 S04 001726 004220 -04006 0250 0000 0500 0750 1000 0500 0000 %0166 S05 001815 004907 -04786 0250 0000 0625 0750 1000 0375 0000 %0167 S06 001865 005362 -05281 0250 0000 0750 0750 1000 0250 0000 %0168 S07 001894 005571 -05507 0250 0000 0875 0750 1000 0125 0000 %0169 S08 001898 005596 -05529 0250 0000 1000 0750 1000 0000 0000 %0170 S09 002101 000226 001753 0250 0125 0000 0750 0875 1000 0000 %0171 T01 002245 000852 -00288 0250 0125 0125 0750 0875 0875 0000 %0172 T02 002334 001483 -01610 0250 0125 0250 0750 0875 0750 0000 %0173 T03 002417 002075 -02556 0250 0125 0375 0750 0875 0625 0000 %0174 T04 002527 002805 -03537 0250 0125 0500 0750 0875 0500 0000 %0175 T05 002630 003549 -04439 0250 0125 0625 0750 0875 0375 0000 %0176 T06 002703 004066 -05028 0250 0125 0750 0750 0875 0250 0000 %0177 T07 002739 004310 -05312 0250 0125 0875 0750 0875 0125 0000 %0178 T08 002728 004365 -05350 0250 0125 1000 0750 0875 0000 0000 %0179 T09 002924 -01205 002804 0250 0250 0000 0750 0750 1000 0000 %0180 U01 003075 -00703 000660 0250 0250 0125 0750 0750 0875 0000 %0181 U02 003198 -00077 -00692 0250 0250 0250 0750 0750 0750 0000 %0182 U03 003300 000484 -01749 0250 0250 0375 0750 0750 0625 0000 %0183 U04 003402 001195 -02811 0250 0250 0500 0750 0750 0500 0000 %0184 U05 003518 001928 -03787 0250 0250 0625 0750 0750 0375 0000 %0185 U06 003589 002503 -04478 0250 0250 0750 0750 0750 0250 0000 %0186 U07 003625 002802 -04833 0250 0250 0875 0750 0750 0125 0000 %0187 U08 003616 002861 -04880 0250 0250 1000 0750 0750 0000 0000 %0188 U09 003677 -02400 003796 0250 0375 0000 0750 0625 1000 0000 %0189 V01 003850 -02021 001593 0250 0375 0125 0750 0625 0875 0000 %0190 V02 003977 -01478 000194 0250 0375 0250 0750 0625 0750 0000 %0191 V03 004076 -00946 -00930 0250 0375 0375 0750 0625 0625 0000 %0192 V04 004177 -00263 -02058 0250 0375 0500 0750 0625 0500 0000 %0193 V05 004281 000463 -03114 0250 0375 0625 0750 0625 0375 0000 %0194 V06 004364 001051 -03880 0250 0375 0750 0750 0625 0250 0000 %0195 V07 004397 001401 -04305 0250 0375 0875 0750 0625 0125 0000 %0196 V08 004389 001456 -04357 0250 0375 1000 0750 0625 0000 0000 %0197 V09 004401 -03503 004767 0250 0500 0000 0750 0500 1000 0000 %0198 W01 004576 -03228 002548 0250 0500 0125 0750 0500 0875 0000 %0199 W02 004721 -02771 001097 0250 0500 0250 0750 0500 0750 0000 %0200 W03 004815 -02298 -00069 0250 0500 0375 0750 0500 0625 0000 %0201 W04 004921 -01681 -01253 0250 0500 0500 0750 0500 0500 0000 %0202 W05 005029 -00977 -02373 0250 0500 0625 0750 0500 0375 0000 %0203 W06 005112 -00354 -03244 0250 0500 0750 0750 0500 0250 0000 %0204 W07 005144 -00001 -03710 0250 0500 0875 0750 0500 0125 0000 %0205 W08 005158 000044 -03767 0250 0500 1000 0750 0500 0000 0000 %0206 W09 004952 -04303 005508 0250 0625 0000 0750 0375 1000 0000 %0207 X01 005144 -04145 003304 0250 0625 0125 0750 0375 0875 0000 %0208 X02 005289 -03764 001841 0250 0625 0250 0750 0375 0750 0000 %0209 X03 005393 -03368 000658 0250 0625 0375 0750 0375 0625 0000 %0210 X04 005499 -02793 -00562 0250 0625 0500 0750 0375 0500 0000 %0211 X05 005620 -02109 -01771 0250 0625 0625 0750 0375 0375 0000 %0212 X06 005707 -01515 -02670 0250 0625 0750 0750 0375 0250 0000 %0213 X07 005759 -01150 -03188 0250 0625 0875 0750 0375 0125 0000 %0214 X08 005745 -01085 -03258 0250 0625 1000 0750 0375 0000 0000 %0215 X09 005341 -04867 006050 0250 0750 0000 0750 0250 1000 0000 %0216 Y01 005572 -04826 003899 0250 0750 0125 0750 0250 0875 0000 %0217 Y02 005732 -04536 002442 0250 0750 0250 0750 0250 0750 0000 %0218 Y03 005836 -04197 001246 0250 0750 0375 0750 0250 0625 0000 %0219 Y04 005958 -03690 000014 0250 0750 0500 0750 0250 0500 0000 %0220 Y05 006091 -03076 -01217 0250 0750 0625 0750 0250 0375 0000 %0221 Y06 006184 -02480 -02181 0250 0750 0750 0750 0250 0250 0000 %0222 Y07 006236 -02125 -02731 0250 0750 0875 0750 0250 0125 0000 %0223 Y08 006240 -02072 -02806 0250 0750 1000 0750 0250 0000 0000 %0224 Y09 005594 -05211 006397 0250 0875 0000 0750 0125 1000 0000 %0225 Z01 005860 -05287 004298 0250 0875 0125 0750 0125 0875 0000 %0226 Z02 006050 -05080 002876 0250 0875 0250 0750 0125 0750 0000 %0227 Z03 006165 -04791 001690 0250 0875 0375 0750 0125 0625 0000 %0228 Z04 006304 -04352 000441 0250 0875 0500 0750 0125 0500 0000 %0229 Z05 006440 -03765 -00811 0250 0875 0625 0750 0125 0375 0000 %0230 Z06 006550 -03204 -01802 0250 0875 0750 0750 0125 0250 0000 %0231 Z07 006598 -02861 -02375 0250 0875 0875 0750 0125 0125 0000 %0232 Z08 006601 -02809 -02450 0250 0875 1000 0750 0125 0000 0000 %0233 Z09 005607 -05213 006418 0250 1000 0000 0750 0000 1000 0000 %0234 a01 005884 -05292 004317 0250 1000 0125 0750 0000 0875 0000 %0235 a02 006072 -05085 002893 0250 1000 0250 0750 0000 0750 0000 %0236 a03 006179 -04814 001722 0250 1000 0375 0750 0000 0625 0000 %0237 a04 006324 -04369 000467 0250 1000 0500 0750 0000 0500 0000 %0238 a05 006463 -03787 -00794 0250 1000 0625 0750 0000 0375 0000 %0239 a06 006562 -03233 -01781 0250 1000 0750 0750 0000 0250 0000 %0240 a07 006610 -02892 -02358 0250 1000 0875 0750 0000 0125 0000 %0241 a08 006624 -02835 -02432 0250 1000 1000 0750 0000 0000 0000 %0242 a09 001717 002305 001405 0375 0000 0000 0625 1000 1000 0000 %0243 A10 001819 002954 -00577 0375 0000 0125 0625 1000 0875 0000 %0244 A11 001914 003497 -01743 0375 0000 0250 0625 1000 0750 0000 %0245 A12 001984 004099 -02727 0375 0000 0375 0625 1000 0625 0000 %0246 A13 002059 004684 -03622 0375 0000 0500 0625 1000 0500 0000 %0247 A14 002122 005264 -04390 0375 0000 0625 0625 1000 0375 0000 %0248 A15 002179 005698 -04913 0375 0000 0750 0625 1000 0250 0000 %0249 A16 002202 005904 -05161 0375 0000 0875 0625 1000 0125 0000 %0250 A17 002212 005925 -05162 0375 0000 1000 0625 1000 0000 0000 %0251 A18 002453 001164 002284 0375 0125 0000 0625 0875 1000 0000 %0252 B10 002608 001702 000177 0375 0125 0125 0625 0875 0875 0000 %0253 B11 002712 002222 -01111 0375 0125 0250 0625 0875 0750 0000 %0254 B12 002809 002786 -02172 0375 0125 0375 0625 0875 0625 0000 %0255 B13 002881 003405 -03179 0375 0125 0500 0625 0875 0500 0000 %0256 B14 002958 004033 -04065 0375 0125 0625 0625 0875 0375 0000 %0257 B15 003032 004542 -04700 0375 0125 0750 0625 0875 0250 0000 %0258 B16 003051 004812 -05023 0375 0125 0875 0625 0875 0125 0000 %0259 B17 003053 004847 -05042 0375 0125 1000 0625 0875 0000 0000 %0260 B18 003268 -00186 003321 0375 0250 0000 0625 0750 1000 0000 %0261 C10 003428 000252 001098 0375 0250 0125 0625 0750 0875 0000 %0262 C11 003560 000710 -00298 0375 0250 0250 0625 0750 0750 0000 %0263 C12 003664 001213 -01374 0375 0250 0375 0625 0750 0625 0000 %0264 C13 003738 001824 -02461 0375 0250 0500 0625 0750 0500 0000 %0265 C14 003816 002495 -03468 0375 0250 0625 0625 0750 0375 0000 %0266 C15 003895 003061 -04210 0375 0250 0750 0625 0750 0250 0000 %0267 C16 003904 003384 -04607 0375 0250 0875 0625 0750 0125 0000 %0268 C17 003907 003433 -04642 0375 0250 1000 0625 0750 0000 0000 %0269 C18 004040 -01459 004306 0375 0375 0000 0625 0625 1000 0000 %0270 D10 004214 -01114 002047 0375 0375 0125 0625 0625 0875 0000 %0271 D11 004345 -00712 000605 0375 0375 0250 0625 0625 0750 0000 %0272 D12 004432 -00214 -00541 0375 0375 0375 0625 0625 0625 0000 %0273 D13 004515 000372 -01710 0375 0375 0500 0625 0625 0500 0000 %0274 D14 004599 001044 -02803 0375 0375 0625 0625 0625 0375 0000 %0275 D15 004674 001643 -03634 0375 0375 0750 0625 0625 0250 0000 %0276 D16 004676 002007 -04106 0375 0375 0875 0625 0625 0125 0000 %0277 D17 004686 002050 -04149 0375 0375 1000 0625 0625 0000 0000 %0278 D18 004773 -02621 005266 0375 0500 0000 0625 0500 1000 0000 %0279 E10 004975 -02366 003008 0375 0500 0125 0625 0500 0875 0000 %0280 E11 005109 -02031 001525 0375 0500 0250 0625 0500 0750 0000 %0281 E12 005174 -01574 000326 0375 0500 0375 0625 0500 0625 0000 %0282 E13 005263 -01040 -00895 0375 0500 0500 0625 0500 0500 0000 %0283 E14 005354 -00409 -02039 0375 0500 0625 0625 0500 0375 0000 %0284 E15 005422 000229 -02998 0375 0500 0750 0625 0500 0250 0000 %0285 E16 005449 000607 -03523 0375 0500 0875 0625 0500 0125 0000 %0286 E17 005456 000657 -03584 0375 0500 1000 0625 0500 0000 0000 %0287 E18 005375 -03484 006053 0375 0625 0000 0625 0375 1000 0000 %0288 F10 005563 -03324 003763 0375 0625 0125 0625 0375 0875 0000 %0289 F11 005710 -03060 002285 0375 0625 0250 0625 0375 0750 0000 %0290 F12 005810 -02679 001087 0375 0625 0375 0625 0375 0625 0000 %0291 F13 005880 -02197 -00161 0375 0625 0500 0625 0375 0500 0000 %0292 F14 005979 -01590 -01383 0375 0625 0625 0625 0375 0375 0000 %0293 F15 006066 -00981 -02398 0375 0625 0750 0625 0375 0250 0000 %0294 F16 006086 -00611 -02979 0375 0625 0875 0625 0375 0125 0000 %0295 F17 006096 -00554 -03045 0375 0625 1000 0625 0375 0000 0000 %0296 F18 005823 -04110 006685 0375 0750 0000 0625 0250 1000 0000 %0297 G10 006050 -04078 004426 0375 0750 0125 0625 0250 0875 0000 %0298 G11 006196 -03916 002971 0375 0750 0250 0625 0250 0750 0000 %0299 G12 006301 -03593 001751 0375 0750 0375 0625 0250 0625 0000 %0300 G13 006395 -03175 000484 0375 0750 0500 0625 0250 0500 0000 %0301 G14 006513 -02642 -00771 0375 0750 0625 0625 0250 0375 0000 %0302 G15 006621 -02068 -01821 0375 0750 0750 0625 0250 0250 0000 %0303 G16 006651 -01708 -02452 0375 0750 0875 0625 0250 0125 0000 %0304 G17 006662 -01652 -02525 0375 0750 1000 0625 0250 0000 0000 %0305 G18 006093 -04525 007124 0375 0875 0000 0625 0125 1000 0000 %0306 H10 006388 -04627 004965 0375 0875 0125 0625 0125 0875 0000 %0307 H11 006558 -04532 003489 0375 0875 0250 0625 0125 0750 0000 %0308 H12 006679 -04273 002291 0375 0875 0375 0625 0125 0625 0000 %0309 H13 006791 -03926 001000 0375 0875 0500 0625 0125 0500 0000 %0310 H14 006928 -03453 -00256 0375 0875 0625 0625 0125 0375 0000 %0311 H15 007039 -02938 -01341 0375 0875 0750 0625 0125 0250 0000 %0312 H16 007096 -02585 -02006 0375 0875 0875 0625 0125 0125 0000 %0313 H17 007102 -02536 -02091 0375 0875 1000 0625 0125 0000 0000 %0314 H18 006104 -04537 007153 0375 1000 0000 0625 0000 1000 0000 %0315 I10 006398 -04645 004998 0375 1000 0125 0625 0000 0875 0000 %0316 I11 006559 -04554 003524 0375 1000 0250 0625 0000 0750 0000 %0317 I12 006693 -04301 002312 0375 1000 0375 0625 0000 0625 0000 %0318 I13 006800 -03964 001035 0375 1000 0500 0625 0000 0500 0000 %0319 I14 006932 -03489 -00234 0375 1000 0625 0625 0000 0375 0000 %0320 I15 007055 -02978 -01320 0375 1000 0750 0625 0000 0250 0000 %0321 I16 007117 -02630 -01987 0375 1000 0875 0625 0000 0125 0000 %0322 I17 007124 -02575 -02073 0375 1000 1000 0625 0000 0000 0000 %0323 I18 002120 003171 002023 0500 0000 0000 0500 1000 1000 0000 %0324 J10 002215 003722 -00049 0500 0000 0125 0500 1000 0875 0000 %0325 J11 002280 004178 -01268 0500 0000 0250 0500 1000 0750 0000 %0326 J12 002356 004656 -02266 0500 0000 0375 0500 1000 0625 0000 %0327 J13 002411 005177 -03196 0500 0000 0500 0500 1000 0500 0000 %0328 J14 002492 005695 -03991 0500 0000 0625 0500 1000 0375 0000 %0329 J15 002555 006087 -04520 0500 0000 0750 0500 1000 0250 0000 %0330 J16 002554 006274 -04781 0500 0000 0875 0500 1000 0125 0000 %0331 J17 002568 006286 -04786 0500 0000 1000 0500 1000 0000 0000 %0332 J18 002829 002086 002858 0500 0125 0000 0500 0875 1000 0000 %0333 K10 002962 002538 000658 0500 0125 0125 0500 0875 0875 0000 %0334 K11 003057 002924 -00632 0500 0125 0250 0500 0875 0750 0000 %0335 K12 003149 003418 -01753 0500 0125 0375 0500 0875 0625 0000 %0336 K13 003218 003966 -02801 0500 0125 0500 0500 0875 0500 0000 %0337 K14 003306 004538 -03712 0500 0125 0625 0500 0875 0375 0000 %0338 K15 003364 004998 -04371 0500 0125 0750 0500 0875 0250 0000 %0339 K16 003370 005253 -04708 0500 0125 0875 0500 0875 0125 0000 %0340 K17 003384 005285 -04727 0500 0125 1000 0500 0875 0000 0000 %0341 K18 003611 000781 003874 0500 0250 0000 0500 0750 1000 0000 %0342 L10 003773 001131 001577 0500 0250 0125 0500 0750 0875 0000 %0343 L11 003898 001479 000169 0500 0250 0250 0500 0750 0750 0000 %0344 L12 003980 001891 -00953 0500 0250 0375 0500 0750 0625 0000 %0345 L13 004062 002435 -02076 0500 0250 0500 0500 0750 0500 0000 %0346 L14 004158 003051 -03121 0500 0250 0625 0500 0750 0375 0000 %0347 L15 004206 003586 -03910 0500 0250 0750 0500 0750 0250 0000 %0348 L16 004210 003898 -04335 0500 0250 0875 0500 0750 0125 0000 %0349 L17 004226 003935 -04367 0500 0250 1000 0500 0750 0000 0000 %0350 L18 004389 -00467 004897 0500 0375 0000 0500 0625 1000 0000 %0351 M10 004551 -00225 002566 0500 0375 0125 0500 0625 0875 0000 %0352 M11 004668 000101 001061 0500 0375 0250 0500 0625 0750 0000 %0353 M12 004730 000494 -00105 0500 0375 0375 0500 0625 0625 0000 %0354 M13 004809 001025 -01326 0500 0375 0500 0500 0625 0500 0000 %0355 M14 004905 001640 -02457 0500 0375 0625 0500 0625 0375 0000 %0356 M15 004976 002211 -03350 0500 0375 0750 0500 0625 0250 0000 %0357 M16 004981 002581 -03861 0500 0375 0875 0500 0625 0125 0000 %0358 M17 004986 002626 -03914 0500 0375 1000 0500 0625 0000 0000 %0359 M18 005171 -01659 005956 0500 0500 0000 0500 0500 1000 0000 %0360 N10 005332 -01499 003563 0500 0500 0125 0500 0500 0875 0000 %0361 N11 005442 -01239 002033 0500 0500 0250 0500 0500 0750 0000 %0362 N12 005505 -00869 000793 0500 0500 0375 0500 0500 0625 0000 %0363 N13 005590 -00406 -00454 0500 0500 0500 0500 0500 0500 0000 %0364 N14 005696 000207 -01680 0500 0500 0625 0500 0500 0375 0000 %0365 N15 005766 000791 -02688 0500 0500 0750 0500 0500 0250 0000 %0366 N16 005790 001169 -03273 0500 0500 0875 0500 0500 0125 0000 %0367 N17 005797 001218 -03335 0500 0500 1000 0500 0500 0000 0000 %0368 N18 005794 -02578 006789 0500 0625 0000 0500 0375 1000 0000 %0369 O10 005983 -02495 004413 0500 0625 0125 0500 0375 0875 0000 %0370 O11 006108 -02318 002867 0500 0625 0250 0500 0375 0750 0000 %0371 O12 006198 -02001 001597 0500 0625 0375 0500 0375 0625 0000 %0372 O13 006274 -01578 000303 0500 0625 0500 0500 0375 0500 0000 %0373 O14 006372 -01024 -00962 0500 0625 0625 0500 0375 0375 0000 %0374 O15 006461 -00453 -02037 0500 0625 0750 0500 0375 0250 0000 %0375 O16 006495 -00079 -02682 0500 0625 0875 0500 0375 0125 0000 %0376 O17 006488 -00020 -02769 0500 0625 1000 0500 0375 0000 0000 %0377 O18 006302 -03241 007493 0500 0750 0000 0500 0250 1000 0000 %0378 P10 006508 -03291 005114 0500 0750 0125 0500 0250 0875 0000 %0379 P11 006651 -03204 003588 0500 0750 0250 0500 0250 0750 0000 %0380 P12 006736 -02951 002315 0500 0750 0375 0500 0250 0625 0000 %0381 P13 006846 -02593 000990 0500 0750 0500 0500 0250 0500 0000 %0382 P14 006970 -02129 -00270 0500 0750 0625 0500 0250 0375 0000 %0383 P15 007059 -01590 -01406 0500 0750 0750 0500 0250 0250 0000 %0384 P16 007110 -01245 -02101 0500 0750 0875 0500 0250 0125 0000 %0385 P17 007110 -01179 -02201 0500 0750 1000 0500 0250 0000 0000 %0386 P18 006644 -03710 007988 0500 0875 0000 0500 0125 1000 0000 %0387 Q10 006888 -03918 005670 0500 0875 0125 0500 0125 0875 0000 %0388 Q11 007066 -03895 004160 0500 0875 0250 0500 0125 0750 0000 %0389 Q12 007174 -03708 002919 0500 0875 0375 0500 0125 0625 0000 %0390 Q13 007296 -03447 001611 0500 0875 0500 0500 0125 0500 0000 %0391 Q14 007443 -03026 000297 0500 0875 0625 0500 0125 0375 0000 %0392 Q15 007546 -02565 -00858 0500 0875 0750 0500 0125 0250 0000 %0393 Q16 007607 -02226 -01589 0500 0875 0875 0500 0125 0125 0000 %0394 Q17 007612 -02169 -01697 0500 0875 1000 0500 0125 0000 0000 %0395 Q18 006651 -03741 007980 0500 1000 0000 0500 0000 1000 0000 %0396 R10 006910 -03952 005718 0500 1000 0125 0500 0000 0875 0000 %0397 R11 007072 -03940 004203 0500 1000 0250 0500 0000 0750 0000 %0398 R12 007180 -03757 002955 0500 1000 0375 0500 0000 0625 0000 %0399 R13 007326 -03478 001632 0500 1000 0500 0500 0000 0500 0000 %0400 R14 007454 -03076 000337 0500 1000 0625 0500 0000 0375 0000 %0401 R15 007564 -02607 -00829 0500 1000 0750 0500 0000 0250 0000 %0402 R16 007628 -02267 -01570 0500 1000 0875 0500 0000 0125 0000 %0403 R17 007634 -02216 -01674 0500 1000 1000 0500 0000 0000 0000 %0404 R18 002591 004183 002773 0625 0000 0000 0375 1000 1000 0000 %0405 S10 002677 004605 000606 0625 0000 0125 0375 1000 0875 0000 %0406 S11 002729 004968 -00659 0625 0000 0250 0375 1000 0750 0000 %0407 S12 002783 005362 -01719 0625 0000 0375 0375 1000 0625 0000 %0408 S13 002833 005796 -02667 0625 0000 0500 0375 1000 0500 0000 %0409 S14 002900 006260 -03501 0625 0000 0625 0375 1000 0375 0000 %0410 S15 002944 006593 -04043 0625 0000 0750 0375 1000 0250 0000 %0411 S16 002943 006752 -04298 0625 0000 0875 0375 1000 0125 0000 %0412 S17 002961 006769 -04307 0625 0000 1000 0375 1000 0000 0000 %0413 S18 003305 003167 003610 0625 0125 0000 0375 0875 1000 0000 %0414 T10 003440 003507 001281 0625 0125 0125 0375 0875 0875 0000 %0415 T11 003518 003828 -00072 0625 0125 0250 0375 0875 0750 0000 %0416 T12 003594 004213 -01229 0625 0125 0375 0375 0875 0625 0000 %0417 T13 003656 004676 -02295 0625 0125 0500 0375 0875 0500 0000 %0418 T14 003723 005182 -03259 0625 0125 0625 0375 0875 0375 0000 %0419 T15 003770 005582 -03926 0625 0125 0750 0375 0875 0250 0000 %0420 T16 003778 005815 -04280 0625 0125 0875 0375 0875 0125 0000 %0421 T17 003790 005834 -04301 0625 0125 1000 0375 0875 0000 0000 %0422 T18 004121 001913 004622 0625 0250 0000 0375 0750 1000 0000 %0423 U10 004281 002148 002213 0625 0250 0125 0375 0750 0875 0000 %0424 U11 004382 002426 000708 0625 0250 0250 0375 0750 0750 0000 %0425 U12 004475 002768 -00459 0625 0250 0375 0375 0750 0625 0000 %0426 U13 004532 003238 -01603 0625 0250 0500 0375 0750 0500 0000 %0427 U14 004600 003784 -02690 0625 0250 0625 0375 0750 0375 0000 %0428 U15 004651 004233 -03483 0625 0250 0750 0375 0750 0250 0000 %0429 U16 004685 004488 -03911 0625 0250 0875 0375 0750 0125 0000 %0430 U17 004669 004528 -03966 0625 0250 1000 0375 0750 0000 0000 %0431 U18 004939 000671 005670 0625 0375 0000 0375 0625 1000 0000 %0432 V10 005084 000835 003170 0625 0375 0125 0375 0625 0875 0000 %0433 V11 005182 001076 001626 0625 0375 0250 0375 0625 0750 0000 %0434 V12 005259 001423 000372 0625 0375 0375 0375 0625 0625 0000 %0435 V13 005339 001877 -00847 0625 0375 0500 0375 0625 0500 0000 %0436 V14 005397 002418 -02023 0625 0375 0625 0375 0625 0375 0000 %0437 V15 005446 002908 -02935 0625 0375 0750 0375 0625 0250 0000 %0438 V16 005472 003235 -03447 0625 0375 0875 0375 0625 0125 0000 %0439 V17 005452 003275 -03514 0625 0375 1000 0375 0625 0000 0000 %0440 V18 005740 -00516 006745 0625 0500 0000 0375 0500 1000 0000 %0441 W10 005871 -00415 004167 0625 0500 0125 0375 0500 0875 0000 %0442 W11 005967 -00219 002564 0625 0500 0250 0375 0500 0750 0000 %0443 W12 006041 000098 001283 0625 0500 0375 0375 0500 0625 0000 %0444 W13 006132 000502 000007 0625 0500 0500 0375 0500 0500 0000 %0445 W14 006199 001021 -01236 0625 0500 0625 0375 0500 0375 0000 %0446 W15 006245 001532 -02271 0625 0500 0750 0375 0500 0250 0000 %0447 W16 006262 001863 -02874 0625 0500 0875 0375 0500 0125 0000 %0448 W17 006262 001918 -02957 0625 0500 1000 0375 0500 0000 0000 %0449 W18 006367 -01463 007610 0625 0625 0000 0375 0375 1000 0000 %0450 X10 006523 -01435 005074 0625 0625 0125 0375 0375 0875 0000 %0451 X11 006652 -01311 003474 0625 0625 0250 0375 0375 0750 0000 %0452 X12 006709 -01072 002174 0625 0625 0375 0375 0375 0625 0000 %0453 X13 006796 -00684 000814 0625 0625 0500 0375 0375 0500 0000 %0454 X14 006877 -00215 -00488 0625 0625 0625 0375 0375 0375 0000 %0455 X15 006949 000278 -01603 0625 0625 0750 0375 0375 0250 0000 %0456 X16 006983 000622 -02281 0625 0625 0875 0375 0375 0125 0000 %0457 X17 006976 000676 -02374 0625 0625 1000 0375 0375 0000 0000 %0458 X18 006895 -02212 008366 0625 0750 0000 0375 0250 1000 0000 %0459 Y10 007085 -02324 005876 0625 0750 0125 0375 0250 0875 0000 %0460 Y11 007221 -02284 004278 0625 0750 0250 0375 0250 0750 0000 %0461 Y12 007306 -02103 002985 0625 0750 0375 0375 0250 0625 0000 %0462 Y13 007401 -01816 001646 0625 0750 0500 0375 0250 0500 0000 %0463 Y14 007525 -01403 000271 0625 0750 0625 0375 0250 0375 0000 %0464 Y15 007602 -00944 -00897 0625 0750 0750 0375 0250 0250 0000 %0465 Y16 007625 -00589 -01669 0625 0750 0875 0375 0250 0125 0000 %0466 Y17 007629 -00527 -01771 0625 0750 1000 0375 0250 0000 0000 %0467 Y18 007285 -02734 008925 0625 0875 0000 0375 0125 1000 0000 %0468 Z10 007524 -03013 006528 0625 0875 0125 0375 0125 0875 0000 %0469 Z11 007683 -03053 004972 0625 0875 0250 0375 0125 0750 0000 %0470 Z12 007789 -02932 003666 0625 0875 0375 0375 0125 0625 0000 %0471 Z13 007926 -02728 002336 0625 0875 0500 0375 0125 0500 0000 %0472 Z14 008040 -02384 000935 0625 0875 0625 0375 0125 0375 0000 %0473 Z15 008134 -01988 -00279 0625 0875 0750 0375 0125 0250 0000 %0474 Z16 008197 -01683 -01066 0625 0875 0875 0375 0125 0125 0000 %0475 Z17 008190 -01615 -01190 0625 0875 1000 0375 0125 0000 0000 %0476 Z18 007297 -02750 008957 0625 1000 0000 0375 0000 1000 0000 %0477 a10 007557 -03023 006582 0625 1000 0125 0375 0000 0875 0000 %0478 a11 007713 -03071 004998 0625 1000 0250 0375 0000 0750 0000 %0479 a12 007813 -02959 003701 0625 1000 0375 0375 0000 0625 0000 %0480 a13 007941 -02753 002359 0625 1000 0500 0375 0000 0500 0000 %0481 a14 008066 -02436 000990 0625 1000 0625 0375 0000 0375 0000 %0482 a15 008157 -02029 -00244 0625 1000 0750 0375 0000 0250 0000 %0483 a16 008226 -01729 -01034 0625 1000 0875 0375 0000 0125 0000 %0484 a17 008230 -01667 -01151 0625 1000 1000 0375 0000 0000 0000 %0485 a18 003105 005249 003655 0750 0000 0000 0250 1000 1000 0000 %0486 A19 003149 005543 001422 0750 0000 0125 0250 1000 0875 0000 %0487 A20 003181 005817 000089 0750 0000 0250 0250 1000 0750 0000 %0488 A21 003224 006136 -01024 0750 0000 0375 0250 1000 0625 0000 %0489 A22 003260 006497 -02041 0750 0000 0500 0250 1000 0500 0000 %0490 A23 003299 006868 -02898 0750 0000 0625 0250 1000 0375 0000 %0491 A24 003340 007160 -03460 0750 0000 0750 0250 1000 0250 0000 %0492 A25 003339 007309 -03731 0750 0000 0875 0250 1000 0125 0000 %0493 A26 003347 007330 -03751 0750 0000 1000 0250 1000 0000 0000 %0494 A27 003839 004406 004471 0750 0125 0000 0250 0875 1000 0000 %0495 B19 003918 004632 002063 0750 0125 0125 0250 0875 0875 0000 %0496 B20 003987 004869 000630 0750 0125 0250 0250 0875 0750 0000 %0497 B21 004031 005183 -00573 0750 0125 0375 0250 0875 0625 0000 %0498 B22 004085 005552 -01698 0750 0125 0500 0250 0875 0500 0000 %0499 B23 004123 005976 -02697 0750 0125 0625 0250 0875 0375 0000 %0500 B24 004158 006317 -03387 0750 0125 0750 0250 0875 0250 0000 %0501 B25 004147 006545 -03768 0750 0125 0875 0250 0875 0125 0000 %0502 B26 004130 006591 -03806 0750 0125 1000 0250 0875 0000 0000 %0503 B27 004622 003265 005428 0750 0250 0000 0250 0750 1000 0000 %0504 C19 004726 003408 002933 0750 0250 0125 0250 0750 0875 0000 %0505 C20 004803 003613 001391 0750 0250 0250 0250 0750 0750 0000 %0506 C21 004866 003892 000162 0750 0250 0375 0250 0750 0625 0000 %0507 C22 004915 004252 -01031 0750 0250 0500 0250 0750 0500 0000 %0508 C23 004958 004709 -02159 0750 0250 0625 0250 0750 0375 0000 %0509 C24 004982 005133 -03006 0750 0250 0750 0250 0750 0250 0000 %0510 C25 004981 005392 -03487 0750 0250 0875 0250 0750 0125 0000 %0511 C26 004969 005455 -03548 0750 0250 1000 0250 0750 0000 0000 %0512 C27 005405 002071 006430 0750 0375 0000 0250 0625 1000 0000 %0513 D19 005517 002180 003867 0750 0375 0125 0250 0625 0875 0000 %0514 D20 005582 002370 002246 0750 0375 0250 0250 0625 0750 0000 %0515 D21 005607 002641 000975 0750 0375 0375 0250 0625 0625 0000 %0516 D22 005667 003007 -00305 0750 0375 0500 0250 0625 0500 0000 %0517 D23 005710 003464 -01536 0750 0375 0625 0250 0625 0375 0000 %0518 D24 005740 003906 -02487 0750 0375 0750 0250 0625 0250 0000 %0519 D25 005730 004239 -03081 0750 0375 0875 0250 0625 0125 0000 %0520 D26 005726 004303 -03158 0750 0375 1000 0250 0625 0000 0000 %0521 D27 006198 000898 007460 0750 0500 0000 0250 0500 1000 0000 %0522 E19 006293 000952 004873 0750 0500 0125 0250 0500 0875 0000 %0523 E20 006355 001118 003212 0750 0500 0250 0250 0500 0750 0000 %0524 E21 006401 001360 001884 0750 0500 0375 0250 0500 0625 0000 %0525 E22 006460 001676 000573 0750 0500 0500 0250 0500 0500 0000 %0526 E23 006498 002119 -00736 0750 0500 0625 0250 0500 0375 0000 %0527 E24 006536 002593 -01836 0750 0500 0750 0250 0500 0250 0000 %0528 E25 006545 002928 -02529 0750 0500 0875 0250 0500 0125 0000 %0529 E26 006532 002997 -02629 0750 0500 1000 0250 0500 0000 0000 %0530 E27 006888 -00094 008404 0750 0625 0000 0250 0375 1000 0000 %0531 F19 006975 -00101 005808 0750 0625 0125 0250 0375 0875 0000 %0532 F20 007057 -00010 004150 0750 0625 0250 0250 0375 0750 0000 %0533 F21 007115 000160 002844 0750 0625 0375 0250 0375 0625 0000 %0534 F22 007166 000455 001465 0750 0625 0500 0250 0375 0500 0000 %0535 F23 007223 000852 000068 0750 0625 0625 0250 0375 0375 0000 %0536 F24 007275 001298 -01114 0750 0625 0750 0250 0375 0250 0000 %0537 F25 007277 001672 -01925 0750 0625 0875 0250 0375 0125 0000 %0538 F26 007261 001750 -02046 0750 0625 1000 0250 0375 0000 0000 %0539 F27 007462 -00913 009207 0750 0750 0000 0250 0250 1000 0000 %0540 G19 007607 -01051 006656 0750 0750 0125 0250 0250 0875 0000 %0541 G20 007698 -01048 005037 0750 0750 0250 0250 0250 0750 0000 %0542 G21 007775 -00927 003706 0750 0750 0375 0250 0250 0625 0000 %0543 G22 007851 -00712 002329 0750 0750 0500 0250 0250 0500 0000 %0544 G23 007944 -00408 000930 0750 0750 0625 0250 0250 0375 0000 %0545 G24 008002 -00001 -00326 0750 0750 0750 0250 0250 0250 0000 %0546 G25 008007 000371 -01231 0750 0750 0875 0250 0250 0125 0000 %0547 G26 008010 000443 -01368 0750 0750 1000 0250 0250 0000 0000 %0548 G27 007918 -01549 009890 0750 0875 0000 0250 0125 1000 0000 %0549 H19 008136 -01860 007451 0750 0875 0125 0250 0125 0875 0000 %0550 H20 008268 -01934 005816 0750 0875 0250 0250 0125 0750 0000 %0551 H21 008364 -01898 004523 0750 0875 0375 0250 0125 0625 0000 %0552 H22 008465 -01767 003157 0750 0875 0500 0250 0125 0500 0000 %0553 H23 008560 -01563 001768 0750 0875 0625 0250 0125 0375 0000 %0554 H24 008659 -01228 000449 0750 0875 0750 0250 0125 0250 0000 %0555 H25 008709 -00924 -00475 0750 0875 0875 0250 0125 0125 0000 %0556 H26 008715 -00875 -00613 0750 0875 1000 0250 0125 0000 0000 %0557 H27 007948 -01556 009946 0750 1000 0000 0250 0000 1000 0000 %0558 I19 008169 -01886 007490 0750 1000 0125 0250 0000 0875 0000 %0559 I20 008290 -01970 005879 0750 1000 0250 0250 0000 0750 0000 %0560 I21 008402 -01934 004559 0750 1000 0375 0250 0000 0625 0000 %0561 I22 008492 -01812 003201 0750 1000 0500 0250 0000 0500 0000 %0562 I23 008603 -01613 001813 0750 1000 0625 0250 0000 0375 0000 %0563 I24 008701 -01286 000499 0750 1000 0750 0250 0000 0250 0000 %0564 I25 008748 -00985 -00428 0750 1000 0875 0250 0000 0125 0000 %0565 I26 008759 -00937 -00569 0750 1000 1000 0250 0000 0000 0000 %0566 I27 003441 005886 004135 0875 0000 0000 0125 1000 1000 0000 %0567 J19 003487 006175 001818 0875 0000 0125 0125 1000 0875 0000 %0568 J20 003526 006443 000464 0875 0000 0250 0125 1000 0750 0000 %0569 J21 003559 006729 -00629 0875 0000 0375 0125 1000 0625 0000 %0570 J22 003600 007055 -01643 0875 0000 0500 0125 1000 0500 0000 %0571 J23 003630 007382 -02470 0875 0000 0625 0125 1000 0375 0000 %0572 J24 003669 007637 -03020 0875 0000 0750 0125 1000 0250 0000 %0573 J25 003664 007777 -03302 0875 0000 0875 0125 1000 0125 0000 %0574 J26 003670 007795 -03326 0875 0000 1000 0125 1000 0000 0000 %0575 J27 004206 005123 005002 0875 0125 0000 0125 0875 1000 0000 %0576 K19 004284 005345 002522 0875 0125 0125 0125 0875 0875 0000 %0577 K20 004340 005584 001052 0875 0125 0250 0125 0875 0750 0000 %0578 K21 004394 005863 -00140 0875 0125 0375 0125 0875 0625 0000 %0579 K22 004429 006194 -01261 0875 0125 0500 0125 0875 0500 0000 %0580 K23 004470 006575 -02239 0875 0125 0625 0125 0875 0375 0000 %0581 K24 004503 006890 -02935 0875 0125 0750 0125 0875 0250 0000 %0582 K25 004484 007104 -03337 0875 0125 0875 0125 0875 0125 0000 %0583 K26 004489 007137 -03374 0875 0125 1000 0125 0875 0000 0000 %0584 K27 004989 004086 005957 0875 0250 0000 0125 0750 1000 0000 %0585 L19 005090 004253 003376 0875 0250 0125 0125 0750 0875 0000 %0586 L20 005158 004446 001805 0875 0250 0250 0125 0750 0750 0000 %0587 L21 005221 004690 000587 0875 0250 0375 0125 0750 0625 0000 %0588 L22 005260 005025 -00593 0875 0250 0500 0125 0750 0500 0000 %0589 L23 005289 005424 -01702 0875 0250 0625 0125 0750 0375 0000 %0590 L24 005322 005793 -02553 0875 0250 0750 0125 0750 0250 0000 %0591 L25 005321 006050 -03060 0875 0250 0875 0125 0750 0125 0000 %0592 L26 005304 006107 -03127 0875 0250 1000 0125 0750 0000 0000 %0593 L27 005767 002999 006983 0875 0375 0000 0125 0625 1000 0000 %0594 M19 005855 003123 004329 0875 0375 0125 0125 0625 0875 0000 %0595 M20 005917 003308 002693 0875 0375 0250 0125 0625 0750 0000 %0596 M21 005955 003550 001406 0875 0375 0375 0125 0625 0625 0000 %0597 M22 005985 003875 000117 0875 0375 0500 0125 0625 0500 0000 %0598 M23 006031 004271 -01066 0875 0375 0625 0125 0625 0375 0000 %0599 M24 006064 004688 -02059 0875 0375 0750 0125 0625 0250 0000 %0600 M25 006057 004987 -02672 0875 0375 0875 0125 0625 0125 0000 %0601 M26 006031 005063 -02758 0875 0375 1000 0125 0625 0000 0000 %0602 M27 006583 001865 008077 0875 0500 0000 0125 0500 1000 0000 %0603 N19 006656 001944 005353 0875 0500 0125 0125 0500 0875 0000 %0604 N20 006706 002097 003663 0875 0500 0250 0125 0500 0750 0000 %0605 N21 006754 002299 002333 0875 0500 0375 0125 0500 0625 0000 %0606 N22 006801 002581 001014 0875 0500 0500 0125 0500 0500 0000 %0607 N23 006844 002967 -00270 0875 0500 0625 0125 0500 0375 0000 %0608 N24 006871 003406 -01403 0875 0500 0750 0125 0500 0250 0000 %0609 N25 006872 003735 -02126 0875 0500 0875 0125 0500 0125 0000 %0610 N26 006851 003800 -02227 0875 0500 1000 0125 0500 0000 0000 %0611 N27 007271 000921 009002 0875 0625 0000 0125 0375 1000 0000 %0612 O19 007367 000920 006277 0875 0625 0125 0125 0375 0875 0000 %0613 O20 007434 000999 004573 0875 0625 0250 0125 0375 0750 0000 %0614 O21 007493 001143 003259 0875 0625 0375 0125 0375 0625 0000 %0615 O22 007536 001404 001874 0875 0625 0500 0125 0375 0500 0000 %0616 O23 007593 001740 000546 0875 0625 0625 0125 0375 0375 0000 %0617 O24 007630 002151 -00671 0875 0625 0750 0125 0375 0250 0000 %0618 O25 007644 002498 -01495 0875 0625 0875 0125 0375 0125 0000 %0619 O26 007631 002568 -01618 0875 0625 1000 0125 0375 0000 0000 %0620 O27 007876 000118 009861 0875 0750 0000 0125 0250 1000 0000 %0621 P19 008013 -00016 007172 0875 0750 0125 0125 0250 0875 0000 %0622 P20 008116 -00023 005488 0875 0750 0250 0125 0250 0750 0000 %0623 P21 008182 000072 004166 0875 0750 0375 0125 0250 0625 0000 %0624 P22 008249 000262 002788 0875 0750 0500 0125 0250 0500 0000 %0625 P23 008328 000509 001437 0875 0750 0625 0125 0250 0375 0000 %0626 P24 008379 000876 000153 0875 0750 0750 0125 0250 0250 0000 %0627 P25 008402 001214 -00760 0875 0750 0875 0125 0250 0125 0000 %0628 P26 008383 001298 -00911 0875 0750 1000 0125 0250 0000 0000 %0629 P27 008357 -00533 010567 0875 0875 0000 0125 0125 1000 0000 %0630 Q19 008581 -00823 008004 0875 0875 0125 0125 0125 0875 0000 %0631 Q20 008706 -00904 006353 0875 0875 0250 0125 0125 0750 0000 %0632 Q21 008796 -00884 005043 0875 0875 0375 0125 0125 0625 0000 %0633 Q22 008884 -00782 003688 0875 0875 0500 0125 0125 0500 0000 %0634 Q23 008988 -00621 002323 0875 0875 0625 0125 0125 0375 0000 %0635 Q24 009059 -00331 001001 0875 0875 0750 0125 0125 0250 0000 %0636 Q25 009116 -00057 000035 0875 0875 0875 0125 0125 0125 0000 %0637 Q26 009104 000005 -00119 0875 0875 1000 0125 0125 0000 0000 %0638 Q27 008381 -00561 010612 0875 1000 0000 0125 0000 1000 0000 %0639 R19 008611 -00863 008054 0875 1000 0125 0125 0000 0875 0000 %0640 R20 008738 -00950 006401 0875 1000 0250 0125 0000 0750 0000 %0641 R21 008821 -00941 005129 0875 1000 0375 0125 0000 0625 0000 %0642 R22 008928 -00841 003743 0875 1000 0500 0125 0000 0500 0000 %0643 R23 009029 -00690 002382 0875 1000 0625 0125 0000 0375 0000 %0644 R24 009107 -00393 001048 0875 1000 0750 0125 0000 0250 0000 %0645 R25 009163 -00130 000088 0875 1000 0875 0125 0000 0125 0000 %0646 R26 009157 -00073 -00068 0875 1000 1000 0125 0000 0000 0000 %0647 R27 003455 005944 004159 1000 0000 0000 0000 1000 1000 0000 %0648 S19 003508 006237 001795 1000 0000 0125 0000 1000 0875 0000 %0649 S20 003555 006510 000449 1000 0000 0250 0000 1000 0750 0000 %0650 S21 003589 006799 -00646 1000 0000 0375 0000 1000 0625 0000 %0651 S22 003630 007110 -01605 1000 0000 0500 0000 1000 0500 0000 %0652 S23 003666 007434 -02433 1000 0000 0625 0000 1000 0375 0000 %0653 S24 003690 007690 -02990 1000 0000 0750 0000 1000 0250 0000 %0654 S25 003695 007820 -03264 1000 0000 0875 0000 1000 0125 0000 %0655 S26 003694 007831 -03287 1000 0000 1000 0000 1000 0000 0000 %0656 S27 004230 005193 005043 1000 0125 0000 0000 0875 1000 0000 %0657 T19 004312 005434 002498 1000 0125 0125 0000 0875 0875 0000 %0658 T20 004372 005673 001032 1000 0125 0250 0000 0875 0750 0000 %0659 T21 004423 005948 -00159 1000 0125 0375 0000 0875 0625 0000 %0660 T22 004468 006281 -01243 1000 0125 0500 0000 0875 0500 0000 %0661 T23 004503 006651 -02215 1000 0125 0625 0000 0875 0375 0000 %0662 T24 004535 006956 -02914 1000 0125 0750 0000 0875 0250 0000 %0663 T25 004534 007156 -03293 1000 0125 0875 0000 0875 0125 0000 %0664 T26 004515 007191 -03336 1000 0125 1000 0000 0875 0000 0000 %0665 T27 005063 004116 006051 1000 0250 0000 0000 0750 1000 0000 %0666 U19 005158 004289 003382 1000 0250 0125 0000 0750 0875 0000 %0667 U20 005241 004483 001808 1000 0250 0250 0000 0750 0750 0000 %0668 U21 005285 004746 000576 1000 0250 0375 0000 0750 0625 0000 %0669 U22 005319 005094 -00609 1000 0250 0500 0000 0750 0500 0000 %0670 U23 005360 005473 -01683 1000 0250 0625 0000 0750 0375 0000 %0671 U24 005382 005837 -02533 1000 0250 0750 0000 0750 0250 0000 %0672 U25 005378 006089 -03015 1000 0250 0875 0000 0750 0125 0000 %0673 U26 005367 006144 -03076 1000 0250 1000 0000 0750 0000 0000 %0674 U27 005841 003038 007037 1000 0375 0000 0000 0625 1000 0000 %0675 V19 005930 003162 004311 1000 0375 0125 0000 0625 0875 0000 %0676 V20 005982 003362 002643 1000 0375 0250 0000 0625 0750 0000 %0677 V21 006027 003615 001346 1000 0375 0375 0000 0625 0625 0000 %0678 V22 006066 003943 000097 1000 0375 0500 0000 0625 0500 0000 %0679 V23 006097 004331 -01075 1000 0375 0625 0000 0625 0375 0000 %0680 V24 006126 004735 -02039 1000 0375 0750 0000 0625 0250 0000 %0681 V25 006109 005031 -02630 1000 0375 0875 0000 0625 0125 0000 %0682 V26 006113 005080 -02703 1000 0375 1000 0000 0625 0000 0000 %0683 V27 006646 001912 008125 1000 0500 0000 0000 0500 1000 0000 %0684 W19 006735 001990 005329 1000 0500 0125 0000 0500 0875 0000 %0685 W20 006786 002148 003618 1000 0500 0250 0000 0500 0750 0000 %0686 W21 006828 002350 002291 1000 0500 0375 0000 0500 0625 0000 %0687 W22 006879 002654 000998 1000 0500 0500 0000 0500 0500 0000 %0688 W23 006908 003033 -00274 1000 0500 0625 0000 0500 0375 0000 %0689 W24 006947 003458 -01380 1000 0500 0750 0000 0500 0250 0000 %0690 W25 006959 003779 -02071 1000 0500 0875 0000 0500 0125 0000 %0691 W26 006946 003833 -02166 1000 0500 1000 0000 0500 0000 0000 %0692 W27 007337 000981 009078 1000 0625 0000 0000 0375 1000 0000 %0693 X19 007423 000990 006267 1000 0625 0125 0000 0375 0875 0000 %0694 X20 007508 001063 004576 1000 0625 0250 0000 0375 0750 0000 %0695 X21 007567 001211 003244 1000 0625 0375 0000 0375 0625 0000 %0696 X22 007612 001485 001882 1000 0625 0500 0000 0375 0500 0000 %0697 X23 007669 001819 000547 1000 0625 0625 0000 0375 0375 0000 %0698 X24 007714 002224 -00646 1000 0625 0750 0000 0375 0250 0000 %0699 X25 007723 002554 -01445 1000 0625 0875 0000 0375 0125 0000 %0700 X26 007706 002625 -01563 1000 0625 1000 0000 0375 0000 0000 %0701 X27 007930 000188 009920 1000 0750 0000 0000 0250 1000 0000 %0702 Y19 008074 000063 007203 1000 0750 0125 0000 0250 0875 0000 %0703 Y20 008175 000066 005506 1000 0750 0250 0000 0250 0750 0000 %0704 Y21 008253 000154 004185 1000 0750 0375 0000 0250 0625 0000 %0705 Y22 008312 000348 002823 1000 0750 0500 0000 0250 0500 0000 %0706 Y23 008393 000601 001469 1000 0750 0625 0000 0250 0375 0000 %0707 Y24 008447 000969 000184 1000 0750 0750 0000 0250 0250 0000 %0708 Y25 008479 001289 -00713 1000 0750 0875 0000 0250 0125 0000 %0709 Y26 008475 001359 -00849 1000 0750 1000 0000 0250 0000 0000 %0710 Y27 008414 -00456 010642 1000 0875 0000 0000 0125 1000 0000 %0711 Z19 008645 -00748 008042 1000 0875 0125 0000 0125 0875 0000 %0712 Z20 008773 -00827 006380 1000 0875 0250 0000 0125 0750 0000 %0713 Z21 008861 -00813 005082 1000 0875 0375 0000 0125 0625 0000 %0714 Z22 008960 -00705 003726 1000 0875 0500 0000 0125 0500 0000 %0715 Z23 009062 -00523 002331 1000 0875 0625 0000 0125 0375 0000 %0716 Z24 009141 -00239 001024 1000 0875 0750 0000 0125 0250 0000 %0717 Z25 009197 000024 000092 1000 0875 0875 0000 0125 0125 0000 %0718 Z26 009191 000072 -00046 1000 0875 1000 0000 0125 0000 0000 %0719 Z27 008436 -00484 010687 1000 1000 0000 0000 0000 1000 0000 %0720 a19 008675 -00788 008103 1000 1000 0125 0000 0000 0875 0000 %0721 a20 008800 -00872 006457 1000 1000 0250 0000 0000 0750 0000 %0722 a21 008896 -00859 005137 1000 1000 0375 0000 0000 0625 0000 %0723 a22 008995 -00756 003759 1000 1000 0500 0000 0000 0500 0000 %0724 a23 009095 -00590 002404 1000 1000 0625 0000 0000 0375 0000 %0725 a24 009171 -00307 001082 1000 1000 0750 0000 0000 0250 0000 %0726 a25 009230 -00048 000142 1000 1000 0875 0000 0000 0125 0000 %0727 a26 009224 000000 000000 1000 1000 1000 0000 0000 0000 0000 %0728 a27 009302 -00013 000012 1000 1000 1000 0000 0000 0000 0000 %0729 b01 009252 -00094 -00037 0875 1000 1000 0125 0000 0000 0000 %0730 b02 008838 -00916 -00535 0750 1000 1000 0250 0000 0000 0000 %0731 b03 008254 -01688 -01152 0625 1000 1000 0375 0000 0000 0000 %0732 b04 007689 -02218 -01661 0500 1000 1000 0500 0000 0000 0000 %0733 b05 007186 -02565 -02057 0375 1000 1000 0625 0000 0000 0000 %0734 b06 006636 -02830 -02426 0250 1000 1000 0750 0000 0000 0000 %0735 b07 005978 -02997 -02789 0125 1000 1000 0875 0000 0000 0000 %0736 b08 005251 -02935 -03079 0000 1000 1000 1000 0000 0000 0000 %0737 b09 009263 000019 000088 1000 0875 0875 0000 0125 0125 0000 %0738 c01 009215 -00070 000043 0875 0875 0875 0125 0125 0125 0000 %0739 c02 008798 -00897 -00464 0750 0875 0875 0250 0125 0125 0000 %0740 c03 008218 -01683 -01079 0625 0875 0875 0375 0125 0125 0000 %0741 c04 007663 -02218 -01588 0500 0875 0875 0500 0125 0125 0000 %0742 c05 007156 -02581 -02003 0375 0875 0875 0625 0125 0125 0000 %0743 c06 006615 -02853 -02372 0250 0875 0875 0750 0125 0125 0000 %0744 c07 005965 -03025 -02730 0125 0875 0875 0875 0125 0125 0000 %0745 c08 005241 -02973 -03022 0000 0875 0875 1000 0125 0125 0000 %0746 c09 008544 000928 000137 1000 0750 0750 0000 0250 0250 0000 %0747 d01 008504 000825 000127 0875 0750 0750 0125 0250 0250 0000 %0748 d02 008106 -00005 -00370 0750 0750 0750 0250 0250 0250 0000 %0749 d03 007598 -00905 -00944 0625 0750 0750 0375 0250 0250 0000 %0750 d04 007103 -01593 -01423 0500 0750 0750 0500 0250 0250 0000 %0751 d05 006687 -02072 -01829 0375 0750 0750 0625 0250 0250 0000 %0752 d06 006208 -02481 -02182 0250 0750 0750 0750 0250 0250 0000 %0753 d07 005638 -02781 -02539 0125 0750 0750 0875 0250 0250 0000 %0754 d08 004986 -02863 -02803 0000 0750 0750 1000 0250 0250 0000 %0755 d09 007753 001802 000470 1000 0625 0625 0000 0375 0375 0000 %0756 e01 007712 001706 000467 0875 0625 0625 0125 0375 0375 0000 %0757 e02 007360 000807 000042 0750 0625 0625 0250 0375 0375 0000 %0758 e03 006865 -00197 -00517 0625 0625 0625 0375 0375 0375 0000 %0759 e04 006414 -00985 -01010 0500 0625 0625 0500 0375 0375 0000 %0760 e05 006048 -01584 -01417 0375 0625 0625 0625 0375 0375 0000 %0761 e06 005638 -02116 -01768 0250 0625 0625 0750 0375 0375 0000 %0762 e07 005116 -02549 -02115 0125 0625 0625 0875 0375 0375 0000 %0763 e08 004564 -02768 -02373 0000 0625 0625 1000 0375 0375 0000 %0764 e09 006947 002652 000908 1000 0500 0500 0000 0500 0500 0000 %0765 f01 006929 002532 000945 0875 0500 0500 0125 0500 0500 0000 %0766 f02 006576 001626 000528 0750 0500 0500 0250 0500 0500 0000 %0767 f03 006090 000523 -00001 0625 0500 0500 0375 0500 0500 0000 %0768 f04 005663 -00368 -00483 0500 0500 0500 0500 0500 0500 0000 %0769 f05 005320 -01070 -00886 0375 0500 0500 0625 0500 0500 0000 %0770 f06 004935 -01704 -01262 0250 0500 0500 0750 0500 0500 0000 %0771 f07 004479 -02242 -01634 0125 0500 0500 0875 0500 0500 0000 %0772 f08 003989 -02584 -01842 0000 0500 0500 1000 0500 0500 0000 %0773 f09 006101 003571 001345 1000 0375 0375 0000 0625 0625 0000 %0774 g01 006060 003478 001350 0875 0375 0375 0125 0625 0625 0000 %0775 g02 005724 002586 000962 0750 0375 0375 0250 0625 0625 0000 %0776 g03 005224 001453 000387 0625 0375 0375 0375 0625 0625 0000 %0777 g04 004793 000513 -00113 0500 0375 0375 0500 0625 0625 0000 %0778 g05 004448 -00270 -00534 0375 0375 0375 0625 0625 0625 0000 %0779 g06 004086 -00986 -00936 0250 0375 0375 0750 0625 0625 0000 %0780 g07 003671 -01595 -01305 0125 0375 0375 0875 0625 0625 0000 %0781 g08 003241 -01996 -01541 0000 0375 0375 1000 0625 0625 0000 %0782 g09 005281 004494 001730 1000 0250 0250 0000 0750 0750 0000 %0783 h01 005256 004398 001759 0875 0250 0250 0125 0750 0750 0000 %0784 h02 004893 003579 001358 0750 0250 0250 0250 0750 0750 0000 %0785 h03 004386 002456 000737 0625 0250 0250 0375 0750 0750 0000 %0786 h04 003939 001485 000202 0500 0250 0250 0500 0750 0750 0000 %0787 h05 003580 000654 -00289 0375 0250 0250 0625 0750 0750 0000 %0788 h06 003231 -00132 -00715 0250 0250 0250 0750 0750 0750 0000 %0789 h07 002845 -00805 -01079 0125 0250 0250 0875 0750 0750 0000 %0790 h08 002465 -01245 -01348 0000 0250 0250 1000 0750 0750 0000 %0791 h09 004393 005395 002475 1000 0125 0125 0000 0875 0875 0000 %0792 i01 004363 005330 002473 0875 0125 0125 0125 0875 0875 0000 %0793 i02 004012 004584 002056 0750 0125 0125 0250 0875 0875 0000 %0794 i03 003476 003491 001370 0625 0125 0125 0375 0875 0875 0000 %0795 i04 003011 002517 000732 0500 0125 0125 0500 0875 0875 0000 %0796 i05 002637 001626 000165 0375 0125 0125 0625 0875 0875 0000 %0797 i06 002279 000803 -00322 0250 0125 0125 0750 0875 0875 0000 %0798 i07 001933 000078 -00718 0125 0125 0125 0875 0875 0875 0000 %0799 i08 001619 -00457 -01004 0000 0125 0125 1000 0875 0875 0000 %0800 i09 003528 005970 004150 1000 0000 0000 0000 1000 1000 0000 %0801 j01 003506 005921 004146 0875 0000 0000 0125 1000 1000 0000 %0802 j02 003177 005272 003656 0750 0000 0000 0250 1000 1000 0000 %0803 j03 002656 004223 002843 0625 0000 0000 0375 1000 1000 0000 %0804 j04 002171 003214 002071 0500 0000 0000 0500 1000 1000 0000 %0805 j05 001767 002320 001407 0375 0000 0000 0625 1000 1000 0000 %0806 j06 001549 001343 000807 0250 0000 0000 0750 1000 1000 0000 %0807 j07 001080 000638 000350 0125 0000 0000 0875 1000 1000 0000 %0808 j08 000826 -00007 -00035 0000 0000 0000 1000 1000 1000 0000 %0809 j09 009256 000010 -00008 1000 1000 1000 0000 0000 0000 0000 %0810 b10 009174 000001 -00112 0875 0875 1000 0125 0125 0000 0000 %0811 b11 008170 000340 -01246 0750 0750 1000 0250 0250 0000 0000 %0812 b12 006991 000698 -02380 0625 0625 1000 0375 0375 0000 0000 %0813 b13 005872 001207 -03301 0500 0500 1000 0500 0500 0000 0000 %0814 b14 004749 001993 -04128 0375 0375 1000 0625 0625 0000 0000 %0815 b15 003612 002867 -04875 0250 0250 1000 0750 0750 0000 0000 %0816 b16 002387 004040 -05512 0125 0125 1000 0875 0875 0000 0000 %0817 b17 001328 005124 -05710 0000 0000 1000 1000 1000 0000 0000 %0818 b18 009256 -00028 000105 1000 1000 0875 0000 0000 0125 0000 %0819 c10 009173 -00042 000011 0875 0875 0875 0125 0125 0125 0000 %0820 c11 008175 000275 -01136 0750 0750 0875 0250 0250 0125 0000 %0821 c12 007004 000639 -02281 0625 0625 0875 0375 0375 0125 0000 %0822 c13 005877 001143 -03228 0500 0500 0875 0500 0500 0125 0000 %0823 c14 004746 001933 -04072 0375 0375 0875 0625 0625 0125 0000 %0824 c15 003620 002812 -04827 0250 0250 0875 0750 0750 0125 0000 %0825 c16 002409 003976 -05468 0125 0125 0875 0875 0875 0125 0000 %0826 c17 001331 005082 -05677 0000 0000 0875 1000 1000 0125 0000 %0827 c18 009199 -00276 000975 1000 1000 0750 0000 0000 0250 0000 %0828 d10 009121 -00296 000886 0875 0875 0750 0125 0125 0250 0000 %0829 d11 008131 -00028 -00357 0750 0750 0750 0250 0250 0250 0000 %0830 d12 006978 000284 -01599 0625 0625 0750 0375 0375 0250 0000 %0831 d13 005862 000772 -02663 0500 0500 0750 0500 0500 0250 0000 %0832 d14 004738 001574 -03616 0375 0375 0750 0625 0625 0250 0000 %0833 d15 003605 002492 -04474 0250 0250 0750 0750 0750 0250 0000 %0834 d16 002383 003694 -05199 0125 0125 0750 0875 0875 0250 0000 %0835 d17 001302 004851 -05471 0000 0000 0750 1000 1000 0250 0000 %0836 d18 009115 -00551 002249 1000 1000 0625 0000 0000 0375 0000 %0837 e10 009040 -00580 002156 0875 0875 0625 0125 0125 0375 0000 %0838 e11 008052 -00426 000896 0750 0750 0625 0250 0250 0375 0000 %0839 e12 006905 -00204 -00493 0625 0625 0625 0375 0375 0375 0000 %0840 e13 005766 000209 -01693 0500 0500 0625 0500 0500 0375 0000 %0841 e14 004647 001020 -02814 0375 0375 0625 0625 0625 0375 0000 %0842 e15 003540 001919 -03796 0250 0250 0625 0750 0750 0375 0000 %0843 e16 002308 003153 -04639 0125 0125 0625 0875 0875 0375 0000 %0844 e17 001238 004358 -05017 0000 0000 0625 1000 1000 0375 0000 %0845 e18 009016 -00750 003656 1000 1000 0500 0000 0000 0500 0000 %0846 f10 008941 -00787 003571 0875 0875 0500 0125 0125 0500 0000 %0847 f11 007956 -00755 002284 0750 0750 0500 0250 0250 0500 0000 %0848 f12 006811 -00685 000827 0625 0625 0500 0375 0375 0500 0000 %0849 f13 005683 -00391 -00462 0500 0500 0500 0500 0500 0500 0000 %0850 f14 004559 000322 -01697 0375 0375 0500 0625 0625 0500 0000 %0851 f15 003416 001158 -02803 0250 0250 0500 0750 0750 0500 0000 %0852 f16 002206 002365 -03801 0125 0125 0500 0875 0875 0500 0000 %0853 f17 001144 003608 -04315 0000 0000 0500 1000 1000 0500 0000 %0854 f18 008914 -00845 005010 1000 1000 0375 0000 0000 0625 0000 %0855 g10 008847 -00887 004926 0875 0875 0375 0125 0125 0625 0000 %0856 g11 007882 -00970 003671 0750 0750 0375 0250 0250 0625 0000 %0857 g12 006711 -01057 002188 0625 0625 0375 0375 0375 0625 0000 %0858 g13 005574 -00882 000801 0500 0500 0375 0500 0500 0625 0000 %0859 g14 004434 -00282 -00522 0375 0375 0375 0625 0625 0625 0000 %0860 g15 003303 000443 -01734 0250 0250 0375 0750 0750 0625 0000 %0861 g16 002091 001583 -02879 0125 0125 0375 0875 0875 0625 0000 %0862 g17 001049 002834 -03557 0000 0000 0375 1000 1000 0625 0000 %0863 g18 008813 -00859 006348 1000 1000 0250 0000 0000 0750 0000 %0864 h10 008745 -00904 006263 0875 0875 0250 0125 0125 0750 0000 %0865 h11 007783 -01065 005001 0750 0750 0250 0250 0250 0750 0000 %0866 h12 006628 -01292 003480 0625 0625 0250 0375 0375 0750 0000 %0867 h13 005500 -01232 002050 0500 0500 0250 0500 0500 0750 0000 %0868 h14 004344 -00746 000636 0375 0375 0250 0625 0625 0750 0000 %0869 h15 003210 -00144 -00680 0250 0250 0250 0750 0750 0750 0000 %0870 h16 002002 000855 -01925 0125 0125 0250 0875 0875 0750 0000 %0871 h17 000967 002065 -02758 0000 0000 0250 1000 1000 0750 0000 %0872 h18 008668 -00777 008050 1000 1000 0125 0000 0000 0875 0000 %0873 i10 008614 -00824 007956 0875 0875 0125 0125 0125 0875 0000 %0874 i11 007684 -01085 006705 0750 0750 0125 0250 0250 0875 0000 %0875 i12 006543 -01453 005157 0625 0625 0125 0375 0375 0875 0000 %0876 i13 005398 -01504 003628 0500 0500 0125 0500 0500 0875 0000 %0877 i14 004249 -01187 002129 0375 0375 0125 0625 0625 0875 0000 %0878 i15 003086 -00758 000665 0250 0250 0125 0750 0750 0875 0000 %0879 i16 001893 000090 -00715 0125 0125 0125 0875 0875 0875 0000 %0880 i17 000876 001166 -01735 0000 0000 0125 1000 1000 0875 0000 %0881 i18 008437 -00462 010622 1000 1000 0000 0000 0000 1000 0000 %0882 j10 008386 -00507 010544 0875 0875 0000 0125 0125 1000 0000 %0883 j11 007533 -00885 009309 0750 0750 0000 0250 0250 1000 0000 %0884 j12 006400 -01427 007665 0625 0625 0000 0375 0375 1000 0000 %0885 j13 005248 -01639 006043 0500 0500 0000 0500 0500 1000 0000 %0886 j14 004079 -01484 004412 0375 0375 0000 0625 0625 1000 0000 %0887 j15 002913 -01250 002791 0250 0250 0000 0750 0750 1000 0000 %0888 j16 001749 -00699 001230 0125 0125 0000 0875 0875 1000 0000 %0889 j17 000795 000004 -00011 0000 0000 0000 1000 1000 1000 0000 %0890 j18 009247 000002 -00004 1000 1000 1000 0000 0000 0000 0000 %0891 b19 009209 000077 -00053 1000 0875 1000 0000 0125 0000 0000 %0892 b20 008525 001277 -00804 1000 0750 1000 0000 0250 0000 0000 %0893 b21 007774 002530 -01521 1000 0625 1000 0000 0375 0000 0000 %0894 b22 007001 003766 -02144 1000 0500 1000 0000 0500 0000 0000 %0895 b23 006171 005020 -02686 1000 0375 1000 0000 0625 0000 0000 %0896 b24 005421 006085 -03067 1000 0250 1000 0000 0750 0000 0000 %0897 b25 004561 007169 -03339 1000 0125 1000 0000 0875 0000 0000 %0898 b26 003714 007843 -03282 1000 0000 1000 0000 1000 0000 0000 %0899 b27 009204 -00129 000084 0875 1000 0875 0125 0000 0125 0000 %0900 c19 009163 -00058 000039 0875 0875 0875 0125 0125 0125 0000 %0901 c20 008499 001122 -00712 0875 0750 0875 0125 0250 0125 0000 %0902 c21 007747 002378 -01439 0875 0625 0875 0125 0375 0125 0000 %0903 c22 006978 003633 -02081 0875 0500 0875 0125 0500 0125 0000 %0904 c23 006157 004894 -02641 0875 0375 0875 0125 0625 0125 0000 %0905 c24 005387 005998 -03050 0875 0250 0875 0125 0750 0125 0000 %0906 c25 004534 007091 -03327 0875 0125 0875 0125 0875 0125 0000 %0907 c26 003691 007781 -03287 0875 0000 0875 0125 1000 0125 0000 %0908 c27 008735 -01245 000459 0750 1000 0750 0250 0000 0250 0000 %0909 d19 008692 -01178 000395 0750 0875 0750 0250 0125 0250 0000 %0910 d20 008087 -00022 -00327 0750 0750 0750 0250 0250 0250 0000 %0911 d21 007374 001233 -01091 0750 0625 0750 0250 0375 0250 0000 %0912 d22 006627 002527 -01813 0750 0500 0750 0250 0500 0250 0000 %0913 d23 005821 003870 -02465 0750 0375 0750 0250 0625 0250 0000 %0914 d24 005046 005099 -02991 0750 0250 0750 0250 0750 0250 0000 %0915 d25 004182 006338 -03385 0750 0125 0750 0250 0875 0250 0000 %0916 d26 003356 007180 -03436 0750 0000 0750 0250 1000 0250 0000 %0917 d27 008073 -02459 001005 0625 1000 0625 0375 0000 0375 0000 %0918 e19 008044 -02403 000964 0625 0875 0625 0375 0125 0375 0000 %0919 e20 007481 -01386 000291 0625 0750 0625 0375 0250 0375 0000 %0920 e21 006819 -00164 -00509 0625 0625 0625 0375 0375 0375 0000 %0921 e22 006107 001089 -01267 0625 0500 0625 0375 0500 0375 0000 %0922 e23 005304 002510 -02055 0625 0375 0625 0375 0625 0375 0000 %0923 e24 004513 003863 -02709 0625 0250 0625 0375 0750 0375 0000 %0924 e25 003655 005255 -03256 0625 0125 0625 0375 0875 0375 0000 %0925 e26 002875 006256 -03456 0625 0000 0625 0375 1000 0375 0000 %0926 e27 007359 -03513 001699 0500 1000 0500 0500 0000 0500 0000 %0927 f19 007328 -03484 001672 0500 0875 0500 0500 0125 0500 0000 %0928 f20 006853 -02621 001050 0500 0750 0500 0500 0250 0500 0000 %0929 f21 006261 -01565 000329 0500 0625 0500 0500 0375 0500 0000 %0930 f22 005584 -00352 -00456 0500 0500 0500 0500 0500 0500 0000 %0931 f23 004793 001099 -01338 0500 0375 0500 0500 0625 0500 0000 %0932 f24 004014 002534 -02118 0500 0250 0500 0500 0750 0500 0000 %0933 f25 003145 004025 -02805 0500 0125 0500 0500 0875 0500 0000 %0934 f26 002385 005146 -03154 0500 0000 0500 0500 1000 0500 0000 %0935 f27 006717 -04350 002348 0375 1000 0375 0625 0000 0625 0000 %0936 g19 006686 -04334 002340 0375 0875 0375 0625 0125 0625 0000 %0937 g20 006294 -03652 001831 0375 0750 0375 0625 0250 0625 0000 %0938 g21 005759 -02717 001164 0375 0625 0375 0625 0375 0625 0000 %0939 g22 005125 -01605 000385 0375 0500 0375 0625 0500 0625 0000 %0940 g23 004343 -00209 -00542 0375 0375 0375 0625 0625 0625 0000 %0941 g24 003546 001242 -01403 0375 0250 0375 0625 0750 0625 0000 %0942 g25 002690 002776 -02190 0375 0125 0375 0625 0875 0625 0000 %0943 g26 001940 004015 -02705 0375 0000 0375 0625 1000 0625 0000 %0944 g27 006017 -05125 002895 0250 1000 0250 0750 0000 0750 0000 %0945 h19 006009 -05099 002861 0250 0875 0250 0750 0125 0750 0000 %0946 h20 005689 -04552 002445 0250 0750 0250 0750 0250 0750 0000 %0947 h21 005223 -03788 001850 0250 0625 0250 0750 0375 0750 0000 %0948 h22 004632 -02786 001107 0250 0500 0250 0750 0500 0750 0000 %0949 h23 003881 -01441 000160 0250 0375 0250 0750 0625 0750 0000 %0950 h24 003115 -00028 -00728 0250 0250 0250 0750 0750 0750 0000 %0951 h25 002254 001546 -01623 0250 0125 0250 0750 0875 0750 0000 %0952 h26 001503 002871 -02220 0250 0000 0250 0750 1000 0750 0000 %0953 h27 005221 -05840 003548 0125 1000 0125 0875 0000 0875 0000 %0954 i19 005211 -05827 003525 0125 0875 0125 0875 0125 0875 0000 %0955 i20 004980 -05446 003222 0125 0750 0125 0875 0250 0875 0000 %0956 i21 004605 -04845 002707 0125 0625 0125 0875 0375 0875 0000 %0957 i22 004072 -03961 002027 0125 0500 0125 0875 0500 0875 0000 %0958 i23 003387 -02763 001138 0125 0375 0125 0875 0625 0875 0000 %0959 i24 002650 -01413 000218 0125 0250 0125 0875 0750 0875 0000 %0960 i25 001835 000160 -00690 0125 0125 0125 0875 0875 0875 0000 %0961 i26 001129 001579 -01417 0125 0000 0125 0875 1000 0875 0000 %0962 i27 004333 -06259 004657 0000 1000 0000 1000 0000 1000 0000 %0963 j19 004326 -06240 004659 0000 0875 0000 1000 0125 1000 0000 %0964 j20 004181 -06009 004482 0000 0750 0000 1000 0250 1000 0000 %0965 j21 003897 -05583 004085 0000 0625 0000 1000 0375 1000 0000 %0966 j22 003451 -04892 003510 0000 0500 0000 1000 0500 1000 0000 %0967 j23 002840 -03900 002682 0000 0375 0000 1000 0625 1000 0000 %0968 j24 002169 -02708 001781 0000 0250 0000 1000 0750 1000 0000 %0969 j25 001432 -01294 000824 0000 0125 0000 1000 0875 1000 0000 %0970 j26 000815 000002 000047 0000 0000 0000 1000 1000 1000 0000 %0971 j27 ] def /LAB*FaG0100 24 array def /LAB*FaG0100 [ %BEG GE29(7)_22_REM.TXT, Separation cmyn62*, D65, adapted %100 x LAB*a %#1000 x (r g b c m y 0) %nr. pos %z003455 005944 004159 %#1000 0000 0000 0000 1000 1000 0000 %0648 S19 %O1 0 %z008436 -00484 010687 %#1000 1000 0000 0000 0000 1000 0000 %0720 a19 %Y1 1 %z004369 -06270 004687 %#0000 1000 0000 1000 0000 1000 0000 %0072 I01 %L1 2 %z005222 -02908 -03087 %#0000 1000 1000 1000 0000 0000 0000 %0080 I09 %C1 3 %z001340 005118 -05715 %#0000 0000 1000 1000 1000 0000 0000 %0008 A09 %V1 4 %z003694 007831 -03287 %#1000 0000 1000 0000 1000 0000 0000 %0656 S27 %M1 5 %z000823 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0000 A01 %N1 6 %z009224 000000 000000 %#1000 1000 1000 0000 0000 0000 0000 %0728 a27 %W1 7 %$ 003528 005970 004150 %#1000 0000 0000 0000 1000 1000 0000 %0801 j01 %O2 0 008437 -00462 010622 %#1000 1000 0000 0000 0000 1000 0000 %0882 j10 %Y2 1 004333 -06259 004657 %#0000 1000 0000 1000 0000 1000 0000 %0963 j19 %L2 2 005251 -02935 -03079 %#0000 1000 1000 1000 0000 0000 0000 %0737 b09 %C2 3 001328 005124 -05710 %#0000 0000 1000 1000 1000 0000 0000 %0818 b18 %V2 4 003714 007843 -03282 %#1000 0000 1000 0000 1000 0000 0000 %0899 b27 %M2 5 000812 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0809 j09 %N2 6 009268 000000 000000 %#1000 1000 1000 0000 0000 0000 0000 %0729 b01 %W2 7 %$ ] def /FileDataG1Na (HE99_FRS09_92_D65_00%_G1) def /LUT_LABG1 [ %GE790-7A, Page 7 /24, %BEG GE69_22.TXT, Separation olv*, cf1=0.70, D65; cf1=1.00; nt=0.18; nx=1.0, adapted %BEG GE69_22.TXT, Separation olv*, cf1=0.70, D65, adapted %100 x LAB*a 1000 x (r g b c m y 0) %nr. pos 001990 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0000 A01 002014 000425 -00411 0000 0000 0125 1000 1000 0875 0000 %0001 A02 002029 000875 -00890 0000 0000 0250 1000 1000 0750 0000 %0002 A03 002056 001358 -01388 0000 0000 0375 1000 1000 0625 0000 %0003 A04 002103 001864 -01876 0000 0000 0500 1000 1000 0500 0000 %0004 A05 002151 002376 -02456 0000 0000 0625 1000 1000 0375 0000 %0005 A06 002199 002840 -02967 0000 0000 0750 1000 1000 0250 0000 %0006 A07 002264 003279 -03458 0000 0000 0875 1000 1000 0125 0000 %0007 A08 002312 003716 -03918 0000 0000 1000 1000 1000 0000 0000 %0008 A09 002318 -00590 000431 0000 0125 0000 1000 0875 1000 0000 %0009 B01 002368 -00291 -00206 0000 0125 0125 1000 0875 0875 0000 %0010 B02 002524 -00077 -00601 0000 0125 0250 1000 0875 0750 0000 %0011 B03 002595 000239 -01065 0000 0125 0375 1000 0875 0625 0000 %0012 B04 002729 000550 -01488 0000 0125 0500 1000 0875 0500 0000 %0013 B05 002777 001077 -02087 0000 0125 0625 1000 0875 0375 0000 %0014 B06 002897 001403 -02549 0000 0125 0750 1000 0875 0250 0000 %0015 B07 002927 001867 -03040 0000 0125 0875 1000 0875 0125 0000 %0016 B08 002988 002242 -03479 0000 0125 1000 1000 0875 0000 0000 %0017 B09 002666 -01168 000831 0000 0250 0000 1000 0750 1000 0000 %0018 C01 002736 -00777 000000 0000 0250 0125 1000 0750 0875 0000 %0019 C02 002786 -00598 -00430 0000 0250 0250 1000 0750 0750 0000 %0020 C03 002901 -00310 -00885 0000 0250 0375 1000 0750 0625 0000 %0021 C04 003029 -00043 -01350 0000 0250 0500 1000 0750 0500 0000 %0022 C05 003147 000277 -01849 0000 0250 0625 1000 0750 0375 0000 %0023 C06 003285 000561 -02278 0000 0250 0750 1000 0750 0250 0000 %0024 C07 003381 000928 -02741 0000 0250 0875 1000 0750 0125 0000 %0025 C08 003472 001267 -03173 0000 0250 1000 1000 0750 0000 0000 %0026 C09 002985 -01742 001306 0000 0375 0000 1000 0625 1000 0000 %0027 D01 003085 -01312 000289 0000 0375 0125 1000 0625 0875 0000 %0028 D02 003122 -01030 -00265 0000 0375 0250 1000 0625 0750 0000 %0029 D03 003159 -00825 -00753 0000 0375 0375 1000 0625 0625 0000 %0030 D04 003295 -00540 -01202 0000 0375 0500 1000 0625 0500 0000 %0031 D05 003440 -00318 -01648 0000 0375 0625 1000 0625 0375 0000 %0032 D06 003562 000015 -02147 0000 0375 0750 1000 0625 0250 0000 %0033 D07 003674 000284 -02553 0000 0375 0875 1000 0625 0125 0000 %0034 D08 003809 000532 -02970 0000 0375 1000 1000 0625 0000 0000 %0035 D09 003286 -02317 001696 0000 0500 0000 1000 0500 1000 0000 %0036 E01 003376 -01795 000580 0000 0500 0125 1000 0500 0875 0000 %0037 E02 003446 -01484 -00092 0000 0500 0250 1000 0500 0750 0000 %0038 E03 003481 -01294 -00549 0000 0500 0375 1000 0500 0625 0000 %0039 E04 003542 -01032 -01079 0000 0500 0500 1000 0500 0500 0000 %0040 E05 003671 -00787 -01500 0000 0500 0625 1000 0500 0375 0000 %0041 E06 003816 -00486 -01979 0000 0500 0750 1000 0500 0250 0000 %0042 E07 003943 -00293 -02363 0000 0500 0875 1000 0500 0125 0000 %0043 E08 004076 -00054 -02775 0000 0500 1000 1000 0500 0000 0000 %0044 E09 003620 -02886 002108 0000 0625 0000 1000 0375 1000 0000 %0045 F01 003705 -02341 000904 0000 0625 0125 1000 0375 0875 0000 %0046 F02 003777 -01981 000156 0000 0625 0250 1000 0375 0750 0000 %0047 F03 003839 -01798 -00285 0000 0625 0375 1000 0375 0625 0000 %0048 F04 003890 -01547 -00804 0000 0625 0500 1000 0375 0500 0000 %0049 F05 003958 -01350 -01332 0000 0625 0625 1000 0375 0375 0000 %0050 F06 004082 -00997 -01800 0000 0625 0750 1000 0375 0250 0000 %0051 F07 004236 -00846 -02177 0000 0625 0875 1000 0375 0125 0000 %0052 F08 004357 -00585 -02607 0000 0625 1000 1000 0375 0000 0000 %0053 F09 003929 -03416 002519 0000 0750 0000 1000 0250 1000 0000 %0054 G01 004039 -02888 001275 0000 0750 0125 1000 0250 0875 0000 %0055 G02 004125 -02530 000474 0000 0750 0250 1000 0250 0750 0000 %0056 G03 004169 -02311 -00070 0000 0750 0375 1000 0250 0625 0000 %0057 G04 004231 -02002 -00640 0000 0750 0500 1000 0250 0500 0000 %0058 G05 004284 -01822 -01091 0000 0750 0625 1000 0250 0375 0000 %0059 G06 004343 -01572 -01585 0000 0750 0750 1000 0250 0250 0000 %0060 G07 004449 -01301 -02019 0000 0750 0875 1000 0250 0125 0000 %0061 G08 004595 -01049 -02469 0000 0750 1000 1000 0250 0000 0000 %0062 G09 004234 -03966 002946 0000 0875 0000 1000 0125 1000 0000 %0063 H01 004329 -03381 001606 0000 0875 0125 1000 0125 0875 0000 %0064 H02 004432 -03032 000757 0000 0875 0250 1000 0125 0750 0000 %0065 H03 004458 -02728 000118 0000 0875 0375 1000 0125 0625 0000 %0066 H04 004552 -02477 -00431 0000 0875 0500 1000 0125 0500 0000 %0067 H05 004597 -02259 -00915 0000 0875 0625 1000 0125 0375 0000 %0068 H06 004674 -02077 -01326 0000 0875 0750 1000 0125 0250 0000 %0069 H07 004736 -01844 -01848 0000 0875 0875 1000 0125 0125 0000 %0070 H08 004829 -01547 -02283 0000 0875 1000 1000 0125 0000 0000 %0071 H09 004560 -04562 003331 0000 1000 0000 1000 0000 1000 0000 %0072 I01 004667 -03968 001998 0000 1000 0125 1000 0000 0875 0000 %0073 I02 004771 -03508 001032 0000 1000 0250 1000 0000 0750 0000 %0074 I03 004816 -03228 000386 0000 1000 0375 1000 0000 0625 0000 %0075 I04 004887 -02937 -00224 0000 1000 0500 1000 0000 0500 0000 %0076 I05 004949 -02753 -00707 0000 1000 0625 1000 0000 0375 0000 %0077 I06 005010 -02552 -01117 0000 1000 0750 1000 0000 0250 0000 %0078 I07 005059 -02358 -01565 0000 1000 0875 1000 0000 0125 0000 %0079 I08 005087 -02085 -02102 0000 1000 1000 1000 0000 0000 0000 %0080 I09 002274 000487 000417 0125 0000 0000 0875 1000 1000 0000 %0081 J01 002235 000701 -00216 0125 0000 0125 0875 1000 0875 0000 %0082 J02 002337 001137 -00649 0125 0000 0250 0875 1000 0750 0000 %0083 J03 002353 001583 -01160 0125 0000 0375 0875 1000 0625 0000 %0084 J04 002395 002070 -01688 0125 0000 0500 0875 1000 0500 0000 %0085 J05 002411 002572 -02278 0125 0000 0625 0875 1000 0375 0000 %0086 J06 002483 003038 -02803 0125 0000 0750 0875 1000 0250 0000 %0087 J07 002527 003482 -03286 0125 0000 0875 0875 1000 0125 0000 %0088 J08 002554 003923 -03773 0125 0000 1000 0875 1000 0000 0000 %0089 J09 002677 -00021 000951 0125 0125 0000 0875 0875 1000 0000 %0090 K01 002744 -00029 000103 0125 0125 0125 0875 0875 0875 0000 %0091 K02 002803 000434 -00336 0125 0125 0250 0875 0875 0750 0000 %0092 K03 002828 000898 -00894 0125 0125 0375 0875 0875 0625 0000 %0093 K04 002868 001339 -01380 0125 0125 0500 0875 0875 0500 0000 %0094 K05 002916 001875 -01996 0125 0125 0625 0875 0875 0375 0000 %0095 K06 002964 002322 -02498 0125 0125 0750 0875 0875 0250 0000 %0096 K07 003035 002746 -02952 0125 0125 0875 0875 0875 0125 0000 %0097 K08 003054 003190 -03463 0125 0125 1000 0875 0875 0000 0000 %0098 K09 002923 -00664 001312 0125 0250 0000 0875 0750 1000 0000 %0099 L01 002994 -00511 000529 0125 0250 0125 0875 0750 0875 0000 %0100 L02 003100 -00264 -00148 0125 0250 0250 0875 0750 0750 0000 %0101 L03 003236 000017 -00643 0125 0250 0375 0875 0750 0625 0000 %0102 L04 003338 000321 -01052 0125 0250 0500 0875 0750 0500 0000 %0103 L05 003462 000657 -01575 0125 0250 0625 0875 0750 0375 0000 %0104 L06 003554 001066 -02078 0125 0250 0750 0875 0750 0250 0000 %0105 L07 003656 001390 -02511 0125 0250 0875 0875 0750 0125 0000 %0106 L08 003717 001776 -02994 0125 0250 1000 0875 0750 0000 0000 %0107 L09 003245 -01249 001736 0125 0375 0000 0875 0625 1000 0000 %0108 M01 003326 -01127 000962 0125 0375 0125 0875 0625 0875 0000 %0109 M02 003427 -00706 000015 0125 0375 0250 0875 0625 0750 0000 %0110 M03 003476 -00531 -00465 0125 0375 0375 0875 0625 0625 0000 %0111 M04 003604 -00271 -00889 0125 0375 0500 0875 0625 0500 0000 %0112 M05 003773 -00018 -01351 0125 0375 0625 0875 0625 0375 0000 %0113 M06 003898 000290 -01820 0125 0375 0750 0875 0625 0250 0000 %0114 M07 004026 000564 -02221 0125 0375 0875 0875 0625 0125 0000 %0115 M08 004108 000914 -02715 0125 0375 1000 0875 0625 0000 0000 %0116 M09 003514 -01788 002134 0125 0500 0000 0875 0500 1000 0000 %0117 N01 003638 -01628 001328 0125 0500 0125 0875 0500 0875 0000 %0118 N02 003760 -01192 000308 0125 0500 0250 0875 0500 0750 0000 %0119 N03 003782 -00973 -00241 0125 0500 0375 0875 0500 0625 0000 %0120 N04 003831 -00708 -00750 0125 0500 0500 0875 0500 0500 0000 %0121 N05 003982 -00473 -01176 0125 0500 0625 0875 0500 0375 0000 %0122 N06 004145 -00250 -01621 0125 0500 0750 0875 0500 0250 0000 %0123 N07 004332 -00068 -02011 0125 0500 0875 0875 0500 0125 0000 %0124 N08 004438 000239 -02482 0125 0500 1000 0875 0500 0000 0000 %0125 N09 003839 -02328 002571 0125 0625 0000 0875 0375 1000 0000 %0126 O01 003964 -02239 001772 0125 0625 0125 0875 0375 0875 0000 %0127 O02 004079 -01702 000631 0125 0625 0250 0875 0375 0750 0000 %0128 O03 004129 -01511 000061 0125 0625 0375 0875 0375 0625 0000 %0129 O04 004187 -01221 -00530 0125 0625 0500 0875 0375 0500 0000 %0130 O05 004269 -01058 -01008 0125 0625 0625 0875 0375 0375 0000 %0131 O06 004408 -00723 -01481 0125 0625 0750 0875 0375 0250 0000 %0132 O07 004581 -00591 -01824 0125 0625 0875 0875 0375 0125 0000 %0133 O08 004707 -00300 -02288 0125 0625 1000 0875 0375 0000 0000 %0134 O09 004192 -02922 002983 0125 0750 0000 0875 0250 1000 0000 %0135 P01 004314 -02799 002214 0125 0750 0125 0875 0250 0875 0000 %0136 P02 004420 -02212 000915 0125 0750 0250 0875 0250 0750 0000 %0137 P03 004498 -01946 000244 0125 0750 0375 0875 0250 0625 0000 %0138 P04 004580 -01756 -00313 0125 0750 0500 0875 0250 0500 0000 %0139 P05 004608 -01515 -00798 0125 0750 0625 0875 0250 0375 0000 %0140 P06 004680 -01273 -01293 0125 0750 0750 0875 0250 0250 0000 %0141 P07 004812 -01006 -01679 0125 0750 0875 0875 0250 0125 0000 %0142 P08 004954 -00787 -02121 0125 0750 1000 0875 0250 0000 0000 %0143 P09 004532 -03493 003427 0125 0875 0000 0875 0125 1000 0000 %0144 Q01 004635 -03344 002589 0125 0875 0125 0875 0125 0875 0000 %0145 Q02 004788 -02755 001266 0125 0875 0250 0875 0125 0750 0000 %0146 Q03 004866 -02427 000534 0125 0875 0375 0875 0125 0625 0000 %0147 Q04 004924 -02162 -00066 0125 0875 0500 0875 0125 0500 0000 %0148 Q05 004985 -01991 -00596 0125 0875 0625 0875 0125 0375 0000 %0149 Q06 005043 -01769 -01021 0125 0875 0750 0875 0125 0250 0000 %0150 Q07 005100 -01594 -01498 0125 0875 0875 0875 0125 0125 0000 %0151 Q08 005213 -01275 -01944 0125 0875 1000 0875 0125 0000 0000 %0152 Q09 004858 -04071 003836 0125 1000 0000 0875 0000 1000 0000 %0153 R01 004950 -03899 003006 0125 1000 0125 0875 0000 0875 0000 %0154 R02 005105 -03285 001640 0125 1000 0250 0875 0000 0750 0000 %0155 R03 005192 -02907 000774 0125 1000 0375 0875 0000 0625 0000 %0156 R04 005289 -02670 000191 0125 1000 0500 0875 0000 0500 0000 %0157 R05 005341 -02409 -00376 0125 1000 0625 0875 0000 0375 0000 %0158 R06 005408 -02217 -00817 0125 1000 0750 0875 0000 0250 0000 %0159 R07 005404 -02048 -01281 0125 1000 0875 0875 0000 0125 0000 %0160 R08 005465 -01827 -01764 0125 1000 1000 0875 0000 0000 0000 %0161 R09 002513 001068 000831 0250 0000 0000 0750 1000 1000 0000 %0162 S01 002494 001245 000270 0250 0000 0125 0750 1000 0875 0000 %0163 S02 002562 001398 -00434 0250 0000 0250 0750 1000 0750 0000 %0164 S03 002564 001821 -00975 0250 0000 0375 0750 1000 0625 0000 %0165 S04 002601 002270 -01477 0250 0000 0500 0750 1000 0500 0000 %0166 S05 002640 002720 -02021 0250 0000 0625 0750 1000 0375 0000 %0167 S06 002663 003244 -02613 0250 0000 0750 0750 1000 0250 0000 %0168 S07 002728 003652 -03082 0250 0000 0875 0750 1000 0125 0000 %0169 S08 002760 004106 -03568 0250 0000 1000 0750 1000 0000 0000 %0170 S09 002862 000618 001256 0250 0125 0000 0750 0875 1000 0000 %0171 T01 003023 000538 000533 0250 0125 0125 0750 0875 0875 0000 %0172 T02 003050 000699 -00120 0250 0125 0250 0750 0875 0750 0000 %0173 T03 003052 001118 -00700 0250 0125 0375 0750 0875 0625 0000 %0174 T04 003088 001501 -01123 0250 0125 0500 0750 0875 0500 0000 %0175 T05 003137 002028 -01724 0250 0125 0625 0750 0875 0375 0000 %0176 T06 003176 002487 -02249 0250 0125 0750 0750 0875 0250 0000 %0177 T07 003226 002936 -02751 0250 0125 0875 0750 0875 0125 0000 %0178 T08 003282 003368 -03231 0250 0125 1000 0750 0875 0000 0000 %0179 T09 003407 -00117 002008 0250 0250 0000 0750 0750 1000 0000 %0180 U01 003437 -00027 001105 0250 0250 0125 0750 0750 0875 0000 %0181 U02 003506 000029 000183 0250 0250 0250 0750 0750 0750 0000 %0182 U03 003531 000464 -00395 0250 0250 0375 0750 0750 0625 0000 %0183 U04 003575 000874 -00845 0250 0250 0500 0750 0750 0500 0000 %0184 U05 003611 001363 -01416 0250 0250 0625 0750 0750 0375 0000 %0185 U06 003656 001839 -01995 0250 0250 0750 0750 0750 0250 0000 %0186 U07 003730 002281 -02442 0250 0250 0875 0750 0750 0125 0000 %0187 U08 003777 002694 -02943 0250 0250 1000 0750 0750 0000 0000 %0188 U09 003616 -00777 002290 0250 0375 0000 0750 0625 1000 0000 %0189 V01 003712 -00669 001432 0250 0375 0125 0750 0625 0875 0000 %0190 V02 003830 -00536 000553 0250 0375 0250 0750 0625 0750 0000 %0191 V03 003876 -00253 -00163 0250 0375 0375 0750 0625 0625 0000 %0192 V04 004016 -00004 -00584 0250 0375 0500 0750 0625 0500 0000 %0193 V05 004143 000235 -01044 0250 0375 0625 0750 0625 0375 0000 %0194 V06 004264 000622 -01547 0250 0375 0750 0750 0625 0250 0000 %0195 V07 004327 000967 -01987 0250 0375 0875 0750 0625 0125 0000 %0196 V08 004425 001316 -02484 0250 0375 1000 0750 0625 0000 0000 %0197 V09 003932 -01285 002626 0250 0500 0000 0750 0500 1000 0000 %0198 W01 004039 -01220 001883 0250 0500 0125 0750 0500 0875 0000 %0199 W02 004159 -01117 001064 0250 0500 0250 0750 0500 0750 0000 %0200 W03 004224 -00756 000139 0250 0500 0375 0750 0500 0625 0000 %0201 W04 004274 -00505 -00425 0250 0500 0500 0750 0500 0500 0000 %0202 W05 004451 -00307 -00877 0250 0500 0625 0750 0500 0375 0000 %0203 W06 004610 -00048 -01333 0250 0500 0750 0750 0500 0250 0000 %0204 W07 004723 000200 -01723 0250 0500 0875 0750 0500 0125 0000 %0205 W08 004844 000474 -02189 0250 0500 1000 0750 0500 0000 0000 %0206 W09 004318 -01970 003164 0250 0625 0000 0750 0375 1000 0000 %0207 X01 004397 -01795 002288 0250 0625 0125 0750 0375 0875 0000 %0208 X02 004537 -01721 001488 0250 0625 0250 0750 0375 0750 0000 %0209 X03 004600 -01315 000432 0250 0625 0375 0750 0375 0625 0000 %0210 X04 004683 -01072 -00139 0250 0625 0500 0750 0375 0500 0000 %0211 X05 004720 -00816 -00702 0250 0625 0625 0750 0375 0375 0000 %0212 X06 004885 -00583 -01130 0250 0625 0750 0750 0375 0250 0000 %0213 X07 005015 -00376 -01520 0250 0625 0875 0750 0375 0125 0000 %0214 X08 005149 -00072 -02005 0250 0625 1000 0750 0375 0000 0000 %0215 X09 004646 -02503 003576 0250 0750 0000 0750 0250 1000 0000 %0216 Y01 004735 -02343 002777 0250 0750 0125 0750 0250 0875 0000 %0217 Y02 004842 -02248 001932 0250 0750 0250 0750 0250 0750 0000 %0218 Y03 004929 -01762 000663 0250 0750 0375 0750 0250 0625 0000 %0219 Y04 005021 -01499 000029 0250 0750 0500 0750 0250 0500 0000 %0220 Y05 005085 -01313 -00475 0250 0750 0625 0750 0250 0375 0000 %0221 Y06 005136 -01071 -00932 0250 0750 0750 0750 0250 0250 0000 %0222 Y07 005250 -00793 -01390 0250 0750 0875 0750 0250 0125 0000 %0223 Y08 005420 -00613 -01798 0250 0750 1000 0750 0250 0000 0000 %0224 Y09 004946 -03065 004007 0250 0875 0000 0750 0125 1000 0000 %0225 Z01 005046 -02933 003203 0250 0875 0125 0750 0125 0875 0000 %0226 Z02 005169 -02818 002363 0250 0875 0250 0750 0125 0750 0000 %0227 Z03 005267 -02307 001057 0250 0875 0375 0750 0125 0625 0000 %0228 Z04 005347 -02001 000292 0250 0875 0500 0750 0125 0500 0000 %0229 Z05 005405 -01806 -00245 0250 0875 0625 0750 0125 0375 0000 %0230 Z06 005474 -01578 -00687 0250 0875 0750 0750 0125 0250 0000 %0231 Z07 005521 -01391 -01162 0250 0875 0875 0750 0125 0125 0000 %0232 Z08 005627 -01059 -01673 0250 0875 1000 0750 0125 0000 0000 %0233 Z09 005246 -03631 004428 0250 1000 0000 0750 0000 1000 0000 %0234 a01 005352 -03447 003601 0250 1000 0125 0750 0000 0875 0000 %0235 a02 005466 -03345 002761 0250 1000 0250 0750 0000 0750 0000 %0236 a03 005562 -02818 001393 0250 1000 0375 0750 0000 0625 0000 %0237 a04 005673 -02462 000505 0250 1000 0500 0750 0000 0500 0000 %0238 a05 005739 -02226 -00073 0250 1000 0625 0750 0000 0375 0000 %0239 a06 005794 -02000 -00533 0250 1000 0750 0750 0000 0250 0000 %0240 a07 005818 -01826 -01000 0250 1000 0875 0750 0000 0125 0000 %0241 a08 005857 -01553 -01541 0250 1000 1000 0750 0000 0000 0000 %0242 a09 002594 001585 001069 0375 0000 0000 0625 1000 1000 0000 %0243 A10 002620 001724 000550 0375 0000 0125 0625 1000 0875 0000 %0244 A11 002665 001876 -00058 0375 0000 0250 0625 1000 0750 0000 %0245 A12 002658 002114 -00823 0375 0000 0375 0625 1000 0625 0000 %0246 A13 002649 002555 -01344 0375 0000 0500 0625 1000 0500 0000 %0247 A14 002681 003017 -01847 0375 0000 0625 0625 1000 0375 0000 %0248 A15 002748 003470 -02404 0375 0000 0750 0625 1000 0250 0000 %0249 A16 002802 003968 -02874 0375 0000 0875 0625 1000 0125 0000 %0250 A17 002860 004357 -03346 0375 0000 1000 0625 1000 0000 0000 %0251 A18 003029 001089 001618 0375 0125 0000 0625 0875 1000 0000 %0252 B10 003150 001053 000797 0375 0125 0125 0625 0875 0875 0000 %0253 B11 003176 001175 000227 0375 0125 0250 0625 0875 0750 0000 %0254 B12 003180 001394 -00537 0375 0125 0375 0625 0875 0625 0000 %0255 B13 003172 001852 -01038 0375 0125 0500 0625 0875 0500 0000 %0256 B14 003223 002347 -01583 0375 0125 0625 0625 0875 0375 0000 %0257 B15 003274 002781 -02105 0375 0125 0750 0625 0875 0250 0000 %0258 B16 003321 003278 -02609 0375 0125 0875 0625 0875 0125 0000 %0259 B17 003377 003686 -03059 0375 0125 1000 0625 0875 0000 0000 %0260 B18 003421 000644 002054 0375 0250 0000 0625 0750 1000 0000 %0261 C10 003538 000584 001263 0375 0250 0125 0625 0750 0875 0000 %0262 C11 003691 000551 000448 0375 0250 0250 0625 0750 0750 0000 %0263 C12 003682 000708 -00233 0375 0250 0375 0625 0750 0625 0000 %0264 C13 003710 001179 -00735 0375 0250 0500 0625 0750 0500 0000 %0265 C14 003754 001655 -01299 0375 0250 0625 0625 0750 0375 0000 %0266 C15 003803 002137 -01823 0375 0250 0750 0625 0750 0250 0000 %0267 C16 003858 002611 -02316 0375 0250 0875 0625 0750 0125 0000 %0268 C17 003906 003021 -02753 0375 0250 1000 0625 0750 0000 0000 %0269 C18 004027 -00137 002791 0375 0375 0000 0625 0625 1000 0000 %0270 D10 004097 -00044 001911 0375 0375 0125 0625 0625 0875 0000 %0271 D11 004135 -00038 001035 0375 0375 0250 0625 0625 0750 0000 %0272 D12 004177 -00020 000098 0375 0375 0375 0625 0625 0625 0000 %0273 D13 004237 000486 -00496 0375 0375 0500 0625 0625 0500 0000 %0274 D14 004290 000994 -01050 0375 0375 0625 0625 0625 0375 0000 %0275 D15 004348 001439 -01560 0375 0375 0750 0625 0625 0250 0000 %0276 D16 004397 001886 -01956 0375 0375 0875 0625 0625 0125 0000 %0277 D17 004415 002319 -02471 0375 0375 1000 0625 0625 0000 0000 %0278 D18 004211 -00837 003059 0375 0500 0000 0625 0500 1000 0000 %0279 E10 004311 -00765 002213 0375 0500 0125 0625 0500 0875 0000 %0280 E11 004420 -00732 001423 0375 0500 0250 0625 0500 0750 0000 %0281 E12 004517 -00584 000486 0375 0500 0375 0625 0500 0625 0000 %0282 E13 004594 -00232 -00241 0375 0500 0500 0625 0500 0500 0000 %0283 E14 004769 -00028 -00693 0375 0500 0625 0625 0500 0375 0000 %0284 E15 004877 000345 -01184 0375 0500 0750 0625 0500 0250 0000 %0285 E16 004964 000633 -01589 0375 0500 0875 0625 0500 0125 0000 %0286 E17 005053 000998 -02063 0375 0500 1000 0625 0500 0000 0000 %0287 E18 004524 -01478 003453 0375 0625 0000 0625 0375 1000 0000 %0288 F10 004633 -01385 002598 0375 0625 0125 0625 0375 0875 0000 %0289 F11 004781 -01285 001798 0375 0625 0250 0625 0375 0750 0000 %0290 F12 004839 -01161 000889 0375 0625 0375 0625 0375 0625 0000 %0291 F13 004954 -00712 -00035 0375 0625 0500 0625 0375 0500 0000 %0292 F14 004998 -00510 -00537 0375 0625 0625 0625 0375 0375 0000 %0293 F15 005139 -00249 -00947 0375 0625 0750 0625 0375 0250 0000 %0294 F16 005294 -00001 -01389 0375 0625 0875 0625 0375 0125 0000 %0295 F17 005421 000283 -01826 0375 0625 1000 0625 0375 0000 0000 %0296 F18 004817 -02071 003823 0375 0750 0000 0625 0250 1000 0000 %0297 G10 004913 -01923 002997 0375 0750 0125 0625 0250 0875 0000 %0298 G11 005040 -01865 002232 0375 0750 0250 0625 0250 0750 0000 %0299 G12 005135 -01664 001292 0375 0750 0375 0625 0250 0625 0000 %0300 G13 005290 -01201 000196 0375 0750 0500 0625 0250 0500 0000 %0301 G14 005332 -00935 -00378 0375 0750 0625 0625 0250 0375 0000 %0302 G15 005395 -00786 -00785 0375 0750 0750 0625 0250 0250 0000 %0303 G16 005529 -00504 -01231 0375 0750 0875 0625 0250 0125 0000 %0304 G17 005674 -00268 -01637 0375 0750 1000 0625 0250 0000 0000 %0305 G18 005121 -02670 004243 0375 0875 0000 0625 0125 1000 0000 %0306 H10 005219 -02524 003431 0375 0875 0125 0625 0125 0875 0000 %0307 H11 005345 -02395 002634 0375 0875 0250 0625 0125 0750 0000 %0308 H12 005434 -02246 001682 0375 0875 0375 0625 0125 0625 0000 %0309 H13 005565 -01706 000486 0375 0875 0500 0625 0125 0500 0000 %0310 H14 005660 -01441 -00138 0375 0875 0625 0625 0125 0375 0000 %0311 H15 005698 -01230 -00583 0375 0875 0750 0625 0125 0250 0000 %0312 H16 005753 -01014 -01065 0375 0875 0875 0625 0125 0125 0000 %0313 H17 005890 -00716 -01527 0375 0875 1000 0625 0125 0000 0000 %0314 H18 005422 -03211 004653 0375 1000 0000 0625 0000 1000 0000 %0315 I10 005547 -03056 003853 0375 1000 0125 0625 0000 0875 0000 %0316 I11 005632 -02930 003059 0375 1000 0250 0625 0000 0750 0000 %0317 I12 005752 -02790 002139 0375 1000 0375 0625 0000 0625 0000 %0318 I13 005885 -02171 000757 0375 1000 0500 0625 0000 0500 0000 %0319 I14 005998 -01930 000153 0375 1000 0625 0625 0000 0375 0000 %0320 I15 006048 -01666 -00409 0375 1000 0750 0625 0000 0250 0000 %0321 I16 006066 -01481 -00844 0375 1000 0875 0625 0000 0125 0000 %0322 I17 006139 -01206 -01396 0375 1000 1000 0625 0000 0000 0000 %0323 I18 002956 002107 001482 0500 0000 0000 0500 1000 1000 0000 %0324 J10 002959 002303 000872 0500 0000 0125 0500 1000 0875 0000 %0325 J11 003009 002417 000303 0500 0000 0250 0500 1000 0750 0000 %0326 J12 002969 002647 -00359 0500 0000 0375 0500 1000 0625 0000 %0327 J13 003004 002795 -01073 0500 0000 0500 0500 1000 0500 0000 %0328 J14 002998 003277 -01645 0500 0000 0625 0500 1000 0375 0000 %0329 J15 003041 003749 -02187 0500 0000 0750 0500 1000 0250 0000 %0330 J16 003068 004184 -02671 0500 0000 0875 0500 1000 0125 0000 %0331 J17 003124 004587 -03152 0500 0000 1000 0500 1000 0000 0000 %0332 J18 003309 001671 001941 0500 0125 0000 0500 0875 1000 0000 %0333 K10 003468 001608 001171 0500 0125 0125 0500 0875 0875 0000 %0334 K11 003474 001756 000564 0500 0125 0250 0500 0875 0750 0000 %0335 K12 003447 001971 -00124 0500 0125 0375 0500 0875 0625 0000 %0336 K13 003481 002100 -00804 0500 0125 0500 0500 0875 0500 0000 %0337 K14 003485 002591 -01382 0500 0125 0625 0500 0875 0375 0000 %0338 K15 003541 003096 -01926 0500 0125 0750 0500 0875 0250 0000 %0339 K16 003582 003463 -02399 0500 0125 0875 0500 0875 0125 0000 %0340 K17 003622 003887 -02863 0500 0125 1000 0500 0875 0000 0000 %0341 K18 003643 001175 002442 0500 0250 0000 0500 0750 1000 0000 %0342 L10 003770 001152 001626 0500 0250 0125 0500 0750 0875 0000 %0343 L11 003938 001060 000838 0500 0250 0250 0500 0750 0750 0000 %0344 L12 003939 001259 000172 0500 0250 0375 0500 0750 0625 0000 %0345 L13 003941 001458 -00571 0500 0250 0500 0500 0750 0500 0000 %0346 L14 003974 001946 -01135 0500 0250 0625 0500 0750 0375 0000 %0347 L15 004008 002367 -01631 0500 0250 0750 0500 0750 0250 0000 %0348 L16 004022 002815 -02104 0500 0250 0875 0500 0750 0125 0000 %0349 L17 004062 003222 -02582 0500 0250 1000 0500 0750 0000 0000 %0350 L18 004067 000562 002974 0500 0375 0000 0500 0625 1000 0000 %0351 M10 004183 000626 002091 0500 0375 0125 0500 0625 0875 0000 %0352 M11 004296 000597 001306 0500 0375 0250 0500 0625 0750 0000 %0353 M12 004413 000571 000448 0500 0375 0375 0500 0625 0625 0000 %0354 M13 004424 000782 -00336 0500 0375 0500 0500 0625 0500 0000 %0355 M14 004493 001231 -00856 0500 0375 0625 0500 0625 0375 0000 %0356 M15 004516 001633 -01326 0500 0375 0750 0500 0625 0250 0000 %0357 M16 004513 002105 -01797 0500 0375 0875 0500 0625 0125 0000 %0358 M17 004545 002533 -02339 0500 0375 1000 0500 0625 0000 0000 %0359 M18 004681 -00204 003743 0500 0500 0000 0500 0500 1000 0000 %0360 N10 004732 -00165 002865 0500 0500 0125 0500 0500 0875 0000 %0361 N11 004790 -00114 001978 0500 0500 0250 0500 0500 0750 0000 %0362 N12 004872 -00098 001031 0500 0500 0375 0500 0500 0625 0000 %0363 N13 004961 000008 000026 0500 0500 0500 0500 0500 0500 0000 %0364 N14 005021 000470 -00522 0500 0500 0625 0500 0500 0375 0000 %0365 N15 005013 000941 -01014 0500 0500 0750 0500 0500 0250 0000 %0366 N16 005054 001337 -01473 0500 0500 0875 0500 0500 0125 0000 %0367 N17 005090 001779 -01953 0500 0500 1000 0500 0500 0000 0000 %0368 N18 004908 -00976 004039 0500 0625 0000 0500 0375 1000 0000 %0369 O10 004954 -00860 003097 0500 0625 0125 0500 0375 0875 0000 %0370 O11 005067 -00823 002333 0500 0625 0250 0500 0375 0750 0000 %0371 O12 005155 -00707 001358 0500 0625 0375 0500 0375 0625 0000 %0372 O13 005263 -00559 000425 0500 0625 0500 0500 0375 0500 0000 %0373 O14 005357 -00241 -00285 0500 0625 0625 0500 0375 0375 0000 %0374 O15 005458 000042 -00693 0500 0625 0750 0500 0375 0250 0000 %0375 O16 005582 000215 -01121 0500 0625 0875 0500 0375 0125 0000 %0376 O17 005667 000588 -01571 0500 0625 1000 0500 0375 0000 0000 %0377 O18 005172 -01572 004340 0500 0750 0000 0500 0250 1000 0000 %0378 P10 005250 -01448 003446 0500 0750 0125 0500 0250 0875 0000 %0379 P11 005356 -01385 002642 0500 0750 0250 0500 0250 0750 0000 %0380 P12 005470 -01269 001756 0500 0750 0375 0500 0250 0625 0000 %0381 P13 005627 -01134 000873 0500 0750 0500 0500 0250 0500 0000 %0382 P14 005711 -00712 -00068 0500 0750 0625 0500 0250 0375 0000 %0383 P15 005756 -00519 -00503 0500 0750 0750 0500 0250 0250 0000 %0384 P16 005871 -00277 -00934 0500 0750 0875 0500 0250 0125 0000 %0385 P17 005990 -00042 -01367 0500 0750 1000 0500 0250 0000 0000 %0386 P18 005470 -02216 004725 0500 0875 0000 0500 0125 1000 0000 %0387 Q10 005574 -02066 003897 0500 0875 0125 0500 0125 0875 0000 %0388 Q11 005667 -01965 003028 0500 0875 0250 0500 0125 0750 0000 %0389 Q12 005786 -01815 002191 0500 0875 0375 0500 0125 0625 0000 %0390 Q13 005921 -01672 001258 0500 0875 0500 0500 0125 0500 0000 %0391 Q14 006046 -01187 000216 0500 0875 0625 0500 0125 0375 0000 %0392 Q15 006097 -00989 -00306 0500 0875 0750 0500 0125 0250 0000 %0393 Q16 006110 -00767 -00794 0500 0875 0875 0500 0125 0125 0000 %0394 Q17 006232 -00522 -01235 0500 0875 1000 0500 0125 0000 0000 %0395 Q18 005749 -02746 005113 0500 1000 0000 0500 0000 1000 0000 %0396 R10 005855 -02585 004273 0500 1000 0125 0500 0000 0875 0000 %0397 R11 005989 -02496 003484 0500 1000 0250 0500 0000 0750 0000 %0398 R12 006061 -02332 002574 0500 1000 0375 0500 0000 0625 0000 %0399 R13 006184 -02148 001643 0500 1000 0500 0500 0000 0500 0000 %0400 R14 006346 -01634 000468 0500 1000 0625 0500 0000 0375 0000 %0401 R15 006364 -01426 -00095 0500 1000 0750 0500 0000 0250 0000 %0402 R16 006434 -01222 -00569 0500 1000 0875 0500 0000 0125 0000 %0403 R17 006481 -00993 -01069 0500 1000 1000 0500 0000 0000 0000 %0404 R18 003168 002653 001815 0625 0000 0000 0375 1000 1000 0000 %0405 S10 003153 002793 001253 0625 0000 0125 0375 1000 0875 0000 %0406 S11 003213 002936 000675 0625 0000 0250 0375 1000 0750 0000 %0407 S12 003192 003059 000064 0625 0000 0375 0375 1000 0625 0000 %0408 S13 003212 003268 -00644 0625 0000 0500 0375 1000 0500 0000 %0409 S14 003246 003514 -01418 0625 0000 0625 0375 1000 0375 0000 %0410 S15 003262 003943 -01983 0625 0000 0750 0375 1000 0250 0000 %0411 S16 003298 004357 -02444 0625 0000 0875 0375 1000 0125 0000 %0412 S17 003322 004804 -02937 0625 0000 1000 0375 1000 0000 0000 %0413 S18 003514 002122 002306 0625 0125 0000 0375 0875 1000 0000 %0414 T10 003669 002085 001520 0625 0125 0125 0375 0875 0875 0000 %0415 T11 003671 002263 000898 0625 0125 0250 0375 0875 0750 0000 %0416 T12 003660 002390 000313 0625 0125 0375 0375 0875 0625 0000 %0417 T13 003684 002556 -00315 0625 0125 0500 0375 0875 0500 0000 %0418 T14 003722 002860 -01180 0625 0125 0625 0375 0875 0375 0000 %0419 T15 003754 003277 -01712 0625 0125 0750 0375 0875 0250 0000 %0420 T16 003775 003685 -02166 0625 0125 0875 0375 0875 0125 0000 %0421 T17 003796 004099 -02642 0625 0125 1000 0375 0875 0000 0000 %0422 T18 003840 001681 002708 0625 0250 0000 0375 0750 1000 0000 %0423 U10 003993 001637 001981 0625 0250 0125 0375 0750 0875 0000 %0424 U11 004164 001536 001228 0625 0250 0250 0375 0750 0750 0000 %0425 U12 004141 001707 000559 0625 0250 0375 0375 0750 0625 0000 %0426 U13 004153 001857 000012 0625 0250 0500 0375 0750 0500 0000 %0427 U14 004213 002105 -00868 0625 0250 0625 0375 0750 0375 0000 %0428 U15 004215 002572 -01422 0625 0250 0750 0375 0750 0250 0000 %0429 U16 004244 002976 -01859 0625 0250 0875 0375 0750 0125 0000 %0430 U17 004276 003411 -02342 0625 0250 1000 0375 0750 0000 0000 %0431 U18 004249 001162 003327 0625 0375 0000 0375 0625 1000 0000 %0432 V10 004351 001122 002517 0625 0375 0125 0375 0625 0875 0000 %0433 V11 004494 001144 001681 0625 0375 0250 0375 0625 0750 0000 %0434 V12 004636 001005 000830 0625 0375 0375 0375 0625 0625 0000 %0435 V13 004652 001171 000193 0625 0375 0500 0375 0625 0500 0000 %0436 V14 004678 001403 -00582 0625 0375 0625 0375 0625 0375 0000 %0437 V15 004729 001856 -01109 0625 0375 0750 0375 0625 0250 0000 %0438 V16 004727 002300 -01574 0625 0375 0875 0375 0625 0125 0000 %0439 V17 004772 002690 -02056 0625 0375 1000 0375 0625 0000 0000 %0440 V18 004687 000577 003875 0625 0500 0000 0375 0500 1000 0000 %0441 W10 004790 000573 003106 0625 0500 0125 0375 0500 0875 0000 %0442 W11 004876 000580 002169 0625 0500 0250 0375 0500 0750 0000 %0443 W12 005008 000577 001253 0625 0500 0375 0375 0500 0625 0000 %0444 W13 005198 000443 000425 0625 0500 0500 0375 0500 0500 0000 %0445 W14 005214 000651 -00246 0625 0500 0625 0375 0500 0375 0000 %0446 W15 005226 001123 -00783 0625 0500 0750 0375 0500 0250 0000 %0447 W16 005248 001521 -01229 0625 0500 0875 0375 0500 0125 0000 %0448 W17 005312 002003 -01716 0625 0500 1000 0375 0500 0000 0000 %0449 W18 005379 -00314 004754 0625 0625 0000 0375 0375 1000 0000 %0450 X10 005407 -00233 003880 0625 0625 0125 0375 0375 0875 0000 %0451 X11 005524 -00254 003040 0625 0625 0250 0375 0375 0750 0000 %0452 X12 005535 -00152 001978 0625 0625 0375 0375 0375 0625 0000 %0453 X13 005642 -00104 001023 0625 0625 0500 0375 0375 0500 0000 %0454 X14 005724 -00050 000055 0625 0625 0625 0375 0375 0375 0000 %0455 X15 005739 000421 -00437 0625 0625 0750 0375 0375 0250 0000 %0456 X16 005787 000827 -00931 0625 0625 0875 0375 0375 0125 0000 %0457 X17 005798 001308 -01375 0625 0625 1000 0375 0375 0000 0000 %0458 X18 005587 -01016 005017 0625 0750 0000 0375 0250 1000 0000 %0459 Y10 005654 -00974 004149 0625 0750 0125 0375 0250 0875 0000 %0460 Y11 005746 -00912 003226 0625 0750 0250 0375 0250 0750 0000 %0461 Y12 005814 -00881 002333 0625 0750 0375 0375 0250 0625 0000 %0462 Y13 005944 -00782 001424 0625 0750 0500 0375 0250 0500 0000 %0463 Y14 006058 -00665 000486 0625 0750 0625 0375 0250 0375 0000 %0464 Y15 006133 -00319 -00188 0625 0750 0750 0375 0250 0250 0000 %0465 Y16 006238 -00072 -00626 0625 0750 0875 0375 0250 0125 0000 %0466 Y17 006346 000249 -01087 0625 0750 1000 0375 0250 0000 0000 %0467 Y18 005835 -01722 005368 0625 0875 0000 0375 0125 1000 0000 %0468 Z10 005909 -01603 004474 0625 0875 0125 0375 0125 0875 0000 %0469 Z11 005992 -01527 003558 0625 0875 0250 0375 0125 0750 0000 %0470 Z12 006073 -01445 002674 0625 0875 0375 0375 0125 0625 0000 %0471 Z13 006183 -01318 001761 0625 0875 0500 0375 0125 0500 0000 %0472 Z14 006345 -01180 000870 0625 0875 0625 0375 0125 0375 0000 %0473 Z15 006441 -00797 000048 0625 0875 0750 0375 0125 0250 0000 %0474 Z16 006509 -00584 -00472 0625 0875 0875 0375 0125 0125 0000 %0475 Z17 006618 -00312 -00905 0625 0875 1000 0375 0125 0000 0000 %0476 Z18 006086 -02289 005623 0625 1000 0000 0375 0000 1000 0000 %0477 a10 006158 -02196 004832 0625 1000 0125 0375 0000 0875 0000 %0478 a11 006275 -02088 003953 0625 1000 0250 0375 0000 0750 0000 %0479 a12 006372 -01975 003058 0625 1000 0375 0375 0000 0625 0000 %0480 a13 006494 -01804 002127 0625 1000 0500 0375 0000 0500 0000 %0481 a14 006646 -01693 001284 0625 1000 0625 0375 0000 0375 0000 %0482 a15 006752 -01267 000263 0625 1000 0750 0375 0000 0250 0000 %0483 a16 006809 -01022 -00232 0625 1000 0875 0375 0000 0125 0000 %0484 a17 006839 -00798 -00793 0625 1000 1000 0375 0000 0000 0000 %0485 a18 003282 003221 002220 0750 0000 0000 0250 1000 1000 0000 %0486 A19 003276 003332 001626 0750 0000 0125 0250 1000 0875 0000 %0487 A20 003294 003475 001056 0750 0000 0250 0250 1000 0750 0000 %0488 A21 003304 003602 000515 0750 0000 0375 0250 1000 0625 0000 %0489 A22 003302 003848 -00195 0750 0000 0500 0250 1000 0500 0000 %0490 A23 003349 003945 -00821 0750 0000 0625 0250 1000 0375 0000 %0491 A24 003349 004202 -01696 0750 0000 0750 0250 1000 0250 0000 %0492 A25 003384 004604 -02177 0750 0000 0875 0250 1000 0125 0000 %0493 A26 003406 005007 -02677 0750 0000 1000 0250 1000 0000 0000 %0494 A27 003617 002742 002574 0750 0125 0000 0250 0875 1000 0000 %0495 B19 003748 002694 001845 0750 0125 0125 0250 0875 0875 0000 %0496 B20 003791 002794 001260 0750 0125 0250 0250 0875 0750 0000 %0497 B21 003787 002977 000625 0750 0125 0375 0250 0875 0625 0000 %0498 B22 003787 003116 000042 0750 0125 0500 0250 0875 0500 0000 %0499 B23 003799 003358 -00663 0750 0125 0625 0250 0875 0375 0000 %0500 B24 003823 003523 -01467 0750 0125 0750 0250 0875 0250 0000 %0501 B25 003858 003942 -01951 0750 0125 0875 0250 0875 0125 0000 %0502 B26 003866 004356 -02437 0750 0125 1000 0250 0875 0000 0000 %0503 B27 003999 002246 003096 0750 0250 0000 0250 0750 1000 0000 %0504 C19 004131 002169 002391 0750 0250 0125 0250 0750 0875 0000 %0505 C20 004266 002131 001557 0750 0250 0250 0250 0750 0750 0000 %0506 C21 004270 002336 000853 0750 0250 0375 0250 0750 0625 0000 %0507 C22 004260 002444 000316 0750 0250 0500 0250 0750 0500 0000 %0508 C23 004308 002658 -00362 0750 0250 0625 0250 0750 0375 0000 %0509 C24 004330 002821 -01196 0750 0250 0750 0250 0750 0250 0000 %0510 C25 004305 003276 -01696 0750 0250 0875 0250 0750 0125 0000 %0511 C26 004324 003730 -02159 0750 0250 1000 0250 0750 0000 0000 %0512 C27 004369 001778 003521 0750 0375 0000 0250 0625 1000 0000 %0513 D19 004504 001695 002811 0750 0375 0125 0250 0625 0875 0000 %0514 D20 004615 001671 001991 0750 0375 0250 0250 0625 0750 0000 %0515 D21 004770 001626 001136 0750 0375 0375 0250 0625 0625 0000 %0516 D22 004754 001798 000515 0750 0375 0500 0250 0625 0500 0000 %0517 D23 004774 001986 -00166 0750 0375 0625 0250 0625 0375 0000 %0518 D24 004791 002157 -00965 0750 0375 0750 0250 0625 0250 0000 %0519 D25 004782 002585 -01401 0750 0375 0875 0250 0625 0125 0000 %0520 D26 004795 003052 -01915 0750 0375 1000 0250 0625 0000 0000 %0521 D27 004789 001235 004112 0750 0500 0000 0250 0500 1000 0000 %0522 E19 004859 001267 003225 0750 0500 0125 0250 0500 0875 0000 %0523 E20 004984 001193 002404 0750 0500 0250 0250 0500 0750 0000 %0524 E21 005118 001134 001574 0750 0500 0375 0250 0500 0625 0000 %0525 E22 005286 001081 000741 0750 0500 0500 0250 0500 0500 0000 %0526 E23 005269 001228 000080 0750 0500 0625 0250 0500 0375 0000 %0527 E24 005277 001430 -00635 0750 0500 0750 0250 0500 0250 0000 %0528 E25 005253 001869 -01098 0750 0500 0875 0250 0500 0125 0000 %0529 E26 005313 002330 -01606 0750 0500 1000 0250 0500 0000 0000 %0530 E27 005285 000555 004751 0750 0625 0000 0250 0375 1000 0000 %0531 F19 005399 000614 003876 0750 0625 0125 0250 0375 0875 0000 %0532 F20 005496 000571 003058 0750 0625 0250 0250 0375 0750 0000 %0533 F21 005527 000630 002099 0750 0625 0375 0250 0375 0625 0000 %0534 F22 005661 000578 001275 0750 0625 0500 0250 0375 0500 0000 %0535 F23 005781 000558 000354 0750 0625 0625 0250 0375 0375 0000 %0536 F24 005772 000726 -00293 0750 0625 0750 0250 0375 0250 0000 %0537 F25 005788 001113 -00774 0750 0625 0875 0250 0375 0125 0000 %0538 F26 005833 001582 -01280 0750 0625 1000 0250 0375 0000 0000 %0539 F27 005974 -00293 005567 0750 0750 0000 0250 0250 1000 0000 %0540 G19 006035 -00284 004727 0750 0750 0125 0250 0250 0875 0000 %0541 G20 006099 -00232 003862 0750 0750 0250 0250 0250 0750 0000 %0542 G21 006132 -00150 002865 0750 0750 0375 0250 0250 0625 0000 %0543 G22 006175 -00082 001877 0750 0750 0500 0250 0250 0500 0000 %0544 G23 006245 -00051 000968 0750 0750 0625 0250 0250 0375 0000 %0545 G24 006265 -00030 000056 0750 0750 0750 0250 0250 0250 0000 %0546 G25 006298 000421 -00457 0750 0750 0875 0250 0250 0125 0000 %0547 G26 006357 000930 -01034 0750 0750 1000 0250 0250 0000 0000 %0548 G27 006132 -01082 005747 0750 0875 0000 0250 0125 1000 0000 %0549 H19 006176 -00997 004905 0750 0875 0125 0250 0125 0875 0000 %0550 H20 006246 -00954 004033 0750 0875 0250 0250 0125 0750 0000 %0551 H21 006308 -00855 003094 0750 0875 0375 0250 0125 0625 0000 %0552 H22 006377 -00754 002135 0750 0875 0500 0250 0125 0500 0000 %0553 H23 006474 -00652 001262 0750 0875 0625 0250 0125 0375 0000 %0554 H24 006576 -00535 000451 0750 0875 0750 0250 0125 0250 0000 %0555 H25 006633 -00245 -00258 0750 0875 0875 0250 0125 0125 0000 %0556 H26 006764 000053 -00769 0750 0875 1000 0250 0125 0000 0000 %0557 H27 006346 -01694 006007 0750 1000 0000 0250 0000 1000 0000 %0558 I19 006406 -01593 005177 0750 1000 0125 0250 0000 0875 0000 %0559 I20 006477 -01561 004295 0750 1000 0250 0250 0000 0750 0000 %0560 I21 006567 -01443 003399 0750 1000 0375 0250 0000 0625 0000 %0561 I22 006655 -01252 002450 0750 1000 0500 0250 0000 0500 0000 %0562 I23 006821 -01199 001650 0750 1000 0625 0250 0000 0375 0000 %0563 I24 006933 -01133 000859 0750 1000 0750 0250 0000 0250 0000 %0564 I25 006981 -00683 -00109 0750 1000 0875 0250 0000 0125 0000 %0565 I26 007019 -00476 -00603 0750 1000 1000 0250 0000 0000 0000 %0566 I27 003591 003686 002507 0875 0000 0000 0125 1000 1000 0000 %0567 J19 003593 003836 001909 0875 0000 0125 0125 1000 0875 0000 %0568 J20 003613 004003 001347 0875 0000 0250 0125 1000 0750 0000 %0569 J21 003629 004119 000801 0875 0000 0375 0125 1000 0625 0000 %0570 J22 003628 004343 000112 0875 0000 0500 0125 1000 0500 0000 %0571 J23 003631 004480 -00456 0875 0000 0625 0125 1000 0375 0000 %0572 J24 003648 004680 -01162 0875 0000 0750 0125 1000 0250 0000 %0573 J25 003647 004883 -01984 0875 0000 0875 0125 1000 0125 0000 %0574 J26 003640 005271 -02451 0875 0000 1000 0125 1000 0000 0000 %0575 J27 003952 003227 002937 0875 0125 0000 0125 0875 1000 0000 %0576 K19 004080 003157 002270 0875 0125 0125 0125 0875 0875 0000 %0577 K20 004075 003320 001562 0875 0125 0250 0125 0875 0750 0000 %0578 K21 004117 003483 000973 0875 0125 0375 0125 0875 0625 0000 %0579 K22 004108 003663 000379 0875 0125 0500 0125 0875 0500 0000 %0580 K23 004126 003826 -00248 0875 0125 0625 0125 0875 0375 0000 %0581 K24 004132 003995 -00904 0875 0125 0750 0125 0875 0250 0000 %0582 K25 004110 004212 -01722 0875 0125 0875 0125 0875 0125 0000 %0583 K26 004134 004597 -02211 0875 0125 1000 0125 0875 0000 0000 %0584 K27 004263 002734 003455 0875 0250 0000 0125 0750 1000 0000 %0585 L19 004417 002716 002743 0875 0250 0125 0125 0750 0875 0000 %0586 L20 004552 002640 001892 0875 0250 0250 0125 0750 0750 0000 %0587 L21 004573 002772 001240 0875 0250 0375 0125 0750 0625 0000 %0588 L22 004544 002946 000680 0875 0250 0500 0125 0750 0500 0000 %0589 L23 004592 003132 000038 0875 0250 0625 0125 0750 0375 0000 %0590 L24 004578 003296 -00645 0875 0250 0750 0125 0750 0250 0000 %0591 L25 004544 003523 -01420 0875 0250 0875 0125 0750 0125 0000 %0592 L26 004567 003908 -01910 0875 0250 1000 0125 0750 0000 0000 %0593 L27 004636 002299 003902 0875 0375 0000 0125 0625 1000 0000 %0594 M19 004753 002224 003160 0875 0375 0125 0125 0625 0875 0000 %0595 M20 004889 002211 002340 0875 0375 0250 0125 0625 0750 0000 %0596 M21 005044 002115 001503 0875 0375 0375 0125 0625 0625 0000 %0597 M22 005037 002284 000906 0875 0375 0500 0125 0625 0500 0000 %0598 M23 005050 002444 000240 0875 0375 0625 0125 0625 0375 0000 %0599 M24 005051 002629 -00409 0875 0375 0750 0125 0625 0250 0000 %0600 M25 005049 002839 -01172 0875 0375 0875 0125 0625 0125 0000 %0601 M26 005069 003272 -01642 0875 0375 1000 0125 0625 0000 0000 %0602 M27 005017 001799 004481 0875 0500 0000 0125 0500 1000 0000 %0603 N19 005127 001758 003606 0875 0500 0125 0125 0500 0875 0000 %0604 N20 005259 001698 002819 0875 0500 0250 0125 0500 0750 0000 %0605 N21 005403 001621 001986 0875 0500 0375 0125 0500 0625 0000 %0606 N22 005568 001601 001104 0875 0500 0500 0125 0500 0500 0000 %0607 N23 005571 001743 000475 0875 0500 0625 0125 0500 0375 0000 %0608 N24 005560 001900 -00131 0875 0500 0750 0125 0500 0250 0000 %0609 N25 005536 002106 -00855 0875 0500 0875 0125 0500 0125 0000 %0610 N26 005575 002539 -01370 0875 0500 1000 0125 0500 0000 0000 %0611 N27 005438 001191 005019 0875 0625 0000 0125 0375 1000 0000 %0612 O19 005547 001210 004198 0875 0625 0125 0125 0375 0875 0000 %0613 O20 005714 001133 003355 0875 0625 0250 0125 0375 0750 0000 %0614 O21 005782 001195 002470 0875 0625 0375 0125 0375 0625 0000 %0615 O22 005894 001123 001570 0875 0625 0500 0125 0375 0500 0000 %0616 O23 006056 001038 000715 0875 0625 0625 0125 0375 0375 0000 %0617 O24 006064 001222 000156 0875 0625 0750 0125 0375 0250 0000 %0618 O25 006032 001408 -00560 0875 0625 0875 0125 0375 0125 0000 %0619 O26 006085 001834 -01075 0875 0625 1000 0125 0375 0000 0000 %0620 O27 006002 000514 005715 0875 0750 0000 0125 0250 1000 0000 %0621 P19 006098 000549 004807 0875 0750 0125 0125 0250 0875 0000 %0622 P20 006201 000534 003949 0875 0750 0250 0125 0250 0750 0000 %0623 P21 006261 000596 003034 0875 0750 0375 0125 0250 0625 0000 %0624 P22 006347 000547 002084 0875 0750 0500 0125 0250 0500 0000 %0625 P23 006458 000558 001168 0875 0750 0625 0125 0250 0375 0000 %0626 P24 006584 000485 000403 0875 0750 0750 0125 0250 0250 0000 %0627 P25 006576 000670 -00270 0875 0750 0875 0125 0250 0125 0000 %0628 P26 006597 001178 -00805 0875 0750 1000 0125 0250 0000 0000 %0629 P27 006726 -00341 006565 0875 0875 0000 0125 0125 1000 0000 %0630 Q19 006768 -00263 005680 0875 0875 0125 0125 0125 0875 0000 %0631 Q20 006836 -00251 004732 0875 0875 0250 0125 0125 0750 0000 %0632 Q21 006890 -00185 003805 0875 0875 0375 0125 0125 0625 0000 %0633 Q22 006921 -00093 002764 0875 0875 0500 0125 0125 0500 0000 %0634 Q23 006995 -00068 001818 0875 0875 0625 0125 0125 0375 0000 %0635 Q24 007040 -00056 000941 0875 0875 0750 0125 0125 0250 0000 %0636 Q25 007066 000007 -00004 0875 0875 0875 0125 0125 0125 0000 %0637 Q26 007091 000492 -00544 0875 0875 1000 0125 0125 0000 0000 %0638 Q27 006847 -01103 006756 0875 1000 0000 0125 0000 1000 0000 %0639 R19 006905 -01032 005873 0875 1000 0125 0125 0000 0875 0000 %0640 R20 006994 -01009 004953 0875 1000 0250 0125 0000 0750 0000 %0641 R21 007035 -00926 003976 0875 1000 0375 0125 0000 0625 0000 %0642 R22 007110 -00826 003030 0875 1000 0500 0125 0000 0500 0000 %0643 R23 007234 -00792 002112 0875 1000 0625 0125 0000 0375 0000 %0644 R24 007325 -00756 001336 0875 1000 0750 0125 0000 0250 0000 %0645 R25 007404 -00555 000460 0875 1000 0875 0125 0000 0125 0000 %0646 R26 007468 -00248 -00333 0875 1000 1000 0125 0000 0000 0000 %0647 R27 003882 004192 002951 1000 0000 0000 0000 1000 1000 0000 %0648 S19 003857 004384 002288 1000 0000 0125 0000 1000 0875 0000 %0649 S20 003902 004501 001717 1000 0000 0250 0000 1000 0750 0000 %0650 S21 003900 004651 001178 1000 0000 0375 0000 1000 0625 0000 %0651 S22 003881 004861 000485 1000 0000 0500 0000 1000 0500 0000 %0652 S23 003908 004983 -00037 1000 0000 0625 0000 1000 0375 0000 %0653 S24 003925 005197 -00707 1000 0000 0750 0000 1000 0250 0000 %0654 S25 003939 005350 -01418 1000 0000 0875 0000 1000 0125 0000 %0655 S26 003944 005533 -02206 1000 0000 1000 0000 1000 0000 0000 %0656 S27 004234 003724 003372 1000 0125 0000 0000 0875 1000 0000 %0657 T19 004356 003652 002669 1000 0125 0125 0000 0875 0875 0000 %0658 T20 004383 003823 001961 1000 0125 0250 0000 0875 0750 0000 %0659 T21 004377 004009 001362 1000 0125 0375 0000 0875 0625 0000 %0660 T22 004377 004150 000779 1000 0125 0500 0000 0875 0500 0000 %0661 T23 004378 004328 000154 1000 0125 0625 0000 0875 0375 0000 %0662 T24 004414 004523 -00481 1000 0125 0750 0000 0875 0250 0000 %0663 T25 004409 004719 -01195 1000 0125 0875 0000 0875 0125 0000 %0664 T26 004397 004930 -01958 1000 0125 1000 0000 0875 0000 0000 %0665 T27 004559 003268 003850 1000 0250 0000 0000 0750 1000 0000 %0666 U19 004717 003214 003117 1000 0250 0125 0000 0750 0875 0000 %0667 U20 004879 003138 002288 1000 0250 0250 0000 0750 0750 0000 %0668 U21 004879 003325 001618 1000 0250 0375 0000 0750 0625 0000 %0669 U22 004870 003501 001046 1000 0250 0500 0000 0750 0500 0000 %0670 U23 004878 003655 000395 1000 0250 0625 0000 0750 0375 0000 %0671 U24 004876 003814 -00240 1000 0250 0750 0000 0750 0250 0000 %0672 U25 004892 004039 -00865 1000 0250 0875 0000 0750 0125 0000 %0673 U26 004884 004238 -01656 1000 0250 1000 0000 0750 0000 0000 %0674 U27 004944 002806 004318 1000 0375 0000 0000 0625 1000 0000 %0675 V19 005062 002771 003549 1000 0375 0125 0000 0625 0875 0000 %0676 V20 005217 002689 002758 1000 0375 0250 0000 0625 0750 0000 %0677 V21 005365 002622 001918 1000 0375 0375 0000 0625 0625 0000 %0678 V22 005378 002802 001288 1000 0375 0500 0000 0625 0500 0000 %0679 V23 005411 002940 000671 1000 0375 0625 0000 0625 0375 0000 %0680 V24 005392 003122 000021 1000 0375 0750 0000 0625 0250 0000 %0681 V25 005380 003309 -00588 1000 0375 0875 0000 0625 0125 0000 %0682 V26 005365 003545 -01396 1000 0375 1000 0000 0625 0000 0000 %0683 V27 005293 002301 004862 1000 0500 0000 0000 0500 1000 0000 %0684 W19 005433 002294 004069 1000 0500 0125 0000 0500 0875 0000 %0685 W20 005603 002192 003255 1000 0500 0250 0000 0500 0750 0000 %0686 W21 005756 002136 002385 1000 0500 0375 0000 0500 0625 0000 %0687 W22 005919 002038 001497 1000 0500 0500 0000 0500 0500 0000 %0688 W23 005922 002207 000876 1000 0500 0625 0000 0500 0375 0000 %0689 W24 005916 002389 000271 1000 0500 0750 0000 0500 0250 0000 %0690 W25 005934 002543 -00276 1000 0500 0875 0000 0500 0125 0000 %0691 W26 005928 002753 -01050 1000 0500 1000 0000 0500 0000 0000 %0692 W27 005771 001753 005462 1000 0625 0000 0000 0375 1000 0000 %0693 X19 005882 001731 004631 1000 0625 0125 0000 0375 0875 0000 %0694 X20 006006 001687 003722 1000 0625 0250 0000 0375 0750 0000 %0695 X21 006128 001681 002850 1000 0625 0375 0000 0375 0625 0000 %0696 X22 006267 001617 001968 1000 0625 0500 0000 0375 0500 0000 %0697 X23 006434 001547 001113 1000 0625 0625 0000 0375 0375 0000 %0698 X24 006440 001704 000561 1000 0625 0750 0000 0375 0250 0000 %0699 X25 006445 001829 -00024 1000 0625 0875 0000 0375 0125 0000 %0700 X26 006435 002054 -00814 1000 0625 1000 0000 0375 0000 0000 %0701 X27 006228 001136 006044 1000 0750 0000 0000 0250 1000 0000 %0702 Y19 006316 001215 005146 1000 0750 0125 0000 0250 0875 0000 %0703 Y20 006431 001220 004229 1000 0750 0250 0000 0250 0750 0000 %0704 Y21 006566 001166 003419 1000 0750 0375 0000 0250 0625 0000 %0705 Y22 006674 001162 002481 1000 0750 0500 0000 0250 0500 0000 %0706 Y23 006805 001094 001573 1000 0750 0625 0000 0250 0375 0000 %0707 Y24 006934 000989 000792 1000 0750 0750 0000 0250 0250 0000 %0708 Y25 006970 001139 000208 1000 0750 0875 0000 0250 0125 0000 %0709 Y26 006956 001330 -00516 1000 0750 1000 0000 0250 0000 0000 %0710 Y27 006771 000500 006784 1000 0875 0000 0000 0125 1000 0000 %0711 Z19 006851 000563 005861 1000 0875 0125 0000 0125 0875 0000 %0712 Z20 006935 000529 004919 1000 0875 0250 0000 0125 0750 0000 %0713 Z21 007035 000583 004053 1000 0875 0375 0000 0125 0625 0000 %0714 Z22 007104 000600 003064 1000 0875 0500 0000 0125 0500 0000 %0715 Z23 007184 000615 002081 1000 0875 0625 0000 0125 0375 0000 %0716 Z24 007290 000580 001278 1000 0875 0750 0000 0125 0250 0000 %0717 Z25 007431 000502 000416 1000 0875 0875 0000 0125 0125 0000 %0718 Z26 007403 000687 -00301 1000 0875 1000 0000 0125 0000 0000 %0719 Z27 007455 -00391 007636 1000 1000 0000 0000 0000 1000 0000 %0720 a19 007522 -00319 006725 1000 1000 0125 0000 0000 0875 0000 %0721 a20 007590 -00295 005819 1000 1000 0250 0000 0000 0750 0000 %0722 a21 007654 -00251 004889 1000 1000 0375 0000 0000 0625 0000 %0723 a22 007705 -00156 003858 1000 1000 0500 0000 0000 0500 0000 %0724 a23 007778 -00157 002848 1000 1000 0625 0000 0000 0375 0000 %0725 a24 007839 -00143 001973 1000 1000 0750 0000 0000 0250 0000 %0726 a25 007881 -00077 001031 1000 1000 0875 0000 0000 0125 0000 %0727 a26 007907 000000 000000 1000 1000 1000 0000 0000 0000 0000 %0728 a27 008077 000018 -00029 1000 1000 1000 0000 0000 0000 0000 %0729 b01 007677 -00268 -00323 0875 1000 1000 0125 0000 0000 0000 %0730 b02 007247 -00471 -00561 0750 1000 1000 0250 0000 0000 0000 %0731 b03 006881 -00711 -00848 0625 1000 1000 0375 0000 0000 0000 %0732 b04 006576 -00966 -01063 0500 1000 1000 0500 0000 0000 0000 %0733 b05 006213 -01234 -01323 0375 1000 1000 0625 0000 0000 0000 %0734 b06 005875 -01514 -01543 0250 1000 1000 0750 0000 0000 0000 %0735 b07 005515 -01835 -01756 0125 1000 1000 0875 0000 0000 0000 %0736 b08 005147 -02091 -02080 0000 1000 1000 1000 0000 0000 0000 %0737 b09 007558 000531 000353 1000 0875 0875 0000 0125 0125 0000 %0738 c01 007264 -00029 000031 0875 0875 0875 0125 0125 0125 0000 %0739 c02 006844 -00230 -00223 0750 0875 0875 0250 0125 0125 0000 %0740 c03 006521 -00514 -00506 0625 0875 0875 0375 0125 0125 0000 %0741 c04 006209 -00744 -00744 0500 0875 0875 0500 0125 0125 0000 %0742 c05 005846 -01043 -00979 0375 0875 0875 0625 0125 0125 0000 %0743 c06 005519 -01332 -01194 0250 0875 0875 0750 0125 0125 0000 %0744 c07 005128 -01617 -01461 0125 0875 0875 0875 0125 0125 0000 %0745 c08 004778 -01879 -01795 0000 0875 0875 1000 0125 0125 0000 %0746 c09 007066 000990 000762 1000 0750 0750 0000 0250 0250 0000 %0747 d01 006795 000426 000437 0875 0750 0750 0125 0250 0250 0000 %0748 d02 006470 -00038 000100 0750 0750 0750 0250 0250 0250 0000 %0749 d03 006157 -00264 -00198 0625 0750 0750 0375 0250 0250 0000 %0750 d04 005860 -00506 -00444 0500 0750 0750 0500 0250 0250 0000 %0751 d05 005500 -00811 -00708 0375 0750 0750 0625 0250 0250 0000 %0752 d06 005139 -01038 -00949 0250 0750 0750 0750 0250 0250 0000 %0753 d07 004751 -01308 -01256 0125 0750 0750 0875 0250 0250 0000 %0754 d08 004423 -01594 -01552 0000 0750 0750 1000 0250 0250 0000 %0755 d09 006581 001512 001121 1000 0625 0625 0000 0375 0375 0000 %0756 e01 006272 000973 000772 0875 0625 0625 0125 0375 0375 0000 %0757 e02 005972 000523 000438 0750 0625 0625 0250 0375 0375 0000 %0758 e03 005767 -00012 000044 0625 0625 0625 0375 0375 0375 0000 %0759 e04 005518 -00245 -00204 0500 0625 0625 0500 0375 0375 0000 %0760 e05 005097 -00562 -00428 0375 0625 0625 0625 0375 0375 0000 %0761 e06 004747 -00793 -00698 0250 0625 0625 0750 0375 0375 0000 %0762 e07 004380 -01098 -00961 0125 0625 0625 0875 0375 0375 0000 %0763 e08 004043 -01379 -01298 0000 0625 0625 1000 0375 0375 0000 %0764 e09 006092 001991 001486 1000 0500 0500 0000 0500 0500 0000 %0765 f01 005800 001551 001159 0875 0500 0500 0125 0500 0500 0000 %0766 f02 005519 001033 000857 0750 0500 0500 0250 0500 0500 0000 %0767 f03 005291 000481 000439 0625 0500 0500 0375 0500 0500 0000 %0768 f04 005118 -00008 000142 0500 0500 0500 0500 0500 0500 0000 %0769 f05 004725 -00268 -00151 0375 0500 0500 0625 0500 0500 0000 %0770 f06 004345 -00509 -00411 0250 0500 0500 0750 0500 0500 0000 %0771 f07 003960 -00774 -00689 0125 0500 0500 0875 0500 0500 0000 %0772 f08 003629 -01112 -01008 0000 0500 0500 1000 0500 0500 0000 %0773 f09 005535 002581 001898 1000 0375 0375 0000 0625 0625 0000 %0774 g01 005258 002059 001575 0875 0375 0375 0125 0625 0625 0000 %0775 g02 004991 001589 001272 0750 0375 0375 0250 0625 0625 0000 %0776 g03 004735 001030 000875 0625 0375 0375 0375 0625 0625 0000 %0777 g04 004565 000562 000554 0500 0375 0375 0500 0625 0625 0000 %0778 g05 004299 -00062 000206 0375 0375 0375 0625 0625 0625 0000 %0779 g06 003956 -00276 -00113 0250 0375 0375 0750 0625 0625 0000 %0780 g07 003598 -00585 -00403 0125 0375 0375 0875 0625 0625 0000 %0781 g08 003249 -00877 -00712 0000 0375 0375 1000 0625 0625 0000 %0782 g09 005036 003103 002320 1000 0250 0250 0000 0750 0750 0000 %0783 h01 004714 002600 001979 0875 0250 0250 0125 0750 0750 0000 %0784 h02 004453 002110 001657 0750 0250 0250 0250 0750 0750 0000 %0785 h03 004243 001562 001295 0625 0250 0250 0375 0750 0750 0000 %0786 h04 004049 001053 000930 0500 0250 0250 0500 0750 0750 0000 %0787 h05 003783 000514 000546 0375 0250 0250 0625 0750 0750 0000 %0788 h06 003566 -00007 000190 0250 0250 0250 0750 0750 0750 0000 %0789 h07 003186 -00313 -00111 0125 0250 0250 0875 0750 0750 0000 %0790 h08 002827 -00638 -00389 0000 0250 0250 1000 0750 0750 0000 %0791 h09 004509 003633 002715 1000 0125 0125 0000 0875 0875 0000 %0792 i01 004245 003124 002399 0875 0125 0125 0125 0875 0875 0000 %0793 i02 003963 002651 001965 0750 0125 0125 0250 0875 0875 0000 %0794 i03 003759 002098 001621 0625 0125 0125 0375 0875 0875 0000 %0795 i04 003578 001585 001328 0500 0125 0125 0500 0875 0875 0000 %0796 i05 003281 001029 000862 0375 0125 0125 0625 0875 0875 0000 %0797 i06 003077 000530 000504 0250 0125 0125 0750 0875 0875 0000 %0798 i07 002812 -00040 000100 0125 0125 0125 0875 0875 0875 0000 %0799 i08 002434 -00312 -00164 0000 0125 0125 1000 0875 0875 0000 %0800 i09 004030 004191 003011 1000 0000 0000 0000 1000 1000 0000 %0801 j01 003743 003659 002650 0875 0000 0000 0125 1000 1000 0000 %0802 j02 003514 003173 002351 0750 0000 0000 0250 1000 1000 0000 %0803 j03 003275 002656 001927 0625 0000 0000 0375 1000 1000 0000 %0804 j04 003058 002101 001628 0500 0000 0000 0500 1000 1000 0000 %0805 j05 002779 001558 001174 0375 0000 0000 0625 1000 1000 0000 %0806 j06 002554 001041 000831 0250 0000 0000 0750 1000 1000 0000 %0807 j07 002306 000457 000447 0125 0000 0000 0875 1000 1000 0000 %0808 j08 002066 -00041 000025 0000 0000 0000 1000 1000 1000 0000 %0809 j09 008042 -00020 000015 1000 1000 1000 0000 0000 0000 0000 %0810 b10 007314 000446 -00498 0875 0875 1000 0125 0125 0000 0000 %0811 b11 006605 000901 -00965 0750 0750 1000 0250 0250 0000 0000 %0812 b12 005843 001348 -01388 0625 0625 1000 0375 0375 0000 0000 %0813 b13 005159 001786 -01919 0500 0500 1000 0500 0500 0000 0000 %0814 b14 004479 002311 -02438 0375 0375 1000 0625 0625 0000 0000 %0815 b15 003772 002752 -02952 0250 0250 1000 0750 0750 0000 0000 %0816 b16 003070 003210 -03446 0125 0125 1000 0875 0875 0000 0000 %0817 b17 002359 003734 -03914 0000 0000 1000 1000 1000 0000 0000 %0818 b18 007991 -00075 000988 1000 1000 0875 0000 0000 0125 0000 %0819 c10 007252 -00022 000063 0875 0875 0875 0125 0125 0125 0000 %0820 c11 006517 000394 -00368 0750 0750 0875 0250 0250 0125 0000 %0821 c12 005816 000869 -00933 0625 0625 0875 0375 0375 0125 0000 %0822 c13 005135 001345 -01432 0500 0500 0875 0500 0500 0125 0000 %0823 c14 004470 001845 -01888 0375 0375 0875 0625 0625 0125 0000 %0824 c15 003715 002321 -02432 0250 0250 0875 0750 0750 0125 0000 %0825 c16 003030 002742 -02904 0125 0125 0875 0875 0875 0125 0000 %0826 c17 002322 003319 -03472 0000 0000 0875 1000 1000 0125 0000 %0827 c18 007933 -00131 001909 1000 1000 0750 0000 0000 0250 0000 %0828 d10 007198 -00089 000995 0875 0875 0750 0125 0125 0250 0000 %0829 d11 006463 -00055 000133 0750 0750 0750 0250 0250 0250 0000 %0830 d12 005774 000441 -00416 0625 0625 0750 0375 0375 0250 0000 %0831 d13 005105 000922 -00943 0500 0500 0750 0500 0500 0250 0000 %0832 d14 004408 001397 -01480 0375 0375 0750 0625 0625 0250 0000 %0833 d15 003667 001878 -01994 0250 0250 0750 0750 0750 0250 0000 %0834 d16 002974 002331 -02479 0125 0125 0750 0875 0875 0250 0000 %0835 d17 002277 002862 -02973 0000 0000 0750 1000 1000 0250 0000 %0836 d18 007867 -00162 002786 1000 1000 0625 0000 0000 0375 0000 %0837 e10 007160 -00111 001885 0875 0875 0625 0125 0125 0375 0000 %0838 e11 006428 -00093 001075 0750 0750 0625 0250 0250 0375 0000 %0839 e12 005753 -00017 000038 0625 0625 0625 0375 0375 0375 0000 %0840 e13 005120 000455 -00454 0500 0500 0625 0500 0500 0375 0000 %0841 e14 004376 000956 -00966 0375 0375 0625 0625 0625 0375 0000 %0842 e15 003627 001414 -01426 0250 0250 0625 0750 0750 0375 0000 %0843 e16 002954 001889 -01971 0125 0125 0625 0875 0875 0375 0000 %0844 e17 002239 002376 -02441 0000 0000 0625 1000 1000 0375 0000 %0845 e18 007814 -00200 003821 1000 1000 0500 0000 0000 0500 0000 %0846 f10 007084 -00150 002849 0875 0875 0500 0125 0125 0500 0000 %0847 f11 006381 -00128 001997 0750 0750 0500 0250 0250 0500 0000 %0848 f12 005698 -00064 001010 0625 0625 0500 0375 0375 0500 0000 %0849 f13 005108 -00006 000113 0500 0500 0500 0500 0500 0500 0000 %0850 f14 004334 000434 -00408 0375 0375 0500 0625 0625 0500 0000 %0851 f15 003606 000900 -00850 0250 0250 0500 0750 0750 0500 0000 %0852 f16 002923 001353 -01370 0125 0125 0500 0875 0875 0500 0000 %0853 f17 002191 001870 -01878 0000 0000 0500 1000 1000 0500 0000 %0854 f18 007731 -00255 004801 1000 1000 0375 0000 0000 0625 0000 %0855 g10 007024 -00207 003848 0875 0875 0375 0125 0125 0625 0000 %0856 g11 006315 -00202 002999 0750 0750 0375 0250 0250 0625 0000 %0857 g12 005603 -00125 001997 0625 0625 0375 0375 0375 0625 0000 %0858 g13 005001 -00098 001117 0500 0500 0375 0500 0500 0625 0000 %0859 g14 004260 -00046 000185 0375 0375 0375 0625 0625 0625 0000 %0860 g15 003561 000489 -00398 0250 0250 0375 0750 0750 0625 0000 %0861 g16 002881 000920 -00899 0125 0125 0375 0875 0875 0625 0000 %0862 g17 002143 001390 -01421 0000 0000 0375 1000 1000 0625 0000 %0863 g18 007644 -00284 005764 1000 1000 0250 0000 0000 0750 0000 %0864 h10 006954 -00269 004843 0875 0875 0250 0125 0125 0750 0000 %0865 h11 006251 -00251 003969 0750 0750 0250 0250 0250 0750 0000 %0866 h12 005550 -00202 003039 0625 0625 0250 0375 0375 0750 0000 %0867 h13 004892 -00110 002071 0500 0500 0250 0500 0500 0750 0000 %0868 h14 004200 -00044 001097 0375 0375 0250 0625 0625 0750 0000 %0869 h15 003508 000028 000145 0250 0250 0250 0750 0750 0750 0000 %0870 h16 002826 000453 -00365 0125 0125 0250 0875 0875 0750 0000 %0871 h17 002084 000904 -00930 0000 0000 0250 1000 1000 0750 0000 %0872 h18 007585 -00326 006718 1000 1000 0125 0000 0000 0875 0000 %0873 i10 006893 -00270 005791 0875 0875 0125 0125 0125 0875 0000 %0874 i11 006191 -00285 004884 0750 0750 0125 0250 0250 0875 0000 %0875 i12 005429 -00194 003895 0625 0625 0125 0375 0375 0875 0000 %0876 i13 004830 -00136 002970 0500 0500 0125 0500 0500 0875 0000 %0877 i14 004161 -00059 002012 0375 0375 0125 0625 0625 0875 0000 %0878 i15 003449 -00022 001057 0250 0250 0125 0750 0750 0875 0000 %0879 i16 002775 -00002 000081 0125 0125 0125 0875 0875 0875 0000 %0880 i17 002066 000469 -00458 0000 0000 0125 1000 1000 0875 0000 %0881 i18 007506 -00374 007605 1000 1000 0000 0000 0000 1000 0000 %0882 j10 006850 -00334 006686 0875 0875 0000 0125 0125 1000 0000 %0883 j11 006133 -00297 005766 0750 0750 0000 0250 0250 1000 0000 %0884 j12 005409 -00276 004782 0625 0625 0000 0375 0375 1000 0000 %0885 j13 004790 -00179 003849 0500 0500 0000 0500 0500 1000 0000 %0886 j14 004104 -00120 002899 0375 0375 0000 0625 0625 1000 0000 %0887 j15 003411 -00103 001970 0250 0250 0000 0750 0750 1000 0000 %0888 j16 002689 -00014 000943 0125 0125 0000 0875 0875 1000 0000 %0889 j17 002032 000010 -00019 0000 0000 0000 1000 1000 1000 0000 %0890 j18 008002 000001 000013 1000 1000 1000 0000 0000 0000 0000 %0891 b19 007505 000689 -00293 1000 0875 1000 0000 0125 0000 0000 %0892 b20 007046 001332 -00495 1000 0750 1000 0000 0250 0000 0000 %0893 b21 006528 002052 -00794 1000 0625 1000 0000 0375 0000 0000 %0894 b22 006032 002741 -01048 1000 0500 1000 0000 0500 0000 0000 %0895 b23 005496 003523 -01397 1000 0375 1000 0000 0625 0000 0000 %0896 b24 004986 004239 -01674 1000 0250 1000 0000 0750 0000 0000 %0897 b25 004459 004954 -01982 1000 0125 1000 0000 0875 0000 0000 %0898 b26 003973 005572 -02213 1000 0000 1000 0000 1000 0000 0000 %0899 b27 007537 -00554 000502 0875 1000 0875 0125 0000 0125 0000 %0900 c19 007200 -00007 000071 0875 0875 0875 0125 0125 0125 0000 %0901 c20 006724 000659 -00205 0875 0750 0875 0125 0250 0125 0000 %0902 c21 006193 001393 -00497 0875 0625 0875 0125 0375 0125 0000 %0903 c22 005688 002111 -00803 0875 0500 0875 0125 0500 0125 0000 %0904 c23 005176 002833 -01121 0875 0375 0875 0125 0625 0125 0000 %0905 c24 004653 003570 -01425 0875 0250 0875 0125 0750 0125 0000 %0906 c25 004147 004261 -01706 0875 0125 0875 0125 0875 0125 0000 %0907 c26 003657 004910 -01944 0875 0000 0875 0125 1000 0125 0000 %0908 c27 007048 -01113 000910 0750 1000 0750 0250 0000 0250 0000 %0909 d19 006714 -00526 000500 0750 0875 0750 0250 0125 0250 0000 %0910 d20 006401 -00035 000118 0750 0750 0750 0250 0250 0250 0000 %0911 d21 005900 000722 -00215 0750 0625 0750 0250 0375 0250 0000 %0912 d22 005368 001417 -00547 0750 0500 0750 0250 0500 0250 0000 %0913 d23 004869 002191 -00921 0750 0375 0750 0250 0625 0250 0000 %0914 d24 004382 002868 -01184 0750 0250 0750 0250 0750 0250 0000 %0915 d25 003873 003562 -01452 0750 0125 0750 0250 0875 0250 0000 %0916 d26 003390 004238 -01679 0750 0000 0750 0250 1000 0250 0000 %0917 d27 006633 -01635 001245 0625 1000 0625 0375 0000 0375 0000 %0918 e19 006310 -01136 000863 0625 0875 0625 0375 0125 0375 0000 %0919 e20 006021 -00599 000453 0625 0750 0625 0375 0250 0375 0000 %0920 e21 005689 000000 000043 0625 0625 0625 0375 0375 0375 0000 %0921 e22 005191 000723 -00267 0625 0500 0625 0375 0500 0375 0000 %0922 e23 004673 001490 -00586 0625 0375 0625 0375 0625 0375 0000 %0923 e24 004173 002162 -00839 0625 0250 0625 0375 0750 0375 0000 %0924 e25 003677 002895 -01133 0625 0125 0625 0375 0875 0375 0000 %0925 e26 003159 003516 -01336 0625 0000 0625 0375 1000 0375 0000 %0926 e27 006241 -02139 001703 0500 1000 0500 0500 0000 0500 0000 %0927 f19 005977 -01659 001330 0500 0875 0500 0500 0125 0500 0000 %0928 f20 005693 -01120 000957 0500 0750 0500 0500 0250 0500 0000 %0929 f21 005354 -00538 000504 0500 0625 0500 0500 0375 0500 0000 %0930 f22 005035 000068 000074 0500 0500 0500 0500 0500 0500 0000 %0931 f23 004499 000809 -00259 0500 0375 0500 0500 0625 0500 0000 %0932 f24 003962 001478 -00511 0500 0250 0500 0500 0750 0500 0000 %0933 f25 003469 002085 -00719 0500 0125 0500 0500 0875 0500 0000 %0934 f26 002950 002771 -01000 0500 0000 0500 0500 1000 0500 0000 %0935 f27 005815 -02781 002225 0375 1000 0375 0625 0000 0625 0000 %0936 g19 005514 -02254 001812 0375 0875 0375 0625 0125 0625 0000 %0937 g20 005202 -01664 001403 0375 0750 0375 0625 0250 0625 0000 %0938 g21 004887 -01172 001009 0375 0625 0375 0625 0375 0625 0000 %0939 g22 004540 -00581 000588 0375 0500 0375 0625 0500 0625 0000 %0940 g23 004211 000029 000128 0375 0375 0375 0625 0625 0625 0000 %0941 g24 003678 000736 -00189 0375 0250 0375 0625 0750 0625 0000 %0942 g25 003210 001378 -00482 0375 0125 0375 0625 0875 0625 0000 %0943 g26 002701 002078 -00775 0375 0000 0375 0625 1000 0625 0000 %0944 g27 005403 -03341 002686 0250 1000 0250 0750 0000 0750 0000 %0945 h19 005094 -02812 002318 0250 0875 0250 0750 0125 0750 0000 %0946 h20 004757 -02228 001874 0250 0750 0250 0750 0250 0750 0000 %0947 h21 004446 -01700 001456 0250 0625 0250 0750 0375 0750 0000 %0948 h22 004077 -01092 001020 0250 0500 0250 0750 0500 0750 0000 %0949 h23 003754 -00493 000500 0250 0375 0250 0750 0625 0750 0000 %0950 h24 003440 000071 000120 0250 0250 0250 0750 0750 0750 0000 %0951 h25 002953 000711 -00153 0250 0125 0250 0750 0875 0750 0000 %0952 h26 002435 001381 -00449 0250 0000 0250 0750 1000 0750 0000 %0953 h27 004930 -03898 002961 0125 1000 0125 0875 0000 0875 0000 %0954 i19 004620 -03354 002576 0125 0875 0125 0875 0125 0875 0000 %0955 i20 004340 -02798 002193 0125 0750 0125 0875 0250 0875 0000 %0956 i21 004007 -02231 001780 0125 0625 0125 0875 0375 0875 0000 %0957 i22 003655 -01591 001323 0125 0500 0125 0875 0500 0875 0000 %0958 i23 003350 -01073 000916 0125 0375 0125 0875 0625 0875 0000 %0959 i24 003003 -00463 000479 0125 0250 0125 0875 0750 0875 0000 %0960 i25 002715 000000 000096 0125 0125 0125 0875 0875 0875 0000 %0961 i26 002152 000740 -00255 0125 0000 0125 0875 1000 0875 0000 %0962 i27 004567 -04547 003313 0000 1000 0000 1000 0000 1000 0000 %0963 j19 004249 -03963 002932 0000 0875 0000 1000 0125 1000 0000 %0964 j20 003956 -03402 002532 0000 0750 0000 1000 0250 1000 0000 %0965 j21 003631 -02854 002105 0000 0625 0000 1000 0375 1000 0000 %0966 j22 003270 -02252 001675 0000 0500 0000 1000 0500 1000 0000 %0967 j23 002974 -01676 001286 0000 0375 0000 1000 0625 1000 0000 %0968 j24 002635 -01087 000792 0000 0250 0000 1000 0750 1000 0000 %0969 j25 002308 -00553 000427 0000 0125 0000 1000 0875 1000 0000 %0970 j26 001970 000030 -00006 0000 0000 0000 1000 1000 1000 0000 %0971 j27 ] def /LAB*FaG1100 24 array def /LAB*FaG1100 [ %BEG GE69_22.TXT, Separation olv*, cf1=0.70, D65, adapted %100 x LAB*a %#1000 x (r g b c m y 0) %nr. pos %z003882 004192 002951 %#1000 0000 0000 0000 1000 1000 0000 %0648 S19 %O1 0 %z007455 -00391 007636 %#1000 1000 0000 0000 0000 1000 0000 %0720 a19 %Y1 1 %z004560 -04562 003331 %#0000 1000 0000 1000 0000 1000 0000 %0072 I01 %L1 2 %z005087 -02085 -02102 %#0000 1000 1000 1000 0000 0000 0000 %0080 I09 %C1 3 %z002312 003716 -03918 %#0000 0000 1000 1000 1000 0000 0000 %0008 A09 %V1 4 %z003944 005533 -02206 %#1000 0000 1000 0000 1000 0000 0000 %0656 S27 %M1 5 %z001990 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0000 A01 %N1 6 %z007907 000000 000000 %#1000 1000 1000 0000 0000 0000 0000 %0728 a27 %W1 7 %$ 004030 004191 003011 %#1000 0000 0000 0000 1000 1000 0000 %0801 j01 %O2 0 007506 -00374 007605 %#1000 1000 0000 0000 0000 1000 0000 %0882 j10 %Y2 1 004567 -04547 003313 %#0000 1000 0000 1000 0000 1000 0000 %0963 j19 %L2 2 005147 -02091 -02080 %#0000 1000 1000 1000 0000 0000 0000 %0737 b09 %C2 3 002359 003734 -03914 %#0000 0000 1000 1000 1000 0000 0000 %0818 b18 %V2 4 003973 005572 -02213 %#1000 0000 1000 0000 1000 0000 0000 %0899 b27 %M2 5 002023 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0809 j09 %N2 6 008040 000000 000000 %#1000 1000 1000 0000 0000 0000 0000 %0729 b01 %W2 7 %$ ] def %END HE99_FRS09_92_D65_00%_00_LUT.DAT %********************************************************************* /cvishow {cvi 6 string cvs show} def /cvsshow1 {10 mul cvi 0.1 mul 7 string cvs show} def /cvsshow2 {100 mul cvi 0.01 mul 7 string cvs show} def /cvsshow3 {1000 mul cvi 0.001 mul 7 string cvs show} def /LAB*ioLmod {%BEG Procedure LAB*ioLmod %requires ISRL*ioL=0,1,3 /RJGBLAB* 12 array def /RJGBLAB*[ 39.92 58.74 27.99 % R CIE No.09 elementary colours in LAB, D65 81.26 -2.89 71.56 % J CIE No.10 52.23 -42.42 13.60 % G CIE No.11 30.57 1.41 -46.47 % B CIE No.12 ] def /LAB* 84 array def %12x3=36 including N,W + 16x3=48 elementary system /LAB*a 84 array def 0 1 11 {/sISO exch def /i30 sISO 3 mul def /i31 i30 1 add def /i32 i30 2 add def sISO 7 le { %sISO=0,7 LAB* i30 LAB*02 i30 get put LAB* i31 LAB*02 i31 get put LAB* i32 LAB*02 i32 get put } %sISO=0,7 {%sISO=8,11 %Definition 8 to 11 /jISO sISO 8 sub def /j30 jISO 3 mul def /j31 j30 1 add def /j32 j30 2 add def LAB* i30 RJGBLAB* j30 get put LAB* i31 RJGBLAB* j31 get put LAB* i32 RJGBLAB* j32 get put % %Definition 12 to 24 (36 to 72) % /jISO0 sISO 8 sub def % sISO 11 eq {/jISO1 0 def} % {/jISO1 jISO0 1 add def} ifelse % 0 1 3 {/ij exch def % ij 0 eq {/a0 1.00 def /b0 0.00 def} if % ij 1 eq {/a0 0.75 def /b0 0.25 def} if % ij 2 eq {/a0 0.50 def /b0 0.50 def} if % ij 3 eq {/a0 0.25 def /b0 0.75 def} if % LAB* 36 jISO0 12 mul add ij 3 mul add % RJGBLAB* jISO0 3 mul get a0 mul % RJGBLAB* jISO1 3 mul get b0 mul add put % LAB* 37 jISO0 12 mul add ij 3 mul add % RJGBLAB* jISO0 3 mul 1 add get a0 mul % RJGBLAB* jISO1 3 mul 1 add get b0 mul add put % LAB* 38 jISO0 12 mul add ij 3 mul add % RJGBLAB* jISO0 3 mul 2 add get a0 mul % RJGBLAB* jISO1 3 mul 2 add get b0 mul add put % } for } ifelse %sISO=0,7 and 8,11 } for /L*Nio LAB* 18 get def /A*Nio LAB* 19 get def /B*Nio LAB* 20 get def /L*Wio LAB* 21 get def /A*Wio LAB* 22 get def /B*Wio LAB* 23 get def /A*Dio A*Wio A*Nio sub def /B*Dio B*Wio B*Nio sub def xcolor xcolor 2 idiv 2 mul eq {/cf1 1 def}{/cf1 1.00 def} ifelse 0 1 11 {/sISO exch def /i30 sISO 3 mul def /i31 i30 1 add def /i32 i30 2 add def /l*CIE LAB* i30 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 /L*Z L*Nio L*Wio L*Nio sub 0.5 mul add def LAB*a i30 LAB* i30 get L*Z sub cf1 mul L*Z add put LAB*a i31 LAB* i31 get A*Nio sub a*s sub cf1 mul put LAB*a i32 LAB* i32 get B*Nio sub b*s sub cf1 mul put } for /cLAB*s0 3 array def %C cyan blue /vLAB*s0 3 array def %V violet blue /mLAB*s0 3 array def %M magenta red /oLAB*s0 3 array def %O orange red /yLAB*s0 3 array def %Y yellow /lLAB*s0 3 array def %L leaf green /nLAB*s0 3 array def %N black /wLAB*s0 3 array def %W white /rLAB*s0 3 array def %R elementary red /jLAB*s0 3 array def %J elementary yellow /gLAB*s0 3 array def %G elementary green /bLAB*s0 3 array def %B elementary blue %Determine Matrix data input or output data oLAB*s0 0 LAB*a 0 get L*Nio sub put oLAB*s0 1 LAB*a 1 get put oLAB*s0 2 LAB*a 2 get put yLAB*s0 0 LAB*a 3 get L*Nio sub put yLAB*s0 1 LAB*a 4 get put yLAB*s0 2 LAB*a 5 get put lLAB*s0 0 LAB*a 6 get L*Nio sub put lLAB*s0 1 LAB*a 7 get put lLAB*s0 2 LAB*a 8 get put cLAB*s0 0 LAB*a 9 get L*Nio sub put cLAB*s0 1 LAB*a 10 get put cLAB*s0 2 LAB*a 11 get put vLAB*s0 0 LAB*a 12 get L*Nio sub put vLAB*s0 1 LAB*a 13 get put vLAB*s0 2 LAB*a 14 get put mLAB*s0 0 LAB*a 15 get L*Nio sub put mLAB*s0 1 LAB*a 16 get put mLAB*s0 2 LAB*a 17 get put nLAB*s0 0 LAB*a 18 get L*Nio sub put nLAB*s0 1 LAB*a 19 get put nLAB*s0 2 LAB*a 20 get put wLAB*s0 0 LAB*a 21 get L*Nio sub put wLAB*s0 1 LAB*a 22 get put wLAB*s0 2 LAB*a 23 get put rLAB*s0 0 LAB*a 24 get L*Nio sub put rLAB*s0 1 LAB*a 25 get put rLAB*s0 2 LAB*a 26 get put jLAB*s0 0 LAB*a 27 get L*Nio sub put jLAB*s0 1 LAB*a 28 get put jLAB*s0 2 LAB*a 29 get put gLAB*s0 0 LAB*a 30 get L*Nio sub put gLAB*s0 1 LAB*a 31 get put gLAB*s0 2 LAB*a 32 get put bLAB*s0 0 LAB*a 33 get L*Nio sub put bLAB*s0 1 LAB*a 34 get put bLAB*s0 2 LAB*a 35 get put % Determine the input or output angle in the A* B* plane % of each of the colours defined above /C*Ang cLAB*s0 2 get cLAB*s0 1 get 0.0001 add atan def /V*Ang vLAB*s0 2 get vLAB*s0 1 get 0.0001 add atan def /M*Ang mLAB*s0 2 get mLAB*s0 1 get 0.0001 add atan def /O*Ang oLAB*s0 2 get oLAB*s0 1 get 0.0001 add atan def /Y*Ang yLAB*s0 2 get yLAB*s0 1 get 0.0001 add atan def /L*Ang lLAB*s0 2 get mLAB*s0 1 get 0.0001 add atan def /N*Ang 0 def /W*Ang 0 def /R*Ang rLAB*s0 2 get rLAB*s0 1 get 0.0001 add atan def /J*Ang jLAB*s0 2 get jLAB*s0 1 get 0.0001 add atan def /G*Ang gLAB*s0 2 get gLAB*s0 1 get 0.0001 add atan def /B*Ang bLAB*s0 2 get bLAB*s0 1 get 0.0001 add atan def } def %END Procedure LAB*ioLmod %*********************************************************** /proc_LAB*Fa_LAB*MaNTABl_olvi3*cmyn3*Ma*ioL { %BEG procedure proc_LAB*Fa_LAB*MaNTABl_olvi3*cmyn3*Ma*ioL %only for calculation without hue tables %input LAB*Fa %input LAB*a (6 adapted colours OYLCVM) %input nLAB*s0 (colour white N for calculation of lab*l) %input wLAB*s0 (colour white W for achromatic axis) %output LAB*Ma %output olvi3*Ma %output cmyn3*Ma /UXF1a wLAB*s0 1 get B*Fa mul wLAB*s0 2 get A*Fa mul sub def /UXF2a wLAB*s0 2 get L*Fa mul wLAB*s0 0 get B*Fa mul sub def /UXF3a wLAB*s0 0 get A*Fa mul wLAB*s0 1 get L*Fa mul sub def /T1 0 def /T2 0 def 0 1 5 {/ia exch def /ia30 ia 3 mul def ia 5 eq {/ia31 0 def} {/ia31 ia30 3 add def} ifelse /T1 LAB*a ia30 get UXF1a mul LAB*a ia30 1 add get UXF2a mul add LAB*a ia30 2 add get UXF3a mul add def /T2 LAB*a ia31 get UXF1a mul LAB*a ia31 1 add get UXF2a mul add LAB*a ia31 2 add get UXF3a mul add def T1 0 le {/T1X (N) def} {/T1X (P) def} ifelse T2 0 gt {/T2X (P) def} {/T2X (N) def} ifelse T1 0 le T2 0 gt and {/ia3END ia30 def exit} if } for /L*11a LAB*a ia3END get def /A*11a LAB*a ia3END 1 add get def /B*11a LAB*a ia3END 2 add get def ia3END 15 ge {/ia3END -3 def} if /L*21a LAB*a ia3END 3 add get def /A*21a LAB*a ia3END 4 add get def /B*21a LAB*a ia3END 5 add get def /NENNER L*21a L*11a sub UXF1a mul A*21a A*11a sub UXF2a mul add B*21a B*11a sub UXF3a mul add def /ZAEHLE L*21a UXF1a mul A*21a UXF2a mul add B*21a UXF3a mul add def NENNER 0 ne {/ALPH ZAEHLE NENNER div def} {/ALPH 99999} ifelse /L*Ma ALPH L*11a mul 1 ALPH sub L*21a mul add def /A*Ma ALPH A*11a mul 1 ALPH sub A*21a mul add def /B*Ma ALPH B*11a mul 1 ALPH sub B*21a mul add def /C*Ma A*Ma dup mul B*Ma dup mul add 0.000001 add sqrt def /H*Ma B*Ma A*Ma 0.0001 add atan def /ia30 ia 3 mul def /iap 1 ALPH sub def /iam ALPH def ia 0 eq {/c3*Ma 0 def %L, c*=0, sector O->Y /m3*Ma iam def %L, m*=1->0 /y3*Ma 1 def %L, y*=1 } if ia 1 eq {/c3*Ma iap def %L, c*=0->1, sector Y->L /m3*Ma 0 def %L, m*=0 /y3*Ma 1 def %L, y*=1 } if ia 2 eq {/c3*Ma 1 def %L, c*=1, sector L->C /m3*Ma 0 def %L, m*=0 /y3*Ma iam def %L, y*=1->0 } if ia 3 eq {/c3*Ma 1 def %L, c*=1, sector C->V /m3*Ma iap def %L, m*=1->0 /y3*Ma 0 def %L, y*=0 } if ia 4 eq {/c3*Ma iam def %L, c*=1->0, sector V->M /m3*Ma 1 def %L, m*=1 /y3*Ma 0 def %L, y*=0 } if ia 5 eq {/c3*Ma 0 def %L, c*=0, sector M->O /m3*Ma 1 def %L, m*=1 /y3*Ma iap def %L, y*=0->1 } if /o3*Ma 1 c3*Ma sub def /l3*Ma 1 m3*Ma sub def /v3*Ma 1 y3*Ma sub def /i3*Ma 1 def /lab*nMa 0.00 def /lab*cMa 1.00 def /lab*wMa 0.00 def /lab*tMa 0.50 def /lab*hMa H*Ma 360 div def /lab*lMa L*Ma nLAB*s0 0 get sub wLAB*s0 0 get nLAB*s0 0 get sub 0.000001 add div def } bind def %END procedure proc_LAB*Fa_LAB*MaNTABl_olvi3*cmyn3*Ma*ioL %******************************************************************* /proc_LAB*Fae_LAB*MaeNTABl_olvi3*cmyn3*Ma*ioL { %BEG procedure proc_LAB*Fae_LAB*MaeNTABl_olvi3*cmyn3*Ma*ioL %only for calculation without hue tables %input LAB*Fae %input LAB*a (4 adapted colours RJGB, No. 8 to 11) %input nLAB*s0 (colour white N for calculation of lab*l) %input wLAB*s0 (colour white W for achromatic axis) %output LAB*Mae %output olvi3*Mae %output cmyn3*Mae /UXF1a wLAB*s0 1 get B*Fae mul wLAB*s0 2 get A*Fae mul sub def /UXF2a wLAB*s0 2 get L*Fae mul wLAB*s0 0 get B*Fae mul sub def /UXF3a wLAB*s0 0 get A*Fae mul wLAB*s0 1 get L*Fae mul sub def /T1 0 def /T2 0 def 0 1 5 {/ia exch def /ia30 ia 3 mul def ia 5 eq {/ia31 0 def} {/ia31 ia30 3 add def} ifelse /T1 LAB*a ia30 get UXF1a mul LAB*a ia30 1 add get UXF2a mul add LAB*a ia30 2 add get UXF3a mul add def /T2 LAB*a ia31 get UXF1a mul LAB*a ia31 1 add get UXF2a mul add LAB*a ia31 2 add get UXF3a mul add def T1 0 le {/T1X (N) def} {/T1X (P) def} ifelse T2 0 gt {/T2X (P) def} {/T2X (N) def} ifelse T1 0 le T2 0 gt and {/ia3END ia30 def exit} if } for /L*11a LAB*a ia3END get def /A*11a LAB*a ia3END 1 add get def /B*11a LAB*a ia3END 2 add get def ia3END 15 ge {/ia3END -3 def} if /L*21a LAB*a ia3END 3 add get def /A*21a LAB*a ia3END 4 add get def /B*21a LAB*a ia3END 5 add get def /NENNER L*21a L*11a sub UXF1a mul A*21a A*11a sub UXF2a mul add B*21a B*11a sub UXF3a mul add def /ZAEHLE L*21a UXF1a mul A*21a UXF2a mul add B*21a UXF3a mul add def NENNER 0 ne {/ALPH ZAEHLE NENNER div def} {/ALPH 99999} ifelse /L*Mae ALPH L*11a mul 1 ALPH sub L*21a mul add def /A*Mae ALPH A*11a mul 1 ALPH sub A*21a mul add def /B*Mae ALPH B*11a mul 1 ALPH sub B*21a mul add def /C*Mae A*Mae dup mul B*Mae dup mul add 0.000001 add sqrt def /H*Mae B*Mae A*Mae 0.0001 add atan def /ia30 ia 3 mul def /iap 1 ALPH sub def /iam ALPH def ia 0 eq {/c3*Mae 0 def %L, c*=0, sector O->Y /m3*Mae iam def %L, m*=1->0 /y3*Mae 1 def %L, y*=1 } if ia 1 eq {/c3*Mae iap def %L, c*=0->1, sector Y->L /m3*Mae 0 def %L, m*=0 /y3*Mae 1 def %L, y*=1 } if ia 2 eq {/c3*Mae 1 def %L, c*=1, sector L->C /m3*Mae 0 def %L, m*=0 /y3*Mae iam def %L, y*=1->0 } if ia 3 eq {/c3*Mae 1 def %L, c*=1, sector C->V /m3*Mae iap def %L, m*=1->0 /y3*Mae 0 def %L, y*=0 } if ia 4 eq {/c3*Mae iam def %L, c*=1->0, sector V->M /m3*Mae 1 def %L, m*=1 /y3*Mae 0 def %L, y*=0 } if ia 5 eq {/c3*Mae 0 def %L, c*=0, sector M->O /m3*Mae 1 def %L, m*=1 /y3*Mae iap def %L, y*=0->1 } if /o3*Mae 1 c3*Mae sub def /l3*Mae 1 m3*Mae sub def /v3*Mae 1 y3*Mae sub def /i3*Mae 1 def /lab*nMae 0.00 def /lab*cMae 1.00 def /lab*wMae 0.00 def /lab*tMae 0.50 def /lab*hMae H*Mae 360 div def /lab*lMae L*Mae nLAB*s0 0 get sub wLAB*s0 0 get nLAB*s0 0 get sub 0.000001 add div def } bind def %END procedure proc_LAB*Fae_LAB*MaeNTABl_olvi3*cmyn3*Ma*ioL %******************************************************************* %%EndProlog gsave %LANINDL2 START 20000505 /lanind 0 def /lantex [(G) (E) (S) (F) (I) (J) (M)] def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind eq {show} {pop} ifelse} bind def /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 /popde {0 lanind ne {pop} if} bind def /popen {1 lanind ne {pop} if} bind def /popes {2 lanind ne {pop} if} bind def /popfr {3 lanind ne {pop} if} bind def /popit {4 lanind ne {pop} if} bind def /popjp {5 lanind ne {pop} if} bind def /popm {6 lanind ne {pop} if} bind def /popxde {/n exch def 0 lanind ne {n {pop} repeat} if} bind def /popxen {/n exch def 1 lanind ne {n {pop} repeat} if} bind def /popxes {/n exch def 2 lanind ne {n {pop} repeat} if} bind def /popxfr {/n exch def 3 lanind ne {n {pop} repeat} if} bind def /popxit {/n exch def 4 lanind ne {n {pop} repeat} if} bind def /popxjp {/n exch def 5 lanind ne {n {pop} repeat} if} bind def /popxm {/n exch def 6 lanind ne {n {pop} repeat} if} bind def /lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def} {/lanind1 1 def /lanind2 1 def} ifelse /xcolorg where {pop /xcolor xcolorg def} {/xcolor 0 def} ifelse /xchartg where {pop /xchart xchartg def} {/xchart 0 def} ifelse lanind1 1 lanind2 {/lanind exch def %output showpage gsave %LANINDL2 END /cvi100show {100 mul cvi /xi exch def xi 0 lt {/vorz -1 def} {/vorz 1 def} ifelse /xia xi abs def vorz -1 eq {(\255) show} {(0) show} ifelse xia 0 ge xia 9 le {(000) show} if xia 10 ge xia 99 le and {(00) show} if xia 100 ge xia 999 le and {(0) show} if % xia 1000 ge xia 9999 le and {() show} if xia cvishow ( ) show } bind def /LUTL* 247 array def %243+4=247 /LUTA* 247 array def /LUTB* 247 array def /LUTr* 247 array def /LUTg* 247 array def /LUTb* 247 array def /C*ab 247 array def /L* 247 array def /LUTl* 247 array def %243+4=247 /LUTc1* 247 array def /LUTc2* 247 array def /LUTt1* 247 array def /LUTt2* 247 array def /LUTc*rgb 247 array def /LUTt*rgb 247 array def /l1* 247 array def %243+4=247 /l2* 247 array def %l* not possible allread used olv* /c1* 247 array def /c2* 247 array def /t1* 247 array def /t2* 247 array def /c1*rgb 247 array def /c2*rgb 247 array def /t1*rgb 247 array def /t2*rgb 247 array def /ColNames [(O) (Y) (L) (C) (V) (M) (N) (W) (R) (J) (G) (B) (R) (R25J) (R50J) (R75J) (J) (J25G) (J50G) (J75G) (G) (G25B) (G50B) (G75B) (B) (B25R) (B50R) (B75R) (R) ] def /o3Ma [1 1 0 0 0 1 0 1 1 1 0 0 1 1.00 1.00 1.00 1 0.75 0.50 0.25 0 0.00 0.00 0.00 0 0.50 1.00 1.00 1] def /l3Ma [0 1 1 1 0 0 0 1 0 1 1 0 0 0.25 0.50 0.75 1 1.00 1.00 1.00 1 1.00 1.00 0.50 0 0.00 0.00 0.00 0] def /v3Ma [0 0 0 1 1 1 0 1 0 0 0 1 0 0.00 0.00 0.00 0 0.00 0.00 0.00 0 0.50 1.00 1.00 1 1.00 1.00 0.50 0] def /yd 340 def %y-Zeilenabstand %Spalten /S1 20 def /S2 450 def /S3 1550 def /S4 2650 def /S5 3750 def /S6 4650 def /S7 5350 def /S8 6400 def /S9 7200 def /S10 8000 def /S11 8800 def /S12 9600 def /yu1 4650 def /yu2 3800 4000 add def /nshow {300 /Times-ISOL1 FS show} bind def /kshow {300 /TimesI-ISOL1 FS show} bind def /bshow {300 /TimesB-ISOL1 FS show} bind def /jshow {300 /TimesBI-ISOL1 FS show} bind def /sshow {300 /Symbol FS show} bind def /ishow {220 /Times-ISOL1 FS -00 -50 rmoveto show 00 50 rmoveto} bind def /eshow {220 /Times-ISOL1 FS 0 100 rmoveto show 0 -100 rmoveto} bind def 72 90 translate 0.01 MM dup scale /L*olv 8 array def /A*olv 8 array def /B*olv 8 array def /C*olv 8 array def /H*olv 8 array def /N*olv 8 array def /o*olv 8 array def /l*olv 8 array def /v*olv 8 array def /L*rgb 8 array def /A*rgb 8 array def /B*rgb 8 array def /C*rgb 8 array def /H*rgb 8 array def /N*rgb 8 array def /o*rgb 8 array def /l*rgb 8 array def /v*rgb 8 array def /angle_olv 7 array def /angle_olvG01 7 array def /angle_olvG11 7 array def /angle_rgb 7 array def /angle_olv [38 96 151 236 305 354 398] def %standard offset /angle_rgb [26 92 162 217 272 329 386] def %CIE-test colors /angle_olvi 28 array def %shift by 00,25,50,75% /angle_olvG01i 28 array def %shift by 00,25,50,75% /angle_olvG11i 28 array def %shift by 00,25,50,75% /angle_rgbi 28 array def %shift by 00,25,50,75% 0 1 23 {/i exch def LAB*Fa0100 i LAB*Fa0100 i get 100 div put LAB*Fa1100 i LAB*Fa1100 i get 100 div put } for 0 1 23 {/i exch def LAB*FaG0100 i LAB*FaG0100 i get 100 div put LAB*FaG1100 i LAB*FaG1100 i get 100 div put } for %00 1 1 {/xcolor exch def %xcolor=0,1 gsave /icolor xcolor xcolor 2 idiv 2 mul sub def %icolor=0 or 1 0 1 02429 {/i exch def %i=0,02429 LUT i xcolor 0 eq {LUT_LAB0 i get} if xcolor 1 eq {LUT_LAB1 i get} if xcolor 2 eq {LUT_LAB2 i get} if xcolor 3 eq {LUT_LAB3 i get} if xcolor 4 eq {LUT_LAB4 i get} if xcolor 5 eq {LUT_LAB5 i get} if xcolor 6 eq {LUT_LAB6 i get} if xcolor 7 eq {LUT_LAB7 i get} if put } for %i=0,02429 0 1 9719 {/i exch def %i=0,09719 %972*10-1=9719 LUTG i icolor 0 eq {LUT_LABG0 i get} if icolor 1 eq {LUT_LABG1 i get} if put } for %i=0,09719 0 1 05 {/i exch def %i=0,5 /A*Fa LAB*FaG0100 i 3 mul 1 add get def /B*Fa LAB*FaG0100 i 3 mul 2 add get def /H*Fa B*Fa A*Fa 0.0001 add atan def angle_olvG01 i H*Fa put i 0 eq {angle_olvG01 6 H*Fa 360 add put} if /A*Fa LAB*FaG1100 i 3 mul 1 add get def /B*Fa LAB*FaG1100 i 3 mul 2 add get def /H*Fa B*Fa A*Fa 0.0001 add atan def angle_olvG11 i H*Fa put i 0 eq {angle_olvG11 6 H*Fa 360 add put} if } for %i=0,5 0 1 5 {/i exch def /i1 i 1 add def %i=0,5 /angle_olvG01_dif angle_olvG01 i1 get angle_olvG01 i get sub def angle_olvG01i i angle_olvG01 i get put angle_olvG01i i 07 add angle_olvG01 i get angle_olvG01_dif 0.25 mul add put angle_olvG01i i 14 add angle_olvG01 i get angle_olvG01_dif 0.50 mul add put angle_olvG01i i 21 add angle_olvG01 i get angle_olvG01_dif 0.75 mul add put /angle_olvG11_dif angle_olvG11 i1 get angle_olvG11 i get sub def angle_olvG11i i angle_olvG11 i get put angle_olvG11i i 07 add angle_olvG11 i get angle_olvG11_dif 0.25 mul add put angle_olvG11i i 14 add angle_olvG11 i get angle_olvG11_dif 0.50 mul add put angle_olvG11i i 21 add angle_olvG11 i get angle_olvG11_dif 0.75 mul add put } for %i=0,5 /LAB*02 24 array def /j0 0 def 729 1 971 {/jj exch def %jj=729,971 /j jj j0 sub def %necessary in both cases jj 963 eq {%RGB*02 02 RGBCMY0*tx j get put %963 0-8-0 L 2 LAB*02 06 LUTG j 10 mul 0 add get put LAB*02 07 LUTG j 10 mul 1 add get put LAB*02 08 LUTG j 10 mul 2 add get put} if jj 737 eq {%RGB*02 03 RGBCMY0*tx j get put %737 0-8-8 C 3 LAB*02 09 LUTG j 10 mul 0 add get put LAB*02 10 LUTG j 10 mul 1 add get put LAB*02 11 LUTG j 10 mul 2 add get put} if jj 818 eq {%RGB*02 04 RGBCMY0*tx j get put %818 0-0-8 V 4 LAB*02 12 LUTG j 10 mul 0 add get put LAB*02 13 LUTG j 10 mul 1 add get put LAB*02 14 LUTG j 10 mul 2 add get put} if jj 809 eq {%RGB*02 06 RGBCMY0*tx j get put %809 or 890 or 971 0-0-0 N 6 LAB*02 18 LUTG j 10 mul 0 add get LUTG 890 j0 sub 10 mul 0 add get add LUTG 971 j0 sub 10 mul 0 add get add 3 div put LAB*02 19 LUTG j 10 mul 1 add get LUTG 890 j0 sub 10 mul 1 add get add LUTG 971 j0 sub 10 mul 1 add get add 3 div put LAB*02 20 LUTG j 10 mul 2 add get LUTG 890 j0 sub 10 mul 2 add get add LUTG 971 j0 sub 10 mul 2 add get add 3 div put} if jj 801 eq {%RGB*02 00 RGBCMY0*tx j get put %801 8-0-0 O 0 LAB*02 00 LUTG j 10 mul 0 add get put LAB*02 01 LUTG j 10 mul 1 add get put LAB*02 02 LUTG j 10 mul 2 add get put} if jj 882 eq {%RGB*02 01 RGBCMY0*tx j get put %882 8-8-0 Y 1 LAB*02 03 LUTG j 10 mul 0 add get put LAB*02 04 LUTG j 10 mul 1 add get put LAB*02 05 LUTG j 10 mul 2 add get put} if jj 899 eq {%RGB*02 05 RGBCMY0*tx j get put %899 8-0-8 M 5 LAB*02 15 LUTG j 10 mul 0 add get put LAB*02 16 LUTG j 10 mul 1 add get put LAB*02 17 LUTG j 10 mul 2 add get put} if jj 729 eq {%RGB*02 07 RGBCMY0*tx j get put %729 or 810 or 891 8-8-8 W 7 LAB*02 21 LUTG j 10 mul 0 add get LUTG 810 j0 sub 10 mul 0 add get add LUTG 891 j0 sub 10 mul 0 add get add 3 div put LAB*02 22 LUTG j 10 mul 1 add get LUTG 810 j0 sub 10 mul 1 add get add LUTG 891 j0 sub 10 mul 1 add get add 3 div put LAB*02 23 LUTG j 10 mul 2 add get LUTG 810 j0 sub 10 mul 2 add get add LUTG 891 j0 sub 10 mul 2 add get add 3 div put} if } for %jj=729,971 0 1 23 {/j exch def %j=0,23 LAB*02 j LAB*02 j get 100 div put } for %j=0,23 /ISRL*ioL 0 def %standard colours /ISIO*ioL 2 def %special for LAB*02 TLS70 LAB*ioLmod 0 1 1 {/ibild exch def %ibild=0,1 ibild 0 eq {%BEG ibild=0 0 1 05 {/ic exch def %ic=0,11 S1 20 add yu2 yd ic mul sub moveto ( ) nshow N*olv ic ColNames ic get put } for %ic=0,11 0 1 05 {/i exch def %i=0,11 /ya yu2 yd i mul sub def /L*Fa LAB*a i 3 mul get def /A*Fa LAB*a i 3 mul 1 add get def /B*Fa LAB*a i 3 mul 2 add get def /C*Fa A*Fa dup mul B*Fa dup mul add sqrt def /H*Fa B*Fa A*Fa 0.0001 add atan def L*olv i L*Fa put A*olv i A*Fa put B*olv i B*Fa put C*olv i C*Fa put H*olv i H*Fa put o*olv i o3Ma i get put l*olv i l3Ma i get put v*olv i v3Ma i get put i 5 eq {L*olv 6 L*olv 0 get put A*olv 6 A*olv 0 get put B*olv 6 B*olv 0 get put A*olv 6 A*olv 0 get put C*olv 6 C*olv 0 get put H*olv 6 H*olv 0 get put o*olv 6 o*olv 0 get put l*olv 6 l*olv 0 get put v*olv 6 v*olv 0 get put } if } for %i=0,11 }%END ibild=0 {%BEG ibild=1 12 2 27 {/ic exch def %ic=12,27 N*rgb ic 12 sub 2 idiv ColNames ic get put } for %ic=12,27 %calculation of intermediate elementary colours %/proc_LAB*Fae_LAB*MaeNTABl_olvi3*cmyn3*Ma*ioL { %BEG procedure proc_LAB*Fae_LAB*MaeNTABl_olvi3*cmyn3*Ma*ioL %only for calculation without hue tables %input LAB*Fae %input LAB*a (4 adapted colours RJGB, No. 8 to 11) %input nLAB*s0 (colour white N for calculation of lab*l) %input wLAB*s0 (colour white W for achromatic axis) %output LAB*Mae %output olvi3*Mae %output cmyn3*Mae 0 1 3 {/j exch def %j=0,3 /L*Fae0 LAB*a j 8 add 3 mul 0 add get def /A*Fae0 LAB*a j 8 add 3 mul 1 add get def /B*Fae0 LAB*a j 8 add 3 mul 2 add get def /H*Fae0 B*Fae0 A*Fae0 0.0001 add atan def j 2 le {/L*Fae1 LAB*a j 1 add 8 add 3 mul 0 add get def /A*Fae1 LAB*a j 1 add 8 add 3 mul 1 add get def /B*Fae1 LAB*a j 1 add 8 add 3 mul 2 add get def /H*Fae1 B*Fae1 A*Fae1 0.0001 add atan def } {/L*Fae1 LAB*a 0 8 add 3 mul 0 add get def /A*Fae1 LAB*a 0 8 add 3 mul 1 add get def /B*Fae1 LAB*a 0 8 add 3 mul 2 add get def /H*Fae1 B*Fae1 A*Fae1 0.0001 add atan 360 add def } ifelse 0 1 1 {/i exch def %i=0,3 /n j 2 mul i add def /ya yu2 yd n mul sub 8000 add def /alph i 2 div def /beta 1 alph sub def /L*Fae L*Fae0 beta mul L*Fae1 alph mul add def /H*Fae H*Fae0 beta mul H*Fae1 alph mul add def /A*Fae 100 H*Fae cos mul def /B*Fae 100 H*Fae sin mul def proc_LAB*Fae_LAB*MaeNTABl_olvi3*cmyn3*Ma*ioL n 0 ge {/ineu n def} if n 2 ge {/ineu n 1 sub def} if n 4 ge {/ineu n 2 sub def} if L*rgb ineu L*Mae put A*rgb ineu A*Mae put B*rgb ineu B*Mae put C*rgb ineu C*Mae put H*rgb ineu H*Mae put n 7 eq {/ineu 6 def %ineu=6 L*rgb ineu L*rgb 0 get put A*rgb ineu A*rgb 0 get put B*rgb ineu B*rgb 0 get put C*rgb ineu C*rgb 0 get put H*rgb ineu H*rgb 0 get put } if %ineu=6 } for %i=0,1 } for %j=0,3 } ifelse %END ibild=1 } for %ibild=0,1 %00 1 15 {/xchart exch def %xchart=0,15 /xchartl xchart def gsave 200 /Times-ISOL1 FS 0 setgray 100 -200 moveto (HE990-7A: ) show (Messung: ) showde (Measurement: ) showen xcolor 0 eq { FileData0Na show} if xcolor 1 eq { FileData1Na show} if xcolor 2 eq { FileData2Na show} if xcolor 3 eq { FileData3Na show} if xcolor 4 eq { FileData4Na show} if xcolor 5 eq { FileData5Na show} if xcolor 6 eq { FileData6Na show} if xcolor 7 eq { FileData7Na show} if lanind 0 eq {FileDatade show} {FileDataen show} ifelse %(, Page ) showen (, Seite ) showde %xcolor 1 add cvishow (/8) show 20 setlinewidth 0 0 25000 17100 0.0 0.0 0.0 0.0 colrecfi %area white grey 0 0 25000 17100 0.0 0.0 0.0 1.0 colrecst %Rahmen Schwarz 0 1 15 {/xchartl exch def %xchartl=0,11 %special space for 'xm03'PROZ0.COM 2x before/after xchartl xchartl 0 eq { 100 13000 translate} if xchartl 1 eq { 6100 13000 translate} if xchartl 2 eq { 100 08750 translate} if xchartl 3 eq { 6100 08750 translate} if xchartl 4 eq { 100 4500 translate} if xchartl 5 eq { 6100 4500 translate} if xchartl 6 eq { 100 0250 translate} if xchartl 7 eq { 6100 0250 translate} if xchartl 8 eq {13500 13000 translate} if xchartl 9 eq {19500 13000 translate} if xchartl 10 eq {13500 08750 translate} if xchartl 11 eq {19500 08750 translate} if xchartl 12 eq {13500 4500 translate} if xchartl 13 eq {19500 4500 translate} if xchartl 14 eq {13500 0250 translate} if xchartl 15 eq {19500 0250 translate} if /xwidth 5400 def /ywidth 4000 def 0 0 xwidth ywidth 0.0 0.0 0.0 0.5 colrecfi %Rechteck Mittelgrau 20 setlinewidth 0 0 xwidth ywidth 0.0 0.0 0.0 1.0 colrecst %Rahmen Schwarz 150 /Times-ISOL1 FS 0 setgray /Param (; cf1=0.70; nt=0.18; nx=1.0) def 300 -150 moveto xchartl 5 le {(HE990-) show} {(HE991-) show} ifelse xchartl 0 ge xchartl 7 le and {xchartl 1 add cvishow} if xchartl 8 ge xchartl 15 le and {xchartl 7 sub cvishow} if (A) show %A (, ) show xcolor 1 add cvishow Param show 2600 0300 translate gsave 0.8 0.8 scale 1 setgray -3200 4175 moveto TBS (System: ) show xcolor 0 eq {FileData0Na show} if xcolor 1 eq {FileData1Na show} if xcolor 2 eq {FileData2Na show} if xcolor 3 eq {FileData3Na show} if xcolor 4 eq {FileData4Na show} if xcolor 5 eq {FileData5Na show} if xcolor 6 eq {FileData6Na show} if xcolor 7 eq {FileData7Na show} if /x400 400 def /x700 550 def 0 1 5 {/i exch def /i1 i 1 add def %i=0,5 /angle_olv_dif angle_olv i1 get angle_olv i get sub def angle_olvi i angle_olv i get put angle_olvi i 07 add angle_olv i get angle_olv_dif 0.25 mul add put angle_olvi i 14 add angle_olv i get angle_olv_dif 0.50 mul add put angle_olvi i 21 add angle_olv i get angle_olv_dif 0.75 mul add put /angle_rgb_dif angle_rgb i1 get angle_rgb i get sub def angle_rgbi i angle_rgb i get put angle_rgbi i 07 add angle_rgb i get angle_rgb_dif 0.25 mul add put angle_rgbi i 14 add angle_rgb i get angle_rgb_dif 0.50 mul add put angle_rgbi i 21 add angle_rgb i get angle_rgb_dif 0.75 mul add put } for %i=0,5 /angle6 7 array def /angle6i 28 array def /cfarb_olv_o 7 array def /cfarb_olv_l 7 array def /cfarb_olv_v 7 array def /cfarb_rgb_r 7 array def /cfarb_rgb_g 7 array def /cfarb_rgb_b 7 array def /cfarb_olv00_o 7 array def /cfarb_olv00_l 7 array def /cfarb_olv00_v 7 array def /cfarb_olv25_o 7 array def /cfarb_olv25_l 7 array def /cfarb_olv25_v 7 array def /cfarb_olv50_o 7 array def /cfarb_olv50_l 7 array def /cfarb_olv50_v 7 array def /cfarb_olv75_o 7 array def /cfarb_olv75_l 7 array def /cfarb_olv75_v 7 array def /cfarb_rgb00_r 7 array def /cfarb_rgb00_g 7 array def /cfarb_rgb00_b 7 array def /cfarb_rgb25_r 7 array def /cfarb_rgb25_g 7 array def /cfarb_rgb25_b 7 array def /cfarb_rgb50_r 7 array def /cfarb_rgb50_g 7 array def /cfarb_rgb50_b 7 array def /cfarb_rgb75_r 7 array def /cfarb_rgb75_g 7 array def /cfarb_rgb75_b 7 array def /cname_olv [(O) (Y) (L) (C) (V) (M) (O)] def /cfarb_olv_o [1 1 0 0 0 1 1] def /cfarb_olv_l [0 1 1 1 0 0 0] def /cfarb_olv_v [0 0 0 1 1 1 0] def /cname_rgb [(R) (J) (G) (G50B) (B) (B50R) (R)] def /cfarb_rgb_r [1 1 0 0 0 1 1] def /cfarb_rgb_g [0 1 1 1 0 0 0] def /cfarb_rgb_g [0 0 0 1 1 1 0] def /cname_olv00 [(O00Y) (Y00L) (L00C) (C00V) (V00M) (M00O) (O00Y)] def /cfarb_olv00_o [1 1 0 0 0 1 1] def /cfarb_olv00_l [0 1 1 1 0 0 0] def /cfarb_olv00_v [0 0 0 1 1 1 0] def /cname_olv25 [(O25Y) (Y25L) (L25C) (C25V) (V25M) (M25O) (O25Y)] def /cfarb_olv25_o [1.00 0.75 0.00 0.00 0.25 1.00 1.00] def /cfarb_olv25_l [0.25 1.00 1.00 0.75 0.00 0.00 0.25] def /cfarb_olv25_v [0.00 0.00 0.25 1.00 1.00 0.75 0.00] def /cname_olv50 [(O50Y) (Y50L) (L50C) (C50V) (V50M) (M50O) (O50Y)] def /cfarb_olv50_o [1.00 0.50 0.00 0.00 0.50 1.00 1.00] def /cfarb_olv50_l [0.50 1.00 1.00 0.50 0.00 0.00 0.50] def /cfarb_olv50_v [0.00 0.00 0.50 1.00 1.00 0.50 0.00] def /cname_olv75 [(O75Y) (Y75L) (L75C) (C75V) (V75M) (M75O) (O75Y)] def /cfarb_olv75_o [1.00 0.25 0.00 0.00 0.75 1.00 1.00] def /cfarb_olv75_l [0.75 1.00 1.00 0.25 0.00 0.00 0.75] def /cfarb_olv75_v [0.00 0.00 0.75 1.00 1.00 0.25 0.00] def /cname_rgb00 [(R00J) (J00G) (G00B) (G50B) (B00R) (B50R) (R00J)] def /cfarb_rgb00_r [1 1 0 0 0 1 1] def /cfarb_rgb00_g [0 1 1 1 0 0 0] def /cfarb_rgb00_b [0 0 0 1 1 1 0] def /cname_rgb25 [(R25J) (J25G) (G13B) (G62B) (B12R) (B63R) (R25J)] def /cfarb_rgb25_r [1.00 0.75 0.00 0.00 0.25 1.00 1.00] def /cfarb_rgb25_g [0.25 1.00 1.00 0.75 0.00 0.00 0.25] def /cfarb_rgb25_b [0.00 0.00 0.25 1.00 1.00 0.75 0.00] def /cname_rgb50 [(R50J) (J50G) (G25B) (G75B) (B25R) (B75R) (R50J)] def /cfarb_rgb50_r [1.00 0.50 0.00 0.00 0.50 1.00 1.00] def /cfarb_rgb50_g [0.50 1.00 1.00 0.50 0.00 0.00 0.50] def /cfarb_rgb50_b [0.00 0.00 0.50 1.00 1.00 0.50 0.00] def /cname_rgb75 [(R75J) (J75G) (G38B) (G88B) (B38R) (B88R) (R75J)] def /cfarb_rgb75_r [1.00 0.25 0.00 0.00 0.75 1.00 1.00] def /cfarb_rgb75_g [0.75 1.00 1.00 0.25 0.00 0.00 0.75] def /cfarb_rgb75_b [0.00 0.00 0.75 1.00 1.00 0.25 0.00] def /cname6 7 array def /olvrgb 1 def 0 1 6 {/i exch def cname6 i olvrgb 0 eq {%olvrgb=0 xcolor 0 eq xcolor 1 eq or {cname_olv00 i get} if xcolor 2 eq xcolor 3 eq or {cname_olv25 i get} if xcolor 4 eq xcolor 5 eq or {cname_olv50 i get} if xcolor 6 eq xcolor 7 eq or {cname_olv75 i get} if } {%olvrgb=1 xcolor 0 eq xcolor 1 eq or {cname_rgb00 i get} if xcolor 2 eq xcolor 3 eq or {cname_rgb25 i get} if xcolor 4 eq xcolor 5 eq or {cname_rgb50 i get} if xcolor 6 eq xcolor 7 eq or {cname_rgb75 i get} if } ifelse put angle6 i olvrgb 0 eq {%olvrgb=0 xcolor 0 eq xcolor 1 eq or {angle_olvi i get} if xcolor 2 eq xcolor 3 eq or {angle_olvi i 07 add get} if xcolor 4 eq xcolor 5 eq or {angle_olvi i 14 add get} if xcolor 6 eq xcolor 7 eq or {angle_olvi i 21 add get} if } {%olvrgb=1 xcolor 0 eq xcolor 1 eq or {angle_rgbi i get} if xcolor 2 eq xcolor 3 eq or {angle_rgbi i 07 add get} if xcolor 4 eq xcolor 5 eq or {angle_rgbi i 14 add get} if xcolor 6 eq xcolor 7 eq or {angle_rgbi i 21 add get} if } ifelse put } for xchartl 0 eq xchartl 4 eq or xchartl 8 eq or xchartl 12 eq or {/jbild 0 def} if xchartl 1 eq xchartl 5 eq or xchartl 9 eq or xchartl 13 eq or {/jbild 1 def} if xchartl 2 eq xchartl 6 eq or xchartl 10 eq or xchartl 14 eq or {/jbild 2 def} if xchartl 3 eq xchartl 7 eq or xchartl 11 eq or xchartl 15 eq or {/jbild 3 def} if jbild 3 ne {%jbild#3 -3200 3900 moveto TBS lanind 0 eq {(Buntton: )} {(Hue: )} ifelse show TBIS (h*) show TBL 0 -50 rmoveto jbild 0 eq {cname6 0 get show} if jbild 1 eq {cname6 1 get show} if jbild 2 eq {cname6 2 get show} if 0 50 rmoveto TBS (=) show jbild 0 eq {angle6 0 get cvishow} if jbild 1 eq {angle6 1 get cvishow} if jbild 2 eq {angle6 2 get cvishow} if (/360; ) show TBIS (h*) show TBL 0 -50 rmoveto jbild 0 eq {cname6 3 get show olvrgb 1 eq {0 -50 rmoveto (gb) show 0 50 rmoveto} if } if jbild 1 eq {cname6 4 get show} if jbild 2 eq {cname6 5 get show olvrgb 1 eq {0 -50 rmoveto (br) show 0 50 rmoveto} if } if 0 50 rmoveto TBS (=) show jbild 0 eq {angle6 3 get cvishow} if jbild 1 eq {angle6 4 get cvishow} if jbild 2 eq {angle6 5 get cvishow} if (/360) show } if %jbild#3 xchartl 12 ge {%xchartl>=12 -3200 3625 xchartl 15 eq {300 add} if moveto TBS lanind 0 eq {(Ergebnis: )} {(Result: )} ifelse show TBIS (c*) show TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto TBS (=) show TBIS (c*) show TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto TBS (; ) show TBIS (t*) show TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto TBS (=) show TBIS (t*) show TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto } if %xchartl>=12 xchartl 0 ge xchartl 3 le and {%0<=xchartl<=3 -3200 4400 moveto TBS (Linear relation ) showen (Beziehung ) showde TBS (CIELAB \050) show TBIS (L*, a*, b*) show TBS (\051) show TBS ( and ) showen ( und ) showde TBIS (adapted (a) ) showen (adaptiertes (a) ) showde TBS (CIELAB \050) show TBIS (C*) show TBL 0 -50 rmoveto (ab,a) show 0 50 rmoveto TBS (, ) show TBIS (L*) show TBS (\051) show x400 4100 moveto TBIS (l*) show TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto TBS (=\050 ) show TBIS (L*) show TBS ( - ) show TBIS (L*) show 0 -50 rmoveto TBL (N) show 0 50 rmoveto TBS ( \051 / \050) show TBIS (L*) show 0 -50 rmoveto TBL (W) show 0 50 rmoveto ( - ) show TBIS (L*) show 0 -50 rmoveto TBL (N) show 0 50 rmoveto TBS ( \051) show x400 3800 moveto TBIS (a*) show 0 -50 rmoveto TBL (a) show 0 50 rmoveto TBS (=) show TBIS (a*) show TBS ( - ) show TBIS (a*) show 0 -50 rmoveto TBL (N) show 0 50 rmoveto TBS ( - ) show TBIS (l*) show TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto TBS ( [ ) show TBIS (a*) show 0 -50 rmoveto TBL (W) show 0 50 rmoveto TBS ( - ) show TBIS (a*) show 0 -50 rmoveto TBL (N) show 0 50 rmoveto TBS ( ]) show x400 3500 moveto TBIS (b*) show 0 -50 rmoveto TBL (a) show 0 50 rmoveto TBS (=) show TBIS (b*) show TBS ( - ) show TBIS (b*) show 0 -50 rmoveto TBL (N) show 0 50 rmoveto TBS ( - ) show TBIS (l*) show TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto TBS ( [ ) show TBIS (b*) show 0 -50 rmoveto TBL (W) show 0 50 rmoveto TBS ( - ) show TBIS (b*) show 0 -50 rmoveto TBL (N) show 0 50 rmoveto TBS ( ]) show x400 500 add 3200 moveto TBIS (C*) show 0 -50 rmoveto TBL (ab,a) show 0 50 rmoveto TBS (=[ ) show TBIS (a*) show 0 -50 rmoveto TBL (a) show 0 050 rmoveto 0 100 rmoveto TBL (2) show 0 -100 rmoveto TBS ( + ) show TBIS (b*) show 0 -50 rmoveto TBL (a) show 0 050 rmoveto 0 100 rmoveto TBL (2) show 0 -100 rmoveto TBS ( ] ) show 0 100 rmoveto TBL (1/2) show 0 -100 rmoveto } if %0<=xchartl<=3 xchartl 4 ge xchartl 7 le and {%4<=xchartl<=7 -3200 4400 moveto %TBS (Linear relation ) showen (Beziehung ) showde TBIS (Adapted (a) ) showen (Adaptiertes (a) ) showde TBS (CIELAB \050) show TBIS (C*) show TBL 0 -50 rmoveto (ab,a) show 0 50 rmoveto TBS (, ) show TBIS (L*) show TBS (\051) show TBS ( and ) showen ( und ) showde TBIS (relative ) showen (relatives ) showde TBS (CIELAB \050) show TBIS (c*) show 0 -50 rmoveto TBL (lab*) show 0 50 rmoveto TBS (, ) show TBIS (l*) show 0 -50 rmoveto TBL (lab*) show 0 50 rmoveto TBS (\051) show x700 4100 moveto TBIS (l*) show 0 -50 rmoveto TBL (lab*) show 0 50 rmoveto TBS (=\050 ) show TBIS (L*) show TBS ( - ) show TBIS (L*) show 0 -50 rmoveto TBL (N) show 0 50 rmoveto TBS ( \051 / \050) show TBIS (L*) show 0 -50 rmoveto TBL (W) show 0 50 rmoveto ( - ) show TBIS (L*) show 0 -50 rmoveto TBL (N) show 0 50 rmoveto TBS ( \051) show x700 3800 moveto TBIS (c*) show 0 -50 rmoveto TBL (lab*) show 0 50 rmoveto TBS (=) show TBIS (C*) show 0 -50 rmoveto TBL (ab,a) show 0 50 rmoveto TBS ( / ) show TBIS (C*) show 0 -50 rmoveto TBL (ab,a,M) show 0 50 rmoveto x700 3500 moveto TBIS (M) show TBS (=Maximum colour) showen (=Maximalfarbe) showde } if %4<=xchartl<=7 xchartl 8 ge xchartl 11 le and {%8<=xchartl<=11 -3200 4400 moveto TBS (Linear relation ) showen (Beziehung ) showde TBIS (adapted (a) ) showen (adaptiertes (a) ) showde TBS (CIELAB \050) show TBIS (C*) show TBL 0 -50 rmoveto (ab,a) show 0 50 rmoveto TBS (, ) show TBIS (L*) show TBS (\051) show TBS ( and ) showen ( und ) showde TBIS (relative ) showen (relatives ) showde TBS (CIELAB \050) show TBIS (c*) show TBS (, ) show TBIS (t*) show TBS (\051) show x700 4100 moveto TBIS (l*) show 0 -50 rmoveto TBL (M) show 0 50 rmoveto TBS (=\050) show TBIS (L*) show 0 -50 rmoveto TBL (M) show 0 50 rmoveto TBS ( - ) show TBIS (L*) show 0 -50 rmoveto TBL (N) show 0 50 rmoveto TBS (\051 / \050) show TBIS (L*) show 0 -50 rmoveto TBL (W) show 0 50 rmoveto ( - ) show TBIS (L*) show 0 -50 rmoveto TBL (N) show 0 50 rmoveto TBS (\051) show x700 3800 moveto TBIS (t*) show TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto TBS (=) show TBIS (l*) show TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto TBS ( - ) show TBIS (c*) show TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto TBS ( [ ) show TBIS (l*) show %TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto 0 -50 rmoveto TBL (M) show 0 50 rmoveto TBS ( - 0,5 ]) show x700 3500 moveto TBIS (c*) show TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto TBS (=) show TBIS (C*) show 0 -50 rmoveto TBL (ab,a) show 0 50 rmoveto TBS ( / ) show TBIS (C*) show 0 -50 rmoveto TBL (ab,a,M) show 0 50 rmoveto 700 3200 moveto TBIS (M) show TBS (=Maximum colour) showen (=Maximalfarbe) showde } if %8<=xchartl<=11 xchartl 12 ge xchartl 15 le and {%12<=xchartl<=15 -3200 4400 moveto TBS (Linear relation ) showen (Beziehung ) showde TBIS olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show TBS ( and ) showen ( und ) showde TBIS (relative ) show TBS (chroma ) showen (Buntheit ) showde TBIS (c*) show TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto xchartl 03 ne xchartl 07 ne and xchartl 11 ne and xchartl 15 ne and {%xchart #3,7,11,15 or =3,7,11,15 TBS ( and triangle lightness ) showen ( und Dreiecks\255Helligkeit ) showde TBIS (t*) show TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto } %xchart #3,7,11,15 %********************************************************************************* { %xchart =3,7,11,15 TBS ( or chroma ) showen ( oder Buntheit ) showde TBIS (a) show xchartl 12 ge {(*) show} if TBL 0 -50 rmoveto xchartl 0 ge xchartl 3 le and {(rgb) show} if xchartl 4 ge xchartl 7 le and {(olv) show} if xchartl 8 ge xchartl 11 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if xchartl 12 ge xchartl 15 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if TBL 0 50 rmoveto TBS (, ) show TBIS (b) show xchartl 12 ge {(*) show} if TBL 0 -50 rmoveto xchartl 0 ge xchartl 3 le and {(rgb) show} if xchartl 4 ge xchartl 7 le and {(olv) show} if xchartl 8 ge xchartl 11 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if xchartl 12 ge xchartl 15 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if TBL 0 50 rmoveto } ifelse %xchart #3,7,11,15 or =3,7,11,15 x700 4100 moveto TBIS (c*) show TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto TBS (=max \050) show TBIS olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show TBS (\051 - min \050) show TBIS olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show TBS (\051) show x700 3800 moveto TBIS (n*) show %TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto TBS (=1 - max \050) show TBIS olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show TBS (\051) show TBS (= 1 - ) show TBIS (i*) show %TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto x700 3500 moveto TBIS (w*) show %TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto TBS (=min \050) show TBIS olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show TBS (\051) show TBS (= 1 - ) show TBIS (d*) show %TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto x700 3200 moveto TBIS (t*) show TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto TBS (=) show TBIS (w*) show %TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto TBS ( + 0,5 ) show TBIS (c*) show TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto xchartl 14 le { 700 2900 moveto TBIS (M) show TBS (=Maximum colour) showen (=Maximalfarbe) showde } if } if %12<=xchartl<=15 xchartl 2 le { 1500 150 moveto TBK (chroma) showen (Buntheit) showde 2500 150 moveto TBIK (C*) show TS 0 -50 rmoveto (ab,a) show -1600 3100 moveto TBK (lightness) showen (Helligkeit) showde -350 3100 moveto TBIK (L*) show } if grestore gsave xchart 3 le {0.75 dup scale} {0.80 dup scale} ifelse xchartl 03 ne xchartl 07 ne and xchartl 11 ne and xchartl 15 ne and {%xchart #3,7,11,15 or =3,7,11,15 xchartl 1 eq xcolor 2 eq xcolor 3 eq or and { 200 0 translate} if %special shift for J-B xchartl 1 eq xcolor 4 eq xcolor 5 eq or and {-300 0 translate} if %special shift for J-B xchartl 1 eq xcolor 6 eq xcolor 7 eq or and { 200 0 translate} if %special shift for J-B /j729 729 def xchartl 0 eq xchartl 4 eq or xchartl 8 eq or xchartl 12 eq or {/j1 729 j729 sub 10 mul def} if %series O-C xchartl 1 eq xchartl 5 eq or xchartl 9 eq or xchartl 13 eq or {/j1 729 j729 sub 081 add 10 mul def} if %series Y-V xchartl 2 eq xchartl 6 eq or xchartl 10 eq or xchartl 14 eq or {/j1 729 j729 sub 162 add 10 mul def} if %series L-M 0 1 080 {/i exch def %i=0,080 /i10 j1 i 10 mul add def LUTL* i LUT i10 0 add get 100 div put LUTA* i LUT i10 1 add get 100 div put LUTB* i LUT i10 2 add get 100 div put LUTr* i LUT i10 3 add get 1000 div put LUTg* i LUT i10 4 add get 1000 div put LUTb* i LUT i10 5 add get 1000 div put C*ab i LUTA* i get dup mul LUTB* i get dup mul add 0.000001 add sqrt put L* i LUTL* i get put } for %i=0,080 % 801 737 809 729 882 818 890 810 963 899 971 891 % j01 b09 j09 b01 j10 b18 j18 b10 j19 b27 j27 b19 % O C N1 W1 Y V N2 W2 L M N3 W3 xchartl 0 eq xchartl 4 eq or xchartl 8 eq or xchartl 12 eq or {/index [801 737 809 729] def} if %O,C,N1,W1 xchartl 1 eq xchartl 5 eq or xchartl 9 eq or xchartl 13 eq or {/index [882 818 890 810] def} if %Y,V,N2,W2 xchartl 2 eq xchartl 6 eq or xchartl 10 eq or xchartl 14 eq or {/index [963 899 971 891] def} if %L,M,N1,W2 0 1 3 {/i exch def %i=0,3 %standard colours at the end /i10 index i get j729 sub 10 mul def /i81 81 i add def LUTL* i81 LUT i10 0 add get 100 div put LUTA* i81 LUT i10 1 add get 100 div put LUTB* i81 LUT i10 2 add get 100 div put LUTr* i81 LUT i10 3 add get 1000 div put LUTg* i81 LUT i10 4 add get 1000 div put LUTb* i81 LUT i10 5 add get 1000 div put C*ab i81 LUTA* i81 get dup mul LUTB* i81 get dup mul add 0.000001 add sqrt put L* i81 LUTL* i81 get put } for %i=0,3 /L*WN LUTL* 84 get LUTL* 83 get sub def 0 1 084 {/i exch def %i=0,084 LUTl* i LUTL* i get LUTL* 83 get sub L*WN 0.000001 add div put LUTc1* i C*ab i get C*ab 81 get 0.000001 add div put LUTc2* i C*ab i get C*ab 82 get 0.000001 add div put LUTt1* i LUTl* i get LUTc1* i get L* 81 get L* 83 get sub L*WN 0.000001 add div 0.5 sub mul sub put LUTt2* i LUTl* i get LUTc2* i get L* 82 get L* 83 get sub L*WN 0.000001 add div 0.5 sub mul sub put LUTr* i get 0 lt {LUTr* i 0 put} if LUTg* i get 0 lt {LUTg* i 0 put} if LUTb* i get 0 lt {LUTb* i 0 put} if LUTr* i get 1 gt {LUTr* i 1 put} if LUTg* i get 1 gt {LUTg* i 1 put} if LUTb* i get 1 gt {LUTb* i 1 put} if %maximum /max LUTr* i get def %rgb brilliantness LUTg* i get max gt {/max LUTg* i get def} if LUTb* i get max gt {/max LUTb* i get def} if %minimum /min LUTr* i get def %rgb whiteness LUTg* i get min lt {/min LUTg* i get def} if LUTb* i get min lt {/min LUTb* i get def} if LUTc*rgb i max min sub put %rgb chroma LUTt*rgb i min max min sub 0.5 mul add put %rgb triangle lightness } for %i=0,084 %axis and scales 1 setgray -3000 0 moveto 6250 0 rlineto stroke 0 -080 moveto 0 3600 rlineto stroke 3250 100 sub 50 moveto 100 -50 rlineto -100 -50 rlineto closepath fill 0 50 sub 3600 100 sub moveto 50 100 rlineto 50 -100 rlineto closepath fill 0 setgray TS /xt001 9 array def /xt001 [(-1,0) () (-0,5) ( ) ( 0) () ( 0,5) () () ] def %( 1,0)] def /yt001 5 array def /yt001 [( ) () (0,5) ( ) (1,0)] def /xt100 9 array def /xt100 [(-100) () ( -50) ( ) ( 0) () ( 50) () (100)] def /yt100 5 array def /yt100 [( ) () (50) ( ) (100)] def 0 1 8 {/i exch def %i=0,8 -3000 i 750 mul add -50 moveto 0 100 rlineto stroke -3200 i 750 mul add -250 moveto xchartl 3 le {xt100}{xt001} ifelse i get show } for %i=0,8 0 1 4 {/i exch def %i=0,4 -75 0 i 750 mul add moveto 150 0 rlineto stroke 30 50 i 750 mul add moveto xchartl 3 le {yt100}{yt001} ifelse i get show } for %i=0,4 xchartl 4 ge xchartl 7 le and { 1 setgray -2800 3100 moveto TBIK (relative ) show TBK (lightness) showen (Helligkeit) showde -600 3100 moveto TBIK (l*) show xchartl 11 le {TS 0 -50 rmoveto (lab*) show 0 50 rmoveto} if } if xchartl 8 ge { 1 setgray -2800 3100 moveto TBK (triangle lightness) showen (Dreiecks\255Helligkeit) showde -600 3100 moveto TBIK (t*) show xchartl 11 le {TS 0 -50 rmoveto (lab*) show 0 50 rmoveto} if xchartl 12 ge {TS 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto} if } if xchartl 4 ge { 1000 150 moveto TBIK (relative ) show TBK (chroma) showen (Buntheit) showde 2800 150 moveto TBIK (c*) show xchartl 11 le {TS 0 -50 rmoveto (lab*) show 0 50 rmoveto} if xchartl 12 ge {TS 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto} if } if xchartl 12 ge { 1500 2350 moveto TBIS (n*) show %TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto TBS (=0; ) show TBIS (i*) show %TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto TBS (=1) show 1500 0550 moveto TBIS (w*) show %TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto TBS (=0; ) show TBIS (d*) show %TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto TBS (=1) show } if /fakt 30 def /fakt2 3000 def 100 /Times-ISOL1 FS /j1 0 def /k1 0 def /k2 3 def xchartl 0 ge xchartl 2 le and {%0<=xchartl <=2 %********************************************************************** 100 /Times-ISOL1 FS %only once: %spalte e05 bis e05: W-C /Vorz -1 def 0 1 0 {/j exch def %j=0,0 %lines /ja j 40 add def L* j LUTL* ja get put C*ab j LUTA* ja get dup mul LUTB* ja get dup mul add sqrt Vorz mul put newpath LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor C*ab j get fakt mul L* j get fakt mul 030 0 360 arc fill newpath } for %j=0,0 %********************************************************************** /Vorz 1 def k1 1 k2 {/k exch def %k=0,3 k 0 eq {/j2 8 def /j0 72 def} if %row j01 to j09: O-N k 1 eq {/j2 6 def /j0 64 def} if %row i02 to i08: O-N k 2 eq {/j2 4 def /j0 56 def} if %row h03 to h07: O-N k 3 eq {/j2 2 def /j0 48 def} if %row g04 to g06: O-N j1 1 j2 {/j exch def %j=j1,j2 %lines /ja j0 j add def L* j LUTL* ja get put C*ab j LUTA* ja get dup mul LUTB* ja get dup mul add sqrt Vorz mul put LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor C*ab j get fakt mul L* j get fakt mul 050 0 360 arc fill j 1 ge { C*ab j 1 sub get fakt mul L* j 1 sub get fakt mul moveto C*ab j get fakt mul L* j get fakt mul lineto stroke } if j 8 eq {k 0 eq {%k=0 icolor 0 eq {0 0 0} {0 1 0} ifelse setrgbcolor C*ab j get fakt mul L* j get fakt mul moveto C*ab 0 get fakt mul L* 0 get fakt mul lineto stroke } if %k=0 } if } for %j=j1,j2 } for %k=0,3 %********************************************************************** /Vorz 1 def k1 1 k2 {/k exch def %k=0,3 k 0 eq {/j2 8 def /j0 00 def} if %line b01 to j01: W-O k 1 eq {/j2 6 def /j0 10 def} if %line c02 to i02: W-O k 2 eq {/j2 4 def /j0 20 def} if %line d03 to h03: W-O k 3 eq {/j2 2 def /j0 30 def} if %line e04 to g04: W-O j1 1 j2 {/j exch def %j=j1,j2 %lines /ja j0 j 9 mul add def L* j LUTL* ja get put C*ab j LUTA* ja get dup mul LUTB* ja get dup mul add sqrt Vorz mul put LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor C*ab j get fakt mul L* j get fakt mul 050 0 360 arc fill j 1 ge {C*ab j 1 sub get fakt mul L* j 1 sub get fakt mul moveto C*ab j get fakt mul L* j get fakt mul lineto stroke } if j 8 eq {k 0 eq {%k=0 icolor 0 eq {0 0 0} {0 1 0} ifelse setrgbcolor C*ab j get fakt mul L* j get fakt mul moveto C*ab 0 get fakt mul L* 0 get fakt mul lineto stroke C*ab j get fakt mul L* j get fakt mul 070 0 360 arc stroke } if %k=0 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor newpath 250 /TimesBI-ISOL1 FS /xadd0 [-200 -200 -200] def /yadd0 [250 250 250] def /xadd1 [-200 -200 -200] def /yadd1 [250 250 250] def C*ab j get fakt mul olvrgb 0 eq {xadd0} {xadd1} ifelse xchartl get add L* j get fakt mul olvrgb 0 eq {yadd0} {yadd1} ifelse xchartl get add moveto cname6 xchartl get show 1 setgray C*ab j get fakt mul 580 sub L* j get fakt mul 700 sub moveto TBS (\050) show TBIS (C*) show 0 -50 rmoveto TBL (ab,a,M) show 0 50 rmoveto TBIS (,) show C*ab j get fakt mul 580 sub L* j get fakt mul 700 sub 300 sub moveto TBIS ( L*) show 0 -50 rmoveto TBL (M) show 0 50 rmoveto TBS (\051) show newpath } if } for %j=j1,j2 } for %k=0,3 %********************************************************************** /Vorz -1 def k1 1 k2 {/k exch def %k=0,3 k 0 eq {/j2 8 def /j0 08 def} if %line b09 to j09: C-N k 1 eq {/j2 6 def /j0 16 def} if %line c08 to i08: C-N k 2 eq {/j2 4 def /j0 24 def} if %line d07 to h07: C-N k 3 eq {/j2 2 def /j0 32 def} if %line e06 to h06: C-N j1 1 j2 {/j exch def %j=j1,j2 %lines /ja j0 j 9 mul add def L* j LUTL* ja get put C*ab j LUTA* ja get dup mul LUTB* ja get dup mul add sqrt Vorz mul put LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor C*ab j get fakt mul L* j get fakt mul 050 0 360 arc fill j 1 ge {C*ab j 1 sub get fakt mul L* j 1 sub get fakt mul moveto C*ab j get fakt mul L* j get fakt mul lineto stroke } if j 8 eq {k 0 eq {%k=0 icolor 0 eq {0 0 0} {0 1 0} ifelse setrgbcolor C*ab j get fakt mul L* j get fakt mul moveto C*ab 0 get fakt mul L* 0 get fakt mul lineto stroke } if %k=0 } if } for %j=j1,j2 } for %k=0,3 %********************************************************************** /Vorz -1 def k1 1 k2 {/k exch def %k=0,3 k 0 eq {/j2 8 def /j0 00 def} if %row b01 to b09: W-C k 1 eq {/j2 6 def /j0 10 def} if %row c02 to c08: W-C k 2 eq {/j2 4 def /j0 20 def} if %row d03 to d07: W-C k 3 eq {/j2 2 def /j0 30 def} if %row e04 to e06: W-C j1 1 j2 {/j exch def %j=j1,j2 %rows /ja j0 j add def L* j LUTL* ja get put C*ab j LUTA* ja get dup mul LUTB* ja get dup mul add sqrt Vorz mul put LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor C*ab j get fakt mul L* j get fakt mul 050 0 360 arc fill j 1 ge {C*ab j 1 sub get fakt mul L* j 1 sub get fakt mul moveto C*ab j get fakt mul L* j get fakt mul lineto stroke } if j 8 eq {k 0 eq {%k=0 icolor 0 eq {0 0 0} {0 1 0} ifelse setrgbcolor C*ab j get fakt mul L* j get fakt mul moveto C*ab 0 get fakt mul L* 0 get fakt mul lineto stroke C*ab j get fakt mul L* j get fakt mul 070 0 360 arc stroke } if %k=0 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor newpath 250 /TimesBI-ISOL1 FS /xadd0 [-400 -400 -400] def /yadd0 [-400 250 -400] def /xadd1 [-400 -400 -400] def /yadd1 [-400 250 -400] def C*ab j get fakt mul olvrgb 0 eq {xadd0} {xadd1} ifelse xchartl get add L* j get fakt mul olvrgb 0 eq {yadd0} {yadd1} ifelse xchartl get add moveto cname6 3 xchartl add get show newpath } if } for %j=j1,j2 } for %k=0,3 /fakt 30 def icolor 1 eq {%icolor=1 0 0 0 setrgbcolor /i24 xcolor 2 idiv 24 mul def /C*abW 0 def /C*abN 0 def /L*aN LAB*Fa0100 6 3 mul i24 add get def /L*aW LAB*Fa0100 7 3 mul i24 add get def /j xchartl def /j30 j 3 mul i24 add def /j31 j30 1 add def /j32 j30 2 add def /C*abM LAB*Fa0100 j31 get dup mul LAB*Fa0100 j32 get dup mul add 0.0001 add sqrt def C*abN fakt mul L*aN fakt mul moveto C*abM fakt mul LAB*Fa0100 j30 get fakt mul lineto C*abW fakt mul L*aW fakt mul lineto stroke /j xchartl 3 add def /j30 j 3 mul i24 add def /j31 j30 1 add def /j32 j30 2 add def /C*abM LAB*Fa0100 j31 get dup mul LAB*Fa0100 j32 get dup mul add 0.0001 add sqrt def C*abN fakt mul neg L*aN fakt mul moveto C*abM fakt mul neg LAB*Fa0100 j30 get fakt mul lineto C*abW fakt mul neg L*aW fakt mul lineto stroke } if %icolor=1 %********************************************************************** } if %0<=xchartl <=2 xchartl 4 ge xchartl 6 le and {%4<=xchartl <=6 %********************************************************************** 100 /Times-ISOL1 FS %only once: %spalte e05 bis e05: W-C 0 1 0 {/j exch def %j=0,0 %lines /ja j 40 add def l1* j LUTl* ja get put c1* j LUTc1* ja get put newpath LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor c1* j get fakt2 mul l1* j get fakt2 mul 030 0 360 arc fill newpath } for %j=0,0 %********************************************************************** /Vorz 1 def k1 1 k2 {/k exch def %k=0,3 k 0 eq {/j2 8 def /j0 72 def} if %row j01 to j09: O-N k 1 eq {/j2 6 def /j0 64 def} if %row i02 to i08: O-N k 2 eq {/j2 4 def /j0 56 def} if %row h03 to h07: O-N k 3 eq {/j2 2 def /j0 48 def} if %row g04 to g06: O-N j1 1 j2 {/j exch def %j=j1,j2 %lines /ja j0 j add def l1* j LUTl* ja get put c1* j LUTc1* ja get put LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor c1* j get fakt2 mul Vorz mul l1* j get fakt2 mul 050 0 360 arc fill j 1 ge {c1* j 1 sub get fakt2 mul Vorz mul l1* j 1 sub get fakt2 mul moveto c1* j get fakt2 mul Vorz mul l1* j get fakt2 mul lineto stroke } if j 8 eq {k 0 eq {%k=0 icolor 0 eq {0 0 0} {0 1 0} ifelse setrgbcolor c1* j get fakt2 mul Vorz mul l1* j get fakt2 mul moveto c1* 0 get fakt2 mul Vorz mul l1* 0 get fakt2 mul lineto stroke } if %k=0 } if } for %j=j1,j2 } for %k=0,3 %********************************************************************** /Vorz 1 def k1 1 k2 {/k exch def %k=0,3 k 0 eq {/j2 8 def /j0 00 def} if %line b01 to j01: W-O k 1 eq {/j2 6 def /j0 10 def} if %line c02 to i02: W-O k 2 eq {/j2 4 def /j0 20 def} if %line d03 to h03: W-O k 3 eq {/j2 2 def /j0 30 def} if %line e04 to g04: W-O j1 1 j2 {/j exch def %j=j1,j2 %lines /ja j0 j 9 mul add def l1* j LUTl* ja get put c1* j LUTc1* ja get put LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor c1* j get fakt2 mul Vorz mul l1* j get fakt2 mul 050 0 360 arc fill j 1 ge {c1* j 1 sub get fakt2 mul Vorz mul l1* j 1 sub get fakt2 mul moveto c1* j get fakt2 mul Vorz mul l1* j get fakt2 mul lineto stroke } if j 8 eq {k 0 eq {%k=0 icolor 0 eq {0 0 0} {0 1 0} ifelse setrgbcolor c1* j get fakt2 mul Vorz mul l1* j get fakt2 mul moveto c1* 0 get fakt2 mul Vorz mul l1* 0 get fakt2 mul lineto stroke c1* j get fakt2 mul Vorz mul l1* j get fakt2 mul 070 0 360 arc stroke } if %k=0 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor newpath 250 /TimesBI-ISOL1 FS /xadd0 [-200 -200 -200] def /yadd0 [250 250 250] def /xadd1 [-200 -200 -200] def /yadd1 [250 250 250] def c1* j get fakt2 mul Vorz mul olvrgb 0 eq {xadd0} {xadd1} ifelse xchartl 4 sub get add l1* j get fakt2 mul olvrgb 0 eq {yadd0} {yadd1} ifelse xchartl 4 sub get add moveto cname6 xchartl 4 sub get show 1 setgray c1* j get fakt2 mul Vorz mul 580 sub l1* j get fakt2 mul 600 sub moveto TBS (\050) show TBIS (c*) show 0 -50 rmoveto TBL (M) show 0 50 rmoveto TBIS (, l*) show 0 -50 rmoveto TBL (M) show 0 50 rmoveto TBS (\051) show newpath } if } for %j=j1,j2 } for %k=0,3 %********************************************************************** /Vorz -1 def k1 1 k2 {/k exch def %k=0,3 k 0 eq {/j2 8 def /j0 08 def} if %line b09 to j09: C-N k 1 eq {/j2 6 def /j0 16 def} if %line c08 to i08: C-N k 2 eq {/j2 4 def /j0 24 def} if %line d07 to h07: C-N k 3 eq {/j2 2 def /j0 32 def} if %line e06 to h06: C-N j1 1 j2 {/j exch def %j=j1,j2 %lines /ja j0 j 9 mul add def l2* j LUTl* ja get put c2* j LUTc2* ja get put LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor c2* j get fakt2 mul Vorz mul l2* j get fakt2 mul 050 0 360 arc fill j 1 ge {c2* j 1 sub get fakt2 mul Vorz mul l2* j 1 sub get fakt2 mul moveto c2* j get fakt2 mul Vorz mul l2* j get fakt2 mul lineto stroke } if j 8 eq {k 0 eq {%k=0 icolor 0 eq {0 0 0} {0 1 0} ifelse setrgbcolor c2* j get fakt2 mul Vorz mul l2* j get fakt2 mul moveto c2* 0 get fakt2 mul Vorz mul l2* 0 get fakt2 mul lineto stroke } if %k=0 } if } for %j=j1,j2 } for %k=0,3 %********************************************************************** /Vorz -1 def k1 1 k2 {/k exch def %k=0,3 k 0 eq {/j2 8 def /j0 00 def} if %row b01 to b09: W-C k 1 eq {/j2 6 def /j0 10 def} if %row c02 to c08: W-C k 2 eq {/j2 4 def /j0 20 def} if %row d03 to d07: W-C k 3 eq {/j2 2 def /j0 30 def} if %row e04 to e06: W-C j1 1 j2 {/j exch def %j=j1,j2 %rows /ja j0 j add def l2* j LUTl* ja get put c2* j LUTc2* ja get put LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor c2* j get fakt2 mul Vorz mul l2* j get fakt2 mul 050 0 360 arc fill j 1 ge {c2* j 1 sub get fakt2 mul Vorz mul l2* j 1 sub get fakt2 mul moveto c2* j get fakt2 mul Vorz mul l2* j get fakt2 mul lineto stroke } if j 8 eq {k 0 eq {%k=0 icolor 0 eq {0 0 0} {0 1 0} ifelse setrgbcolor c2* j get fakt2 mul Vorz mul l2* j get fakt2 mul moveto c2* 0 get fakt2 mul Vorz mul l2* 0 get fakt2 mul lineto stroke c2* j get fakt2 mul Vorz mul l2* j get fakt2 mul 070 0 360 arc stroke } if %k=0 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor newpath 250 /TimesBI-ISOL1 FS /xadd0 [-000 -400 -400] def /yadd0 [-400 250 -400] def /xadd1 [-000 -400 -400] def /yadd1 [-400 250 -400] def c2* j get fakt2 mul Vorz mul olvrgb 0 eq {xadd0} {xadd1} ifelse xchartl 4 sub get add l2* j get fakt2 mul olvrgb 0 eq {yadd0} {yadd1} ifelse xchartl 4 sub get add moveto cname6 xchartl 4 sub 3 add get show newpath } if } for %j=j1,j2 } for %k=0,3 %********************************************************************** } if %4<=xchartl <=6 xchartl 8 ge xchartl 10 le and {%8<=xchartl <=10 %********************************************************************** 100 /Times-ISOL1 FS %only once: %spalte e05 bis e05: W-C 0 1 0 {/j exch def %j=0,0 %lines /ja j 40 add def t1* j LUTt1* ja get put c1* j LUTc1* ja get put newpath LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor c1* j get fakt2 mul t1* j get fakt2 mul 030 0 360 arc fill newpath } for %j=0,0 %********************************************************************** /Vorz 1 def k1 1 k2 {/k exch def %k=0,3 k 0 eq {/j2 8 def /j0 72 def} if %row j01 to j09: O-N k 1 eq {/j2 6 def /j0 64 def} if %row i02 to i08: O-N k 2 eq {/j2 4 def /j0 56 def} if %row h03 to h07: O-N k 3 eq {/j2 2 def /j0 48 def} if %row g04 to g06: O-N j1 1 j2 {/j exch def %j=j1,j2 %lines /ja j0 j add def t1* j LUTt1* ja get put c1* j LUTc1* ja get put LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor c1* j get fakt2 mul Vorz mul t1* j get fakt2 mul 050 0 360 arc fill j 1 ge {c1* j 1 sub get fakt2 mul Vorz mul t1* j 1 sub get fakt2 mul moveto c1* j get fakt2 mul Vorz mul t1* j get fakt2 mul lineto stroke } if j 8 eq {k 0 eq {%k=0 icolor 0 eq {0 0 0} {0 1 0} ifelse setrgbcolor c1* j get fakt2 mul Vorz mul t1* j get fakt2 mul moveto c1* 0 get fakt2 mul Vorz mul t1* 0 get fakt2 mul lineto stroke } if %k=0 } if } for %j=j1,j2 } for %k=0,3 %********************************************************************** /Vorz 1 def k1 1 k2 {/k exch def %k=0,3 k 0 eq {/j2 8 def /j0 00 def} if %line b01 to j01: W-O k 1 eq {/j2 6 def /j0 10 def} if %line c02 to i02: W-O k 2 eq {/j2 4 def /j0 20 def} if %line d03 to h03: W-O k 3 eq {/j2 2 def /j0 30 def} if %line e04 to g04: W-O j1 1 j2 {/j exch def %j=j1,j2 %lines /ja j0 j 9 mul add def t1* j LUTt1* ja get put c1* j LUTc1* ja get put LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor c1* j get fakt2 mul Vorz mul t1* j get fakt2 mul 050 0 360 arc fill j 1 ge {c1* j 1 sub get fakt2 mul Vorz mul t1* j 1 sub get fakt2 mul moveto c1* j get fakt2 mul Vorz mul t1* j get fakt2 mul lineto stroke } if j 8 eq {k 0 eq {%k=0 icolor 0 eq {0 0 0} {0 1 0} ifelse setrgbcolor c1* j get fakt2 mul Vorz mul t1* j get fakt2 mul moveto c1* 0 get fakt2 mul Vorz mul t1* 0 get fakt2 mul lineto stroke c1* j get fakt2 mul Vorz mul t1* j get fakt2 mul 070 0 360 arc stroke } if %k=0 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor newpath 250 /TimesBI-ISOL1 FS /xadd0 [-200 -200 -200] def /yadd0 [250 250 250] def /xadd1 [-200 -200 -200] def /yadd1 [250 250 250] def c1* j get fakt2 mul Vorz mul olvrgb 0 eq {xadd0} {xadd1} ifelse xchartl 8 sub get add t1* j get fakt2 mul olvrgb 0 eq {yadd0} {yadd1} ifelse xchartl 8 sub get add moveto cname6 xchartl 8 sub get show 1 setgray c1* j get fakt2 mul Vorz mul 580 sub t1* j get fakt2 mul 600 sub moveto TBS (\050) show TBIS (c*) show 0 -50 rmoveto TBL (M) show 0 50 rmoveto TBIS (, t*) show 0 -50 rmoveto TBL (M) show 0 50 rmoveto TBS (\051) show newpath } if } for %j=j1,j2 } for %k=0,3 %********************************************************************** /Vorz -1 def k1 1 k2 {/k exch def %k=0,3 k 0 eq {/j2 8 def /j0 08 def} if %line b09 to j09: C-N k 1 eq {/j2 6 def /j0 16 def} if %line c08 to i08: C-N k 2 eq {/j2 4 def /j0 24 def} if %line d07 to h07: C-N k 3 eq {/j2 2 def /j0 32 def} if %line e06 to h06: C-N j1 1 j2 {/j exch def %j=j1,j2 %lines /ja j0 j 9 mul add def t2* j LUTt2* ja get put c2* j LUTc2* ja get put LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor c2* j get fakt2 mul Vorz mul t2* j get fakt2 mul 050 0 360 arc fill j 1 ge {c2* j 1 sub get fakt2 mul Vorz mul t2* j 1 sub get fakt2 mul moveto c2* j get fakt2 mul Vorz mul t2* j get fakt2 mul lineto stroke } if j 8 eq {k 0 eq {%k=0 icolor 0 eq {0 0 0} {0 1 0} ifelse setrgbcolor c2* j get fakt2 mul Vorz mul t2* j get fakt2 mul moveto c2* 0 get fakt2 mul Vorz mul t2* 0 get fakt2 mul lineto stroke } if %k=0 } if } for %j=j1,j2 } for %k=0,3 %********************************************************************** /Vorz -1 def k1 1 k2 {/k exch def %k=0,3 k 0 eq {/j2 8 def /j0 00 def} if %row b01 to b09: W-C k 1 eq {/j2 6 def /j0 10 def} if %row c02 to c08: W-C k 2 eq {/j2 4 def /j0 20 def} if %row d03 to d07: W-C k 3 eq {/j2 2 def /j0 30 def} if %row e04 to e06: W-C j1 1 j2 {/j exch def %j=j1,j2 %rows /ja j0 j add def t2* j LUTt2* ja get put c2* j LUTc2* ja get put LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor c2* j get fakt2 mul Vorz mul t2* j get fakt2 mul 050 0 360 arc fill j 1 ge {c2* j 1 sub get fakt2 mul Vorz mul t2* j 1 sub get fakt2 mul moveto c2* j get fakt2 mul Vorz mul t2* j get fakt2 mul lineto stroke } if j 8 eq {k 0 eq {%k=0 icolor 0 eq {0 0 0} {0 1 0} ifelse setrgbcolor c2* j get fakt2 mul Vorz mul t2* j get fakt2 mul moveto c2* 0 get fakt2 mul Vorz mul t2* 0 get fakt2 mul lineto stroke c2* j get fakt2 mul Vorz mul t2* j get fakt2 mul 070 0 360 arc stroke } if %k=0 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor newpath 250 /TimesBI-ISOL1 FS /xadd0 [-000 -400 -400] def /yadd0 [-400 250 -400] def /xadd1 [-000 -400 -400] def /yadd1 [-400 250 -400] def c2* j get fakt2 mul Vorz mul olvrgb 0 eq {xadd0} {xadd1} ifelse xchartl 8 sub get add t2* j get fakt2 mul olvrgb 0 eq {yadd0} {yadd1} ifelse xchartl 8 sub get add moveto cname6 xchartl 8 sub 3 add get show newpath } if } for %j=j1,j2 } for %k=0,3 %********************************************************************** } if %8<=xchartl <=10 xchartl 12 ge xchartl 14 le and {%12<=xchartl <=14 %********************************************************************** 100 /Times-ISOL1 FS %only once: %spalte e05 bis e05: W-C 0 1 0 {/j exch def %j=0,0 %lines /ja j 40 add def t1*rgb j LUTt*rgb ja get put c1*rgb j LUTc*rgb ja get put newpath LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor c1*rgb j get fakt2 mul t1*rgb j get fakt2 mul 030 0 360 arc fill newpath } for %j=0,0 %********************************************************************** /Vorz 1 def k1 1 k2 {/k exch def %k=0,3 k 0 eq {/j2 8 def /j0 72 def} if %row j01 to j09: O-N k 1 eq {/j2 6 def /j0 64 def} if %row i02 to i08: O-N k 2 eq {/j2 4 def /j0 56 def} if %row h03 to h07: O-N k 3 eq {/j2 2 def /j0 48 def} if %row g04 to g06: O-N j1 1 j2 {/j exch def %j=j1,j2 %lines /ja j0 j add def t1*rgb j LUTt*rgb ja get put c1*rgb j LUTc*rgb ja get put LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor c1*rgb j get fakt2 mul Vorz mul t1*rgb j get fakt2 mul 050 0 360 arc fill j 1 ge {c1*rgb j 1 sub get fakt2 mul Vorz mul t1*rgb j 1 sub get fakt2 mul moveto c1*rgb j get fakt2 mul Vorz mul t1*rgb j get fakt2 mul lineto stroke } if j 8 eq {k 0 eq {%k=0 icolor 0 eq {0 0 0} {0 1 0} ifelse setrgbcolor c1*rgb j get fakt2 mul Vorz mul t1*rgb j get fakt2 mul moveto c1*rgb 0 get fakt2 mul Vorz mul t1*rgb 0 get fakt2 mul lineto stroke } if %k=0 } if } for %j=j1,j2 } for %k=0,3 %********************************************************************** /Vorz 1 def k1 1 k2 {/k exch def %k=0,3 k 0 eq {/j2 8 def /j0 00 def} if %line b01 to j01: W-O k 1 eq {/j2 6 def /j0 10 def} if %line c02 to i02: W-O k 2 eq {/j2 4 def /j0 20 def} if %line d03 to h03: W-O k 3 eq {/j2 2 def /j0 30 def} if %line e04 to g04: W-O j1 1 j2 {/j exch def %j=j1,j2 %lines /ja j0 j 9 mul add def t1*rgb j LUTt*rgb ja get put c1*rgb j LUTc*rgb ja get put LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor c1*rgb j get fakt2 mul Vorz mul t1*rgb j get fakt2 mul 050 0 360 arc fill j 1 ge {c1*rgb j 1 sub get fakt2 mul Vorz mul t1*rgb j 1 sub get fakt2 mul moveto c1*rgb j get fakt2 mul Vorz mul t1*rgb j get fakt2 mul lineto stroke } if j 8 eq {k 0 eq {%k=0 icolor 0 eq {0 0 0} {0 1 0} ifelse setrgbcolor c1*rgb j get fakt2 mul Vorz mul t1*rgb j get fakt2 mul moveto c1*rgb 0 get fakt2 mul Vorz mul t1*rgb 0 get fakt2 mul lineto stroke c1*rgb j get fakt2 mul Vorz mul t1*rgb j get fakt2 mul 070 0 360 arc stroke } if %k=0 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor newpath 250 /TimesBI-ISOL1 FS /xadd0 [-200 -200 -200] def /yadd0 [250 250 250] def /xadd1 [-200 -200 -200] def /yadd1 [250 250 250] def c1*rgb j get fakt2 mul Vorz mul olvrgb 0 eq {xadd0} {xadd1} ifelse xchartl 12 sub get add t1*rgb j get fakt2 mul olvrgb 0 eq {yadd0} {yadd1} ifelse xchartl 12 sub get add moveto cname6 xchartl 12 sub get show 1 setgray c1*rgb j get fakt2 mul Vorz mul 580 sub t1*rgb j get fakt2 mul 600 sub moveto TBS (\050) show TBIS (c*) show 0 -50 rmoveto TBL (M) show 0 50 rmoveto TBIS (, t*) show 0 -50 rmoveto TBL (M) show 0 50 rmoveto TBS (\051) show newpath } if } for %j=j1,j2 } for %k=0,3 %********************************************************************** /Vorz -1 def k1 1 k2 {/k exch def %k=0,3 k 0 eq {/j2 8 def /j0 08 def} if %line b09 to j09: C-N k 1 eq {/j2 6 def /j0 16 def} if %line c08 to i08: C-N k 2 eq {/j2 4 def /j0 24 def} if %line d07 to h07: C-N k 3 eq {/j2 2 def /j0 32 def} if %line e06 to h06: C-N j1 1 j2 {/j exch def %j=j1,j2 %lines /ja j0 j 9 mul add def t2*rgb j LUTt*rgb ja get put c2*rgb j LUTc*rgb ja get put LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor c2*rgb j get fakt2 mul Vorz mul t2*rgb j get fakt2 mul 050 0 360 arc fill j 1 ge {c2*rgb j 1 sub get fakt2 mul Vorz mul t2*rgb j 1 sub get fakt2 mul moveto c2*rgb j get fakt2 mul Vorz mul t2*rgb j get fakt2 mul lineto stroke } if j 8 eq {k 0 eq {%k=0 icolor 0 eq {0 0 0} {0 1 0} ifelse setrgbcolor c2*rgb j get fakt2 mul Vorz mul t2*rgb j get fakt2 mul moveto c2*rgb 0 get fakt2 mul Vorz mul t2*rgb 0 get fakt2 mul lineto stroke } if %k=0 } if } for %j=j1,j2 } for %k=0,3 %********************************************************************** /Vorz -1 def k1 1 k2 {/k exch def %k=0,3 k 0 eq {/j2 8 def /j0 00 def} if %row b01 to b09: W-C k 1 eq {/j2 6 def /j0 10 def} if %row c02 to c08: W-C k 2 eq {/j2 4 def /j0 20 def} if %row d03 to d07: W-C k 3 eq {/j2 2 def /j0 30 def} if %row e04 to e06: W-C j1 1 j2 {/j exch def %j=j1,j2 %rows /ja j0 j add def t2*rgb j LUTt*rgb ja get put c2*rgb j LUTc*rgb ja get put LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor c2*rgb j get fakt2 mul Vorz mul t2*rgb j get fakt2 mul 050 0 360 arc fill j 1 ge {c2*rgb j 1 sub get fakt2 mul Vorz mul t2*rgb j 1 sub get fakt2 mul moveto c2*rgb j get fakt2 mul Vorz mul t2*rgb j get fakt2 mul lineto stroke } if j 8 eq {k 0 eq {%k=0 icolor 0 eq {0 0 0} {0 1 0} ifelse setrgbcolor c2*rgb j get fakt2 mul Vorz mul t2*rgb j get fakt2 mul moveto c2*rgb 0 get fakt2 mul Vorz mul t2*rgb 0 get fakt2 mul lineto stroke c2*rgb j get fakt2 mul Vorz mul t2*rgb j get fakt2 mul 070 0 360 arc stroke } if %k=0 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor newpath 250 /TimesBI-ISOL1 FS /xadd0 [-000 -400 -400] def /yadd0 [-400 250 -400] def /xadd1 [-000 -400 -400] def /yadd1 [-400 250 -400] def c2*rgb j get fakt2 mul Vorz mul olvrgb 0 eq {xadd0} {xadd1} ifelse xchartl 12 sub get add t2*rgb j get fakt2 mul olvrgb 0 eq {yadd0} {yadd1} ifelse xchartl 12 sub get add moveto cname6 xchartl 12 sub 3 add get show newpath } if } for %j=j1,j2 } for %k=0,3 %********************************************************************** } if %12<=xchartl <=14 xchartl 1 eq xcolor 2 eq xcolor 3 eq or and {-200 0 translate} if %special shift for J-B TLS00a xchartl 1 eq xcolor 4 eq xcolor 5 eq or and { 300 0 translate} if %special shift for J-B FRS06a xchartl 1 eq xcolor 6 eq xcolor 7 eq or and {-200 0 translate} if %special shift for J-B TLS18a %********************************************************************** } %xchart #3,7,11,15 %********************************************************************************* { %xchart =3,7,11,15 1 setgray xchartl 11 le {-3400 4175 moveto TBS (CIELAB) show (\255Bunttonwinkel: ) showde ( hue angles: ) showen } if -3400 3900 moveto TBIS (h) show 0 -50 rmoveto TBL (ab,d) show 0 50 rmoveto TBS (=[) show 0 1 5 {/i exch def %i=0,5 angle_olvG11i i get cvishow i 5 ne {(, ) show} if } for %i=0,5 (]) show -3400 3625 moveto TBIS (h) show 0 -50 rmoveto TBL (ab,ex) show 0 50 rmoveto TBS (=[) show 0 1 5 {/i exch def %i=0,5 angle6 i get cvishow i 5 ne {(, ) show} if } for %i=0,5 (]) show olvrgb 1 eq {%olvrgb=1 -3400 3350 moveto TBIS (h) show 0 -50 rmoveto TBL (ab,e) show 0 50 rmoveto TBS (=[) show 0 1 5 {/i exch def %i=0,5 angle_rgb i get cvishow i 5 ne {(, ) show} if } for %i=0,5 (]) show } if %olvrgb=1 1600 200 add 2900 moveto %xchartl 3 eq {200 sub} if 2900 moveto TBIS (a*) show TBL 0 -50 rmoveto xchartl 0 ge xchartl 3 le and {(a) show} if xchartl 4 ge xchartl 7 le and {(lab*) show} if xchartl 8 ge xchartl 11 le and {(lab*) show} if xchartl 12 ge xchartl 15 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if TBL 0 50 rmoveto TBS (=) show xchartl 4 le { TBIS (C*) show TBL 0 -50 rmoveto (ab,a) show TBL 0 50 rmoveto } { TBIS (c*) show TBL 0 -50 rmoveto xchartl 4 ge xchartl 7 le and {(lab*) show} if xchartl 8 ge xchartl 11 le and {(lab*) show} if xchartl 12 ge xchartl 15 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if TBL 0 50 rmoveto } ifelse TBIS ( cos h) show 0 -50 rmoveto TBL (ab) show 0 50 rmoveto 1600 200 add 2600 moveto %xchartl 3 eq {200 sub} if 2600 moveto TBIS (b*) show TBL 0 -50 rmoveto xchartl 0 ge xchartl 3 le and {(a) show} if xchartl 4 ge xchartl 7 le and {(lab*) show} if xchartl 8 ge xchartl 11 le and {(lab*) show} if xchartl 12 ge xchartl 15 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if TBL 0 50 rmoveto TBS (=) show xchartl 4 le { TBIS (C*) show TBL 0 -50 rmoveto (ab,a) show TBL 0 50 rmoveto } { TBIS (c*) show TBL 0 -50 rmoveto xchartl 4 ge xchartl 7 le and {(lab*) show} if xchartl 8 ge xchartl 11 le and {(lab*) show} if xchartl 12 ge xchartl 15 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if TBL 0 50 rmoveto } ifelse TBIS ( sin h) show 0 -50 rmoveto TBL (ab) show 0 50 rmoveto -400 200 add 3800 moveto %xchartl 11 le {300 add} if 3500 moveto TBIK (b*) show TBS 0 -50 rmoveto xchartl 0 ge xchartl 3 le and {(a) show} if xchartl 4 ge xchartl 7 le and {(lab*) show} if xchartl 8 ge xchartl 11 le and {(lab*) show} if xchartl 12 ge xchartl 15 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if TBS 0 50 rmoveto 1800 xchartl 3 le {700 add } if 1900 moveto xchartl 4 ge {TBIK (relative ) show} if TBK lanind 0 eq {(Buntheit ) showde} {(chroma ) showen} ifelse 2700 1650 moveto TBIK (a*) show TBS 0 -50 rmoveto xchartl 0 ge xchartl 3 le and {(a) show} if xchartl 4 ge xchartl 7 le and {(lab*) show} if xchartl 8 ge xchartl 11 le and {(lab*) show} if xchartl 12 ge xchartl 15 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if TBS 0 50 rmoveto %new shift in middle 0 1500 translate %axis and scales 1 setgray -3000 0 moveto 6300 0 rlineto stroke 0 -1880 moveto 0 3600 rlineto stroke 3300 100 sub 50 moveto 100 -50 rlineto -100 -50 rlineto closepath fill 0 50 sub 1800 100 sub moveto 50 100 rlineto 50 -100 rlineto closepath fill 0 setgray TS /xt001 9 array def /xt001 [(-2,0) () (-1,0) ( ) ( ) () () () () ]def %( 1,0) () ( 2,0)] def /yt001 5 array def /yt001 [(-1,0 ) () ( ) ( ) (1,0)] def /xt100 9 array def /xt100 [(-200) () (-100) ( ) ( ) () ( 100) () ( 200)] def /yt100 5 array def /yt100 [(-100 ) () ( ) ( ) (100)] def 2 1 6 {/i exch def %i=2,6 -3000 i 750 mul add -50 moveto 0 100 rlineto stroke -3650 i 850 mul add -200 moveto xchartl 3 le {xt100} {xt001} ifelse i get show } for %i=2,6 0 1 4 {/i exch def %i=0,4 -75 -1500 i 750 mul add moveto 150 0 rlineto stroke 100 -1650 i 800 mul add moveto xchartl 3 le {yt100} {yt001} ifelse i get show } for %i=0,4 newpath %********************************************************************** %For all xchartl=3,7,11,15 %Variable hue series O00Y-O83Y, Y00L-Y83L, L00C-L83C, % C00V-C83V, C00V-C83V, C00V-C83V-O00Y 250 /TimesBI-ISOL1 FS /fcolor1 1.10 def /fcolor2 1.20 def /j729 0 def 0 1 5 {/xtonj exch def %xton=0,5 0 1 7 {/j exch def %i=0,08 xtonj 0 eq {/j10 648 j729 sub j 09 mul add 10 mul def} if %series O00Y-O83Y, -09 xtonj 1 eq {/j10 720 j729 sub j 81 mul sub 10 mul def} if %series Y00L-Y83L, -81 xtonj 2 eq {/j10 072 j729 sub j add 10 mul def} if %series L00C-L83C, +01 xtonj 3 eq {/j10 080 j729 sub j 09 mul sub 10 mul def} if %series C00V-C83V, -09 xtonj 4 eq {/j10 008 j729 sub j 81 mul add 10 mul def} if %series C00V-C83V, -81 xtonj 5 eq {/j10 656 j729 sub j sub 10 mul def} if %series C00V-C83V, +01 LUTL* j LUTG j10 0 add get 100 div put LUTA* j LUTG j10 1 add get 100 div put LUTB* j LUTG j10 2 add get 100 div put LUTr* j LUTG j10 3 add get 1000 div put LUTg* j LUTG j10 4 add get 1000 div put LUTb* j LUTG j10 5 add get 1000 div put C*ab j LUTA* j get dup mul LUTB* j get dup mul add 0.000001 add sqrt put L* j LUTL* j get put LUTc*rgb j 1000 put } for %j=0,08 %********************************************************************** /j0 0 def /j1 0 def /j2 8 def /k 0 def /fakt 30 def /fakt1 15 def /fakt2 1500 def 0 1 7 {/j exch def %j=0,8 %lines /ja j0 j add def c1*rgb j LUTc*rgb ja get put C*ab j LUTA* ja get dup mul LUTB* ja get dup mul add sqrt put /angleWO LUTB* ja get LUTA* ja get 0.0001 add atan def LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor xchartl 3 le {%xchart=3 newpath C*ab j get fakt1 mul angleWO cos mul C*ab j get fakt1 mul angleWO sin mul moveto C*ab j get fakt1 mul angleWO cos mul C*ab j get fakt1 mul angleWO sin mul 050 0 360 arc fill } {%xchart>=7 newpath c1*rgb j get fakt2 mul angleWO cos mul c1*rgb j get fakt2 mul angleWO sin mul moveto c1*rgb j get fakt2 mul angleWO cos mul c1*rgb j get fakt2 mul angleWO sin mul 050 0 360 arc fill } ifelse %xchart=3,>=7 } for %j=0,8 } for %xton=0,5 %END for all xchartl=3,7,11,15 %********************************************************************** %For all xchartl=3,7,11,15 %Constant hue series 250 /TimesBI-ISOL1 FS /fcolor1 1.10 def /fcolor2 1.20 def /j729 729 def 0 1 2 {/xtonj exch def %xton=0,2 xtonj 0 eq {/j1 729 j729 sub 10 mul def} if %series O-C xtonj 1 eq {/j1 729 j729 sub 081 add 10 mul def} if %series Y-V xtonj 2 eq {/j1 729 j729 sub 162 add 10 mul def} if %series L-M 0 1 080 {/i exch def %i=0,080 /i10 j1 i 10 mul add def LUTL* i LUT i10 0 add get 100 div put LUTA* i LUT i10 1 add get 100 div put LUTB* i LUT i10 2 add get 100 div put LUTr* i LUT i10 3 add get 1000 div put LUTg* i LUT i10 4 add get 1000 div put LUTb* i LUT i10 5 add get 1000 div put C*ab i LUTA* i get dup mul LUTB* i get dup mul add 0.000001 add sqrt put L* i LUTL* i get put } for %i=0,080 % 801 737 809 729 882 818 890 810 963 899 971 891 % j01 b09 j09 b01 j10 b18 j18 b10 j19 b27 j27 b19 % O C N1 W1 Y V N2 W2 L M N3 W3 xtonj 0 eq {/index [801 737 809 729] def} if %O,C,N1,W1 xtonj 1 eq {/index [882 818 890 810] def} if %Y,V,N2,W2 xtonj 2 eq {/index [963 899 971 891] def} if %L,M,N1,W2 0 1 3 {/i exch def %i=0,3 %standard colours at the end /i10 index i get j729 sub 10 mul def /i81 81 i add def LUTL* i81 LUT i10 0 add get 100 div put LUTA* i81 LUT i10 1 add get 100 div put LUTB* i81 LUT i10 2 add get 100 div put LUTr* i81 LUT i10 3 add get 1000 div put LUTg* i81 LUT i10 4 add get 1000 div put LUTb* i81 LUT i10 5 add get 1000 div put C*ab i81 LUTA* i81 get dup mul LUTB* i81 get dup mul add 0.000001 add sqrt put L* i81 LUTL* i81 get put } for %i=0,3 /L*WN LUTL* 84 get LUTL* 83 get sub def 0 1 084 {/i exch def %i=0,084 LUTl* i LUTL* i get LUTL* 83 get sub L*WN 0.000001 add div put LUTc1* i C*ab i get C*ab 81 get 0.000001 add div put LUTc2* i C*ab i get C*ab 82 get 0.000001 add div put LUTt1* i LUTl* i get LUTc1* i get L* 81 get L* 83 get sub L*WN 0.000001 add div 0.5 sub mul sub put LUTt2* i LUTl* i get LUTc2* i get L* 82 get L* 83 get sub L*WN 0.000001 add div 0.5 sub mul sub put LUTr* i get 0 lt {LUTr* i 0 put} if LUTg* i get 0 lt {LUTg* i 0 put} if LUTb* i get 0 lt {LUTb* i 0 put} if LUTr* i get 1 gt {LUTr* i 1 put} if LUTg* i get 1 gt {LUTg* i 1 put} if LUTb* i get 1 gt {LUTb* i 1 put} if %maximum /max LUTr* i get def %rgb brilliantness LUTg* i get max gt {/max LUTg* i get def} if LUTb* i get max gt {/max LUTb* i get def} if %minimum /min LUTr* i get def %rgb whiteness LUTg* i get min lt {/min LUTg* i get def} if LUTb* i get min lt {/min LUTb* i get def} if LUTc*rgb i max min sub put %rgb chroma LUTt*rgb i min max min sub 0.5 mul add put %rgb triangle lightness } for %i=0,084 %********************************************************************** /j0 0 def /j1 0 def /j2 8 def /k 0 def /fakt 30 def /fakt1 15 def /fakt2 1500 def 0 1 8 {/j exch def %j=0,8 %lines /ja j0 j 9 mul add def c1*rgb j LUTc*rgb ja get put C*ab j LUTA* ja get dup mul LUTB* ja get dup mul add sqrt put /angleWO LUTB* ja get LUTA* ja get 0.0001 add atan def LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor xchartl 3 le {%xchart=3 C*ab j get fakt1 mul angleWO cos mul C*ab j get fakt1 mul angleWO sin mul 050 0 360 arc fill j j2 eq {%j=j2 0 1 0 setrgbcolor C*ab j get fakt1 mul angleWO cos mul C*ab j get fakt1 mul angleWO sin mul 065 0 360 arc stroke LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor /xadd0 [-100 -600 -500 -700 -200 000] def /yadd0 [ 100 -000 -200 -100 -200 100] def C*ab j get fakt1 mul fcolor2 mul angleWO cos mul xadd0 xtonj get add C*ab j get fakt1 mul fcolor2 mul angleWO sin mul yadd0 xtonj get add moveto cname6 xtonj get show newpath icolor 1 eq {0 1 0 setrgbcolor 0 0 moveto C*ab j get fakt1 mul angleWO cos mul C*ab j get fakt1 mul angleWO sin mul lineto stroke } if } if %j=j2 } {%xchart>=7 c1*rgb j get fakt2 mul angleWO cos mul c1*rgb j get fakt2 mul angleWO sin mul 050 0 360 arc fill j j2 eq {%j=j2 0 1 0 setrgbcolor c1*rgb j get fakt2 mul angleWO cos mul c1*rgb j get fakt2 mul angleWO sin mul 065 0 360 arc stroke LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor /xadd0 [-100 -500 -500 -700 -200 000] def /yadd0 [ 100 -000 -200 -100 -200 100] def c1*rgb j get fakt2 mul fcolor2 mul angleWO cos mul xadd0 xtonj get add c1*rgb j get fakt2 mul fcolor2 mul angleWO sin mul yadd0 xtonj get add moveto cname6 xtonj get show icolor 1 eq {0 1 0 setrgbcolor %icolor=1 0 0 moveto c1*rgb j get fakt2 mul angleWO cos mul c1*rgb j get fakt2 mul angleWO sin mul lineto stroke } if %icolor=1 } if %j=j2 } ifelse %xchart=3,>=7 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor j 1 ge {xchartl 3 eq {olvrgb 0 eq {C*ab j 1 sub get fakt1 mul angleWO cos mul C*ab j 1 sub get fakt1 mul angleWO sin mul moveto C*ab j get fakt1 mul angleWO cos mul C*ab j get fakt1 mul angleWO sin mul lineto stroke } if } {c1*rgb j 1 sub get fakt2 mul angleWO cos mul c1*rgb j 1 sub get fakt2 mul angleWO sin mul moveto c1*rgb j get fakt2 mul angleWO cos mul c1*rgb j get fakt2 mul angleWO sin mul lineto stroke } ifelse } if } for %j=0,8 %********************************************************************** 0 1 8 {/j exch def %j=0,8 %lines /ja j0 j add def c2*rgb j LUTc*rgb ja get put C*ab j LUTA* ja get dup mul LUTB* ja get dup mul add sqrt put /angleWO LUTB* ja get LUTA* ja get 0.0001 add atan def LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor xchartl 3 le {%xchart=3 C*ab j get fakt1 mul angleWO cos mul C*ab j get fakt1 mul angleWO sin mul 050 0 360 arc fill j j2 eq {%j=j2 0 1 0 setrgbcolor C*ab j get fakt1 mul angleWO cos mul C*ab j get fakt1 mul angleWO sin mul 065 0 360 arc stroke LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor /xadd0 [-000 -100 -500 -700 -200 000] def /yadd0 [ 100 -000 000 -100 -200 100] def C*ab j get fakt1 mul fcolor2 mul angleWO cos mul xadd0 xtonj 3 add get add C*ab j get fakt1 mul fcolor2 mul angleWO sin mul yadd0 xtonj 3 add get add moveto cname6 xtonj 3 add get show newpath icolor 1 eq {0 1 0 setrgbcolor 0 0 moveto C*ab j get fakt1 mul angleWO cos mul C*ab j get fakt1 mul angleWO sin mul lineto stroke } if } if %j=j2 } {%xchart=7 c2*rgb j get fakt2 mul angleWO cos mul c2*rgb j get fakt2 mul angleWO sin mul 050 0 360 arc fill j j2 eq {%j=j2 0 1 0 setrgbcolor c2*rgb j get fakt2 mul angleWO cos mul c2*rgb j get fakt2 mul angleWO sin mul 065 0 360 arc stroke LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor /xadd0 [-000 -100 -500 -700 -200 000] def /yadd0 [ 100 -000 000 -100 -100 100] def c2*rgb j get fakt2 mul fcolor2 mul angleWO cos mul xadd0 xtonj 3 add get add c2*rgb j get fakt2 mul fcolor2 mul angleWO sin mul yadd0 xtonj 3 add get add moveto cname6 xtonj 3 add get show icolor 1 eq {0 1 0 setrgbcolor %icolor=1 0 0 moveto c2*rgb j get fakt2 mul angleWO cos mul c2*rgb j get fakt2 mul angleWO sin mul lineto stroke } if %icolor=1 } if %j=j2 } ifelse %xchart=3, %xchart>=7 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor j 1 ge {xchartl 3 le {C*ab j 1 sub get fakt1 mul angleWO cos mul C*ab j 1 sub get fakt1 mul angleWO sin mul moveto C*ab j get fakt1 mul angleWO cos mul C*ab j get fakt1 mul angleWO sin mul lineto stroke } {c2*rgb j 1 sub get fakt2 mul angleWO cos mul c2*rgb j 1 sub get fakt2 mul angleWO sin mul moveto c2*rgb j get fakt2 mul angleWO cos mul c2*rgb j get fakt2 mul angleWO sin mul lineto stroke } ifelse } if } for %j=00,08 %xtonj=0 %series O-C %xtonj=1 %series Y-V %xtonj=2 %series L-M } for %xton=0,2 %END for all xchartl=3,7,11,15 %********************************************************************** xchartl 3 eq {%xchartl=3 %BEG Hexagon % 801 737 809 729 882 818 890 810 963 899 971 891 % j01 b09 j09 b01 j10 b18 j18 b10 j19 b27 j27 b19 % O C N1 W1 Y V N2 W2 L M N3 W3 /fakt1 15 def /indexX 7 array def /indexX [801 882 963 737 818 899 801] def /LUTL*X 7 array def /LUTA*X 7 array def /LUTB*X 7 array def 0 setgray /fcolor1 1.10 def /fcolor2 1.20 def 250 /TimesBI-ISOL1 FS /j729 0 def 0 1 6 {/iX exch def %iX=0,6 %hexagon standard colours at the end /i10 indexX iX get j729 sub 10 mul def LUTL*X iX LUTG i10 0 add get 100 div put LUTA*X iX LUTG i10 1 add get 100 div put LUTB*X iX LUTG i10 2 add get 100 div put LUTr* iX LUTG i10 3 add get 1000 div put LUTg* iX LUTG i10 4 add get 1000 div put LUTb* iX LUTG i10 5 add get 1000 div put iX 5 le {0 0 0 setrgbcolor 0 0 moveto LUTA*X iX get fakt1 mul fcolor1 mul cf1 div LUTB*X iX get fakt1 mul fcolor1 mul cf1 div lineto stroke /xadd0 [-000 -100 -500 -700 -200 000] def /yadd0 [ 100 100 000 -100 -200 100] def LUTA*X iX get fakt1 mul fcolor2 mul cf1 div xadd0 iX get add LUTB*X iX get fakt1 mul fcolor2 mul cf1 div yadd0 iX get add moveto 0 0 0 setrgbcolor cname_olv00 iX get show newpath } if iX 5 le icolor 1 eq and {0 0 0 setrgbcolor 0 0 moveto LUTA*X iX get fakt1 mul LUTB*X iX get fakt1 mul lineto stroke } if iX 1 ge {0 0 0 setrgbcolor LUTA*X iX 1 sub get fakt1 mul cf1 div LUTB*X iX 1 sub get fakt1 mul cf1 div moveto LUTA*X iX get fakt1 mul cf1 div LUTB*X iX get fakt1 mul cf1 div lineto stroke } if iX 1 ge icolor 1 eq and {0 1 0 setrgbcolor LUTA*X iX 1 sub get fakt1 mul LUTB*X iX 1 sub get fakt1 mul moveto LUTA*X iX get fakt1 mul LUTB*X iX get fakt1 mul lineto stroke } if } for %iX=0,6 %hexagon 250 /TimesBI-ISOL1 FS /c1000 1 fakt2 mul def olvrgb 1 eq {%olvrgb=1 0 1 5 {/i exch def %i=0,5 0 1 0 setrgbcolor /angleRGB angle_rgbi i get def %elementary colors 0 0 moveto c1000 angleRGB cos mul xcolor 2 ge {1.1 mul} if c1000 angleRGB sin mul xcolor 2 ge {1.1 mul} if lineto stroke /xadd0 [-000 100 -000 -600 -300 000] def /yadd0 [ 000 -000 000 -000 -000 000] def cfarb_rgb00_r i get cfarb_rgb00_g i get cfarb_rgb00_b i get setrgbcolor c1000 angleRGB cos mul 1.2 mul xadd0 i get add c1000 angleRGB sin mul 1.2 mul yadd0 i get add moveto cname_rgb00 i get show } for %i=0,5 } if %olvrgb=1 } if %xchartl=3 %********************************************************************** xchartl 7 ge {%xchart>=7 %circle icolor 0 eq {0 0 0 setrgbcolor} {0 1 0 setrgbcolor} ifelse 0 1500 moveto newpath 0 0 1500 0 360 arc stroke %BEG Hexagon % 801 737 809 729 882 818 890 810 963 899 971 891 % j01 b09 j09 b01 j10 b18 j18 b10 j19 b27 j27 b19 % O C N1 W1 Y V N2 W2 L M N3 W3 /fakt1 15 def /indexX 7 array def /indexX [801 882 963 737 818 899 801] def /LUTL*X 7 array def /LUTA*X 7 array def /LUTB*X 7 array def 0 setgray /fcolor1 1.10 def /fcolor2 1.20 def /c1000 1 fakt2 mul def 250 /TimesBI-ISOL1 FS /j729 0 def 0 1 6 {/iX exch def %iX=0,5 %hexagon standard colours at the end /i10 indexX iX get j729 sub 10 mul def LUTL*X iX LUTG i10 0 add get 100 div put LUTA*X iX LUTG i10 1 add get 100 div put LUTB*X iX LUTG i10 2 add get 100 div put LUTr* iX LUTG i10 3 add get 1000 div put LUTg* iX LUTG i10 4 add get 1000 div put LUTb* iX LUTG i10 5 add get 1000 div put /angleOLV LUTB*X iX get LUTA*X iX get 0.0001 add atan def iX 5 le {0 0 0 setrgbcolor 0 0 moveto c1000 angleOLV cos mul fcolor2 mul c1000 angleOLV sin mul fcolor2 mul lineto stroke /xadd0 [-200 -300 -300 -500 -400 -000] def /yadd0 [ 100 300 000 -100 -200 100] def c1000 angleOLV cos mul fcolor2 mul xadd0 iX get add c1000 angleOLV sin mul fcolor2 mul yadd0 iX get add moveto 0 0 0 setrgbcolor cname_olv00 iX get show } if iX 5 le icolor 1 eq and {xcolor 2 ge {0 0 0}{0 0 0} ifelse setrgbcolor 0 0 moveto c1000 angleOLV cos mul fcolor2 mul c1000 angleOLV sin mul fcolor2 mul lineto stroke } if } for %iX=0,6 %hexagon 250 /TimesBI-ISOL1 FS olvrgb 1 eq {%olvrgb=1 0 1 5 {/i exch def %i=0,5 0 1 0 setrgbcolor /angleRGB angle_rgbi i get def %elementary colors 0 0 moveto c1000 angleRGB cos mul xcolor 2 ge {1.1 mul} if c1000 angleRGB sin mul xcolor 2 ge {1.1 mul} if lineto stroke /xadd0 [-000 100 -500 -600 -300 000] def /yadd0 [ 000 -000 000 -000 -000 000] def cfarb_rgb00_r i get cfarb_rgb00_g i get cfarb_rgb00_b i get setrgbcolor c1000 angleRGB cos mul 1.2 mul xadd0 i get add c1000 angleRGB sin mul 1.2 mul yadd0 i get add moveto cname_rgb00 i get show } for %i=0,5 } if %olvrgb=1 } if %xchartl=4 %********************************************************************** 0 1500 neg translate } ifelse %xchart #3,7,11,15 or =3,7,11,15 grestore 2600 neg 0300 neg translate %special space for 'xm03'PROZ0.COM 2x before/after xchartl xchartl 0 eq { 100 neg 13000 neg translate} if xchartl 1 eq { 6100 neg 13000 neg translate} if xchartl 2 eq { 100 neg 08750 neg translate} if xchartl 3 eq { 6100 neg 08750 neg translate} if xchartl 4 eq { 100 neg 4500 neg translate} if xchartl 5 eq { 6100 neg 4500 neg translate} if xchartl 6 eq { 100 neg 0250 neg translate} if xchartl 7 eq { 6100 neg 0250 neg translate} if xchartl 8 eq {13500 neg 13000 neg translate} if xchartl 9 eq {19500 neg 13000 neg translate} if xchartl 10 eq {13500 neg 08750 neg translate} if xchartl 11 eq {19500 neg 08750 neg translate} if xchartl 12 eq {13500 neg 4500 neg translate} if xchartl 13 eq {19500 neg 4500 neg translate} if xchartl 14 eq {13500 neg 0250 neg translate} if xchartl 15 eq {19500 neg 0250 neg translate} if } for % xchartl=0,15 showpage grestore %} for %xchart=0,15 grestore %} for %xcolor=0,1 } for %output with langind end %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 86 MM 020 MM translate 12 /Times-ISOL1 FS -9 MM -7 MM moveto ( ) show 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 18 %line 409 %!PS-Adobe-3.0 EPSF-3.0 HE990-8, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (HE990-8,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 197 MM translate 10 /Times-ISOL1 FS 1 1 scale -77 -91 translate %%BeginDocument: Bild 12 %line 419 %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 152 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 21 %line 429 %!PS-Adobe-3.0 EPSF-3.0 HE991-1, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (HE991-1,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 219 MM 152 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 22 %line 439 %!PS-Adobe-3.0 EPSF-3.0 HE991-2, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (HE991-2,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 108 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 23 %line 449 %!PS-Adobe-3.0 EPSF-3.0 HE991-3, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (HE991-3,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 219 MM 108 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 24 %line 459 %!PS-Adobe-3.0 EPSF-3.0 HE991-4, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (HE991-4,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 064 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 25 %line 469 %!PS-Adobe-3.0 EPSF-3.0 HE991-5, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (HE991-5,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 219 MM 064 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 26 %line 479 %!PS-Adobe-3.0 EPSF-3.0 HE991-6, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (HE991-6,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 020 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 27 %line 489 %!PS-Adobe-3.0 EPSF-3.0 HE991-7, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (HE991-7,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 219 MM 020 MM translate 12 /Times-ISOL1 FS -9 MM -7 MM moveto ( ) show 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 28 %line 499 %!PS-Adobe-3.0 EPSF-3.0 HE991-8, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (HE991-8,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 219 MM 080 MM add 008 MM translate %80 MM Breite von TestStreifen 10 /Times-ISOL1 FS 53 MM 1 MM moveto () show 1 1 scale -77 21 MM sub -91 translate %%BeginDocument: Bild 29 Teststreifen Ueberlaenge %line 509 %%EndDocument EndEPSF grestore gsave BeginEPSF -0.0 MM -0.0 MM translate %xy-Verschiebung Rechteckrahmen nach innen% %%BeginDocument: Bild 30 %Rechteckrahmen %line 519 %!PS-Adobe-3.0 EPSF-3.0 Frame arround with Internet text DG02 20080601 %%BoundingBox: 0 0 598 845 %%EndProlog gsave /lanind 1 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 /i*ptrsc where {pop %/i*ptrsc i*ptrsc def } {/i*ptrsc 0 def} ifelse gsave /xchartg where {pop /xchart xchartg def} {/xchart 0 def} ifelse /colormg where {pop /colorm colormg def} {/colorm 0 def} ifelse /ISRL*ioG where {pop}{/ISRL*ioG 0 def} ifelse /ISIN*ioG where {pop}{/ISIN*ioG 0 def} ifelse /ISOU*ioG where {pop}{/ISOU*ioG 0 def} ifelse /ausz 8 def %xchart 0 eq {%BEG if xchart=0 0 setgray 1.0 1.0 scale 0.0 MM 0.0 MM translate 0.15 MM setlinewidth /xx 20 array def /yy 20 array def /dd 20 array def /xx [000 296 296 000 002 294 294 002 005 291 291 005 %speziell 006 290 290 006 008 288 288 008 ] def /yy [000 000 210 210 002 002 208 208 005 005 205 205 %speziell 006 006 204 204 008 008 202 202 ] def /dd [060 017 -60 -17 058 015 -58 -15 056 013 -56 -13 054 011 -54 -11 052 009 -52 -09 ] def /xlu 017 MM def /ylu 017 MM def /xro 279 MM def /yro 193 MM def /xlo 017 MM def /ylo 193 MM def /xru 279 MM def /yru 017 MM def xlu 8 MM sub ylu moveto 16 MM 0 rlineto stroke xlu ylu 8 MM sub moveto 0 16 MM rlineto stroke xro 8 MM add yro moveto -16 MM 0 rlineto stroke xro yro 8 MM add moveto 0 -16 MM rlineto stroke xru 8 MM sub yru moveto 16 MM 0 rlineto stroke xru yru 8 MM sub moveto 0 16 MM rlineto stroke xlo 8 MM add ylo moveto -16 MM 0 rlineto stroke xlo ylo 8 MM add moveto 0 -16 MM rlineto stroke 1 2 7 {/i exch def %Zentrierkreise xlu ylu i MM 0 360 arc stroke xro yro i MM 0 360 arc stroke xru yru i MM 0 360 arc stroke xlo ylo i MM 0 360 arc stroke } for %i 12 4 16 {/i exch def /i0 i def %i=0,16 %0 4 16 {/i exch def /i0 i def %i=0,16 /i1 i0 1 add def /i2 i0 2 add def /i3 i0 3 add def i 16 eq {0.30 MM setlinewidth} {0.15 MM setlinewidth} ifelse 0 setgray xx i0 get MM yy i0 get MM moveto xx i1 get MM yy i1 get MM lineto xx i2 get MM yy i2 get MM lineto xx i3 get MM yy i3 get MM lineto xx i0 get MM yy i0 get MM lineto stroke i 16 eq {6 /Times-ISOL1 FS /x00 67 def /xdif 32 def /y0o 202.3 def /y0u 6.3 def /x0l 6.1 def /x0r 288 def /y00 22 def /ydif 32 def x00 xdif 0 mul add MM y0o MM moveto (V) show x00 xdif 0 mul add MM y0u MM moveto (C) show x00 xdif 1 mul add MM y0o MM moveto (L) show x00 xdif 1 mul add MM y0u MM moveto (M) show x00 xdif 2 mul add MM y0o MM moveto (O) show x00 xdif 2 mul add MM y0u MM moveto (Y) show x00 xdif 3 mul add MM y0o MM moveto (Y) show x00 xdif 3 mul add MM y0u MM moveto (O) show x00 xdif 4 mul add MM y0o MM moveto (M) show x00 xdif 4 mul add MM y0u MM moveto (L) show x00 xdif 5 mul add MM y0o MM moveto (C) show x00 xdif 5 mul add MM y0u MM moveto (V) show x0l MM y00 ydif 0 mul add MM moveto (V) show x0r MM y00 ydif 0 mul add MM moveto (C) show x0l MM y00 ydif 1 mul add MM moveto (L) show x0r MM y00 ydif 1 mul add MM moveto (M) show x0l MM y00 ydif 2 mul add MM moveto (O) show x0r MM y00 ydif 2 mul add MM moveto (Y) show x0l MM y00 ydif 3 mul add MM moveto (Y) show x0r MM y00 ydif 3 mul add MM moveto (O) show x0l MM y00 ydif 4 mul add MM moveto (M) show x0r MM y00 ydif 4 mul add MM moveto (L) show x0l MM y00 ydif 5 mul add MM moveto (C) show x0r MM y00 ydif 5 mul add MM moveto (V) show } if } for %i=0,16 0 1 10 {/j0 exch def /j1 j0 1 add def %j0 j0 0 eq {tzcolv* setrgbcolor} if j0 1 eq {0 setgray} if j0 2 eq {tzmolv* setrgbcolor} if j0 3 eq {0 setgray} if j0 4 eq {tzyolv* setrgbcolor} if j0 5 eq {0 setgray} if j0 6 eq {tzoolv* setrgbcolor} if j0 7 eq {0 setgray} if j0 8 eq {tzlolv* setrgbcolor} if j0 9 eq {0 setgray} if j0 10 eq {tzvolv* setrgbcolor} if 12 4 16 {/i exch def /i0 i def %i=0,16 %0 4 16 {/i exch def /i0 i def %i=0,16 /i1 i0 1 add def /i2 i0 2 add def /i3 i0 3 add def i 16 eq {0.30 MM setlinewidth} {0.15 MM setlinewidth} ifelse xx i0 get dd i0 get add 16 j0 mul add MM yy i0 get MM moveto xx i0 get dd i0 get add 16 j1 mul add MM yy i0 get MM lineto stroke xx i1 get MM yy i1 get dd i1 get add 16 j0 mul add MM moveto xx i1 get MM yy i1 get dd i1 get add 16 j1 mul add MM lineto stroke xx i2 get dd i2 get add 16 j0 mul sub MM yy i2 get MM moveto xx i2 get dd i2 get add 16 j1 mul sub MM yy i2 get MM lineto stroke xx i3 get MM yy i3 get dd i3 get add 16 j0 mul sub MM moveto xx i3 get MM yy i3 get dd i3 get add 16 j1 mul sub MM lineto stroke } for %i=0,16 } for %j0 0.15 MM setlinewidth /s 7 MM def /s1 8 MM def /s5 36 MM def 16 1 20 {/j exch def /j0 j 16 sub def %j=16,20 /ix0 xlu 8 MM add j0 7 MM mul add def /iy0 ylu 8 MM sub def 0 1 3 {/ij exch def %ij=0,3 ij 0 eq {/ix0 xlu 8 MM add j0 7 MM mul add def /iy0 ylu 8 MM sub def} if ij 1 eq {/ix0 xru 43 MM sub j0 7 MM mul add def /iy0 yru 8 MM sub def} if ij 2 eq {/ix0 xlo 8 MM add j0 7 MM mul add def /iy0 ylo 1 MM add def} if ij 3 eq {/ix0 xro 43 MM sub j0 7 MM mul add def /iy0 yro 1 MM add def} if i*ptrsc 0 eq i*ptrsc 2 eq or {%i*ptrsc=0,2 cmy0* setcmykcolor j 16 eq {/ng tzan j get def ng ng ng 0 setcmykcolor ix0 0.5 MM sub iy0 0.5 MM sub s5 s1 rec fill} if /ng tzan j get def ng ng ng 0 setcmykcolor ix0 iy0 s s rec fill } if %i*ptrsc=0,2 i*ptrsc 1 eq i*ptrsc 3 eq or {%i*ptrsc=1,3 www* setrgbcolor j 16 eq {/wg 1 tzan j get sub def wg setgray %N ix0 0.5 MM sub iy0 0.5 MM sub s5 s1 rec fill} if /wg 1 tzan j get sub def wg setgray %N ix0 iy0 s s rec fill } if %i*ptrsc=1,3 i*ptrsc 4 eq i*ptrsc 5 eq or {%i*ptrsc=4,5 [/CIEBasedABC << %Farbraum und Grenzen fuer D65 /RangeABC [0 100 -128 127 -128 127] /DecodeABC [{16 add 116 div} bind {500 div} bind {200 div} bind] /MatrixABC [1 1 1 1 0 0 0 0 -1] /DecodeLMN [{dup 6 29 div ge {dup dup mul mul} {4 29 div sub 108 841 div mul} ifelse 0.9505 mul} bind {dup 6 29 div ge {dup dup mul mul} {4 29 div sub 108 841 div mul} ifelse} bind {dup 6 29 div ge {dup dup mul mul} {4 29 div sub 108 841 div mul} ifelse 1.0890 mul} bind] /WhitePoint [0.9505 1 1.089] %CIEXYZ fuer D65 >>] setcolorspace j 16 eq {tznLAB* 0 get tzwLAB* 0 get tznLAB* 0 get sub 0.25 j0 mul mul add tznLAB* 1 get tzwLAB* 1 get tznLAB* 1 get sub 0.25 j0 mul mul add tznLAB* 2 get tzwLAB* 2 get tznLAB* 2 get sub 0.25 j0 mul mul add setcolor %N ix0 0.5 MM sub iy0 0.5 MM sub s5 s1 rec fill} if tznLAB* 0 get tzwLAB* 0 get tznLAB* 0 get sub 0.25 j0 mul mul add tznLAB* 1 get tzwLAB* 1 get tznLAB* 1 get sub 0.25 j0 mul mul add tznLAB* 2 get tzwLAB* 2 get tznLAB* 2 get sub 0.25 j0 mul mul add setcolor %N ix0 iy0 s s rec fill } if %i*ptrsc=4,5 i*ptrsc 6 eq {%i*ptrsc=6 000n* setcmykcolor j 16 eq {/ng tzan j get def 0 0 0 ng setcmykcolor ix0 0.5 MM sub iy0 0.5 MM sub s5 s1 rec fill} if /ng tzan j get def 0 0 0 ng setcmykcolor ix0 iy0 s s rec fill } if %i*ptrsc=6 i*ptrsc 7 eq {%i*ptrsc=7 w* setgray j 16 eq {/wg 1 tzan j get sub def wg setgray ix0 0.5 MM sub iy0 0.5 MM sub s5 s1 rec fill} if /wg 1 tzan j get sub def wg setgray ix0 iy0 s s rec fill } if %i*ptrsc=7 } for %ij=0,3 } for %j=16,20 0 setgray 018 MM 008.2 MM moveto 6 /Times-Roman FS (-8) show 018 MM 006.2 MM moveto 6 /Times-Roman FS (-6) show 276 MM 008.2 MM moveto 6 /Times-Roman FS (-8) show 276 MM 006.2 MM moveto 6 /Times-Roman FS (-6) show 018 MM 202.2 MM moveto 6 /Times-Roman FS (-8) show 018 MM 204.2 MM moveto 6 /Times-Roman FS (-6) show 276 MM 202.2 MM moveto 6 /Times-Roman FS (-8) show 276 MM 204.2 MM moveto 6 /Times-Roman FS (-6) show 0 setgray 12 /Times-ISOL1 FS 61 MM 13 MM moveto (TUB\255Pr\374fvorlage HE99; Relatives Elementar\255Farbsystem G) showde (TUB\255test chart HE99; Reletive Elementary Colour System G) showen 61 MM 09 MM moveto (9\255stufig; Laserdrucker; Separation + Linearisierung) showde (9 step series; laser printer; separation + linarisation) showen 12 /Times-ISOL1 FS 167 MM 13 MM moveto ( input: ) showen (Eingabe: ) showde 12 /TimesI-ISOL1 FS ( rgb -> olv*) show 12 /Times-ISOL1 FS 167 MM 9 MM moveto ( output: ) showen (Ausgabe: ) showde LSC$ (N) eq {%LSC$=N 12 /Times-ISOL1 FS xchart 1 le xchart 4 eq or {(no change compared to input) showen (keine Eingabe\344nderung) showde} {12 /TimesI-ISOL1 FS (->olv* setrgbcolor) show 12 /Times-ISOL1 FS} ifelse } if %LSC$=N LSC$ (S) eq { (Startup (S) data dependend) showen (Startup(S)Daten abh\344ngig) showde } if LSC$ (F) eq { 12 /TimesI-ISOL1 FS i*ptrsc 0 eq {(cmy0* / 000n* setcmykcolor) show} if i*ptrsc 1 eq {xchart 1 le xchart 4 eq or {12 /Times-ISOL1 FS (no change compared to input) showen (keine Eingabe\344nderung) showde } {(->LAB*->olv* setrgbcolor) show } ifelse } if i*ptrsc 2 eq {(cmy0* / nnn0* setcmykcolor) show} if i*ptrsc 3 eq {(olv* / www* setrgbcolor) show} if i*ptrsc 4 eq {(lab* setcolor) show} if i*ptrsc 5 eq {(LAB* setcolor) show} if i*ptrsc 6 eq {(000n* setcmykcolor) show} if i*ptrsc 7 eq {(w* setgray) show} if } if %0 setgray %end white and unvisible 12 /Times-ISOL1 FS 62 MM 198.5 MM moveto (http://130.149.60.45/~farbmetrik/HE99/HE99L) show (0) show LSC$ show LEX$ show (, Page ) showen (, Seite ) showde xcolor 1 add cvishow (/2) show (; ) show LAB*TE 0 get show (; ) show xcolor xcolor 2 idiv 2 mul eq {(Start\255Ausgabe) showde (start output) showen} {(linearisierte Ausgabe) showde (linearized output) showen} ifelse 62 MM 194 MM moveto LSC$ (N) eq LSC$ (C) eq or { (N: Keine Ausgabe\255Linearisierung (OL) in Datei (F), Startup (S), Ger\344t (D)) showde (N: No Output Linearization (OL) data in File (F), Startup (S) or Device (D)) showen (N: No Output Linearization (OL) data in File (F), Startup (S) or Device (D)) showes (N: No Output Linearization (OL) data in File (F), Startup (S) or Device (D)) showfr (N: No Output Linearization (OL) data in File (F), Startup (S) or Device (D)) showit (N: No Output Linearization (OL) data in File (F), Startup (S) or Device (D)) showjp (N: No Output Linearization (OL) data in File (F), Startup (S) or Device (D)) showm } {LSC$ show (: ) show (Linearisierte\255Ausgabe) showde (linearized output) showen (linearized output) showes (linearized output) showfr (linearized output) showit (linearized output) showjp (linearized output) showm (HE99/HE99L) show (0) show LSC$ show LEY$ show } ifelse LSC$ (F) eq { ( in der Datei (F)) showde ( in File (F)) showen ( in File (F)) showes ( in File (F)) showfr ( in File (F)) showit ( in File (F)) showjp ( in File (F)) showm } if LSC$ (S) eq { ( im Distiller Startup (S) Directory) showde ( in Distiller Startup (S) Directory) showen ( in Distiller Startup (S) Directory) showes ( in Distiller Startup (S) Directory) showfr ( in Distiller Startup (S) Directory) showit ( in Distiller Startup (S) Directory) showjp ( in Distiller Startup (S) Directory) showm } if LSC$ (D) eq { ( in PostScript Device (D)) showde ( in PostScript Device (D)) showen ( in PostScript Device (D)) showes ( in PostScript Device (D)) showfr ( in PostScript Device (D)) showit ( in PostScript Device (D)) showjp ( in PostScript Device (D)) showm } if LSC$ (T) eq { ( von Distiller Startup (S) Directory) showde ( of Distiller Startup (S) Directory) showen ( of Distiller Startup (S) Directory) showes ( of Distiller Startup (S) Directory) showfr ( of Distiller Startup (S) Directory) showit ( of Distiller Startup (S) Directory) showjp ( of Distiller Startup (S) Directory) showm } if LSC$ (E) eq { ( von PostScript Device (D)) showde ( of PostScript Device (D)) showen ( of PostScript Device (D)) showes ( of PostScript Device (D)) showfr ( of PostScript Device (D)) showit ( of PostScript Device (D)) showjp ( of PostScript Device (D)) showm } if %0 setgray %end white and unvisible 16 MM 185 MM moveto -90 rotate (Siehe Original/Kopie: ) showde (See original or copy: ) showen (http://web.me.com/klaus.richter/HE99/HE99L) show (0) show LSC$ show LEX$ show 90 rotate 12 MM 185 MM moveto -90 rotate (Technische Information: ) showde (Technical information: ) showen (http://www.ps.bam.de) show %( or ) showen ( oder ) showde %(http://130.149.60.45/~farbmetrik) show 90 rotate 281 MM 185 MM moveto -90 rotate (TUB\255Registrierung: 20091101\255HE99/HE99L) showde (TUB registration: 20091101\255HE99/HE99L) showen (0) show LSC$ show LEX$ show 90 rotate 281 MM 74 MM moveto -90 rotate (TUB\255Material: Code=rha4ta) showde (TUB material: code=rha4ta) showen 90 rotate 12 MM 105 MM moveto -90 rotate (V 2.1, io=1,) show LSC$ (N) eq {(1) show} if LSC$ (S) eq {(1?) show} if LSC$ (D) eq {(1?) show} if %LSC$ (F) eq {i*ptrsc cvishow % IMES 0 eq {(, CIELAB) show} % {(, CIEXYZ) show} ifelse % } if (, Cx=) show ColSpx cvishow (; cf1=0.70; nt=0.18; nx=1.0) show 90 rotate 277 MM 185 MM moveto -90 rotate /cvishow {cvi 6 string cvs show} def /cvsshow1 {10 mul cvi 0.1 mul 7 string cvs show} def ( Anwendung f\374r Beurteilung und Messung von Drucker- oder Monitorsystemen) showde ( application for evaluation and measurement of printer or monitor systems) showen ( application for evaluation and measurement of printer or monitor systems) showes ( application for evaluation and measurement of printer or monitor systems) showfr ( application for evaluation and measurement of printer or monitor systems) showit ( application for evaluation and measurement of printer or monitor systems) showjp ( application for evaluation and measurement of printer or monitor systems) showm IMES 1 eq LSC$ (N) ne and { %IMES=1 (, Yr=) show Yre cvsshow1 (, XYZ) show } if %IMES=1 90 rotate /i0 8 def /i1 i0 1 add def /i2 i0 2 add def /i3 i0 3 add def 0.30 MM setlinewidth 0 setgray xx i0 get MM yy i0 get MM moveto xx i1 get MM yy i1 get MM lineto xx i2 get MM yy i2 get MM lineto xx i3 get MM yy i3 get MM lineto xx i0 get MM yy i0 get MM lineto stroke %} if %END if xchart=0 %xchart 1 eq xchart 3 ge or {%xchart=1, xchart>=3 %/xlu1 013 MM def /ylu1 010 MM def %/xro1 283 MM def /yro1 200 MM def %/xlo1 013 MM def /ylo1 200 MM def %/xru1 283 MM def /yru1 010 MM def %xlu1 4 MM sub ylu1 moveto 8 MM 0 rlineto stroke %xlu1 ylu1 4 MM sub moveto 0 8 MM rlineto stroke %xro1 4 MM add yro1 moveto -8 MM 0 rlineto stroke %xro1 yro1 4 MM add moveto 0 -8 MM rlineto stroke %xru1 4 MM sub yru1 moveto 8 MM 0 rlineto stroke %xru1 yru1 4 MM sub moveto 0 8 MM rlineto stroke %xlo1 4 MM add ylo1 moveto -8 MM 0 rlineto stroke %xlo1 ylo1 4 MM add moveto 0 -8 MM rlineto stroke %} if %xchart=1, xchart>=3 %} for %output with xchart end %} for %output with colorm end %} for %output with xcolor end %} for %output with lanind end %%Trailer %%EndDocument EndEPSF grestore gsave showpage grestore } for %end for xchartg=xchartg1,xchartg2 } for %end for xcolorg=xcolorg1,xcolorg2 %} for %end for pcountg=pcountg1,pcount2g %} for %end for scountg=scountg1,scount2g %%Trailer