%!PS-Adobe-3.0 EPSF-3.0 http://130.149.60.45/~farbmetrik/SS45/SS45L00XX.PS 20130201 %%BoundingBox: 00 00 414 292 /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/SS45/SS45.HTM) /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1) /Subject (goto: http://www.ps.bam.de or http://130.149.60.45/~farbmetrik) /Keywords (image reproduction, colour devices) /Creator (klaus.richter@mac.com) /CreationDate (D:2013020112000) /ModDate (D:20130210112000) /DOCINFO pdfmark [ /View [ /Fit ] /DOCVIEW pdfmark /sfgray {setgray} bind def %Early Frame File (f) definition /sfrgbcolor {setrgbcolor} bind def /sfcmykcolor {setcmykcolor} bind def %line 20****************************************************** %BEG GK0X->SS45/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->SS45/OUTLIN10.PS Output Linearization (OL) LAB*->cmyolvnw* 20090201 %***************************************************************************** %BEG GK0X->SS45/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 GK0X->SS45/10L/OUTLIN1X.PS, ident. for NP-(*ioG), FP-files (*ioG) 20090201 %BEG SS45/OUTLIN1Y2.PS Emty 20101101 %END SS45/OUTLIN1Y2.PS Emty 20101101 /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 % End for EPS file 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 /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 %%EndProlog %*********************************************************** %%BeginPageSetup /#copies 1 def %A4querF 0.5 0.5 scale /pgsave save def %%EndPageSetup /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)] def /SY$ [(0) (1) (2) (3) (4) (5) (6) (7) (8) (9) (A) (B) (C) (D) (E) (F)] def % 0 1 2 3 4 5 % 6 7 8 /EX$ [(1.TXT /.PS) (B.BMP /.PS) (G.GIF /.PS) (H.HTM /.PS) (I.HTM /.PS) (J.JPE /.PS) (P.PDF /.PS) (T.TIF /.PS)] def /EY$ [(1.DAT) (B.DAT) (G.DAT) (H.DAT) (I.DAT) (J.DAT) (P.DAT) (T.DAT)] def %******************************************************************* /lanind1f 02 def /lanind2f 02 def /laninddf 01 def /colorm1f 00 def /colorm2f 00 def /colormdf 01 def /deintp1f 00 def /deintp2f 00 def /deintpdf 01 def /xcolor1f 00 def /xcolor2f 00 def /xcolordf 01 def /xchart1f 00 def /xchart2f 00 def /xchartdf 01 def /xchart3f 01 def /xchart4f 00 def /xchart5f 00 def /pchart1f 03 def /pchart2f 03 def /pchartdf 01 def %=3 for sRGB, Lr=0 /colsep1f 00 def /colsep2f 00 def /colsepdf 01 def /pmetam1f 00 def /pmetam2f 00 def /pmetamdf 01 def %/lanindf lanind1f def % /lanindf lanind1f def %lanind1f laninddf lanind2f {/lanindf exch def %/colormf colorm1f def % /colormf colorm1f def %colorm1f colormdf colorm2f {/colormf exch def %/deintpf deintp1f def % /deintpf deintp1f def %deintp1f deintpdf deintp2f {/deintpf exch def %/xcolorf xcolor1f def % xcolor1f xcolordf xcolor2f {/xcolorf exch def %/xchartf xchart1f def % /xchartf xchart1f def %xchart1f xchartdf xchart2f {/xchartf exch def %/pchartf pchart1f def % /pchartf pchart1f def %/pchartf pchart1f def %pchart1f pchartdf pchart2f {/pchartf exch def %/colsepf colsep1f def % /colsepf colsep1f def %colsep1f colsepdf colsep2f {/colsepf exch def /lanind lanindf def /colorm colormf def /deintp deintpf def /xcolor xcolorf def /xchart xchartf def /xchartm xchart2f xchart1f sub 1 add def /xchart3 xchart3f def /xchart4 xchart4f def /pchart pchartf def /colsep colsepf def %/pmetamf pmetam1f def % /pmetamf pmetam1f def %pmetam1f pmetamdf pmetam2f {/pmetamf exch def /pmetam pmetamf def %************************************************************* /setgray {sfgray} bind def /setrgbcolor {sfrgbcolor} bind def /setcmykcolor {sfcmykcolor} bind def %72 90 translate %0.01 MM dup scale %0 0 moveto 24600 0 rlineto 0 17220 rlineto % -24600 0 rlineto closepath stroke %000 -240 moveto %240 /Times-ISOL1 FS %lanindf cvishow (-) show %colormf cvishow %deintpf cvishow %xcolorf cvishow %xchartf cvishow %pchartf cvishow %colsepf cvishow (-F) show pmetamf cvishow %grestore gsave /GSS$ SS$ lanind get def /GSC$ SC$ colorm get def /GSX$ SX$ xcolor xcolor 16 idiv 16 mul sub get def /GSY$ SY$ xchart xchart 16 idiv 16 mul sub get def /GEX$ EX$ 0 get def /GEY$ EY$ 0 get def %01 %02 %03 %04 %05 %06 %07 %08 %09 %10 %11 %12 %13 %14 %15 %16 %17 %18 %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 %%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 %%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 %%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 %%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 %%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 %%EndDocument EndEPSF grestore gsave BeginEPSF /xc1 16 def /yc1 12 def /xt 1 def xchart 1 eq {/xt 1 def} if 28 MM 2 MM sub xt 0 eq {16 MM sub} if 20 MM xt 0 eq {12 MM sub} if 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 SS450-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: http://130.149.60.45/~farbmetrik/SS45/) /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1) /Subject (goto: http://www.ps.bam.de or http://130.149.60.45/~farbmetrik) /Keywords (image reproduction, colour devices, colour vision) /Creator (klaus.richter@mac.com) /CreationDate (D:2013030112000) /ModDate (D:2013030112000) /DOCINFO pdfmark07 [ /View [ /FitB ] /DOCVIEW pdfmark07 %END PDFDE011 %SETCMYK_OLV.PS /setcmyk_olvcolor %transfer cmyk to olv {/ncolor exch def /ycolor exch def /mcolor exch def /ccolor exch def ncolor 0 eq {1 ccolor sub 1 mcolor sub 1 ycolor sub setrgbcolor } {ccolor 0 eq mcolor 0 eq and ycolor 0 eq and {%only black n 1 ncolor sub dup dup setrgbcolor } {%cmy and black n 1 ccolor sub 1 ncolor sub mul 1 mcolor sub 1 ncolor sub mul 1 ycolor sub 1 ncolor sub mul setrgbcolor } ifelse } ifelse } bind def % !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 /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 SS45_FRS09_92_D65_00%_00_LUT.DAT /FileDataen (_LUT.DAT, 243 colours, 090115, Separation cmyn62*, adapted) def /FileDatade (_LUT.DAT, 243 Farben, 090115, Separation cmyn62*, adaptiert) def /FileData0Na (SS45_FRS09_92_D65_00%_G0) def /LUT_LAB0 [ %GE370-7A, Page 7 /24, %BEG GE27_22_REM.TXT, Separation cmyn62*, D65; cf1=1.00; nt=0.18; nx=1.0, adapted %BEG GE27_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*Fa0100 [ %BEG GE27_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 /FileData1Na (SS45_FRS09_92_D65_00%_G1) def /LUT_LAB1 [ %GE770-7A, Page 7 /24, %BEG GE67_22.TXT, Separation olv*, cf1=0.95, D65; cf1=1.00; nt=0.18; nx=1.0, adapted %BEG GE67_22.TXT, Separation olv*, cf1=0.95, D65, adapted %100 x LAB*a 1000 x (r g b c m y 0) %nr. pos 000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0000 A01 000966 000757 -01401 0000 0000 0125 1000 1000 0875 0000 %0001 A02 001030 001410 -02050 0000 0000 0250 1000 1000 0750 0000 %0002 A03 001085 001969 -02681 0000 0000 0375 1000 1000 0625 0000 %0003 A04 001166 002576 -03321 0000 0000 0500 1000 1000 0500 0000 %0004 A05 001248 003197 -04017 0000 0000 0625 1000 1000 0375 0000 %0005 A06 001304 003830 -04708 0000 0000 0750 1000 1000 0250 0000 %0006 A07 001339 004428 -05368 0000 0000 0875 1000 1000 0125 0000 %0007 A08 001403 005094 -06063 0000 0000 1000 1000 1000 0000 0000 %0008 A09 001316 -00534 -00177 0000 0125 0000 1000 0875 1000 0000 %0009 B01 001404 -00112 -01128 0000 0125 0125 1000 0875 0875 0000 %0010 B02 001599 000238 -01652 0000 0125 0250 1000 0875 0750 0000 %0011 B03 001749 000572 -02169 0000 0125 0375 1000 0875 0625 0000 %0012 B04 001892 001047 -02817 0000 0125 0500 1000 0875 0500 0000 %0013 B05 002015 001610 -03507 0000 0125 0625 1000 0875 0375 0000 %0014 B06 002148 002139 -04170 0000 0125 0750 1000 0875 0250 0000 %0015 B07 002215 002652 -04773 0000 0125 0875 1000 0875 0125 0000 %0016 B08 002290 003271 -05459 0000 0125 1000 1000 0875 0000 0000 %0017 B09 001747 -01347 000414 0000 0250 0000 1000 0750 1000 0000 %0018 C01 001870 -00759 -00835 0000 0250 0125 1000 0750 0875 0000 %0019 C02 001938 -00487 -01400 0000 0250 0250 1000 0750 0750 0000 %0020 C03 002134 -00189 -01952 0000 0250 0375 1000 0750 0625 0000 %0021 C04 002314 000138 -02477 0000 0250 0500 1000 0750 0500 0000 %0022 C05 002503 000586 -03155 0000 0250 0625 1000 0750 0375 0000 %0023 C06 002662 001019 -03762 0000 0250 0750 1000 0750 0250 0000 %0024 C07 002792 001463 -04339 0000 0250 0875 1000 0750 0125 0000 %0025 C08 002911 001992 -05023 0000 0250 1000 1000 0750 0000 0000 %0026 C09 002161 -02078 001041 0000 0375 0000 1000 0625 1000 0000 %0027 D01 002324 -01425 -00403 0000 0375 0125 1000 0625 0875 0000 %0028 D02 002392 -01120 -01089 0000 0375 0250 1000 0625 0750 0000 %0029 D03 002448 -00829 -01697 0000 0375 0375 1000 0625 0625 0000 %0030 D04 002630 -00486 -02295 0000 0375 0500 1000 0625 0500 0000 %0031 D05 002886 -00212 -02858 0000 0375 0625 1000 0625 0375 0000 %0032 D06 003093 000146 -03449 0000 0375 0750 1000 0625 0250 0000 %0033 D07 003229 000571 -04056 0000 0375 0875 1000 0625 0125 0000 %0034 D08 003387 001011 -04676 0000 0375 1000 1000 0625 0000 0000 %0035 D09 002618 -02883 001680 0000 0500 0000 1000 0500 1000 0000 %0036 E01 002785 -02174 000081 0000 0500 0125 1000 0500 0875 0000 %0037 E02 002901 -01867 -00666 0000 0500 0250 1000 0500 0750 0000 %0038 E03 002932 -01501 -01399 0000 0500 0375 1000 0500 0625 0000 %0039 E04 003008 -01222 -02041 0000 0500 0500 1000 0500 0500 0000 %0040 E05 003212 -00837 -02668 0000 0500 0625 1000 0500 0375 0000 %0041 E06 003408 -00493 -03240 0000 0500 0750 1000 0500 0250 0000 %0042 E07 003592 -00195 -03757 0000 0500 0875 1000 0500 0125 0000 %0043 E08 003810 000134 -04340 0000 0500 1000 1000 0500 0000 0000 %0044 E09 003073 -03682 002315 0000 0625 0000 1000 0375 1000 0000 %0045 F01 003262 -02878 000599 0000 0625 0125 1000 0375 0875 0000 %0046 F02 003359 -02487 -00370 0000 0625 0250 1000 0375 0750 0000 %0047 F03 003416 -02172 -01068 0000 0625 0375 1000 0375 0625 0000 %0048 F04 003511 -01923 -01690 0000 0625 0500 1000 0375 0500 0000 %0049 F05 003588 -01594 -02376 0000 0625 0625 1000 0375 0375 0000 %0050 F06 003752 -01218 -02969 0000 0625 0750 1000 0375 0250 0000 %0051 F07 003928 -00906 -03506 0000 0625 0875 1000 0375 0125 0000 %0052 F08 004129 -00544 -04081 0000 0625 1000 1000 0375 0000 0000 %0053 F09 003491 -04417 002916 0000 0750 0000 1000 0250 1000 0000 %0054 G01 003706 -03618 001072 0000 0750 0125 1000 0250 0875 0000 %0055 G02 003801 -03161 000028 0000 0750 0250 1000 0250 0750 0000 %0056 G03 003873 -02844 -00714 0000 0750 0375 1000 0250 0625 0000 %0057 G04 003976 -02553 -01387 0000 0750 0500 1000 0250 0500 0000 %0058 G05 004036 -02266 -02027 0000 0750 0625 1000 0250 0375 0000 %0059 G06 004092 -01952 -02662 0000 0750 0750 1000 0250 0250 0000 %0060 G07 004273 -01560 -03274 0000 0750 0875 1000 0250 0125 0000 %0061 G08 004449 -01210 -03853 0000 0750 1000 1000 0250 0000 0000 %0062 G09 003898 -05174 003487 0000 0875 0000 1000 0125 1000 0000 %0063 H01 004133 -04342 001607 0000 0875 0125 1000 0125 0875 0000 %0064 H02 004253 -03842 000472 0000 0875 0250 1000 0125 0750 0000 %0065 H03 004329 -03499 -00348 0000 0875 0375 1000 0125 0625 0000 %0066 H04 004408 -03172 -01074 0000 0875 0500 1000 0125 0500 0000 %0067 H05 004482 -02897 -01702 0000 0875 0625 1000 0125 0375 0000 %0068 H06 004546 -02648 -02300 0000 0875 0750 1000 0125 0250 0000 %0069 H07 004584 -02229 -03049 0000 0875 0875 1000 0125 0125 0000 %0070 H08 004771 -01817 -03655 0000 0875 1000 1000 0125 0000 0000 %0071 H09 004350 -05944 004112 0000 1000 0000 1000 0000 1000 0000 %0072 I01 004529 -05087 002094 0000 1000 0125 1000 0000 0875 0000 %0073 I02 004656 -04503 000872 0000 1000 0250 1000 0000 0750 0000 %0074 I03 004732 -04105 -00030 0000 1000 0375 1000 0000 0625 0000 %0075 I04 004833 -03789 -00756 0000 1000 0500 1000 0000 0500 0000 %0076 I05 004895 -03480 -01432 0000 1000 0625 1000 0000 0375 0000 %0077 I06 004976 -03270 -01996 0000 1000 0750 1000 0000 0250 0000 %0078 I07 005047 -02926 -02690 0000 1000 0875 1000 0000 0125 0000 %0079 I08 005167 -02633 -03335 0000 1000 1000 1000 0000 0000 0000 %0080 I09 001205 000903 -00279 0125 0000 0000 0875 1000 1000 0000 %0081 J01 001206 001144 -01188 0125 0000 0125 0875 1000 0875 0000 %0082 J02 001279 001736 -01829 0125 0000 0250 0875 1000 0750 0000 %0083 J03 001338 002290 -02454 0125 0000 0375 0875 1000 0625 0000 %0084 J04 001393 002870 -03100 0125 0000 0500 0875 1000 0500 0000 %0085 J05 001480 003510 -03799 0125 0000 0625 0875 1000 0375 0000 %0086 J06 001565 004139 -04478 0125 0000 0750 0875 1000 0250 0000 %0087 J07 001617 004661 -05105 0125 0000 0875 0875 1000 0125 0000 %0088 J08 001696 005300 -05797 0125 0000 1000 0875 1000 0000 0000 %0089 J09 001769 000088 000563 0125 0125 0000 0875 0875 1000 0000 %0090 K01 001884 000158 -00748 0125 0125 0125 0875 0875 0875 0000 %0091 K02 001930 000787 -01353 0125 0125 0250 0875 0875 0750 0000 %0092 K03 001957 001404 -01990 0125 0125 0375 0875 0875 0625 0000 %0093 K04 002033 002048 -02676 0125 0125 0500 0875 0875 0500 0000 %0094 K05 002109 002750 -03400 0125 0125 0625 0875 0875 0375 0000 %0095 K06 002183 003349 -04085 0125 0125 0750 0875 0875 0250 0000 %0096 K07 002239 003923 -04713 0125 0125 0875 0875 0875 0125 0000 %0097 K08 002293 004558 -05409 0125 0125 1000 0875 0875 0000 0000 %0098 K09 002154 -00819 001088 0125 0250 0000 0875 0750 1000 0000 %0099 L01 002300 -00629 -00124 0125 0250 0125 0875 0750 0875 0000 %0100 L02 002427 -00224 -00984 0125 0250 0250 0875 0750 0750 0000 %0101 L03 002595 000129 -01569 0125 0250 0375 0875 0750 0625 0000 %0102 L04 002747 000501 -02128 0125 0250 0500 0875 0750 0500 0000 %0103 L05 002901 001018 -02821 0125 0250 0625 0875 0750 0375 0000 %0104 L06 002985 001561 -03474 0125 0250 0750 0875 0750 0250 0000 %0105 L07 003081 002096 -04086 0125 0250 0875 0875 0750 0125 0000 %0106 L08 003198 002621 -04729 0125 0250 1000 0875 0750 0000 0000 %0107 L09 002561 -01539 001647 0125 0375 0000 0875 0625 1000 0000 %0108 M01 002725 -01380 000496 0125 0375 0125 0875 0625 0875 0000 %0109 M02 002873 -00854 -00670 0125 0375 0250 0875 0625 0750 0000 %0110 M03 002935 -00549 -01309 0125 0375 0375 0875 0625 0625 0000 %0111 M04 003114 -00215 -01905 0125 0375 0500 0875 0625 0500 0000 %0112 M05 003327 000093 -02476 0125 0375 0625 0875 0625 0375 0000 %0113 M06 003504 000534 -03123 0125 0375 0750 0875 0625 0250 0000 %0114 M07 003622 000927 -03687 0125 0375 0875 0875 0625 0125 0000 %0115 M08 003775 001432 -04320 0125 0375 1000 0875 0625 0000 0000 %0116 M09 002991 -02332 002235 0125 0500 0000 0875 0500 1000 0000 %0117 N01 003147 -02141 001059 0125 0500 0125 0875 0500 0875 0000 %0118 N02 003314 -01541 -00251 0125 0500 0250 0875 0500 0750 0000 %0119 N03 003381 -01241 -00968 0125 0500 0375 0875 0500 0625 0000 %0120 N04 003467 -00901 -01662 0125 0500 0500 0875 0500 0500 0000 %0121 N05 003624 -00522 -02269 0125 0500 0625 0875 0500 0375 0000 %0122 N06 003835 -00203 -02822 0125 0500 0750 0875 0500 0250 0000 %0123 N07 004021 000107 -03370 0125 0500 0875 0875 0500 0125 0000 %0124 N08 004219 000499 -03995 0125 0500 1000 0875 0500 0000 0000 %0125 N09 003463 -03116 002898 0125 0625 0000 0875 0375 1000 0000 %0126 O01 003644 -02964 001723 0125 0625 0125 0875 0375 0875 0000 %0127 O02 003776 -02270 000217 0125 0625 0250 0875 0375 0750 0000 %0128 O03 003880 -01947 -00579 0125 0625 0375 0875 0375 0625 0000 %0129 O04 003938 -01605 -01262 0125 0625 0500 0875 0375 0500 0000 %0130 O05 004055 -01332 -01925 0125 0625 0625 0875 0375 0375 0000 %0131 O06 004209 -00966 -02519 0125 0625 0750 0875 0375 0250 0000 %0132 O07 004377 -00620 -03070 0125 0625 0875 0875 0375 0125 0000 %0133 O08 004567 -00196 -03747 0125 0625 1000 0875 0375 0000 0000 %0134 O09 003892 -03884 003503 0125 0750 0000 0875 0250 1000 0000 %0135 P01 004049 -03730 002301 0125 0750 0125 0875 0250 0875 0000 %0136 P02 004216 -02997 000690 0125 0750 0250 0875 0250 0750 0000 %0137 P03 004301 -02611 -00169 0125 0750 0375 0875 0250 0625 0000 %0138 P04 004405 -02227 -00958 0125 0750 0500 0875 0250 0500 0000 %0139 P05 004476 -01948 -01603 0125 0750 0625 0875 0250 0375 0000 %0140 P06 004563 -01637 -02264 0125 0750 0750 0875 0250 0250 0000 %0141 P07 004711 -01289 -02812 0125 0750 0875 0875 0250 0125 0000 %0142 P08 004914 -00928 -03448 0125 0750 1000 0875 0250 0000 0000 %0143 P09 004329 -04604 004120 0125 0875 0000 0875 0125 1000 0000 %0144 Q01 004492 -04475 002922 0125 0875 0125 0875 0125 0875 0000 %0145 Q02 004643 -03703 001189 0125 0875 0250 0875 0125 0750 0000 %0146 Q03 004745 -03223 000138 0125 0875 0375 0875 0125 0625 0000 %0147 Q04 004847 -02864 -00641 0125 0875 0500 0875 0125 0500 0000 %0148 Q05 004929 -02604 -01282 0125 0875 0625 0875 0125 0375 0000 %0149 Q06 005000 -02314 -01883 0125 0875 0750 0875 0125 0250 0000 %0150 Q07 005089 -01996 -02562 0125 0875 0875 0875 0125 0125 0000 %0151 Q08 005231 -01593 -03185 0125 0875 1000 0875 0125 0000 0000 %0152 Q09 004749 -05343 004717 0125 1000 0000 0875 0000 1000 0000 %0153 R01 004927 -05213 003515 0125 1000 0125 0875 0000 0875 0000 %0154 R02 005072 -04397 001721 0125 1000 0250 0875 0000 0750 0000 %0155 R03 005199 -03871 000539 0125 1000 0375 0875 0000 0625 0000 %0156 R04 005289 -03500 -00285 0125 1000 0500 0875 0000 0500 0000 %0157 R05 005368 -03202 -00991 0125 1000 0625 0875 0000 0375 0000 %0158 R06 005449 -02954 -01565 0125 1000 0750 0875 0000 0250 0000 %0159 R07 005542 -02611 -02262 0125 1000 0875 0875 0000 0125 0000 %0160 R08 005577 -02293 -02947 0125 1000 1000 0875 0000 0000 0000 %0161 R09 001564 001653 000371 0250 0000 0000 0750 1000 1000 0000 %0162 S01 001554 001813 -00530 0250 0000 0125 0750 1000 0875 0000 %0163 S02 001597 002085 -01429 0250 0000 0250 0750 1000 0750 0000 %0164 S03 001623 002663 -02103 0250 0000 0375 0750 1000 0625 0000 %0165 S04 001705 003244 -02784 0250 0000 0500 0750 1000 0500 0000 %0166 S05 001773 003844 -03473 0250 0000 0625 0750 1000 0375 0000 %0167 S06 001861 004438 -04171 0250 0000 0750 0750 1000 0250 0000 %0168 S07 001936 005012 -04816 0250 0000 0875 0750 1000 0125 0000 %0169 S08 002023 005612 -05495 0250 0000 1000 0750 1000 0000 0000 %0170 S09 002069 000989 001023 0250 0125 0000 0750 0875 1000 0000 %0171 T01 002263 000893 -00124 0250 0125 0125 0750 0875 0875 0000 %0172 T02 002289 001100 -00963 0250 0125 0250 0750 0875 0750 0000 %0173 T03 002335 001663 -01599 0250 0125 0375 0750 0875 0625 0000 %0174 T04 002381 002322 -02305 0250 0125 0500 0750 0875 0500 0000 %0175 T05 002461 002962 -03065 0250 0125 0625 0750 0875 0375 0000 %0176 T06 002510 003589 -03777 0250 0125 0750 0750 0875 0250 0000 %0177 T07 002577 004155 -04419 0250 0125 0875 0750 0875 0125 0000 %0178 T08 002642 004810 -05119 0250 0125 1000 0750 0875 0000 0000 %0179 T09 002806 000008 002102 0250 0250 0000 0750 0750 1000 0000 %0180 U01 002884 000103 000719 0250 0250 0125 0750 0750 0875 0000 %0181 U02 002953 000144 -00514 0250 0250 0250 0750 0750 0750 0000 %0182 U03 003003 000760 -01196 0250 0250 0375 0750 0750 0625 0000 %0183 U04 003053 001375 -01861 0250 0250 0500 0750 0750 0500 0000 %0184 U05 003112 002002 -02611 0250 0250 0625 0750 0750 0375 0000 %0185 U06 003192 002642 -03316 0250 0250 0750 0750 0750 0250 0000 %0186 U07 003266 003190 -03944 0250 0250 0875 0750 0750 0125 0000 %0187 U08 003337 003827 -04649 0250 0250 1000 0750 0750 0000 0000 %0188 U09 003062 -00844 002443 0250 0375 0000 0750 0625 1000 0000 %0189 V01 003215 -00754 001185 0250 0375 0125 0750 0625 0875 0000 %0190 V02 003386 -00632 000146 0250 0375 0250 0750 0625 0750 0000 %0191 V03 003457 -00214 -00844 0250 0375 0375 0750 0625 0625 0000 %0192 V04 003643 000092 -01372 0250 0375 0500 0750 0625 0500 0000 %0193 V05 003803 000545 -02088 0250 0375 0625 0750 0625 0375 0000 %0194 V06 003982 001005 -02680 0250 0375 0750 0750 0625 0250 0000 %0195 V07 004063 001490 -03317 0250 0375 0875 0750 0625 0125 0000 %0196 V08 004196 002014 -03975 0250 0375 1000 0750 0625 0000 0000 %0197 V09 003463 -01640 002986 0250 0500 0000 0750 0500 1000 0000 %0198 W01 003627 -01525 001801 0250 0500 0125 0750 0500 0875 0000 %0199 W02 003785 -01300 000707 0250 0500 0250 0750 0500 0750 0000 %0200 W03 003875 -00813 -00546 0250 0500 0375 0750 0500 0625 0000 %0201 W04 003954 -00562 -01177 0250 0500 0500 0750 0500 0500 0000 %0202 W05 004150 -00246 -01770 0250 0500 0625 0750 0500 0375 0000 %0203 W06 004377 000076 -02331 0250 0500 0750 0750 0500 0250 0000 %0204 W07 004544 000479 -02918 0250 0500 0875 0750 0500 0125 0000 %0205 W08 004730 000912 -03570 0250 0500 1000 0750 0500 0000 0000 %0206 W09 003906 -02475 003586 0250 0625 0000 0750 0375 1000 0000 %0207 X01 004070 -02307 002405 0250 0625 0125 0750 0375 0875 0000 %0208 X02 004230 -02129 001295 0250 0625 0250 0750 0375 0750 0000 %0209 X03 004374 -01592 -00071 0250 0625 0375 0750 0375 0625 0000 %0210 X04 004441 -01198 -00851 0250 0625 0500 0750 0375 0500 0000 %0211 X05 004544 -00989 -01455 0250 0625 0625 0750 0375 0375 0000 %0212 X06 004718 -00611 -02056 0250 0625 0750 0750 0375 0250 0000 %0213 X07 004912 -00251 -02681 0250 0625 0875 0750 0375 0125 0000 %0214 X08 005115 000113 -03292 0250 0625 1000 0750 0375 0000 0000 %0215 X09 004313 -03256 004165 0250 0750 0000 0750 0250 1000 0000 %0216 Y01 004463 -03067 002966 0250 0750 0125 0750 0250 0875 0000 %0217 Y02 004648 -02850 001902 0250 0750 0250 0750 0250 0750 0000 %0218 Y03 004778 -02260 000399 0250 0750 0375 0750 0250 0625 0000 %0219 Y04 004897 -01880 -00509 0250 0750 0500 0750 0250 0500 0000 %0220 Y05 004988 -01605 -01141 0250 0750 0625 0750 0250 0375 0000 %0221 Y06 005066 -01341 -01790 0250 0750 0750 0750 0250 0250 0000 %0222 Y07 005234 -00970 -02364 0250 0750 0875 0750 0250 0125 0000 %0223 Y08 005441 -00614 -02992 0250 0750 1000 0750 0250 0000 0000 %0224 Y09 004746 -04014 004775 0250 0875 0000 0750 0125 1000 0000 %0225 Z01 004917 -03883 003598 0250 0875 0125 0750 0125 0875 0000 %0226 Z02 005083 -03674 002483 0250 0875 0250 0750 0125 0750 0000 %0227 Z03 005234 -02966 000879 0250 0875 0375 0750 0125 0625 0000 %0228 Z04 005352 -02510 -00189 0250 0875 0500 0750 0125 0500 0000 %0229 Z05 005449 -02202 -00852 0250 0875 0625 0750 0125 0375 0000 %0230 Z06 005508 -01973 -01459 0250 0875 0750 0750 0125 0250 0000 %0231 Z07 005568 -01634 -02147 0250 0875 0875 0750 0125 0125 0000 %0232 Z08 005718 -01245 -02772 0250 0875 1000 0750 0125 0000 0000 %0233 Z09 005176 -04768 005383 0250 1000 0000 0750 0000 1000 0000 %0234 a01 005345 -04625 004189 0250 1000 0125 0750 0000 0875 0000 %0235 a02 005516 -04394 003058 0250 1000 0250 0750 0000 0750 0000 %0236 a03 005683 -03667 001328 0250 1000 0375 0750 0000 0625 0000 %0237 a04 005817 -03158 000207 0250 1000 0500 0750 0000 0500 0000 %0238 a05 005926 -02846 -00507 0250 1000 0625 0750 0000 0375 0000 %0239 a06 005993 -02561 -01173 0250 1000 0750 0750 0000 0250 0000 %0240 a07 006058 -02289 -01839 0250 1000 0875 0750 0000 0125 0000 %0241 a08 006078 -01984 -02472 0250 1000 1000 0750 0000 0000 0000 %0242 a09 001787 002295 000787 0375 0000 0000 0625 1000 1000 0000 %0243 A10 001805 002530 -00101 0375 0000 0125 0625 1000 0875 0000 %0244 A11 001854 002753 -00811 0375 0000 0250 0625 1000 0750 0000 %0245 A12 001839 002992 -01833 0375 0000 0375 0625 1000 0625 0000 %0246 A13 001889 003555 -02527 0375 0000 0500 0625 1000 0500 0000 %0247 A14 001976 004101 -03157 0375 0000 0625 0625 1000 0375 0000 %0248 A15 002039 004688 -03866 0375 0000 0750 0625 1000 0250 0000 %0249 A16 002132 005284 -04500 0375 0000 0875 0625 1000 0125 0000 %0250 A17 002241 005887 -05187 0375 0000 1000 0625 1000 0000 0000 %0251 A18 002228 001666 001422 0375 0125 0000 0625 0875 1000 0000 %0252 B10 002453 001590 000296 0375 0125 0125 0625 0875 0875 0000 %0253 B11 002485 001821 -00449 0375 0125 0250 0625 0875 0750 0000 %0254 B12 002496 002094 -01412 0375 0125 0375 0625 0875 0625 0000 %0255 B13 002545 002624 -02042 0375 0125 0500 0625 0875 0500 0000 %0256 B14 002569 003222 -02765 0375 0125 0625 0625 0875 0375 0000 %0257 B15 002675 003888 -03459 0375 0125 0750 0625 0875 0250 0000 %0258 B16 002725 004499 -04139 0375 0125 0875 0625 0875 0125 0000 %0259 B17 002782 005150 -04827 0375 0125 1000 0625 0875 0000 0000 %0260 B18 002772 001027 002151 0375 0250 0000 0625 0750 1000 0000 %0261 C10 002930 000941 000953 0375 0250 0125 0625 0750 0875 0000 %0262 C11 003136 000853 -00029 0375 0250 0250 0625 0750 0750 0000 %0263 C12 003135 001110 -00986 0375 0250 0375 0625 0750 0625 0000 %0264 C13 003181 001699 -01613 0375 0250 0500 0625 0750 0500 0000 %0265 C14 003240 002366 -02362 0375 0250 0625 0625 0750 0375 0000 %0266 C15 003328 002984 -03047 0375 0250 0750 0625 0750 0250 0000 %0267 C16 003372 003619 -03729 0375 0250 0875 0625 0750 0125 0000 %0268 C17 003480 004208 -04353 0375 0250 1000 0625 0750 0000 0000 %0269 C18 003574 -00041 003236 0375 0375 0000 0625 0625 1000 0000 %0270 D10 003679 000059 001896 0375 0375 0125 0625 0625 0875 0000 %0271 D11 003757 000077 000742 0375 0375 0250 0625 0625 0750 0000 %0272 D12 003804 000199 -00531 0375 0375 0375 0625 0625 0625 0000 %0273 D13 003894 000780 -01184 0375 0375 0500 0625 0625 0500 0000 %0274 D14 003989 001443 -01920 0375 0375 0625 0625 0625 0375 0000 %0275 D15 004051 002079 -02554 0375 0375 0750 0625 0625 0250 0000 %0276 D16 004084 002702 -03277 0375 0375 0875 0625 0625 0125 0000 %0277 D17 004161 003321 -03903 0375 0375 1000 0625 0625 0000 0000 %0278 D18 003842 -00962 003556 0375 0500 0000 0625 0500 1000 0000 %0279 E10 003998 -00916 002395 0375 0500 0125 0625 0500 0875 0000 %0280 E11 004149 -00816 001274 0375 0500 0250 0625 0500 0750 0000 %0281 E12 004290 -00607 000113 0375 0500 0375 0625 0500 0625 0000 %0282 E13 004385 -00213 -00840 0375 0500 0500 0625 0500 0500 0000 %0283 E14 004596 000116 -01449 0375 0500 0625 0625 0500 0375 0000 %0284 E15 004786 000508 -01987 0375 0500 0750 0625 0500 0250 0000 %0285 E16 004887 001011 -02639 0375 0500 0875 0625 0500 0125 0000 %0286 E17 005054 001483 -03272 0375 0500 1000 0625 0500 0000 0000 %0287 E18 004255 -01863 004194 0375 0625 0000 0625 0375 1000 0000 %0288 F10 004439 -01773 002984 0375 0625 0125 0625 0375 0875 0000 %0289 F11 004587 -01625 001918 0375 0625 0250 0625 0375 0750 0000 %0290 F12 004718 -01399 000710 0375 0625 0375 0625 0375 0625 0000 %0291 F13 004875 -00866 -00511 0375 0625 0500 0625 0375 0500 0000 %0292 F14 004973 -00571 -01156 0375 0625 0625 0625 0375 0375 0000 %0293 F15 005159 -00225 -01720 0375 0625 0750 0625 0375 0250 0000 %0294 F16 005347 000119 -02306 0375 0625 0875 0625 0375 0125 0000 %0295 F17 005523 000526 -02923 0375 0625 1000 0625 0375 0000 0000 %0296 F18 004676 -02652 004787 0375 0750 0000 0625 0250 1000 0000 %0297 G10 004837 -02520 003518 0375 0750 0125 0625 0250 0875 0000 %0298 G11 005006 -02361 002473 0375 0750 0250 0625 0250 0750 0000 %0299 G12 005138 -02161 001327 0375 0750 0375 0625 0250 0625 0000 %0300 G13 005308 -01549 -00147 0375 0750 0500 0625 0250 0500 0000 %0301 G14 005424 -01236 -00814 0375 0750 0625 0625 0250 0375 0000 %0302 G15 005467 -00952 -01477 0375 0750 0750 0625 0250 0250 0000 %0303 G16 005647 -00538 -02077 0375 0750 0875 0625 0250 0125 0000 %0304 G17 005852 -00213 -02672 0375 0750 1000 0625 0250 0000 0000 %0305 G18 005069 -03445 005355 0375 0875 0000 0625 0125 1000 0000 %0306 H10 005251 -03259 004131 0375 0875 0125 0625 0125 0875 0000 %0307 H11 005416 -03114 003100 0375 0875 0250 0625 0125 0750 0000 %0308 H12 005547 -02864 001915 0375 0875 0375 0625 0125 0625 0000 %0309 H13 005682 -02194 000260 0375 0875 0500 0625 0125 0500 0000 %0310 H14 005817 -01830 -00512 0375 0875 0625 0625 0125 0375 0000 %0311 H15 005899 -01552 -01150 0375 0875 0750 0625 0125 0250 0000 %0312 H16 005964 -01229 -01864 0375 0875 0875 0625 0125 0125 0000 %0313 H17 006129 -00821 -02448 0375 0875 1000 0625 0125 0000 0000 %0314 H18 005520 -04205 005917 0375 1000 0000 0625 0000 1000 0000 %0315 I10 005661 -04065 004753 0375 1000 0125 0625 0000 0875 0000 %0316 I11 005854 -03881 003689 0375 1000 0250 0625 0000 0750 0000 %0317 I12 006014 -03655 002552 0375 1000 0375 0625 0000 0625 0000 %0318 I13 006190 -02945 000793 0375 1000 0500 0625 0000 0500 0000 %0319 I14 006290 -02490 -00154 0375 1000 0625 0625 0000 0375 0000 %0320 I15 006382 -02216 -00824 0375 1000 0750 0625 0000 0250 0000 %0321 I16 006462 -01928 -01479 0375 1000 0875 0625 0000 0125 0000 %0322 I17 006505 -01615 -02143 0375 1000 1000 0625 0000 0000 0000 %0323 I18 002114 003053 001264 0500 0000 0000 0500 1000 1000 0000 %0324 J10 002145 003225 000462 0500 0000 0125 0500 1000 0875 0000 %0325 J11 002180 003395 -00295 0500 0000 0250 0500 1000 0750 0000 %0326 J12 002181 003634 -01194 0500 0000 0375 0500 1000 0625 0000 %0327 J13 002211 003938 -02224 0500 0000 0500 0500 1000 0500 0000 %0328 J14 002267 004456 -02878 0500 0000 0625 0500 1000 0375 0000 %0329 J15 002336 005059 -03565 0500 0000 0750 0500 1000 0250 0000 %0330 J16 002423 005656 -04234 0500 0000 0875 0500 1000 0125 0000 %0331 J17 002498 006193 -04886 0500 0000 1000 0500 1000 0000 0000 %0332 J18 002572 002460 001944 0500 0125 0000 0500 0875 1000 0000 %0333 K10 002781 002323 000829 0500 0125 0125 0500 0875 0875 0000 %0334 K11 002822 002537 000107 0500 0125 0250 0500 0875 0750 0000 %0335 K12 002836 002698 -00725 0500 0125 0375 0500 0875 0625 0000 %0336 K13 002856 003022 -01752 0500 0125 0500 0500 0875 0500 0000 %0337 K14 002889 003582 -02445 0500 0125 0625 0500 0875 0375 0000 %0338 K15 002978 004212 -03137 0500 0125 0750 0500 0875 0250 0000 %0339 K16 002997 004834 -03843 0500 0125 0875 0500 0875 0125 0000 %0340 K17 003069 005457 -04525 0500 0125 1000 0500 0875 0000 0000 %0341 K18 003096 001766 002649 0500 0250 0000 0500 0750 1000 0000 %0342 L10 003294 001734 001459 0500 0250 0125 0500 0750 0875 0000 %0343 L11 003512 001625 000454 0500 0250 0250 0500 0750 0750 0000 %0344 L12 003506 001793 -00358 0500 0250 0375 0500 0750 0625 0000 %0345 L13 003514 002075 -01349 0500 0250 0500 0500 0750 0500 0000 %0346 L14 003594 002655 -02003 0500 0250 0625 0500 0750 0375 0000 %0347 L15 003647 003291 -02738 0500 0250 0750 0500 0750 0250 0000 %0348 L16 003696 003848 -03393 0500 0250 0875 0500 0750 0125 0000 %0349 L17 003759 004482 -04089 0500 0250 1000 0500 0750 0000 0000 %0350 L18 003670 001035 003433 0500 0375 0000 0500 0625 1000 0000 %0351 M10 003824 000973 002244 0500 0375 0125 0500 0625 0875 0000 %0352 M11 004023 000909 001150 0500 0375 0250 0500 0625 0750 0000 %0353 M12 004187 000930 -00007 0500 0375 0375 0500 0625 0625 0000 %0354 M13 004228 001061 -00863 0500 0375 0500 0500 0625 0500 0000 %0355 M14 004276 001739 -01618 0500 0375 0625 0500 0625 0375 0000 %0356 M15 004324 002335 -02274 0500 0375 0750 0500 0625 0250 0000 %0357 M16 004389 002878 -02910 0500 0375 0875 0500 0625 0125 0000 %0358 M17 004409 003573 -03635 0500 0375 1000 0500 0625 0000 0000 %0359 M18 004496 -00120 004579 0500 0500 0000 0500 0500 1000 0000 %0360 N10 004602 -00069 003315 0500 0500 0125 0500 0500 0875 0000 %0361 N11 004699 -00001 002138 0500 0500 0250 0500 0500 0750 0000 %0362 N12 004796 000035 000894 0500 0500 0375 0500 0500 0625 0000 %0363 N13 004921 000137 -00404 0500 0500 0500 0500 0500 0500 0000 %0364 N14 004971 000717 -01117 0500 0500 0625 0500 0500 0375 0000 %0365 N15 005016 001348 -01776 0500 0500 0750 0500 0500 0250 0000 %0366 N16 005029 001932 -02447 0500 0500 0875 0500 0500 0125 0000 %0367 N17 005073 002651 -03172 0500 0500 1000 0500 0500 0000 0000 %0368 N18 004781 -01091 004971 0500 0625 0000 0500 0375 1000 0000 %0369 O10 004906 -01057 003719 0500 0625 0125 0500 0375 0875 0000 %0370 O11 005051 -00933 002596 0500 0625 0250 0500 0375 0750 0000 %0371 O12 005171 -00830 001398 0500 0625 0375 0500 0375 0625 0000 %0372 O13 005347 -00613 000171 0500 0625 0500 0500 0375 0500 0000 %0373 O14 005458 -00176 -00769 0500 0625 0625 0500 0375 0375 0000 %0374 O15 005631 000115 -01321 0500 0625 0750 0500 0375 0250 0000 %0375 O16 005760 000494 -01934 0500 0625 0875 0500 0375 0125 0000 %0376 O17 005894 000943 -02578 0500 0625 1000 0500 0375 0000 0000 %0377 O18 005156 -02030 005484 0500 0750 0000 0500 0250 1000 0000 %0378 P10 005318 -01940 004291 0500 0750 0125 0500 0250 0875 0000 %0379 P11 005455 -01749 003154 0500 0750 0250 0500 0250 0750 0000 %0380 P12 005598 -01578 001951 0500 0750 0375 0500 0250 0625 0000 %0381 P13 005760 -01409 000782 0500 0750 0500 0500 0250 0500 0000 %0382 P14 005895 -00867 -00399 0500 0750 0625 0500 0250 0375 0000 %0383 P15 005984 -00614 -01012 0500 0750 0750 0500 0250 0250 0000 %0384 P16 006151 -00284 -01645 0500 0750 0875 0500 0250 0125 0000 %0385 P17 006334 000074 -02240 0500 0750 1000 0500 0250 0000 0000 %0386 P18 005539 -02764 006035 0500 0875 0000 0500 0125 1000 0000 %0387 Q10 005684 -02660 004820 0500 0875 0125 0500 0125 0875 0000 %0388 Q11 005836 -02523 003675 0500 0875 0250 0500 0125 0750 0000 %0389 Q12 005990 -02280 002540 0500 0875 0375 0500 0125 0625 0000 %0390 Q13 006151 -02114 001371 0500 0875 0500 0500 0125 0500 0000 %0391 Q14 006307 -01520 -00017 0500 0875 0625 0500 0125 0375 0000 %0392 Q15 006384 -01222 -00708 0500 0875 0750 0500 0125 0250 0000 %0393 Q16 006472 -00929 -01406 0500 0875 0875 0500 0125 0125 0000 %0394 Q17 006638 -00565 -02009 0500 0875 1000 0500 0125 0000 0000 %0395 Q18 005962 -03585 006639 0500 1000 0000 0500 0000 1000 0000 %0396 R10 006119 -03492 005438 0500 1000 0125 0500 0000 0875 0000 %0397 R11 006287 -03303 004310 0500 1000 0250 0500 0000 0750 0000 %0398 R12 006421 -03083 003137 0500 1000 0375 0500 0000 0625 0000 %0399 R13 006610 -02929 002000 0500 1000 0500 0500 0000 0500 0000 %0400 R14 006761 -02244 000454 0500 1000 0625 0500 0000 0375 0000 %0401 R15 006861 -01895 -00400 0500 1000 0750 0500 0000 0250 0000 %0402 R16 006939 -01583 -01081 0500 1000 0875 0500 0000 0125 0000 %0403 R17 006999 -01265 -01767 0500 1000 1000 0500 0000 0000 0000 %0404 R18 002452 003731 001848 0625 0000 0000 0375 1000 1000 0000 %0405 S10 002493 003955 000991 0625 0000 0125 0375 1000 0875 0000 %0406 S11 002522 004103 000222 0625 0000 0250 0375 1000 0750 0000 %0407 S12 002516 004316 -00590 0625 0000 0375 0375 1000 0625 0000 %0408 S13 002559 004528 -01483 0625 0000 0500 0375 1000 0500 0000 %0409 S14 002601 004856 -02539 0625 0000 0625 0375 1000 0375 0000 %0410 S15 002653 005417 -03280 0625 0000 0750 0375 1000 0250 0000 %0411 S16 002692 005953 -03925 0625 0000 0875 0375 1000 0125 0000 %0412 S17 002773 006503 -04583 0625 0000 1000 0375 1000 0000 0000 %0413 S18 002956 003115 002532 0625 0125 0000 0375 0875 1000 0000 %0414 T10 003181 002983 001347 0625 0125 0125 0375 0875 0875 0000 %0415 T11 003208 003171 000671 0625 0125 0250 0375 0875 0750 0000 %0416 T12 003212 003399 -00221 0625 0125 0375 0375 0875 0625 0000 %0417 T13 003244 003623 -01084 0625 0125 0500 0375 0875 0500 0000 %0418 T14 003258 003915 -02107 0625 0125 0625 0375 0875 0375 0000 %0419 T15 003335 004476 -02812 0625 0125 0750 0375 0875 0250 0000 %0420 T16 003370 005060 -03469 0625 0125 0875 0375 0875 0125 0000 %0421 T17 003404 005723 -04216 0625 0125 1000 0375 0875 0000 0000 %0422 T18 003430 002450 003235 0625 0250 0000 0375 0750 1000 0000 %0423 U10 003636 002320 002019 0625 0250 0125 0375 0750 0875 0000 %0424 U11 003854 002242 001004 0625 0250 0250 0375 0750 0750 0000 %0425 U12 003878 002468 000162 0625 0250 0375 0375 0750 0625 0000 %0426 U13 003889 002692 -00609 0625 0250 0500 0375 0750 0500 0000 %0427 U14 003923 002893 -01663 0625 0250 0625 0375 0750 0375 0000 %0428 U15 003970 003535 -02420 0625 0250 0750 0375 0750 0250 0000 %0429 U16 004014 004145 -03077 0625 0250 0875 0375 0750 0125 0000 %0430 U17 004081 004748 -03745 0625 0250 1000 0375 0750 0000 0000 %0431 U18 003943 001789 003959 0625 0375 0000 0375 0625 1000 0000 %0432 V10 004111 001708 002732 0625 0375 0125 0375 0625 0875 0000 %0433 V11 004306 001634 001671 0625 0375 0250 0375 0625 0750 0000 %0434 V12 004502 001532 000561 0625 0375 0375 0375 0625 0625 0000 %0435 V13 004547 001730 -00228 0625 0375 0500 0375 0625 0500 0000 %0436 V14 004566 002009 -01285 0625 0375 0625 0375 0625 0375 0000 %0437 V15 004587 002579 -01956 0625 0375 0750 0375 0625 0250 0000 %0438 V16 004648 003162 -02585 0625 0375 0875 0375 0625 0125 0000 %0439 V17 004741 003831 -03280 0625 0375 1000 0375 0625 0000 0000 %0440 V18 004546 000925 004779 0625 0500 0000 0375 0500 1000 0000 %0441 W10 004662 000933 003495 0625 0500 0125 0375 0500 0875 0000 %0442 W11 004801 000969 002382 0625 0500 0250 0375 0500 0750 0000 %0443 W12 004986 000891 001265 0625 0500 0375 0375 0500 0625 0000 %0444 W13 005198 000794 000121 0625 0500 0500 0375 0500 0500 0000 %0445 W14 005262 001027 -00794 0625 0500 0625 0375 0500 0375 0000 %0446 W15 005278 001635 -01444 0625 0500 0750 0375 0500 0250 0000 %0447 W16 005312 002274 -02165 0625 0500 0875 0375 0500 0125 0000 %0448 W17 005391 002905 -02870 0625 0500 1000 0375 0500 0000 0000 %0449 W18 005416 -00246 006027 0625 0625 0000 0375 0375 1000 0000 %0450 X10 005533 -00192 004701 0625 0625 0125 0375 0375 0875 0000 %0451 X11 005607 -00099 003507 0625 0625 0250 0375 0375 0750 0000 %0452 X12 005692 -00021 002262 0625 0625 0375 0375 0375 0625 0000 %0453 X13 005767 000047 000925 0625 0625 0500 0375 0375 0500 0000 %0454 X14 005917 000057 -00315 0625 0625 0625 0375 0375 0375 0000 %0455 X15 005939 000694 -00986 0625 0625 0750 0375 0375 0250 0000 %0456 X16 005999 001312 -01671 0625 0625 0875 0375 0375 0125 0000 %0457 X17 006094 001960 -02408 0625 0625 1000 0375 0375 0000 0000 %0458 X18 005687 -01251 006321 0625 0750 0000 0375 0250 1000 0000 %0459 Y10 005795 -01229 005094 0625 0750 0125 0375 0250 0875 0000 %0460 Y11 005899 -01122 003890 0625 0750 0250 0375 0250 0750 0000 %0461 Y12 005987 -01004 002637 0625 0750 0375 0375 0250 0625 0000 %0462 Y13 006135 -00870 001418 0625 0750 0500 0375 0250 0500 0000 %0463 Y14 006323 -00718 000293 0625 0750 0625 0375 0250 0375 0000 %0464 Y15 006416 -00301 -00624 0625 0750 0750 0375 0250 0250 0000 %0465 Y16 006607 000085 -01273 0625 0750 0875 0375 0250 0125 0000 %0466 Y17 006750 000495 -01850 0625 0750 1000 0375 0250 0000 0000 %0467 Y18 006031 -02090 006798 0625 0875 0000 0375 0125 1000 0000 %0468 Z10 006151 -02033 005483 0625 0875 0125 0375 0125 0875 0000 %0469 Z11 006275 -01920 004389 0625 0875 0250 0375 0125 0750 0000 %0470 Z12 006378 -01740 003203 0625 0875 0375 0375 0125 0625 0000 %0471 Z13 006545 -01531 001956 0625 0875 0500 0375 0125 0500 0000 %0472 Z14 006756 -01392 000821 0625 0875 0625 0375 0125 0375 0000 %0473 Z15 006864 -00875 -00357 0625 0875 0750 0375 0125 0250 0000 %0474 Z16 006944 -00606 -01011 0625 0875 0875 0375 0125 0125 0000 %0475 Z17 007115 -00179 -01632 0625 0875 1000 0375 0125 0000 0000 %0476 Z18 006435 -02922 007372 0625 1000 0000 0375 0000 1000 0000 %0477 a10 006568 -02875 006066 0625 1000 0125 0375 0000 0875 0000 %0478 a11 006732 -02723 004974 0625 1000 0250 0375 0000 0750 0000 %0479 a12 006834 -02496 003778 0625 1000 0375 0375 0000 0625 0000 %0480 a13 007016 -02380 002617 0625 1000 0500 0375 0000 0500 0000 %0481 a14 007215 -02203 001430 0625 1000 0625 0375 0000 0375 0000 %0482 a15 007353 -01565 000069 0625 1000 0750 0375 0000 0250 0000 %0483 a16 007420 -01233 -00720 0625 1000 0875 0375 0000 0125 0000 %0484 a17 007496 -00941 -01356 0625 1000 1000 0375 0000 0000 0000 %0485 a18 002766 004441 002418 0750 0000 0000 0250 1000 1000 0000 %0486 A19 002779 004589 001583 0750 0000 0125 0250 1000 0875 0000 %0487 A20 002797 004780 000775 0750 0000 0250 0250 1000 0750 0000 %0488 A21 002818 004985 000026 0750 0000 0375 0250 1000 0625 0000 %0489 A22 002851 005216 -00832 0750 0000 0500 0250 1000 0500 0000 %0490 A23 002861 005464 -01745 0750 0000 0625 0250 1000 0375 0000 %0491 A24 002903 005755 -02869 0750 0000 0750 0250 1000 0250 0000 %0492 A25 002952 006247 -03516 0750 0000 0875 0250 1000 0125 0000 %0493 A26 003008 006826 -04223 0750 0000 1000 0250 1000 0000 0000 %0494 A27 003193 003891 003007 0750 0125 0000 0250 0875 1000 0000 %0495 B19 003396 003744 001946 0750 0125 0125 0250 0875 0875 0000 %0496 B20 003389 003977 001120 0750 0125 0250 0250 0875 0750 0000 %0497 B21 003437 004136 000381 0750 0125 0375 0250 0875 0625 0000 %0498 B22 003441 004369 -00507 0750 0125 0500 0250 0875 0500 0000 %0499 B23 003465 004592 -01390 0750 0125 0625 0250 0875 0375 0000 %0500 B24 003506 004888 -02467 0750 0125 0750 0250 0875 0250 0000 %0501 B25 003533 005435 -03155 0750 0125 0875 0250 0875 0125 0000 %0502 B26 003606 006039 -03856 0750 0125 1000 0250 0875 0000 0000 %0503 B27 003624 003264 003641 0750 0250 0000 0250 0750 1000 0000 %0504 C19 003844 003151 002486 0750 0250 0125 0250 0750 0875 0000 %0505 C20 004042 003059 001497 0750 0250 0250 0250 0750 0750 0000 %0506 C21 004074 003234 000663 0750 0250 0375 0250 0750 0625 0000 %0507 C22 004079 003477 -00107 0750 0250 0500 0250 0750 0500 0000 %0508 C23 004065 003734 -01031 0750 0250 0625 0250 0750 0375 0000 %0509 C24 004109 003985 -02101 0750 0250 0750 0250 0750 0250 0000 %0510 C25 004163 004520 -02776 0750 0250 0875 0250 0750 0125 0000 %0511 C26 004222 005155 -03502 0750 0250 1000 0250 0750 0000 0000 %0512 C27 004159 002590 004337 0750 0375 0000 0250 0625 1000 0000 %0513 D19 004330 002487 003166 0750 0375 0125 0250 0625 0875 0000 %0514 D20 004529 002401 002124 0750 0375 0250 0250 0625 0750 0000 %0515 D21 004721 002370 001070 0750 0375 0375 0250 0625 0625 0000 %0516 D22 004744 002546 000247 0750 0375 0500 0250 0625 0500 0000 %0517 D23 004761 002740 -00605 0750 0375 0625 0250 0625 0375 0000 %0518 D24 004772 003038 -01665 0750 0375 0750 0250 0625 0250 0000 %0519 D25 004818 003600 -02339 0750 0375 0875 0250 0625 0125 0000 %0520 D26 004890 004240 -03070 0750 0375 1000 0250 0625 0000 0000 %0521 D27 004700 001841 005068 0750 0500 0000 0250 0500 1000 0000 %0522 E19 004854 001839 003858 0750 0500 0125 0250 0500 0875 0000 %0523 E20 005024 001776 002839 0750 0500 0250 0250 0500 0750 0000 %0524 E21 005228 001670 001689 0750 0500 0375 0250 0500 0625 0000 %0525 E22 005450 001582 000599 0750 0500 0500 0250 0500 0500 0000 %0526 E23 005451 001816 -00262 0750 0500 0625 0250 0500 0375 0000 %0527 E24 005467 002017 -01173 0750 0500 0750 0250 0500 0250 0000 %0528 E25 005537 002601 -01852 0750 0500 0875 0250 0500 0125 0000 %0529 E26 005601 003299 -02615 0750 0500 1000 0250 0500 0000 0000 %0530 E27 005431 000880 006065 0750 0625 0000 0250 0375 1000 0000 %0531 F19 005564 000903 004882 0750 0625 0125 0250 0375 0875 0000 %0532 F20 005674 000962 003700 0750 0625 0250 0250 0375 0750 0000 %0533 F21 005790 000950 002491 0750 0625 0375 0250 0375 0625 0000 %0534 F22 005956 000904 001292 0750 0625 0500 0250 0375 0500 0000 %0535 F23 006160 000836 000169 0750 0625 0625 0250 0375 0375 0000 %0536 F24 006175 001052 -00685 0750 0625 0750 0250 0375 0250 0000 %0537 F25 006237 001661 -01430 0750 0625 0875 0250 0375 0125 0000 %0538 F26 006307 002298 -02118 0750 0625 1000 0250 0375 0000 0000 %0539 F27 006330 -00254 007364 0750 0750 0000 0250 0250 1000 0000 %0540 G19 006421 -00228 006030 0750 0750 0125 0250 0250 0875 0000 %0541 G20 006520 -00095 004837 0750 0750 0250 0250 0250 0750 0000 %0542 G21 006583 -00066 003600 0750 0750 0375 0250 0250 0625 0000 %0543 G22 006677 000022 002278 0750 0750 0500 0250 0250 0500 0000 %0544 G23 006760 000088 000956 0750 0750 0625 0250 0250 0375 0000 %0545 G24 006796 000146 -00282 0750 0750 0750 0250 0250 0250 0000 %0546 G25 006883 000801 -01021 0750 0750 0875 0250 0250 0125 0000 %0547 G26 006970 001430 -01680 0750 0750 1000 0250 0250 0000 0000 %0548 G27 006515 -01305 007522 0750 0875 0000 0250 0125 1000 0000 %0549 H19 006603 -01225 006320 0750 0875 0125 0250 0125 0875 0000 %0550 H20 006717 -01123 005138 0750 0875 0250 0250 0125 0750 0000 %0551 H21 006802 -01008 003881 0750 0875 0375 0250 0125 0625 0000 %0552 H22 006934 -00913 002675 0750 0875 0500 0250 0125 0500 0000 %0553 H23 007116 -00801 001455 0750 0875 0625 0250 0125 0375 0000 %0554 H24 007255 -00644 000355 0750 0875 0750 0250 0125 0250 0000 %0555 H25 007348 -00223 -00686 0750 0875 0875 0250 0125 0125 0000 %0556 H26 007572 000127 -01271 0750 0875 1000 0250 0125 0000 0000 %0557 H27 006845 -02287 008015 0750 1000 0000 0250 0000 1000 0000 %0558 I19 006954 -02189 006731 0750 1000 0125 0250 0000 0875 0000 %0559 I20 007079 -02049 005662 0750 1000 0250 0250 0000 0750 0000 %0560 I21 007222 -01868 004478 0750 1000 0375 0250 0000 0625 0000 %0561 I22 007357 -01759 003267 0750 1000 0500 0250 0000 0500 0000 %0562 I23 007554 -01655 002092 0750 1000 0625 0250 0000 0375 0000 %0563 I24 007723 -01500 000970 0750 1000 0750 0250 0000 0250 0000 %0564 I25 007857 -00946 -00291 0750 1000 0875 0250 0000 0125 0000 %0565 I26 007930 -00570 -01013 0750 1000 1000 0250 0000 0000 0000 %0566 I27 003098 005134 002931 0875 0000 0000 0125 1000 1000 0000 %0567 J19 003130 005325 001998 0875 0000 0125 0125 1000 0875 0000 %0568 J20 003154 005502 001233 0875 0000 0250 0125 1000 0750 0000 %0569 J21 003201 005739 000503 0875 0000 0375 0125 1000 0625 0000 %0570 J22 003242 005969 -00331 0875 0000 0500 0125 1000 0500 0000 %0571 J23 003249 006150 -01157 0875 0000 0625 0125 1000 0375 0000 %0572 J24 003295 006417 -02113 0875 0000 0750 0125 1000 0250 0000 %0573 J25 003280 006693 -03187 0875 0000 0875 0125 1000 0125 0000 %0574 J26 003335 007235 -03900 0875 0000 1000 0125 1000 0000 0000 %0575 J27 003544 004584 003553 0875 0125 0000 0125 0875 1000 0000 %0576 K19 003759 004471 002439 0875 0125 0125 0125 0875 0875 0000 %0577 K20 003797 004657 001670 0875 0125 0250 0125 0875 0750 0000 %0578 K21 003816 004855 000875 0875 0125 0375 0125 0875 0625 0000 %0579 K22 003818 005074 000014 0875 0125 0500 0125 0875 0500 0000 %0580 K23 003835 005284 -00787 0875 0125 0625 0125 0875 0375 0000 %0581 K24 003879 005541 -01724 0875 0125 0750 0125 0875 0250 0000 %0582 K25 003892 005844 -02777 0875 0125 0875 0125 0875 0125 0000 %0583 K26 003942 006364 -03513 0875 0125 1000 0125 0875 0000 0000 %0584 K27 004040 003947 004268 0875 0250 0000 0125 0750 1000 0000 %0585 L19 004255 003807 003021 0875 0250 0125 0125 0750 0875 0000 %0586 L20 004461 003738 002022 0875 0250 0250 0125 0750 0750 0000 %0587 L21 004473 003956 001203 0875 0250 0375 0125 0750 0625 0000 %0588 L22 004499 004171 000398 0875 0250 0500 0125 0750 0500 0000 %0589 L23 004532 004383 -00439 0875 0250 0625 0125 0750 0375 0000 %0590 L24 004552 004612 -01357 0875 0250 0750 0125 0750 0250 0000 %0591 L25 004561 004905 -02361 0875 0250 0875 0125 0750 0125 0000 %0592 L26 004631 005448 -03088 0875 0250 1000 0125 0750 0000 0000 %0593 L27 004523 003267 004898 0875 0375 0000 0125 0625 1000 0000 %0594 M19 004734 003178 003714 0875 0375 0125 0125 0625 0875 0000 %0595 M20 004947 003075 002687 0875 0375 0250 0125 0625 0750 0000 %0596 M21 005154 003002 001610 0875 0375 0375 0125 0625 0625 0000 %0597 M22 005155 003208 000740 0875 0375 0500 0125 0625 0500 0000 %0598 M23 005205 003451 -00075 0875 0375 0625 0125 0625 0375 0000 %0599 M24 005231 003703 -00937 0875 0375 0750 0125 0625 0250 0000 %0600 M25 005218 003956 -01934 0875 0375 0875 0125 0625 0125 0000 %0601 M26 005267 004563 -02689 0875 0375 1000 0125 0625 0000 0000 %0602 M27 005038 002593 005618 0875 0500 0000 0125 0500 1000 0000 %0603 N19 005208 002519 004443 0875 0500 0125 0125 0500 0875 0000 %0604 N20 005425 002477 003368 0875 0500 0250 0125 0500 0750 0000 %0605 N21 005649 002332 002342 0875 0500 0375 0125 0500 0625 0000 %0606 N22 005848 002269 001192 0875 0500 0500 0125 0500 0500 0000 %0607 N23 005892 002487 000291 0875 0500 0625 0125 0500 0375 0000 %0608 N24 005906 002658 -00504 0875 0500 0750 0125 0500 0250 0000 %0609 N25 005918 002985 -01469 0875 0500 0875 0125 0500 0125 0000 %0610 N26 005966 003583 -02226 0875 0500 1000 0125 0500 0000 0000 %0611 N27 005689 001787 006529 0875 0625 0000 0125 0375 1000 0000 %0612 O19 005835 001747 005307 0875 0625 0125 0125 0375 0875 0000 %0613 O20 005981 001793 004129 0875 0625 0250 0125 0375 0750 0000 %0614 O21 006141 001752 002961 0875 0625 0375 0125 0375 0625 0000 %0615 O22 006319 001674 001831 0875 0625 0500 0125 0375 0500 0000 %0616 O23 006557 001558 000694 0875 0625 0625 0125 0375 0375 0000 %0617 O24 006586 001733 -00059 0875 0625 0750 0125 0375 0250 0000 %0618 O25 006591 002012 -01078 0875 0625 0875 0125 0375 0125 0000 %0619 O26 006607 002591 -01757 0875 0625 1000 0125 0375 0000 0000 %0620 O27 006410 000863 007555 0875 0750 0000 0125 0250 1000 0000 %0621 P19 006534 000882 006277 0875 0750 0125 0125 0250 0875 0000 %0622 P20 006646 000931 005048 0875 0750 0250 0125 0250 0750 0000 %0623 P21 006765 000983 003878 0875 0750 0375 0125 0250 0625 0000 %0624 P22 006879 000999 002541 0875 0750 0500 0125 0250 0500 0000 %0625 P23 007059 000946 001370 0875 0750 0625 0125 0250 0375 0000 %0626 P24 007221 000837 000285 0875 0750 0750 0125 0250 0250 0000 %0627 P25 007233 001094 -00638 0875 0750 0875 0125 0250 0125 0000 %0628 P26 007285 001730 -01333 0875 0750 1000 0125 0250 0000 0000 %0629 P27 007311 -00281 008785 0875 0875 0000 0125 0125 1000 0000 %0630 Q19 007420 -00229 007499 0875 0875 0125 0125 0125 0875 0000 %0631 Q20 007510 -00142 006234 0875 0875 0250 0125 0125 0750 0000 %0632 Q21 007592 -00087 004990 0875 0875 0375 0125 0125 0625 0000 %0633 Q22 007679 -00001 003654 0875 0875 0500 0125 0125 0500 0000 %0634 Q23 007775 -00002 002387 0875 0875 0625 0125 0125 0375 0000 %0635 Q24 007857 000047 001188 0875 0875 0750 0125 0125 0250 0000 %0636 Q25 007908 000090 -00190 0875 0875 0875 0125 0125 0125 0000 %0637 Q26 007989 000805 -00887 0875 0875 1000 0125 0125 0000 0000 %0638 Q27 007550 -01383 009123 0875 1000 0000 0125 0000 1000 0000 %0639 R19 007647 -01334 007771 0875 1000 0125 0125 0000 0875 0000 %0640 R20 007732 -01260 006542 0875 1000 0250 0125 0000 0750 0000 %0641 R21 007845 -01151 005297 0875 1000 0375 0125 0000 0625 0000 %0642 R22 007956 -01057 004051 0875 1000 0500 0125 0000 0500 0000 %0643 R23 008096 -00990 002787 0875 1000 0625 0125 0000 0375 0000 %0644 R24 008231 -00886 001669 0875 1000 0750 0125 0000 0250 0000 %0645 R25 008382 -00708 000437 0875 1000 0875 0125 0000 0125 0000 %0646 R26 008506 -00285 -00471 0875 1000 1000 0125 0000 0000 0000 %0647 R27 003456 005843 003508 1000 0000 0000 0000 1000 1000 0000 %0648 S19 003470 006038 002586 1000 0000 0125 0000 1000 0875 0000 %0649 S20 003513 006238 001770 1000 0000 0250 0000 1000 0750 0000 %0650 S21 003530 006357 001049 1000 0000 0375 0000 1000 0625 0000 %0651 S22 003528 006527 000249 1000 0000 0500 0000 1000 0500 0000 %0652 S23 003554 006717 -00493 1000 0000 0625 0000 1000 0375 0000 %0653 S24 003596 006995 -01439 1000 0000 0750 0000 1000 0250 0000 %0654 S25 003651 007316 -02379 1000 0000 0875 0000 1000 0125 0000 %0655 S26 003667 007654 -03552 1000 0000 1000 0000 1000 0000 0000 %0656 S27 003950 005277 004142 1000 0125 0000 0000 0875 1000 0000 %0657 T19 004191 005128 003011 1000 0125 0125 0000 0875 0875 0000 %0658 T20 004197 005368 002198 1000 0125 0250 0000 0875 0750 0000 %0659 T21 004226 005564 001337 1000 0125 0375 0000 0875 0625 0000 %0660 T22 004235 005758 000538 1000 0125 0500 0000 0875 0500 0000 %0661 T23 004240 005992 -00257 1000 0125 0625 0000 0875 0375 0000 %0662 T24 004268 006222 -01113 1000 0125 0750 0000 0875 0250 0000 %0663 T25 004293 006463 -01991 1000 0125 0875 0000 0875 0125 0000 %0664 T26 004337 006729 -03126 1000 0125 1000 0000 0875 0000 0000 %0665 T27 004419 004677 004829 1000 0250 0000 0000 0750 1000 0000 %0666 U19 004659 004514 003670 1000 0250 0125 0000 0750 0875 0000 %0667 U20 004874 004440 002588 1000 0250 0250 0000 0750 0750 0000 %0668 U21 004880 004638 001798 1000 0250 0375 0000 0750 0625 0000 %0669 U22 004910 004863 000962 1000 0250 0500 0000 0750 0500 0000 %0670 U23 004909 005082 000125 1000 0250 0625 0000 0750 0375 0000 %0671 U24 004924 005320 -00769 1000 0250 0750 0000 0750 0250 0000 %0672 U25 004962 005516 -01558 1000 0250 0875 0000 0750 0125 0000 %0673 U26 005017 005803 -02679 1000 0250 1000 0000 0750 0000 0000 %0674 U27 004926 004014 005498 1000 0375 0000 0000 0625 1000 0000 %0675 V19 005131 003901 004350 1000 0375 0125 0000 0625 0875 0000 %0676 V20 005346 003790 003301 1000 0375 0250 0000 0625 0750 0000 %0677 V21 005543 003723 002156 1000 0375 0375 0000 0625 0625 0000 %0678 V22 005549 003940 001353 1000 0375 0500 0000 0625 0500 0000 %0679 V23 005598 004146 000506 1000 0375 0625 0000 0625 0375 0000 %0680 V24 005603 004363 -00352 1000 0375 0750 0000 0625 0250 0000 %0681 V25 005591 004639 -01213 1000 0375 0875 0000 0625 0125 0000 %0682 V26 005640 004894 -02294 1000 0375 1000 0000 0625 0000 0000 %0683 V27 005388 003408 006141 1000 0500 0000 0000 0500 1000 0000 %0684 W19 005600 003306 004957 1000 0500 0125 0000 0500 0875 0000 %0685 W20 005800 003192 003893 1000 0500 0250 0000 0500 0750 0000 %0686 W21 006010 003070 002818 1000 0500 0375 0000 0500 0625 0000 %0687 W22 006250 002960 001724 1000 0500 0500 0000 0500 0500 0000 %0688 W23 006251 003231 000815 1000 0500 0625 0000 0500 0375 0000 %0689 W24 006265 003435 000067 1000 0500 0750 0000 0500 0250 0000 %0690 W25 006297 003603 -00773 1000 0500 0875 0000 0500 0125 0000 %0691 W26 006317 003912 -01859 1000 0500 1000 0000 0500 0000 0000 %0692 W27 005980 002650 006947 1000 0625 0000 0000 0375 1000 0000 %0693 X19 006154 002539 005704 1000 0625 0125 0000 0375 0875 0000 %0694 X20 006313 002490 004590 1000 0625 0250 0000 0375 0750 0000 %0695 X21 006488 002430 003470 1000 0625 0375 0000 0375 0625 0000 %0696 X22 006690 002366 002371 1000 0625 0500 0000 0375 0500 0000 %0697 X23 006921 002249 001262 1000 0625 0625 0000 0375 0375 0000 %0698 X24 006938 002466 000459 1000 0625 0750 0000 0375 0250 0000 %0699 X25 006958 002691 -00367 1000 0625 0875 0000 0375 0125 0000 %0700 X26 006980 002932 -01387 1000 0625 1000 0000 0375 0000 0000 %0701 X27 006591 001826 007824 1000 0750 0000 0000 0250 1000 0000 %0702 Y19 006712 001777 006514 1000 0750 0125 0000 0250 0875 0000 %0703 Y20 006864 001833 005394 1000 0750 0250 0000 0250 0750 0000 %0704 Y21 006983 001799 004232 1000 0750 0375 0000 0250 0625 0000 %0705 Y22 007167 001771 003084 1000 0750 0500 0000 0250 0500 0000 %0706 Y23 007399 001690 001896 1000 0750 0625 0000 0250 0375 0000 %0707 Y24 007559 001585 000825 1000 0750 0750 0000 0250 0250 0000 %0708 Y25 007593 001826 -00050 1000 0750 0875 0000 0250 0125 0000 %0709 Y26 007620 002072 -01009 1000 0750 1000 0000 0250 0000 0000 %0710 Y27 007284 000901 008839 1000 0875 0000 0000 0125 1000 0000 %0711 Z19 007410 000965 007470 1000 0875 0125 0000 0125 0875 0000 %0712 Z20 007480 000936 006352 1000 0875 0250 0000 0125 0750 0000 %0713 Z21 007552 000956 005100 1000 0875 0375 0000 0125 0625 0000 %0714 Z22 007674 000983 003839 1000 0875 0500 0000 0125 0500 0000 %0715 Z23 007879 000955 002640 1000 0875 0625 0000 0125 0375 0000 %0716 Z24 008083 000995 001477 1000 0875 0750 0000 0125 0250 0000 %0717 Z25 008287 000851 000345 1000 0875 0875 0000 0125 0125 0000 %0718 Z26 008303 001069 -00548 1000 0875 1000 0000 0125 0000 0000 %0719 Z27 008298 -00438 010150 1000 1000 0000 0000 0000 1000 0000 %0720 a19 008371 -00369 008848 1000 1000 0125 0000 0000 0875 0000 %0721 a20 008401 -00373 007604 1000 1000 0250 0000 0000 0750 0000 %0722 a21 008431 -00338 006302 1000 1000 0375 0000 0000 0625 0000 %0723 a22 008503 -00300 005058 1000 1000 0500 0000 0000 0500 0000 %0724 a23 008628 -00243 003692 1000 1000 0625 0000 0000 0375 0000 %0725 a24 008728 -00116 002475 1000 1000 0750 0000 0000 0250 0000 %0726 a25 008904 -00005 001217 1000 1000 0875 0000 0000 0125 0000 %0727 a26 009015 000000 000000 1000 1000 1000 0000 0000 0000 0000 %0728 a27 009137 -00015 000005 1000 1000 1000 0000 0000 0000 0000 %0729 b01 008663 -00321 -00377 0875 1000 1000 0125 0000 0000 0000 %0730 b02 008107 -00629 -00829 0750 1000 1000 0250 0000 0000 0000 %0731 b03 007524 -00944 -01234 0625 1000 1000 0375 0000 0000 0000 %0732 b04 007088 -01285 -01561 0500 1000 1000 0500 0000 0000 0000 %0733 b05 006612 -01690 -01854 0375 1000 1000 0625 0000 0000 0000 %0734 b06 006122 -02029 -02203 0250 1000 1000 0750 0000 0000 0000 %0735 b07 005625 -02399 -02625 0125 1000 1000 0875 0000 0000 0000 %0736 b08 005218 -02792 -02931 0000 1000 1000 1000 0000 0000 0000 %0737 b09 008423 000778 000381 1000 0875 0875 0000 0125 0125 0000 %0738 c01 008084 000032 -00086 0875 0875 0875 0125 0125 0125 0000 %0739 c02 007534 -00289 -00497 0750 0875 0875 0250 0125 0125 0000 %0740 c03 006976 -00623 -00820 0625 0875 0875 0375 0125 0125 0000 %0741 c04 006532 -00966 -01165 0500 0875 0875 0500 0125 0125 0000 %0742 c05 006069 -01341 -01539 0375 0875 0875 0625 0125 0125 0000 %0743 c06 005597 -01714 -01809 0250 0875 0875 0750 0125 0125 0000 %0744 c07 005129 -02114 -02193 0125 0875 0875 0875 0125 0125 0000 %0745 c08 004649 -02409 -02602 0000 0875 0875 1000 0125 0125 0000 %0746 c09 007679 001499 000910 1000 0750 0750 0000 0250 0250 0000 %0747 d01 007379 000753 000432 0875 0750 0750 0125 0250 0250 0000 %0748 d02 006974 000029 -00027 0750 0750 0750 0250 0250 0250 0000 %0749 d03 006463 -00327 -00407 0625 0750 0750 0375 0250 0250 0000 %0750 d04 006050 -00660 -00730 0500 0750 0750 0500 0250 0250 0000 %0751 d05 005561 -01085 -01096 0375 0750 0750 0625 0250 0250 0000 %0752 d06 005094 -01433 -01437 0250 0750 0750 0750 0250 0250 0000 %0753 d07 004585 -01788 -01836 0125 0750 0750 0875 0250 0250 0000 %0754 d08 004126 -02135 -02161 0000 0750 0750 1000 0250 0250 0000 %0755 d09 007052 002135 001407 1000 0625 0625 0000 0375 0375 0000 %0756 e01 006744 001408 000936 0875 0625 0625 0125 0375 0375 0000 %0757 e02 006329 000717 000463 0750 0625 0625 0250 0375 0375 0000 %0758 e03 005959 000009 -00027 0625 0625 0625 0375 0375 0375 0000 %0759 e04 005556 -00275 -00399 0500 0625 0625 0500 0375 0375 0000 %0760 e05 005057 -00732 -00716 0375 0625 0625 0625 0375 0375 0000 %0761 e06 004581 -01116 -01040 0250 0625 0625 0750 0375 0375 0000 %0762 e07 004106 -01511 -01435 0125 0625 0625 0875 0375 0375 0000 %0763 e08 003632 -01791 -01841 0000 0625 0625 1000 0375 0375 0000 %0764 e09 006383 002790 001974 1000 0500 0500 0000 0500 0500 0000 %0765 f01 006039 002096 001502 0875 0500 0500 0125 0500 0500 0000 %0766 f02 005643 001383 001017 0750 0500 0500 0250 0500 0500 0000 %0767 f03 005266 000705 000498 0625 0500 0500 0375 0500 0500 0000 %0768 f04 005026 -00003 000050 0500 0500 0500 0500 0500 0500 0000 %0769 f05 004504 -00399 -00330 0375 0500 0500 0625 0500 0500 0000 %0770 f06 004004 -00740 -00679 0250 0500 0500 0750 0500 0500 0000 %0771 f07 003531 -01103 -01105 0125 0500 0500 0875 0500 0500 0000 %0772 f08 003084 -01486 -01421 0000 0500 0500 1000 0500 0500 0000 %0773 f09 005660 003559 002463 1000 0375 0375 0000 0625 0625 0000 %0774 g01 005306 002815 002016 0875 0375 0375 0125 0625 0625 0000 %0775 g02 004930 002150 001561 0750 0375 0375 0250 0625 0625 0000 %0776 g03 004569 001407 001062 0625 0375 0375 0375 0625 0625 0000 %0777 g04 004291 000790 000511 0500 0375 0375 0500 0625 0625 0000 %0778 g05 003934 -00008 000033 0375 0375 0375 0625 0625 0625 0000 %0779 g06 003505 -00415 -00312 0250 0375 0375 0750 0625 0625 0000 %0780 g07 003020 -00803 -00682 0125 0375 0375 0875 0625 0625 0000 %0781 g08 002536 -01093 -01067 0000 0375 0375 1000 0625 0625 0000 %0782 g09 004975 004269 002973 1000 0250 0250 0000 0750 0750 0000 %0783 h01 004630 003520 002488 0875 0250 0250 0125 0750 0750 0000 %0784 h02 004254 002843 002031 0750 0250 0250 0250 0750 0750 0000 %0785 h03 003904 002123 001534 0625 0250 0250 0375 0750 0750 0000 %0786 h04 003610 001454 001043 0500 0250 0250 0500 0750 0750 0000 %0787 h05 003283 000652 000557 0375 0250 0250 0625 0750 0750 0000 %0788 h06 002979 -00051 000015 0250 0250 0250 0750 0750 0750 0000 %0789 h07 002520 -00475 -00337 0125 0250 0250 0875 0750 0750 0000 %0790 h08 002034 -00773 -00725 0000 0250 0250 1000 0750 0750 0000 %0791 h09 004283 004979 003441 1000 0125 0125 0000 0875 0875 0000 %0792 i01 003935 004238 002993 0875 0125 0125 0125 0875 0875 0000 %0793 i02 003584 003516 002522 0750 0125 0125 0250 0875 0875 0000 %0794 i03 003235 002820 001971 0625 0125 0125 0375 0875 0875 0000 %0795 i04 002942 002138 001503 0500 0125 0125 0500 0875 0875 0000 %0796 i05 002601 001352 000973 0375 0125 0125 0625 0875 0875 0000 %0797 i06 002288 000695 000446 0250 0125 0125 0750 0875 0875 0000 %0798 i07 001970 -00073 -00074 0125 0125 0125 0875 0875 0875 0000 %0799 i08 001457 -00341 -00462 0000 0125 0125 1000 0875 0875 0000 %0800 i09 003549 005751 003989 1000 0000 0000 0000 1000 1000 0000 %0801 j01 003221 005022 003521 0875 0000 0000 0125 1000 1000 0000 %0802 j02 002893 004297 003027 0750 0000 0000 0250 1000 1000 0000 %0803 j03 002552 003614 002491 0625 0000 0000 0375 1000 1000 0000 %0804 j04 002225 002927 001999 0500 0000 0000 0500 1000 1000 0000 %0805 j05 001914 002149 001493 0375 0000 0000 0625 1000 1000 0000 %0806 j06 001575 001461 000987 0250 0000 0000 0750 1000 1000 0000 %0807 j07 001234 000713 000422 0125 0000 0000 0875 1000 1000 0000 %0808 j08 000905 -00003 -00028 0000 0000 0000 1000 1000 1000 0000 %0809 j09 009083 000007 -00002 1000 1000 1000 0000 0000 0000 0000 %0810 b10 008152 000688 -00724 0875 0875 1000 0125 0125 0000 0000 %0811 b11 007172 001252 -01364 0750 0750 1000 0250 0250 0000 0000 %0812 b12 006147 001893 -02109 0625 0625 1000 0375 0375 0000 0000 %0813 b13 005173 002518 -02775 0500 0500 1000 0500 0500 0000 0000 %0814 b14 004268 003155 -03445 0375 0375 1000 0625 0625 0000 0000 %0815 b15 003323 003720 -04135 0250 0250 1000 0750 0750 0000 0000 %0816 b16 002347 004386 -04781 0125 0125 1000 0875 0875 0000 0000 %0817 b17 001417 004902 -05374 0000 0000 1000 1000 1000 0000 0000 %0818 b18 008953 -00019 001199 1000 1000 0875 0000 0000 0125 0000 %0819 c10 008056 000029 -00055 0875 0875 0875 0125 0125 0125 0000 %0820 c11 007068 000670 -00754 0750 0750 0875 0250 0250 0125 0000 %0821 c12 006030 001242 -01363 0625 0625 0875 0375 0375 0125 0000 %0822 c13 005130 001798 -02025 0500 0500 0875 0500 0500 0125 0000 %0823 c14 004187 002498 -02760 0375 0375 0875 0625 0625 0125 0000 %0824 c15 003250 003083 -03426 0250 0250 0875 0750 0750 0125 0000 %0825 c16 002279 003747 -04084 0125 0125 0875 0875 0875 0125 0000 %0826 c17 001350 004248 -04682 0000 0000 0875 1000 1000 0125 0000 %0827 c18 008765 -00170 002495 1000 1000 0750 0000 0000 0250 0000 %0828 d10 007969 -00005 001264 0875 0875 0750 0125 0125 0250 0000 %0829 d11 006958 000014 000018 0750 0750 0750 0250 0250 0250 0000 %0830 d12 005959 000647 -00717 0625 0625 0750 0375 0375 0250 0000 %0831 d13 005079 001199 -01345 0500 0500 0750 0500 0500 0250 0000 %0832 d14 004118 001899 -02075 0375 0375 0750 0625 0625 0250 0000 %0833 d15 003159 002517 -02794 0250 0250 0750 0750 0750 0250 0000 %0834 d16 002221 003149 -03422 0125 0125 0750 0875 0875 0250 0000 %0835 d17 001314 003638 -04009 0000 0000 0750 1000 1000 0250 0000 %0836 d18 008659 -00282 003694 1000 1000 0625 0000 0000 0375 0000 %0837 e10 007885 -00080 002509 0875 0875 0625 0125 0125 0375 0000 %0838 e11 006926 -00039 001228 0750 0750 0625 0250 0250 0375 0000 %0839 e12 005963 000001 -00022 0625 0625 0625 0375 0375 0375 0000 %0840 e13 005037 000565 -00688 0500 0500 0625 0500 0500 0375 0000 %0841 e14 004065 001213 -01369 0375 0375 0625 0625 0625 0375 0000 %0842 e15 003102 001848 -02069 0250 0250 0625 0750 0750 0375 0000 %0843 e16 002166 002582 -02782 0125 0125 0625 0875 0875 0375 0000 %0844 e17 001259 003050 -03366 0000 0000 0625 1000 1000 0375 0000 %0845 e18 008547 -00358 005096 1000 1000 0500 0000 0000 0500 0000 %0846 f10 007780 -00094 003774 0875 0875 0500 0125 0125 0500 0000 %0847 f11 006847 -00145 002566 0750 0750 0500 0250 0250 0500 0000 %0848 f12 005818 -00064 001284 0625 0625 0500 0375 0375 0500 0000 %0849 f13 004997 -00008 000025 0500 0500 0500 0500 0500 0500 0000 %0850 f14 003991 000578 -00639 0375 0375 0500 0625 0625 0500 0000 %0851 f15 003032 001228 -01332 0250 0250 0500 0750 0750 0500 0000 %0852 f16 002079 001848 -02032 0125 0125 0500 0875 0875 0500 0000 %0853 f17 001179 002418 -02660 0000 0000 0500 1000 1000 0500 0000 %0854 f18 008461 -00382 006351 1000 1000 0375 0000 0000 0625 0000 %0855 g10 007686 -00169 005092 0875 0875 0375 0125 0125 0625 0000 %0856 g11 006722 -00217 003925 0750 0750 0375 0250 0250 0625 0000 %0857 g12 005726 -00135 002647 0625 0625 0375 0375 0375 0625 0000 %0858 g13 004863 -00093 001346 0500 0500 0375 0500 0500 0625 0000 %0859 g14 003902 -00010 000027 0375 0375 0375 0625 0625 0625 0000 %0860 g15 002982 000601 -00662 0250 0250 0375 0750 0750 0625 0000 %0861 g16 002001 001237 -01384 0125 0125 0375 0875 0875 0625 0000 %0862 g17 001100 001799 -02012 0000 0000 0375 1000 1000 0625 0000 %0863 g18 008409 -00413 007669 1000 1000 0250 0000 0000 0750 0000 %0864 h10 007597 -00227 006366 0875 0875 0250 0125 0125 0750 0000 %0865 h11 006667 -00222 005158 0750 0750 0250 0250 0250 0750 0000 %0866 h12 005645 -00189 003884 0625 0625 0250 0375 0375 0750 0000 %0867 h13 004791 -00123 002594 0500 0500 0250 0500 0500 0750 0000 %0868 h14 003864 -00116 001279 0375 0375 0250 0625 0625 0750 0000 %0869 h15 002927 -00031 -00017 0250 0250 0250 0750 0750 0750 0000 %0870 h16 001982 000579 -00690 0125 0125 0250 0875 0875 0750 0000 %0871 h17 001050 001211 -01361 0000 0000 0250 1000 1000 0750 0000 %0872 h18 008385 -00397 008881 1000 1000 0125 0000 0000 0875 0000 %0873 i10 007507 -00311 007672 0875 0875 0125 0125 0125 0875 0000 %0874 i11 006577 -00355 006422 0750 0750 0125 0250 0250 0875 0000 %0875 i12 005577 -00293 005080 0625 0625 0125 0375 0375 0875 0000 %0876 i13 004707 -00213 003832 0500 0500 0125 0500 0500 0875 0000 %0877 i14 003770 -00148 002524 0375 0375 0125 0625 0625 0875 0000 %0878 i15 002856 -00088 001249 0250 0250 0125 0750 0750 0875 0000 %0879 i16 001935 -00046 -00104 0125 0125 0125 0875 0875 0875 0000 %0880 i17 000963 000584 -00734 0000 0000 0125 1000 1000 0875 0000 %0881 i18 008307 -00446 010206 1000 1000 0000 0000 0000 1000 0000 %0882 j10 007393 -00318 009004 0875 0875 0000 0125 0125 1000 0000 %0883 j11 006451 -00341 007767 0750 0750 0000 0250 0250 1000 0000 %0884 j12 005456 -00315 006383 0625 0625 0000 0375 0375 1000 0000 %0885 j13 004582 -00237 005128 0500 0500 0000 0500 0500 1000 0000 %0886 j14 003655 -00195 003841 0375 0375 0000 0625 0625 1000 0000 %0887 j15 002753 -00168 002586 0250 0250 0000 0750 0750 1000 0000 %0888 j16 001773 -00081 001192 0125 0125 0000 0875 0875 1000 0000 %0889 j17 000892 000016 -00018 0000 0000 0000 1000 1000 1000 0000 %0890 j18 009050 000008 -00003 1000 1000 1000 0000 0000 0000 0000 %0891 b19 008395 000978 -00438 1000 0875 1000 0000 0125 0000 0000 %0892 b20 007727 001931 -00826 1000 0750 1000 0000 0250 0000 0000 %0893 b21 007089 002784 -01145 1000 0625 1000 0000 0375 0000 0000 %0894 b22 006427 003763 -01580 1000 0500 1000 0000 0500 0000 0000 %0895 b23 005746 004727 -01971 1000 0375 1000 0000 0625 0000 0000 %0896 b24 005075 005691 -02330 1000 0250 1000 0000 0750 0000 0000 %0897 b25 004368 006621 -02708 1000 0125 1000 0000 0875 0000 0000 %0898 b26 003703 007530 -03068 1000 0000 1000 0000 1000 0000 0000 %0899 b27 008465 -00711 000510 0875 1000 0875 0125 0000 0125 0000 %0900 c19 008032 000035 -00046 0875 0875 0875 0125 0125 0125 0000 %0901 c20 007369 001004 -00424 0875 0750 0875 0125 0250 0125 0000 %0902 c21 006707 001892 -00794 0875 0625 0875 0125 0375 0125 0000 %0903 c22 006043 002829 -01109 0875 0500 0875 0125 0500 0125 0000 %0904 c23 005340 003793 -01528 0875 0375 0875 0125 0625 0125 0000 %0905 c24 004663 004757 -01932 0875 0250 0875 0125 0750 0125 0000 %0906 c25 003971 005707 -02311 0875 0125 0875 0125 0875 0125 0000 %0907 c26 003315 006579 -02660 0875 0000 0875 0125 1000 0125 0000 %0908 c27 007805 -01519 001124 0750 1000 0750 0250 0000 0250 0000 %0909 d19 007349 -00716 000571 0750 0875 0750 0250 0125 0250 0000 %0910 d20 006901 000056 -00008 0750 0750 0750 0250 0250 0250 0000 %0911 d21 006265 000935 -00354 0750 0625 0750 0250 0375 0250 0000 %0912 d22 005558 001867 -00763 0750 0500 0750 0250 0500 0250 0000 %0913 d23 004881 002878 -01220 0750 0375 0750 0250 0625 0250 0000 %0914 d24 004190 003851 -01639 0750 0250 0750 0250 0750 0250 0000 %0915 d25 003554 004759 -01968 0750 0125 0750 0250 0875 0250 0000 %0916 d26 002926 005595 -02288 0750 0000 0750 0250 1000 0250 0000 %0917 d27 007206 -02260 001649 0625 1000 0625 0375 0000 0375 0000 %0918 e19 006739 -01437 001058 0625 0875 0625 0375 0125 0375 0000 %0919 e20 006320 -00779 000576 0625 0750 0625 0375 0250 0375 0000 %0920 e21 005890 000014 -00020 0625 0625 0625 0375 0375 0375 0000 %0921 e22 005230 000954 -00431 0625 0500 0625 0375 0500 0375 0000 %0922 e23 004528 001939 -00859 0625 0375 0625 0375 0625 0375 0000 %0923 e24 003865 002857 -01236 0625 0250 0625 0375 0750 0375 0000 %0924 e25 003183 003823 -01579 0625 0125 0625 0375 0875 0375 0000 %0925 e26 002568 004648 -01889 0625 0000 0625 0375 1000 0375 0000 %0926 e27 006637 -02975 002258 0500 1000 0500 0500 0000 0500 0000 %0927 f19 006181 -02190 001689 0500 0875 0500 0500 0125 0500 0000 %0928 f20 005776 -01501 001152 0500 0750 0500 0500 0250 0500 0000 %0929 f21 005396 -00714 000573 0500 0625 0500 0500 0375 0500 0000 %0930 f22 004943 000038 000008 0500 0500 0500 0500 0500 0500 0000 %0931 f23 004231 000963 -00387 0500 0375 0500 0500 0625 0500 0000 %0932 f24 003524 001932 -00799 0500 0250 0500 0500 0750 0500 0000 %0933 f25 002866 002832 -01128 0500 0125 0500 0500 0875 0500 0000 %0934 f26 002210 003689 -01532 0500 0000 0500 0500 1000 0500 0000 %0935 f27 006068 -03734 002913 0375 1000 0375 0625 0000 0625 0000 %0936 g19 005591 -02967 002342 0375 0875 0375 0625 0125 0625 0000 %0937 g20 005202 -02297 001804 0375 0750 0375 0625 0250 0625 0000 %0938 g21 004746 -01523 001207 0375 0625 0375 0625 0375 0625 0000 %0939 g22 004306 -00750 000644 0375 0500 0375 0625 0500 0625 0000 %0940 g23 003864 000029 000043 0375 0375 0375 0625 0625 0625 0000 %0941 g24 003196 000937 -00395 0375 0250 0375 0625 0750 0625 0000 %0942 g25 002515 001900 -00794 0375 0125 0375 0625 0875 0625 0000 %0943 g26 001859 002733 -01130 0375 0000 0375 0625 1000 0625 0000 %0944 g27 005455 -04512 003348 0250 1000 0250 0750 0000 0750 0000 %0945 h19 005043 -03798 002834 0250 0875 0250 0750 0125 0750 0000 %0946 h20 004616 -02997 002291 0250 0750 0250 0750 0250 0750 0000 %0947 h21 004195 -02277 001722 0250 0625 0250 0750 0375 0750 0000 %0948 h22 003741 -01472 001176 0250 0500 0250 0750 0500 0750 0000 %0949 h23 003354 -00792 000619 0250 0375 0250 0750 0625 0750 0000 %0950 h24 002881 000000 -00006 0250 0250 0250 0750 0750 0750 0000 %0951 h25 002213 000915 -00353 0250 0125 0250 0750 0875 0750 0000 %0952 h26 001554 001811 -00737 0250 0000 0250 0750 1000 0750 0000 %0953 h27 004913 -05314 003856 0125 1000 0125 0875 0000 0875 0000 %0954 i19 004499 -04589 003319 0125 0875 0125 0875 0125 0875 0000 %0955 i20 004078 -03865 002747 0125 0750 0125 0875 0250 0875 0000 %0956 i21 003666 -03099 002214 0125 0625 0125 0875 0375 0875 0000 %0957 i22 003192 -02283 001609 0125 0500 0125 0875 0500 0875 0000 %0958 i23 002773 -01522 001069 0125 0375 0125 0875 0625 0875 0000 %0959 i24 002344 -00781 000481 0125 0250 0125 0875 0750 0875 0000 %0960 i25 001906 -00012 -00082 0125 0125 0125 0875 0875 0875 0000 %0961 i26 001221 000898 -00413 0125 0000 0125 0875 1000 0875 0000 %0962 i27 004325 -06046 004509 0000 1000 0000 1000 0000 1000 0000 %0963 j19 003890 -05296 003949 0000 0875 0000 1000 0125 1000 0000 %0964 j20 003490 -04564 003422 0000 0750 0000 1000 0250 1000 0000 %0965 j21 003057 -03823 002851 0000 0625 0000 1000 0375 1000 0000 %0966 j22 002623 -03044 002272 0000 0500 0000 1000 0500 1000 0000 %0967 j23 002175 -02253 001670 0000 0375 0000 1000 0625 1000 0000 %0968 j24 001747 -01523 001077 0000 0250 0000 1000 0750 1000 0000 %0969 j25 001319 -00713 000531 0000 0125 0000 1000 0875 1000 0000 %0970 j26 000929 -00013 000046 0000 0000 0000 1000 1000 1000 0000 %0971 j27 ] def /LAB*Fa1100 [ %BEG GE67_22.TXT, Separation olv*, cf1=0.95, D65, adapted %100 x LAB*a %#1000 x (r g b c m y 0) %nr. pos %z003456 005843 003508 %#1000 0000 0000 0000 1000 1000 0000 %0648 S19 %O1 0 %z008298 -00438 010150 %#1000 1000 0000 0000 0000 1000 0000 %0720 a19 %Y1 1 %z004350 -05944 004112 %#0000 1000 0000 1000 0000 1000 0000 %0072 I01 %L1 2 %z005167 -02633 -03335 %#0000 1000 1000 1000 0000 0000 0000 %0080 I09 %C1 3 %z001403 005094 -06063 %#0000 0000 1000 1000 1000 0000 0000 %0008 A09 %V1 4 %z003667 007654 -03552 %#1000 0000 1000 0000 1000 0000 0000 %0656 S27 %M1 5 %z000000 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0000 A01 %N1 6 %z009015 000000 000000 %#1000 1000 1000 0000 0000 0000 0000 %0728 a27 %W1 7 %$ 003549 005751 003989 %#1000 0000 0000 0000 1000 1000 0000 %0801 j01 %O2 0 008307 -00446 010206 %#1000 1000 0000 0000 0000 1000 0000 %0882 j10 %Y2 1 004325 -06046 004509 %#0000 1000 0000 1000 0000 1000 0000 %0963 j19 %L2 2 005218 -02792 -02931 %#0000 1000 1000 1000 0000 0000 0000 %0737 b09 %C2 3 001417 004902 -05374 %#0000 0000 1000 1000 1000 0000 0000 %0818 b18 %V2 4 003703 007530 -03068 %#1000 0000 1000 0000 1000 0000 0000 %0899 b27 %M2 5 000909 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0809 j09 %N2 6 009090 000000 000000 %#1000 1000 1000 0000 0000 0000 0000 %0729 b01 %W2 7 %$ ] def %END SS45_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 icolor 0 eq {/cf1 1 def}{/cf1 0.95 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 /ibshown {TBS -50 -50 rmoveto show 0 50 rmoveto TBK} bind def /ibshow0 {TBS -00 -50 rmoveto show 0 50 rmoveto TBK} bind def /ishown {TS -50 -50 rmoveto show 0 50 rmoveto TK } bind def /ishow0 {TS -00 -50 rmoveto show 0 50 rmoveto TK } bind def /ibshownL {TBL -50 -50 rmoveto show 0 50 rmoveto TBS} bind def /ibshow0L {TBL -00 -50 rmoveto show 0 50 rmoveto TBS} bind def /ishownL {TL -50 -50 rmoveto show 0 50 rmoveto TS } bind def /ishow0L {TL -00 -50 rmoveto show 0 50 rmoveto TS } bind def %%EndProlog gsave %LANINDL2 START 20090901 /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 /showea {1 lanind le {show} {pop} ifelse} bind def /lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def /lanindd laninddf def} {/lanind1 2 def /lanind2 2 def} ifelse /colormf where {pop /colorm1 colormf def /colorm2 colormf def /colormd colormdf def} {/colorm1 0 def} ifelse /deintpf where {pop /deintp1 deintpf def /deintp2 deintpf def /deintpd deintpdf def} {/deintp1 0 def} ifelse /xcolorf where {pop /xcolor1 xcolorf def /xcolor2 xcolorf def /xcolord xcolordf def /xcolorm xcolor2f xcolor1f sub 1 add def} {/xcolor1 0 def /xcolorm 1 def} ifelse /xchartf where {pop /xchart1 xchartf def /xchart2 xchartf def /xchartd xchartdf def /xchartm xchart2f xchart1f sub 1 add def} {/xchart1 0 def /xchartm 1 def} ifelse /xchart3f where {pop /xchart3 xchart3f def} {/xchart3 0 def} ifelse /xchart4f where {pop /xchart4 xchart4f def} {/xchart4 0 def} ifelse /pchartf where {pop /pchart1 pchartf def /pchart2 pchartf def /pchartd pchartdf def} {/pchart1 3 def} ifelse /colsepf where {pop /colsep1 colsepf def /colsep2 colsepf def /colsepd colsepdf def} {/colsep1 0 def} ifelse /pmetamf where {pop /pmetam1 pmetamf def /pmetam2 pmetamf def /pmetamd pmetamdf def} {/pmetam1 0 def} ifelse %either defaul values for xchart=0 or values for xchart=1 /lanind lanind1 def % /colorm colorm1 def % /deintp deintp1 def % /xcolor xcolor1 def % /xchart xchart1 def % /pchart pchart1 def % /colsep colsep1 def % /pmetam pmetam1 def % colorm 0 eq deintp 0 eq and {/Txx (d) def /Fxx (d) def} if %colorm=0, deintp=0 colorm 0 eq deintp 1 eq and {/Txx (e) def /Fxx (e) def} if %colorm=0, deintp=1 colorm 1 eq deintp 0 eq and {/Txx (dd) def /Fxx (d) def} if %colorm=1, deintp=0 colorm 1 eq deintp 1 eq and {/Txx (de) def /Fxx (e) def} if %colorm=1, deintp=1 %xchart 0 eq {/Txx (-) def /Fxx (-) def} if %always independent of intended output /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 /LAB*FaG0100 24 array def /LAB*FaG1100 24 array def /LAB*FaG0000 24 array def 0 1 23 {/i exch def LAB*FaG0100 i LAB*Fa0100 i get put LAB*FaG1100 i LAB*Fa1100 i get 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 9719 {/i exch def %i=0,09719 %972*10-1=9719 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,09719 0 1 23 {/i exch def LAB*Fa0000 i icolor 0 eq {LAB*Fa0100 i get} {LAB*Fa1100 i get} ifelse put } for 0 1 23 {/i exch def LAB*FaG0000 i icolor 0 eq {LAB*FaG0100 i get} {LAB*FaG1100 i get} ifelse put } for 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 LUT j 10 mul 0 add get put LAB*02 07 LUT j 10 mul 1 add get put LAB*02 08 LUT 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 LUT j 10 mul 0 add get put LAB*02 10 LUT j 10 mul 1 add get put LAB*02 11 LUT 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 LUT j 10 mul 0 add get put LAB*02 13 LUT j 10 mul 1 add get put LAB*02 14 LUT 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 LUT j 10 mul 0 add get LUT 890 j0 sub 10 mul 0 add get add LUT 971 j0 sub 10 mul 0 add get add 3 div put LAB*02 19 LUT j 10 mul 1 add get LUT 890 j0 sub 10 mul 1 add get add LUT 971 j0 sub 10 mul 1 add get add 3 div put LAB*02 20 LUT j 10 mul 2 add get LUT 890 j0 sub 10 mul 2 add get add LUT 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 LUT j 10 mul 0 add get put LAB*02 01 LUT j 10 mul 1 add get put LAB*02 02 LUT 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 LUT j 10 mul 0 add get put LAB*02 04 LUT j 10 mul 1 add get put LAB*02 05 LUT 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 LUT j 10 mul 0 add get put LAB*02 16 LUT j 10 mul 1 add get put LAB*02 17 LUT 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 LUT j 10 mul 0 add get LUT 810 j0 sub 10 mul 0 add get add LUT 891 j0 sub 10 mul 0 add get add 3 div put LAB*02 22 LUT j 10 mul 1 add get LUT 810 j0 sub 10 mul 1 add get add LUT 891 j0 sub 10 mul 1 add get add 3 div put LAB*02 23 LUT j 10 mul 2 add get LUT 810 j0 sub 10 mul 2 add get add LUT 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 (SS450-7N: ) show (Messung: ) showde (Measurement: ) showea 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 (, Seite ) showde %0SS45X-Y 2200# (, page ) showen %1SS45X-Y 2200# (, p\341gina ) showes %2SS45X-Y 2200# (, page ) showfr %3SS45X-Y 2200# (, pagina ) showit %4SS45X-Y 2200# (, page ) showjp %5SS45X-Y 2200# xcolor 1 add cvishow (/) show 2 cvishow 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.95; nt=0.18; nx=1.0) def 300 -150 moveto xchartl 5 le {(SS450-) show} {(SS451-) 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 (N) show %N (, ) 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 /x800 800 def /X850 850 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 [(R) (Y) (G) (C) (B) (M) (R)] 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) (Y) (G) (C) (B) (M) (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 [(R00Y) (Y00G) (G00C) (C00B) (B00M) (M00R) (R00Y)] 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 [(R25Y) (Y25G) (G25C) (C25B) (B25M) (M25R) (R25Y)] 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 [(R50Y) (Y50G) (G50C) (C50B) (B50M) (M50R) (R50Y)] 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 [(R75Y) (Y75G) (G75C) (C75B) (B75M) (M75R) (R75Y)] 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 [(R00Y) (Y00G) (G00B) (G50B) (B00R) (B50R) (R00Y)] 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 [(R25Y) (Y25G) (G13B) (G62B) (B12R) (B63R) (R25Y)] 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 [(R50Y) (Y50G) (G25B) (G75B) (B25R) (B75R) (R50Y)] 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 [(R75Y) (Y75G) (G38B) (G88B) (B38R) (B88R) (R75Y)] 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 0 def 0 1 6 {/i exch def cname6 i 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 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 (ab,) ibshow0L TBL 0 -50 rmoveto jbild 0 eq {cname6 0 get show Txx show} if jbild 1 eq {cname6 1 get show Txx show} if jbild 2 eq {cname6 2 get show Txx 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 (ab,) ibshow0L TBL 0 -50 rmoveto jbild 0 eq {cname6 3 get show Txx show} if jbild 1 eq {cname6 4 get show Txx show} if jbild 2 eq {cname6 5 get show Txx show} 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 (rgb*) ibshownL TBS (=) show TBIS (c*) show %(rgb*) ibshownL TBS (; ) show TBIS (t*) show (rgb*) ibshownL TBS (=) show TBIS (t*) show } if %xchartl>=12 xchartl 0 ge xchartl 3 le and {%0<=xchartl<=3 -3200 4400 moveto TBS (Linear relation ) showea (Beziehung ) showde TBS (CIELAB \050) show TBIS (L*, a*, b*) show TBS (\051) show TBS ( and ) showea ( und ) showde TBIS (adapted (a) ) showea (adaptiertes (a) ) showde TBS (CIELAB \050) show TBIS (C*) show (ab,a) ibshownL TBS (, ) show TBIS (L*) show TBS (\051) show x800 4100 moveto TBIS (l*) show TBS (=\050 ) show TBIS (L*) show TBS ( - ) show TBIS (L*) show (N) ibshownL TBS ( \051 / \050) show TBIS (L*) show (W) ibshownL ( - ) show TBIS (L*) show (N) ibshownL TBS ( \051) show x800 3800 moveto TBIS (a*) show (a) ibshownL TBS (=) show TBIS (a*) show TBS ( - ) show TBIS (a*) show (N) ibshownL TBS ( - ) show TBIS (l*) show TBS ( [ ) show TBIS (a*) show (W) ibshownL TBS ( - ) show TBIS (a*) show (N) ibshownL TBS ( ]) show x800 3500 moveto TBIS (b*) show (a) ibshownL TBS (=) show TBIS (b*) show TBS ( - ) show TBIS (b*) show (N) ibshownL TBS ( - ) show TBIS (l*) show TBS ( [ ) show TBIS (b*) show (W) ibshownL TBS ( - ) show TBIS (b*) show (N) ibshownL TBS ( ]) show x800 500 add 3200 moveto TBIS (C*) show (ab,a) ibshownL TBS (=[ ) show TBIS (a*) show (a) ibshownL 0 100 rmoveto TBL (2) show 0 -100 rmoveto TBS ( + ) show TBIS (b*) show (a) ibshownL 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 ) showea (Beziehung ) showde TBIS (Adapted (a) ) showea (Adaptiertes (a) ) showde TBS (CIELAB \050) show TBIS (C*) show (ab,a) ibshownL TBS (, ) show TBIS (L*) show TBS (\051) show TBS ( and ) showea ( und ) showde TBIS (relative ) showea (relatives ) showde TBS (CIELAB \050) show TBIS (c*) show TBS (, ) show TBIS (l*) show TBS (\051) show X850 4100 moveto TBIS (l*) show TBS (=\050 ) show TBIS (L*) show TBS ( - ) show TBIS (L*) show (N) ibshownL TBS ( \051 / \050) show TBIS (L*) show (W) ibshownL ( - ) show TBIS (L*) show (N) ibshownL TBS ( \051) show X850 3800 moveto TBIS (c*) show TBS (=) show TBIS (C*) show (ab,a) ibshownL TBS ( / ) show TBIS (C*) show (ab,a,M) ibshownL X850 3500 moveto TBIS (M) show TBS (=Maximum colour) showea (=Maximalfarbe) showde } if %4<=xchartl<=7 xchartl 8 ge xchartl 11 le and {%8<=xchartl<=11 -3200 4400 moveto TBS (Linear relation ) showea (Beziehung ) showde TBIS (adapted (a) ) showea (adaptiertes (a) ) showde TBS (CIELAB \050) show TBIS (C*) show (ab,a) ibshownL TBS (, ) show TBIS (L*) show TBS (\051) show TBS ( and ) showea ( und ) showde TBIS (relative ) showea (relatives ) showde TBS (CIELAB \050) show TBIS (c*) show TBS (, ) show TBIS (t*) show TBS (\051) show X850 4100 moveto TBIS (l*) show (M) ibshownL TBS (=\050) show TBIS (L*) show (M) ibshownL TBS ( - ) show TBIS (L*) show (N) ibshownL TBS (\051 / \050) show TBIS (L*) show (W) ibshownL ( - ) show TBIS (L*) show (N) ibshownL TBS (\051) show X850 3800 moveto TBIS (t*) show TBS (=) show TBIS (l*) show TBS ( - ) show TBIS (c*) show TBS ( [ ) show TBIS (l*) show 0 -50 rmoveto TBL (M) show 0 50 rmoveto TBS ( - 0,5 ]) show X850 3500 moveto TBIS (c*) show TBS (=) show TBIS (C*) show (ab,a) ibshownL TBS ( / ) show TBIS (C*) show (ab,a,M) ibshownL X850 3200 moveto TBIS (M) show TBS (=Maximum colour) showea (=Maximalfarbe) showde } if %8<=xchartl<=11 xchartl 12 ge xchartl 15 le and {%12<=xchartl<=15 -3200 4400 moveto TBS (Linear relation ) showea (Beziehung ) showde TBIS (rgb*) show TBS ( and ) showea ( und ) showde TBIS (relative ) show TBS (chroma ) showea (Buntheit ) showde TBIS (c*) show (rgb*) ibshownL 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 ) showea ( und Dreiecks\255Helligkeit ) showde TBIS (t*) show TBL 0 -50 rmoveto (rgb*) show 0 50 rmoveto } %xchart #3,7,11,15 %********************************************************************************* { %xchart =3,7,11,15 TBS ( or chroma ) showea ( oder Buntheit ) showde TBIS (a) show xchartl 12 ge {(*) show} if (rgb*) ibshownL TBS (, ) show TBIS (b) show xchartl 12 ge {(*) show} if (rgb*) ibshownL } ifelse %xchart #3,7,11,15 or =3,7,11,15 X850 4100 moveto TBIS (c*) show (rgb*) ibshownL TBS (=max\050) show TBIS (rgb*) show TBS (\051 - min\050) show TBIS (rgb*) show TBS (\051) show X850 3800 moveto TBIS (n*) show %(rgb*) ibshownL TBS (=1 - max\050) show TBIS (rgb*) show TBS (\051) show TBS (= 1 - ) show TBIS (i*) show %(rgb*) ibshownL X850 3500 moveto TBIS (w*) show %(rgb*) ibshownL TBS (=min\050) show TBIS (rgb*) show TBS (\051) show TBS (= 1 - ) show TBIS (d*) show %(rgb*) ibshownL X850 3200 moveto TBIS (t*) show (rgb*) ibshownL TBS (=) show TBIS (w*) show %(rgb*) ibshownL TBS ( + 0,5 ) show TBIS (c*) show (rgb*) ibshownL xchartl 14 le { X850 2900 moveto TBIS (M) show TBS (=Maximum colour) showea (=Maximalfarbe) showde } if } if %12<=xchartl<=15 xchartl 2 le { 1500 150 moveto TBK (chroma) showea (Buntheit) showde 2500 150 moveto TBIK (C*) show TS 0 -50 rmoveto (ab,a) show -1600 3100 moveto TBK (lightness) showea (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 0 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) showea (Helligkeit) showde -600 3100 moveto TBIK (l*) show xchartl 11 le {TS 0 -50 rmoveto () show 0 50 rmoveto} if } if xchartl 8 ge { 1 setgray -2800 3100 moveto TBK (triangle lightness) showea (Dreiecks\255Helligkeit) showde -600 3100 moveto TBIK (t*) show xchartl 11 le {TS 0 -50 rmoveto () show 0 50 rmoveto} if xchartl 12 ge {TS 0 -50 rmoveto (rgb*) show 0 50 rmoveto} if } if xchartl 4 ge { 1000 150 moveto TBIK (relative ) show TBK (chroma) showea (Buntheit) showde 2800 150 moveto TBIK (c*) show xchartl 11 le {TS 0 -50 rmoveto () show 0 50 rmoveto} if xchartl 12 ge {TS 0 -50 rmoveto (rgb*) show 0 50 rmoveto} if } if xchartl 12 ge { 1500 2350 moveto TBIS (n*) show %TBL 0 -50 rmoveto (rgb*) show 0 50 rmoveto TBS (=0; ) show TBIS (i*) show %TBL 0 -50 rmoveto (rgb*) show 0 50 rmoveto TBS (=1) show 1500 0550 moveto TBIS (w*) show %TBL 0 -50 rmoveto (rgb*) show 0 50 rmoveto TBS (=0; ) show TBIS (d*) show %TBL 0 -50 rmoveto (rgb*) 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} {1 0 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} {1 0 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 [500 500 500] def C*ab j get fakt mul xadd0 xchartl get add L* j get fakt mul yadd0 xchartl get add moveto cname6 xchartl get show Txx ibshow0 newpath 1 setgray C*ab j get fakt mul 580 sub L* j get fakt mul 700 sub 150 sub moveto TBS (\050) show TBIS (C*) show (ab,a,M) ibshown TBIS (,) show TBIS ( L*) show (M) ibshown 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} {1 0 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} {1 0 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 [500 500 500] def C*ab j get fakt mul xadd0 xchartl get add L* j get fakt mul yadd0 xchartl get add moveto cname6 3 xchartl add get show Txx ibshow0 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} {1 0 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} {1 0 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 [-400 -400 -400] def /yadd0 [500 500 500] def c1* j get fakt2 mul Vorz mul xadd0 xchartl 4 sub get add l1* j get fakt2 mul yadd0 xchartl 4 sub get add moveto cname6 xchartl 4 sub get show Txx ibshow0 newpath 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} {1 0 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} {1 0 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 [-400 -400 -400] def /yadd0 [500 500 500] def c2* j get fakt2 mul Vorz mul xadd0 xchartl 4 sub get add l2* j get fakt2 mul yadd0 xchartl 4 sub get add moveto cname6 xchartl 4 sub 3 add get show Txx ibshow0 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} {1 0 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} {1 0 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 [-400 -400 -400] def /yadd0 [500 500 500] def c1* j get fakt2 mul Vorz mul xadd0 xchartl 8 sub get add t1* j get fakt2 mul yadd0 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} {1 0 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} {1 0 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 [-400 -400 -400] def /yadd0 [500 500 500] def c2* j get fakt2 mul Vorz mul xadd0 xchartl 8 sub get add t2* j get fakt2 mul yadd0 xchartl 8 sub get add moveto cname6 xchartl 8 sub 3 add get show Txx ibshow0 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} {1 0 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} {1 0 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 [-400 -400 -400] def /yadd0 [500 500 500] def c1*rgb j get fakt2 mul Vorz mul xadd0 xchartl 12 sub get add t1*rgb j get fakt2 mul yadd0 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} {1 0 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} {1 0 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 [-400 -400 -400] def /yadd0 [500 500 500] def c2*rgb j get fakt2 mul Vorz mul xadd0 xchartl 12 sub get add t2*rgb j get fakt2 mul yadd0 xchartl 12 sub get add moveto cname6 xchartl 12 sub 3 add get show Txx ibshow0 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 3 eq { -3400 4175 moveto TBS (CIELAB) show (\255Bunttonwinkel: ) showde ( hue angles: ) showea % } if xchartl 11 le { -3400 xchartl 7 ge {200 add} if 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 xchartl 7 ge {200 add} if 3625 moveto TBIS (h) show 0 -50 rmoveto TBL (ab,dx) show 0 50 rmoveto TBS (=[) show 0 1 5 {/i exch def %i=0,5 H*olv i get cvishow i 5 ne {(, ) show} if } for %i=0,5 (]) show } if %xchartl,<=11 olvrgb 1 eq {%olvrgb=1 -3400 xchartl 7 ge {200 add} if 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 {() show} if xchartl 8 ge xchartl 11 le and {() show} if xchartl 12 ge xchartl 15 le and {(rgb*) 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 {() show} if xchartl 8 ge xchartl 11 le and {() show} if xchartl 12 ge xchartl 15 le and {(rgb*) 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 {() show} if xchartl 8 ge xchartl 11 le and {() show} if xchartl 12 ge xchartl 15 le and {(rgb*) 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 {() show} if xchartl 8 ge xchartl 11 le and {() show} if xchartl 12 ge xchartl 15 le and {(rgb*) 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 {() show} if xchartl 8 ge xchartl 11 le and {() show} if xchartl 12 ge xchartl 15 le and {(rgb*) show} if TBS 0 50 rmoveto 1800 xchartl 3 le {700 add } if 1900 moveto xchartl 4 ge {TBIK (relative ) show} if TBK (Buntheit ) showde (chroma ) showea 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 {() show} if xchartl 8 ge xchartl 11 le and {() show} if xchartl 12 ge xchartl 15 le and {(rgb*) 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 LUT j10 0 add get 100 div put LUTA* j LUT j10 1 add get 100 div put LUTB* j LUT j10 2 add get 100 div put LUTr* j LUT j10 3 add get 1000 div put LUTg* j LUT j10 4 add get 1000 div put LUTb* j LUT 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 xcolor 1 le {/j729 0 def}{/j729 729 def} ifelse 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 0 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 /xadd1 [ 100 -500 -800 -800 -200 100] def /yadd1 [-100 100 -200 -200 -200 -200] def C*ab j get fakt1 mul fcolor2 mul angleWO cos mul xadd1 xtonj get add C*ab j get fakt1 mul fcolor2 mul angleWO sin mul yadd1 xtonj get add moveto cname6 xtonj get show Txx ibshow0 icolor 1 eq {1 0 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 0 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 /xadd1 [ 100 -500 -800 -800 -200 100] def /yadd1 [-100 100 -200 -200 -100 -200] def c1*rgb j get fakt2 mul fcolor2 mul angleWO cos mul xadd1 xtonj get add c1*rgb j get fakt2 mul fcolor2 mul angleWO sin mul yadd1 xtonj get add moveto cname6 xtonj get show Txx ibshow0 icolor 1 eq {1 0 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 0 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 /xadd1 [ 100 -500 -800 -800 -200 100] def /yadd1 [-100 100 -200 -200 -100 -200] def C*ab j get fakt1 mul fcolor2 mul angleWO cos mul xadd1 xtonj 3 add get add C*ab j get fakt1 mul fcolor2 mul angleWO sin mul yadd1 xtonj 3 add get add moveto cname6 xtonj 3 add get show Txx ibshow0 icolor 1 eq {1 0 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 0 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 /xadd1 [ 100 -500 -800 -800 -200 100] def /yadd1 [-100 100 -200 -200 -100 -200] def c2*rgb j get fakt2 mul fcolor2 mul angleWO cos mul xadd1 xtonj 3 add get add c2*rgb j get fakt2 mul fcolor2 mul angleWO sin mul yadd1 xtonj 3 add get add moveto cname6 xtonj 3 add get show Txx ibshow0 icolor 1 eq {1 0 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 only %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 LUT i10 0 add get 100 div put LUTA*X iX LUT i10 1 add get 100 div put LUTB*X iX LUT i10 2 add get 100 div put LUTr* iX LUT i10 3 add get 1000 div put LUTg* iX LUT i10 4 add get 1000 div put LUTb* iX LUT 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 /xadd1 [ 100 -500 -800 -800 -200 100] def /yadd1 [-100 100 -200 -200 -300 -200] def LUTA*X iX get fakt1 mul fcolor2 mul cf1 div xadd1 iX get add LUTB*X iX get fakt1 mul fcolor2 mul cf1 div yadd1 iX get add moveto xcolor 2 ge {%xcolor>=2 0 0 0 setrgbcolor cname_olv00 iX get show } if %xcolor>=2 } if iX 5 le icolor 1 eq and {xcolor 2 ge {0 0 0}{1 0 0} ifelse 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 {1 0 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 } if %xchartl=3 %********************************************************************** xchartl 7 ge {%xchart>=7 %circle icolor 0 eq {0 0 0 setrgbcolor} {1 0 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 LUT i10 0 add get 100 div put LUTA*X iX LUT i10 1 add get 100 div put LUTB*X iX LUT i10 2 add get 100 div put LUTr* iX LUT i10 3 add get 1000 div put LUTg* iX LUT i10 4 add get 1000 div put LUTb* iX LUT 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 /xadd1 [ 100 -500 -800 -800 -200 100] def /yadd1 [-100 100 -200 -200 -100 -200] def c1000 angleOLV cos mul fcolor2 mul xadd1 iX get add c1000 angleOLV sin mul fcolor2 mul yadd1 iX get add moveto xcolor 2 ge {%xcolor>=2 0 0 0 setrgbcolor cname_olv00 iX get show } if %xcolor>=2 } if iX 5 le icolor 1 eq and {xcolor 2 ge {0 0 0}{1 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 } 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 %%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 %%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 08 MM sub 152 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 21 %line 429 %%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 %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 08 MM sub 108 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 23 %line 449 %%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 %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 08 MM sub 064 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 25 %line 469 %%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 %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 08 MM sub 020 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 27 %line 489 %%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 %%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 20070101 %%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 /showea {1 lanind le {show} {pop} ifelse} bind def /lanind1 01 def /lanind2 01 def /lanindd 01 def /colorm1 00 def /colorm2 00 def /colormd 01 def /deintp1 00 def /deintp2 00 def /deintpd 01 def /xcolor1 03 def /xcolor2 03 def /xcolord 01 def /xchart1 00 def /xchart2 00 def /xchartd 01 def /pchart1 00 def /pchart2 00 def /pchartd 01 def /colsep1 00 def /colsep2 00 def /colsepd 01 def /pmetam1 00 def /pmetam2 00 def /pmetamd 01 def /lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def /lanindd laninddf def} if /colormf where {pop /colorm1 colormf def /colorm2 colormf def /colormd colormdf def} if /deintpf where {pop /deintp1 deintpf def /deintp2 deintpf def /deintpd deintpdf def} if /xcolorf where {pop /xcolor1 xcolorf def /xcolor2 xcolorf def /xcolord xcolordf def} if /xchartf where {pop /xchart1 xchartf def /xchart2 xchartf def /xchartd xchartdf def /xchartm xchart2f xchart1f sub 1 add def} {/xchartm 1 def} ifelse /xchart3f where {pop /xchart3 xchart3f def} {/xchart3 1 def} ifelse /xchart4f where {pop /xchart4 xchart4f def} {/xchart4 0 def} ifelse /pchartf where {pop /pchart1 pchartf def /pchart2 pchartf def /pchartd pchartdf def} if /colsepf where {pop /colsep1 colsepf def /colsep2 colsepf def /colsepd colsepdf def} if /pmetamf where {pop /pmetam1 pmetamf def /pmetam2 pmetamf def /pmetamd pmetamdf def} if /lanind lanind1 def % /colorm colorm1 def % /deintp deintp1 def % /xcolor xcolor1 def % /xchart xchart1 def % /pchart pchart1 def % /colsep colsep1 def % /pmetam pmetam1 def % /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 0 def /i*ptrsc 0 def gsave 0 setgray 1.0 1.0 scale 0.0 MM 0.0 MM translate 0.15 MM setlinewidth /x 20 array def /y 20 array def /d 20 array def /x [000 296 296 000 002 294 294 002 005 291 291 005 %speziell 006 290 290 006 008 288 288 008 ] def /y [000 000 210 210 002 002 208 208 005 005 205 205 %speziell 006 006 204 204 008 008 202 202 ] def /d [060 017 -60 -17 058 015 -58 -15 056 013 -56 -13 054 011 -54 -11 052 009 -52 -09 ] def colorm 0 eq deintp 0 eq and {/Txx (d) def /Fxx (d) def} if %colorm=0, deintp=0 colorm 0 eq deintp 1 eq and {/Txx (e) def /Fxx (e) def} if %colorm=0, deintp=1 colorm 1 eq deintp 0 eq and {/Txx (dd) def /Fxx (d) def} if %colorm=1, deintp=0 colorm 1 eq deintp 1 eq and {/Txx (de) def /Fxx (e) def} if %colorm=1, deintp=1 xchart xchart3 lt {/Txx (-) def /Fxx (-) def} if xchart xchart3 ge {%xchart>=xchart3 /i0 12 def /i1 i0 1 add def /i2 i0 2 add def /i3 i0 3 add def 2.5 MM /Times-ISOL1 FS x i0 get MM 40 MM add y i0 get MM 1 MM sub moveto lanind cvishow (-) show colorm cvishow deintp cvishow xcolor cvishow xchart cvishow pchart cvishow colsep cvishow (-F) show pmetam cvishow } if %xchart>=xchart3 /xt 1 def xchart 1 eq {/xt 1 def} if xt 0 eq {%xt=0,1 ifelse /i0 12 def /i1 i0 1 add def /i2 i0 2 add def /i3 i0 3 add def 2.5 MM /Times-ISOL1 FS x i0 get MM 110 MM add y i0 get MM 1 MM sub moveto (http://130.149.60.45/~farbmetrik/SS45/SS45) show colorm cvishow deintp cvishow colorm 0 eq {(N) show} {(F) show} ifelse (P.PDF & ) show (http://130.149.60.45/~farbmetrik/SS45/SS45) show colorm cvishow deintp cvishow colorm 0 eq {(N) show} {(F) show} ifelse (P.TXT & ) show (http://130.149.60.45/~farbmetrik/SS45/SS45.HTM) show } %xt=0 { %xt=1 /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 x i0 get MM y i0 get MM moveto x i1 get MM y i1 get MM lineto x i2 get MM y i2 get MM lineto x i3 get MM y i3 get MM lineto x i0 get MM y 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 {tzccmy0* setcmykcolor} if j0 1 eq {0 setgray} if j0 2 eq {tzmcmy0* setcmykcolor} if j0 3 eq {0 setgray} if j0 4 eq {tzycmy0* setcmykcolor} if j0 5 eq {0 setgray} if j0 6 eq {tzocmy0* setcmykcolor} if j0 7 eq {0 setgray} if j0 8 eq {tzlcmy0* setcmykcolor} if j0 9 eq {0 setgray} if j0 10 eq {tzvcmy0* setcmykcolor} 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 x i0 get d i0 get add 16 j0 mul add MM y i0 get MM moveto x i0 get d i0 get add 16 j1 mul add MM y i0 get MM lineto stroke x i1 get MM y i1 get d i1 get add 16 j0 mul add MM moveto x i1 get MM y i1 get d i1 get add 16 j1 mul add MM lineto stroke x i2 get d i2 get add 16 j0 mul sub MM y i2 get MM moveto x i2 get d i2 get add 16 j1 mul sub MM y i2 get MM lineto stroke x i3 get MM y i3 get d i3 get add 16 j0 mul sub MM moveto x i3 get MM y i3 get d 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 {tzan j get dup dup 0 setcmykcolor ix0 0.5 MM sub iy0 0.5 MM sub s5 s1 rec fill} if tzan j get dup dup 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 {1 tzan j get 1 sub dup dup setrgbcolor %N ix0 0.5 MM sub iy0 0.5 MM sub s5 s1 rec fill} if 1 tzan j get sub dup dup setrgbcolor %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 {0 0 0 tzan j get setcmykcolor ix0 0.5 MM sub iy0 0.5 MM sub s5 s1 rec fill} if 0 0 0 tzan j get setcmykcolor ix0 iy0 s s rec fill } if %i*ptrsc=6 i*ptrsc 7 eq {%i*ptrsc=7 w* setgray j 16 eq {1 tzan j get sub setgray ix0 0.5 MM sub iy0 0.5 MM sub s5 s1 rec fill} if 1 tzan j get sub 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.5 MM moveto 61 MM 13.5 MM moveto (TUB\255Pr\374fvorlage SS45; ) showde %0SS45X-Y 0000# (TUB\255test chart SS45; ) showen %1SS45X-Y 0000# (gr\341fico TUB\255SS45; ) showes %2SS45X-Y 0000# (TUB\255test graphique SS45; ) showfr %3SS45X-Y 0000# (grafico TUB\255SS45; ) showit %4SS45X-Y 0000# (TUB\255test chart SS45; ) showjp %5SS45X-Y 0000# xchart4 0 eq {%xchart4=0 (Foto\255Drucker F) showde %0SS45X-Y 0100# (Photo printer F) showea %ASS45X-Y 0100# } if %xchart4=0 xchart4 1 eq {() show} if xchart4 2 eq {() show} if 61 MM 09.5 MM moveto xchart4 0 eq {%xchart4=0 12 /Times-ISOL1 FS (Ausgabe rgbd_cmy0; FRS09_91; Start- & 3D-linearisiert) showde %0SS45X-Y 0200# (output rgbd_cmy0; FRS09_91; start and 3D-linearized) showea %ASS45X-Y 0200# } if %xchart4=0 xchart4 1 eq { 12 /Times-ISOL1 FS (Chromatische Pr\374fvorlage) showde %0SS45X-Y 0300# (chromatic test chart) showen %1SS45X-Y 0300# (test crom\341tico gr\341fico) showes %2SS45X-Y 0300# (chromatic graphique de test) showfr %3SS45X-Y 0300# (prova cromatica grafico) showit %4SS45X-Y 0300# (chromatic test chart) showjp %5SS45X-Y 0300# 12 /TimesI-ISOL1 FS ( RGB) show } if xchart4 2 eq { 12 /Times-ISOL1 FS (Chromatische Pr\374fvorlage) showde %0SS45X-Y 0400# (chromatic test chart) showen %1SS45X-Y 0400# (test crom\341tico gr\341fico) showes %2SS45X-Y 0400# (chromatic graphique de test) showfr %3SS45X-Y 0400# (prova cromatica grafico) showit %4SS45X-Y 0400# (chromatic test chart) showjp %5SS45X-Y 0400# 12 /TimesI-ISOL1 FS ( CMY) show } if xchart xchart3 ge {%xchart>=xchart3 12 /Times-ISOL1 FS (, 3D=) show colorm cvishow (, de=) show deintp cvishow 12 /TimesI-ISOL1 FS xchart5f 0 eq {(, sRGB) show} if xchart5f 1 eq {(, cmyk) show} if xchart5f 2 eq {(, cmy0) show} if xchart5f 3 eq {(, cmyk) show} if colorm 1 eq {(*) show} if } if %xchart>=xchart3 12 /Times-ISOL1 FS 165 MM 13 MM moveto (Eingabe: ) showde %0SS45X-Y 0500# (input: ) showen %1SS45X-Y 0500# (entrada: ) showes %2SS45X-Y 0500# (entr\351e: ) showfr %3SS45X-Y 0500# (immettere: ) showit %4SS45X-Y 0500# (input: ) showjp %5SS45X-Y 0500# 12 /TimesI-ISOL1 FS (w/rgb/cmyk -> ) show xchart xchart3 lt {(w/rgb/cmyk) show } if xchart xchart3 ge {%xchart>=xchart3 (rgb) show } if %xchart>=xchart3 10 /Times-ISOL1 FS 0 -2 rmoveto Txx show 0 2 rmoveto 12 /Times-ISOL1 FS 12 /Times-ISOL1 FS 165 MM 9 MM moveto (Ausgabe: ) showde %0SS45X-Y 0600# (output: ) showen %1SS45X-Y 0600# (salida: ) showes %2SS45X-Y 0600# (sortie: ) showfr %3SS45X-Y 0600# (uscita: ) showit %4SS45X-Y 0600# (output: ) showjp %5SS45X-Y 0600# %colorm=0,1! 12 /Times-ISOL1 FS xchart 0 eq {%xchart=0,#0 12 /Times-ISOL1 FS (keine \304nderung) showde %0SS45X-Y 0700# (no change) showen %1SS45X-Y 0700# (ning\372n cambio) showes %2SS45X-Y 0700# (aucun changement) showfr %3SS45X-Y 0700# (nessun cambiamento) showit %4SS45X-Y 0700# (no change compared) showjp %5SS45X-Y 0700# }%xchart=0 {%xchart#0 12 /Times-ISOL1 FS colorm 0 eq {%colorm=0 (Transfer nach ) showde %0SS45X-Y 0800# (transfer to ) showen %1SS45X-Y 0800# (transfiera a ) showes %2SS45X-Y 0800# (transf\351rer \340 ) showfr %3SS45X-Y 0800# (trasferire a ) showit %4SS45X-Y 0800# (transfer to ) showjp %5SS45X-Y 0800# }%colorm=0 {%colorm=1 (3D\255Linearisierung ) showde %0SS45X-Y 0900# (3D\255linearization to ) showen %1SS45X-Y 0900# (3D\255linealizaci\363n a ) showes %2SS45X-Y 0900# (linearisation 3D selon ) showfr %3SS45X-Y 0900# (3D\255linearizzazione a ) showit %4SS45X-Y 0900# (3D\255linearization to ) showjp %5SS45X-Y 0900# } ifelse %colorm=1 12 /TimesI-ISOL1 FS xchart5f 0 eq {(rgb) show} if xchart5f 1 eq {(cmyk) show} if xchart5f 2 eq {(cmy0) show} if xchart5f 3 eq {(cmyk) show} if colorm 1 eq {(*) show} if 10 /Times-ISOL1 FS 0 -2 rmoveto Txx show 0 2 rmoveto 12 /Times-ISOL1 FS } ifelse %xchart=0,#0 %0 setgray %end white and unvisible 12 /Times-ISOL1 FS 62 MM 198.5 MM moveto (http://130.149.60.45/~farbmetrik/SS45/SS45L) show (0) show LSC$ show LEX$ show %1 setgray %start white and unvisible (; ) show xchart 0 eq { (Start\255Ausgabe) showde %0SS45X-Y 1000# (start output) showen %1SS45X-Y 1000# (comience salida) showes %2SS45X-Y 1000# (sortie de production) showfr %3SS45X-Y 1000# (cominciare l'uscita) showit %4SS45X-Y 1000# (start output) showjp %5SS45X-Y 1000# } if LSC$ (C) eq { (Start\255Ausgabe) showde %0SS45X-Y 1100# (start output) showen %1SS45X-Y 1100# (comience salida) showes %2SS45X-Y 1100# (sortie de production) showfr %3SS45X-Y 1100# (cominciare l'uscita) showit %4SS45X-Y 1100# (start output) showjp %5SS45X-Y 1100# } if xchart xchart3 ge {%xchart>=xchart3 colorm 0 eq {%colorm=0,1 (Transfer Ausgabe) showde %0SS45X-Y 1200# (transfer output) showen %1SS45X-Y 1200# (salida de transferencia) showes %2SS45X-Y 1200# (sortie de transfert) showfr %3SS45X-Y 1200# (uscita di trasferimento) showit %4SS45X-Y 1200# (transfer output) showjp %5SS45X-Y 1200# }%colorm=0 {%colorm=1 (3D\255Linearisierung) showde %0SS45X-Y 1300# (3D\255linearization) showen %1SS45X-Y 1300# (3D\255linealizaci\363n) showes %2SS45X-Y 1300# (linearisation 3D) showfr %3SS45X-Y 1300# (3D\255linearizzzazione) showit %4SS45X-Y 1300# (3D\255linearization) showjp %5SS45X-Y 1300# } ifelse %colorm=0,1 } if %xchart>=xchart3 62 MM 194 MM moveto LSC$ (N) eq LSC$ (C) eq or { (N: Keine 3D\255Linearisierung (OL) ) showde %0SS45X-Y 1400# (N: no 3D\255linearization (OL) ) showen %1SS45X-Y 1400# (N: ninguna 3D\255linealizaci\363n (OL) ) showes %2SS45X-Y 1400# (N: aucun linearisation 3D (OL) ) showfr %3SS45X-Y 1400# (N: nessun 3D\255linearizzazione (OL) ) showit %4SS45X-Y 1400# (N: no 3D\255linearization (OL) ) showjp %5SS45X-Y 1400# (in Datei (F) oder PS\255Startup (S)) showde %0SS45X-Y 1500# (in file (F) or PS\255startup (S)) showen %1SS45X-Y 1500# (en archivo (F) o PS\255startup (S)) showes %2SS45X-Y 1500# (dans fichier (F) ou PS\255startup (S)) showfr %3SS45X-Y 1500# (nel file (F) o PS\255startup (S)) showit %4SS45X-Y 1500# (in file (F) or PS\255startup (S)) showjp %5SS45X-Y 1500# } {LSC$ show (: ) show (3D\255Linearisierung) showde %0SS45X-Y 1600# (3D\255linearization) showen %1SS45X-Y 1600# (3D\255linealizaci\363n) showes %2SS45X-Y 1600# (linearisation 3D) showfr %3SS45X-Y 1600# (3D\255linearizzzazione) showit %4SS45X-Y 1600# (3D\255linearization) showjp %5SS45X-Y 1600# ( SS45/SS45L) show LSS$ show LSX$ show (0) show LSC$ show LEY$ show } ifelse LSC$ (F) eq { ( in Datei (F)) showde %0SS45X-Y 1700# ( in file (F)) showen %1SS45X-Y 1700# ( en archivo (F)) showes %2SS45X-Y 1700# ( dans fichier (F)) showfr %3SS45X-Y 1700# ( nel file (F)) showit %4SS45X-Y 1700# ( in file (F)) showjp %5SS45X-Y 1700# } if LSC$ (S) eq { ( im Distiller Startup (S) Directory) showde %0SS45X-Y 1800# ( in Distiller Startup (S) Directory) showen %1SS45X-Y 1800# ( en el Distiller Startup (S) Directory) showes %2SS45X-Y 1800# ( dans le Distiller Startup (S) Directory) showfr %3SS45X-Y 1800# ( nel Distiller Startup (S) Directory) showit %4SS45X-Y 1800# ( in Distiller Startup (S) Directory) showjp %5SS45X-Y 1800# } if LSC$ (D) eq { ( in PS\255Device (D)) showde %0SS45X-Y 1900# ( in PS\255device (D)) showen %1SS45X-Y 1900# ( en el PS\255device (D)) showes %2SS45X-Y 1900# ( dans l'appareil PS (D)) showfr %3SS45X-Y 1900# ( nel PS\255dispositivo (D)) showit %4SS45X-Y 1900# ( in PS\255Device (D)) showjp %5SS45X-Y 1900# } if LSC$ (T) eq { ( im Distiller Startup (S) Directory) showde %0SS45X-Y 2000# ( in Distiller Startup (S) Directory) showen %1SS45X-Y 2000# ( en el Distiller Startup (S) Directory) showes %2SS45X-Y 2000# ( dans le Distiller Startup (S) Directory) showfr %3SS45X-Y 2000# ( nel Distiller Startup (S) Directory) showit %4SS45X-Y 2000# ( in Distiller Startup (S) Directory) showjp %5SS45X-Y 2000# } if LSC$ (E) eq { ( in PS\255Device (D)) showde %0SS45X-Y 2100# ( in PS\255device (D)) showen %1SS45X-Y 2100# ( en el PS\255device (D)) showes %2SS45X-Y 2100# ( dans appareil PS (D)) showfr %3SS45X-Y 2100# ( nel PS\255dispositivo (D)) showit %4SS45X-Y 2100# ( in PS\255Device (D)) showjp %5SS45X-Y 2100# } if %0 setgray %end white and unvisible (, Seite ) showde %0SS45X-Y 2200# (, page ) showen %1SS45X-Y 2200# (, p\341gina ) showes %2SS45X-Y 2200# (, page ) showfr %3SS45X-Y 2200# (, pagina ) showit %4SS45X-Y 2200# (, page ) showjp %5SS45X-Y 2200# xcolor 1 add cvishow (/) show 2 cvishow 16 MM 185 MM moveto -90 rotate (Siehe \344hnliche Dateien: ) showde %0SS45X-Y 2300# (see similar files: ) showen %1SS45X-Y 2300# (vea archivos semejantes: ) showes %2SS45X-Y 2300# (voir des fichiers similaires: ) showfr %3SS45X-Y 2300# (vedere dei file simili: ) showit %4SS45X-Y 2300# (see similar files: ) showjp %5SS45X-Y 2300# (http://130.149.60.45/~farbmetrik/SS45/SS45.HTM) show %(0) show %LSC$ show LEX$ show 90 rotate 12 MM 185 MM moveto -90 rotate (Technische Information: ) showde %0SS45X-Y 2400# (technical information: ) showen %1SS45X-Y 2400# (informaci\363n t\351cnica: ) showes %2SS45X-Y 2400# (informations techniques: ) showfr %3SS45X-Y 2400# (informazioni tecniche: ) showit %4SS45X-Y 2400# (technical information: ) showjp %5SS45X-Y 2400# (http://www.ps.bam.de) show ( oder ) showde %0SS45X-Y 2500# ( or ) showen %1SS45X-Y 2500# ( o ) showes %2SS45X-Y 2500# ( ou ) showfr %3SS45X-Y 2500# ( o ) showit %4SS45X-Y 2500# ( or ) showjp %5SS45X-Y 2500# (http://130.149.60.45/~farbmetrik) show 90 rotate 281 MM 185 MM moveto -90 rotate (TUB\255Registrierung: 20130201\255SS45/SS45L) showde %0SS45X-Y 2600# (TUB registration: 20130201\255SS45/SS45L) showen %1SS45X-Y 2600# (TUB matr\355cula: 20130201\255SS45/SS45L) showes %2SS45X-Y 2600# (TUB enregistrement: 20130201\255SS45/SS45L) showfr %3SS45X-Y 2600# (TUB iscrizione: 20130201\255SS45/SS45L) showit %4SS45X-Y 2600# (TUB registration: 20130201\255SS45/SS45L) showjp %5SS45X-Y 2600# (0) show LSC$ show LEX$ show 90 rotate 281 MM 74 MM moveto -90 rotate (TUB\255Material: Code=rha4ta) showde %0SS45X-Y 2700# (TUB material: code=rha4ta) showen %1SS45X-Y 2700# (TUB material: code=rha4ta) showes %2SS45X-Y 2700# (TUB mat\351riel: code=rha4ta) showfr %3SS45X-Y 2700# (TUB materiale: code=rha4ta) showit %4SS45X-Y 2700# (TUB material: code=rha4ta) showjp %5SS45X-Y 2700# 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 Messung ) showde %0SS45X-Y 2800# ( application for measurement ) showen %1SS45X-Y 2800# ( aplicaci\363n para la medida ) showes %2SS45X-Y 2800# ( application pour la mesure ) showfr %3SS45X-Y 2800# ( la domanda per la misura ) showit %4SS45X-Y 2800# ( application for measurement ) showjp %5SS45X-Y 2800# xchart5f 0 eq {%xchart5f=0 (von Display-Ausgabe) showde %0SS45X-Y 2900# (of display output) showen %1SS45X-Y 2900# (de display output) showes %2SS45X-Y 2900# (de sortie sur \350cran) showfr %3SS45X-Y 2900# (di stampa di display) showit %4SS45X-Y 2900# (of display output) showjp %5SS45X-Y 2900# } if %xchart5f=0 xchart5f 1 eq xchart5f 2 eq or {%xchart5f=1,2 (von Offsetdruck\255Ausgabe) showde %0SS45X-Y 3000# (of offset print output) showen %1SS45X-Y 3000# (salida en la impressi\363n offset) showes %2SS45X-Y 3000# (des sorties sur offset) showfr %3SS45X-Y 3000# (uscita nella stampa di offset) showit %4SS45X-Y 3000# (of offset print output) showjp %5SS45X-Y 3000# } if %xchart5f=1,2 xchart5f 3 eq {%xchart5f=3 (von Laserdrucker\255Ausgabe) showde %0SS45X-Y 3100# (of laser printer output) showen %1SS45X-Y 3100# (salida de impresora l\341ser) showes %2SS45X-Y 3100# (des sorties sur imprimante laser) showfr %3SS45X-Y 3100# (di uscita della stampante laser) showit %4SS45X-Y 3100# (of laser printer output) showjp %5SS45X-Y 3100# } if %xchart5f=3 xchart xchart3 ge {%xchart>=xchart3 xchart5f 0 eq {%xchart5f=0 (, keine Separation) showde %0SS45X-Y 3200# (, no separation) showen %1SS45X-Y 3200# (, ninguna separaci\363n) showes %2SS45X-Y 3200# (, aucune s\351paration) showfr %3SS45X-Y 3200# (, nessuna separazione) showit %4SS45X-Y 3200# (, no separation) showjp %5SS45X-Y 3200# } if %chart5f=0 xchart5f 1 ge {%xchart5f>=1 (, Separation) showde %0SS45X-Y 3300# (, separation) showen %1SS45X-Y 3300# (, separaci\363n) showes %2SS45X-Y 3300# (, s\351paration) showfr %3SS45X-Y 3300# (, separazione) showit %4SS45X-Y 3300# (, separation) showjp %5SS45X-Y 3300# xchart5f 1 eq xchart5f 3 eq or {(cmyn6) show} if xchart5f 2 eq {(cmy0) show} if colorm 1 eq {(*) show} if colsep 0 eq {( (CMYK))}{( (CMY0))} ifelse show } if %xchart5f>=1 } if %xchart>=xchart3 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 x i0 get MM y i0 get MM moveto x i1 get MM y i1 get MM lineto x i2 get MM y i2 get MM lineto x i3 get MM y i3 get MM lineto x i0 get MM y i0 get MM lineto stroke %/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 } ifelse %xt=1 grestore gsave %********************************************************** %%Trailer %%EndDocument EndEPSF grestore gsave showpage grestore %} for %colsepf=0,1 %} for %pchartf=0,0 %} for %xchartf=0,1 } for %xcolorf=0,1 %} for %deintpf=0,1 %} for %colormf=0,1 %} for %lanindf=0,0 %%Trailer