%!PS-Adobe-3.0 EPSF-3.0 http://130.149.60.45/~farbmetrik/SE61/SE61L00XX.PS 20130201 %%BoundingBox: 14 08 828 584 /pdfmark where {pop} {userdict /pdfmark /cleartomark load put} ifelse /languagelevel where {pop languagelevel} {1} ifelse 2 lt { userdict (<<) cvn ([) cvn load put userdict (>>) cvn (]) cvn load put} if [ /Title (PostScript pictures: www.ps.bam.de/SE61/SE61.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->SE61/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->SE61/OUTLIN10.PS Output Linearization (OL) LAB*->cmyolvnw* 20090201 %***************************************************************************** %BEG GK0X->SE61/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->SE61/10L/OUTLIN1X.PS, ident. for NP-(*ioG), FP-files (*ioG) 20090201 %BEG SE61/OUTLIN1Y2.PS Emty 20101101 %END SE61/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 1.0 1.0 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$ [(A.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$ [(A.DAT) (B.DAT) (G.DAT) (H.DAT) (I.DAT) (J.DAT) (P.DAT) (T.DAT)] def %******************************************************************* /lanind1f 01 def /lanind2f 01 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 03 def /xchartdf 01 def /xchart3f 04 def /xchart4f 00 def /xchart5f 00 def %04 pages=3+1 /pchart1f 00 def /pchart2f 00 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 % /xcolorf xcolor1f def %xcolor1f xcolordf xcolor2f {/xcolorf exch 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$ 6 get def /GEY$ EY$ 6 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 %!PS-Adobe-3.0 EPSF-3.0 SE610-1, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (SE610-1,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 86 MM 152 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 12 %line 349 %!PS-Adobe-3.0 EPSF-3.0 SE610-2, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (SE610-2,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 28 MM 108 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 13 %line 359 %!PS-Adobe-3.0 EPSF-3.0 SE610-3, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (SE610-3,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 86 MM 108 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 14 %line 369 %!PS-Adobe-3.0 EPSF-3.0 SE610-4, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (SE610-4,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 28 MM 064 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 15 %line 379 %!PS-Adobe-3.0 EPSF-3.0 SE610-5, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (SE610-5,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 86 MM 064 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 16 %line 389 %!PS-Adobe-3.0 EPSF-3.0 SE610-6, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (SE610-6,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF /xc1 16 def /yc1 12 def /xt 1 def xchart 1 eq {/xt 1 def} if 28 MM 02 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 SE610-7N.EPS %%BoundingBox: 70 82 785 580 %START PDFDE011.EPS /pdfmark07 where {pop} {userdict /pdfmark07 /cleartomark load put} ifelse /languagelevel where {pop languagelevel} {1} ifelse 2 lt { userdict (<<) cvn ([) cvn load put userdict (>>) cvn (]) cvn load put} if [ /Title (PostScript pictures: http://130.149.60.45/~farbmetrik/SE61/) /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:2013090112000) /ModDate (D:2013090112000) /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 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def /str {8 string } bind def /languagelevel where {pop languagelevel} {1} ifelse /PSL12 exch def /dictende {counttomark 2 idiv dup dict begin {def} repeat pop currentdict end} bind def /Times-Roman findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /Times-ISOL1 exch definefont pop /Times-Italic findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /TimesI-ISOL1 exch definefont pop /Times-Bold findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /TimesB-ISOL1 exch definefont pop /Times-BoldItalic findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /TimesBI-ISOL1 exch definefont pop /Courier-Bold findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /CourierB-ISOL1 exch definefont pop /TK {200 /Times-ISOL1 FS} bind def /TM {270 /Times-ISOL1 FS} bind def /TG {320 /Times-ISOL1 FS} bind def /TIK {200 /TimesI-ISOL1 FS} bind def /TIM {270 /TimesI-ISOL1 FS} bind def /TIG {320 /TimesI-ISOL1 FS} bind def /TBK {200 /TimesB-ISOL1 FS} bind def /TBM {270 /TimesB-ISOL1 FS} bind def /TBG {320 /TimesB-ISOL1 FS} bind def /TBIK {200 /TimesBI-ISOL1 FS} bind def /TBIM {270 /TimesBI-ISOL1 FS} bind def /TBIG {320 /TimesBI-ISOL1 FS} bind def /CBKK {200 /CourierB-ISOL1 FS} bind def /CBK {250 /CourierB-ISOL1 FS} bind def /CBM {300 /CourierB-ISOL1 FS} bind def /CBG {350 /CourierB-ISOL1 FS} bind def /TSK {200 /Symbol FS} bind def /TSM {270 /Symbol FS} bind def /TSG {320 /Symbol FS} bind def /xyY0 7560 array def %1080x7 /LAB*TE [(LCED_low_gloss_100828_1)] def /xyY0 [ %produced with the settings of the LED-LCD (LECD) monitor; full white used %FILE LMT_1080_100828_1.TXT %no. r g b x y Y. Apple low glossy display. measurement 1 1 0.00000 0.00000 0.00000 0.3097 0.3049 45.10E-01 2 0.00000 0.00000 0.12549 0.1955 0.1229 6.00E+00 3 0.00000 0.00000 0.25098 0.1711 0.0840 8.03E+00 4 0.00000 0.00000 0.37647 0.1619 0.0697 1.08E+01 5 0.00000 0.00000 0.50196 0.1569 0.0627 1.39E+01 6 0.00000 0.00000 0.62353 0.1545 0.0604 1.65E+01 7 0.00000 0.00000 0.74902 0.1528 0.0584 1.93E+01 8 0.00000 0.00000 0.87451 0.1510 0.0573 2.45E+01 9 0.00000 0.00000 1.00000 0.1494 0.0566 3.13E+01 10 0.00000 0.12549 0.00000 0.2985 0.5380 25.76E+00 11 0.00000 0.12549 0.12549 0.2352 0.3339 27.47E+00 12 0.00000 0.12549 0.25098 0.2028 0.2291 29.58E+00 13 0.00000 0.12549 0.37647 0.1854 0.1721 3.25E+01 14 0.00000 0.12549 0.50196 0.1748 0.1392 3.56E+01 15 0.00000 0.12549 0.62353 0.1698 0.1242 3.81E+01 16 0.00000 0.12549 0.74902 0.1660 0.1125 4.10E+01 17 0.00000 0.12549 0.87451 0.1616 0.1001 4.62E+01 18 0.00000 0.12549 1.00000 0.1578 0.0906 5.32E+01 19 0.00000 0.25098 0.00000 0.2971 0.5810 48.04E+00 20 0.00000 0.25098 0.12549 0.2532 0.4257 49.98E+00 21 0.00000 0.25098 0.25098 0.2227 0.3173 52.18E+00 22 0.00000 0.25098 0.37647 0.2026 0.2459 5.51E+01 23 0.00000 0.25098 0.50196 0.1896 0.2002 5.83E+01 24 0.00000 0.25098 0.62353 0.1831 0.1778 6.09E+01 25 0.00000 0.25098 0.74902 0.1775 0.1595 6.38E+01 26 0.00000 0.25098 0.87451 0.1709 0.1390 6.91E+01 27 0.00000 0.25098 1.00000 0.1657 0.1225 7.63E+01 28 0.00000 0.37647 0.00000 0.2975 0.6013 76.76E+00 29 0.00000 0.37647 0.12549 0.2658 0.4850 78.95E+00 30 0.00000 0.37647 0.25098 0.2391 0.3870 81.25E+00 31 0.00000 0.37647 0.37647 0.2190 0.3123 8.43E+01 32 0.00000 0.37647 0.50196 0.2042 0.2596 8.75E+01 33 0.00000 0.37647 0.62353 0.1966 0.2319 9.00E+01 34 0.00000 0.37647 0.74902 0.1900 0.2086 9.30E+01 35 0.00000 0.37647 0.87451 0.1819 0.1811 9.84E+01 36 0.00000 0.37647 1.00000 0.1749 0.1582 10.59E+01 37 0.00000 0.50196 0.00000 0.2986 0.6088 9.93E+01 38 0.00000 0.50196 0.12549 0.2725 0.5118 10.16E+01 39 0.00000 0.50196 0.25098 0.2483 0.4233 10.40E+01 40 0.00000 0.50196 0.37647 0.2286 0.3501 10.69E+01 41 0.00000 0.50196 0.50196 0.2136 0.2958 11.02E+01 42 0.00000 0.50196 0.62353 0.2053 0.2662 11.28E+01 43 0.00000 0.50196 0.74902 0.1982 0.2403 11.57E+01 44 0.00000 0.50196 0.87451 0.1891 0.2093 12.12E+01 45 0.00000 0.50196 1.00000 0.1814 0.1826 12.88E+01 46 0.00000 0.62353 0.00000 0.2997 0.6137 12.04E+01 47 0.00000 0.62353 0.12549 0.2768 0.5300 12.29E+01 48 0.00000 0.62353 0.25098 0.2547 0.4489 12.53E+01 49 0.00000 0.62353 0.37647 0.2359 0.3785 12.82E+01 50 0.00000 0.62353 0.50196 0.2209 0.3241 13.16E+01 51 0.00000 0.62353 0.62353 0.2125 0.2932 13.41E+01 52 0.00000 0.62353 0.74902 0.2050 0.2663 13.72E+01 53 0.00000 0.62353 0.87451 0.1954 0.2326 14.25E+01 54 0.00000 0.62353 1.00000 0.1870 0.2034 15.03E+01 55 0.00000 0.74902 0.00000 0.3006 0.6185 15.35E+01 56 0.00000 0.74902 0.12549 0.2820 0.5496 15.61E+01 57 0.00000 0.74902 0.25098 0.2629 0.4784 15.85E+01 58 0.00000 0.74902 0.37647 0.2453 0.4129 16.14E+01 59 0.00000 0.74902 0.50196 0.2306 0.3595 16.48E+01 60 0.00000 0.74902 0.62353 0.2221 0.3284 16.74E+01 61 0.00000 0.74902 0.74902 0.2143 0.3003 17.04E+01 62 0.00000 0.74902 0.87451 0.2040 0.2645 17.59E+01 63 0.00000 0.74902 1.00000 0.1948 0.2320 18.36E+01 64 0.00000 0.87451 0.00000 0.3029 0.6223 20.22E+01 65 0.00000 0.87451 0.12549 0.2880 0.5680 20.47E+01 66 0.00000 0.87451 0.25098 0.2716 0.5077 20.71E+01 67 0.00000 0.87451 0.37647 0.2557 0.4493 21.00E+01 68 0.00000 0.87451 0.50196 0.2418 0.3989 21.33E+01 69 0.00000 0.87451 0.62353 0.2334 0.3684 21.59E+01 70 0.00000 0.87451 0.74902 0.2255 0.3400 21.89E+01 71 0.00000 0.87451 0.87451 0.2149 0.3026 22.43E+01 72 0.00000 0.87451 1.00000 0.2049 0.2674 23.20E+01 73 0.00000 1.00000 0.00000 0.3051 0.6255 26.47E+01 74 0.00000 1.00000 0.12549 0.2930 0.5823 26.63E+01 75 0.00000 1.00000 0.25098 0.2795 0.5320 26.82E+01 76 0.00000 1.00000 0.37647 0.2653 0.4809 27.10E+01 77 0.00000 1.00000 0.50196 0.2527 0.4346 27.40E+01 78 0.00000 1.00000 0.62353 0.2445 0.4057 27.65E+01 79 0.00000 1.00000 0.74902 0.2367 0.3781 27.95E+01 80 0.00000 1.00000 0.87451 0.2260 0.3402 28.45E+01 81 0.00000 1.00000 1.00000 0.2154 0.3032 29.14E+01 82 0.12549 0.00000 0.00000 0.5234 0.3247 12.74E+00 83 0.12549 0.00000 0.12549 0.3467 0.1931 14.25E+00 84 0.12549 0.00000 0.25098 0.2680 0.1345 16.31E+00 85 0.12549 0.00000 0.37647 0.2280 0.1052 1.91E+01 86 0.12549 0.00000 0.50196 0.2055 0.0895 2.23E+01 87 0.12549 0.00000 0.62353 0.1953 0.0825 2.48E+01 88 0.12549 0.00000 0.74902 0.1869 0.0774 2.77E+01 89 0.12549 0.00000 0.87451 0.1779 0.0721 3.28E+01 90 0.12549 0.00000 1.00000 0.1707 0.0686 3.96E+01 91 0.12549 0.12549 0.00000 0.4192 0.4693 34.11E+00 92 0.12549 0.12549 0.12549 0.3310 0.3331 35.84E+00 93 0.12549 0.12549 0.25098 0.2743 0.2447 37.98E+00 94 0.12549 0.12549 0.37647 0.2384 0.1897 4.09E+01 95 0.12549 0.12549 0.50196 0.2164 0.1557 4.41E+01 96 0.12549 0.12549 0.62353 0.2053 0.1393 4.66E+01 97 0.12549 0.12549 0.74902 0.1965 0.1261 4.95E+01 98 0.12549 0.12549 0.87451 0.1863 0.1118 5.47E+01 99 0.12549 0.12549 1.00000 0.1778 0.1007 6.16E+01 100 0.12549 0.25098 0.00000 0.3793 0.5245 56.45E+00 101 0.12549 0.25098 0.12549 0.3223 0.4088 58.42E+00 102 0.12549 0.25098 0.25098 0.2783 0.3181 60.65E+00 103 0.12549 0.25098 0.37647 0.2467 0.2531 6.36E+01 104 0.12549 0.25098 0.50196 0.2252 0.2095 6.68E+01 105 0.12549 0.25098 0.62353 0.2143 0.1873 6.94E+01 106 0.12549 0.25098 0.74902 0.2049 0.1691 7.24E+01 107 0.12549 0.25098 0.87451 0.1937 0.1480 7.77E+01 108 0.12549 0.25098 1.00000 0.1845 0.1307 8.47E+01 109 0.12549 0.37647 0.00000 0.3554 0.5581 85.21E+00 110 0.12549 0.37647 0.12549 0.3167 0.4642 87.43E+00 111 0.12549 0.37647 0.25098 0.2823 0.3799 89.77E+00 112 0.12549 0.37647 0.37647 0.2548 0.3127 9.29E+01 113 0.12549 0.37647 0.50196 0.2346 0.2634 9.61E+01 114 0.12549 0.37647 0.62353 0.2233 0.2373 9.88E+01 115 0.12549 0.37647 0.74902 0.2139 0.2145 10.17E+01 116 0.12549 0.37647 0.87451 0.2022 0.1873 10.70E+01 117 0.12549 0.37647 1.00000 0.1921 0.1647 11.44E+01 118 0.12549 0.50196 0.00000 0.3456 0.5731 10.78E+01 119 0.12549 0.50196 0.12549 0.3143 0.4920 11.02E+01 120 0.12549 0.50196 0.25098 0.2851 0.4137 11.26E+01 121 0.12549 0.50196 0.37647 0.2598 0.3473 11.55E+01 122 0.12549 0.50196 0.50196 0.2404 0.2966 11.88E+01 123 0.12549 0.50196 0.62353 0.2296 0.2686 12.14E+01 124 0.12549 0.50196 0.74902 0.2200 0.2442 12.45E+01 125 0.12549 0.50196 0.87451 0.2081 0.2140 12.99E+01 126 0.12549 0.50196 1.00000 0.1975 0.1880 13.73E+01 127 0.12549 0.62353 0.00000 0.3394 0.5825 12.89E+01 128 0.12549 0.62353 0.12549 0.3131 0.5105 13.14E+01 129 0.12549 0.62353 0.25098 0.2870 0.4382 13.39E+01 130 0.12549 0.62353 0.37647 0.2639 0.3737 13.68E+01 131 0.12549 0.62353 0.50196 0.2453 0.3230 14.02E+01 132 0.12549 0.62353 0.62353 0.2347 0.2940 14.28E+01 133 0.12549 0.62353 0.74902 0.2252 0.2684 14.59E+01 134 0.12549 0.62353 0.87451 0.2131 0.2362 15.13E+01 135 0.12549 0.62353 1.00000 0.2023 0.2079 15.89E+01 136 0.12549 0.74902 0.00000 0.3330 0.5925 16.21E+01 137 0.12549 0.74902 0.12549 0.3118 0.5316 16.47E+01 138 0.12549 0.74902 0.25098 0.2897 0.4669 16.71E+01 139 0.12549 0.74902 0.37647 0.2691 0.4065 17.01E+01 140 0.12549 0.74902 0.50196 0.2519 0.3566 17.34E+01 141 0.12549 0.74902 0.62353 0.2416 0.3273 17.61E+01 142 0.12549 0.74902 0.74902 0.2324 0.3006 17.91E+01 143 0.12549 0.74902 0.87451 0.2201 0.2664 18.46E+01 144 0.12549 0.74902 1.00000 0.2089 0.2353 19.22E+01 145 0.12549 0.87451 0.00000 0.3277 0.6021 21.09E+01 146 0.12549 0.87451 0.12549 0.3115 0.5523 21.33E+01 147 0.12549 0.87451 0.25098 0.2932 0.4967 21.58E+01 148 0.12549 0.87451 0.37647 0.2753 0.4420 21.87E+01 149 0.12549 0.87451 0.50196 0.2598 0.3945 22.20E+01 150 0.12549 0.87451 0.62353 0.2501 0.3655 22.46E+01 151 0.12549 0.87451 0.74902 0.2412 0.3386 22.77E+01 152 0.12549 0.87451 0.87451 0.2290 0.3030 23.31E+01 153 0.12549 0.87451 1.00000 0.2176 0.2694 24.06E+01 154 0.12549 1.00000 0.00000 0.3246 0.6092 27.33E+01 155 0.12549 1.00000 0.12549 0.3119 0.5686 27.47E+01 156 0.12549 1.00000 0.25098 0.2970 0.5216 27.68E+01 157 0.12549 1.00000 0.37647 0.2815 0.4731 27.95E+01 158 0.12549 1.00000 0.50196 0.2675 0.4292 28.27E+01 159 0.12549 1.00000 0.62353 0.2586 0.4016 28.52E+01 160 0.12549 1.00000 0.74902 0.2502 0.3752 28.81E+01 161 0.12549 1.00000 0.87451 0.2383 0.3392 29.32E+01 162 0.12549 1.00000 1.00000 0.2266 0.3041 30.00E+01 163 0.25098 0.00000 0.00000 0.5690 0.3289 19.93E+00 164 0.25098 0.00000 0.12549 0.4151 0.2251 21.44E+00 165 0.25098 0.00000 0.25098 0.3253 0.1646 23.52E+00 166 0.25098 0.00000 0.37647 0.2724 0.1298 2.64E+01 167 0.25098 0.00000 0.50196 0.2405 0.1088 2.95E+01 168 0.25098 0.00000 0.62353 0.2255 0.0993 3.20E+01 169 0.25098 0.00000 0.74902 0.2131 0.0918 3.49E+01 170 0.25098 0.00000 0.87451 0.1992 0.0841 4.01E+01 171 0.25098 0.00000 1.00000 0.1880 0.0780 4.67E+01 172 0.25098 0.12549 0.00000 0.4728 0.4389 41.39E+00 173 0.25098 0.12549 0.12549 0.3846 0.3335 43.13E+00 174 0.25098 0.12549 0.25098 0.3203 0.2556 45.28E+00 175 0.25098 0.12549 0.37647 0.2764 0.2028 4.82E+01 176 0.25098 0.12549 0.50196 0.2474 0.1682 5.14E+01 177 0.25098 0.12549 0.62353 0.2325 0.1510 5.39E+01 178 0.25098 0.12549 0.74902 0.2202 0.1372 5.69E+01 179 0.25098 0.12549 0.87451 0.2061 0.1212 6.20E+01 180 0.25098 0.12549 1.00000 0.1941 0.1089 6.90E+01 181 0.25098 0.25098 0.00000 0.4251 0.4930 63.75E+00 182 0.25098 0.25098 0.12549 0.3658 0.3990 65.73E+00 183 0.25098 0.25098 0.25098 0.3164 0.3197 67.98E+00 184 0.25098 0.25098 0.37647 0.2789 0.2595 7.10E+01 185 0.25098 0.25098 0.50196 0.2525 0.2173 7.42E+01 186 0.25098 0.25098 0.62353 0.2385 0.1955 7.68E+01 187 0.25098 0.25098 0.74902 0.2264 0.1769 7.97E+01 188 0.25098 0.25098 0.87451 0.2119 0.1553 8.50E+01 189 0.25098 0.25098 1.00000 0.1997 0.1375 9.21E+01 190 0.25098 0.37647 0.00000 0.3930 0.5303 9.27E+01 191 0.25098 0.37647 0.12549 0.3519 0.4506 9.49E+01 192 0.25098 0.37647 0.25098 0.3135 0.3761 9.73E+01 193 0.25098 0.37647 0.37647 0.2817 0.3140 10.02E+01 194 0.25098 0.37647 0.50196 0.2580 0.2673 10.35E+01 195 0.25098 0.37647 0.62353 0.2446 0.2419 10.61E+01 196 0.25098 0.37647 0.74902 0.2332 0.2197 10.91E+01 197 0.25098 0.37647 0.87451 0.2188 0.1927 11.44E+01 198 0.25098 0.37647 1.00000 0.2062 0.1699 12.17E+01 199 0.25098 0.50196 0.00000 0.3776 0.5481 11.51E+01 200 0.25098 0.50196 0.12549 0.3442 0.4779 11.76E+01 201 0.25098 0.50196 0.25098 0.3122 0.4076 12.00E+01 202 0.25098 0.50196 0.37647 0.2840 0.3463 12.29E+01 203 0.25098 0.50196 0.50196 0.2618 0.2984 12.62E+01 204 0.25098 0.50196 0.62353 0.2491 0.2714 12.88E+01 205 0.25098 0.50196 0.74902 0.2376 0.2476 13.18E+01 206 0.25098 0.50196 0.87451 0.2235 0.2181 13.72E+01 207 0.25098 0.50196 1.00000 0.2108 0.1923 14.47E+01 208 0.25098 0.62353 0.00000 0.3673 0.5604 13.64E+01 209 0.25098 0.62353 0.12549 0.3395 0.4970 13.89E+01 210 0.25098 0.62353 0.25098 0.3113 0.4312 14.13E+01 211 0.25098 0.62353 0.37647 0.2855 0.3713 14.42E+01 212 0.25098 0.62353 0.50196 0.2647 0.3234 14.76E+01 213 0.25098 0.62353 0.62353 0.2527 0.2956 15.02E+01 214 0.25098 0.62353 0.74902 0.2417 0.2708 15.33E+01 215 0.25098 0.62353 0.87451 0.2276 0.2392 15.86E+01 216 0.25098 0.62353 1.00000 0.2148 0.2115 16.63E+01 217 0.25098 0.74902 0.00000 0.3565 0.5738 16.95E+01 218 0.25098 0.74902 0.12549 0.3343 0.5188 17.21E+01 219 0.25098 0.74902 0.25098 0.3105 0.4592 17.45E+01 220 0.25098 0.74902 0.37647 0.2881 0.4027 17.75E+01 221 0.25098 0.74902 0.50196 0.2690 0.3554 18.09E+01 222 0.25098 0.74902 0.62353 0.2577 0.3274 18.36E+01 223 0.25098 0.74902 0.74902 0.2472 0.3016 18.66E+01 224 0.25098 0.74902 0.87451 0.2334 0.2682 19.19E+01 225 0.25098 0.74902 1.00000 0.2206 0.2380 19.96E+01 226 0.25098 0.87451 0.00000 0.3469 0.5864 21.82E+01 227 0.25098 0.87451 0.12549 0.3298 0.5404 22.07E+01 228 0.25098 0.87451 0.25098 0.3105 0.4887 22.32E+01 229 0.25098 0.87451 0.37647 0.2913 0.4371 22.61E+01 230 0.25098 0.87451 0.50196 0.2743 0.3920 22.95E+01 231 0.25098 0.87451 0.62353 0.2640 0.3642 23.21E+01 232 0.25098 0.87451 0.74902 0.2541 0.3383 23.51E+01 233 0.25098 0.87451 0.87451 0.2407 0.3037 24.05E+01 234 0.25098 0.87451 1.00000 0.2280 0.2711 24.81E+01 235 0.25098 1.00000 0.00000 0.3401 0.5963 28.07E+01 236 0.25098 1.00000 0.12549 0.3269 0.5584 28.22E+01 237 0.25098 1.00000 0.25098 0.3112 0.5138 28.42E+01 238 0.25098 1.00000 0.37647 0.2949 0.4678 28.70E+01 239 0.25098 1.00000 0.50196 0.2800 0.4258 29.02E+01 240 0.25098 1.00000 0.62353 0.2704 0.3993 29.27E+01 241 0.25098 1.00000 0.74902 0.2613 0.3739 29.56E+01 242 0.25098 1.00000 0.87451 0.2486 0.3389 30.07E+01 243 0.25098 1.00000 1.00000 0.2359 0.3048 30.75E+01 244 0.37647 0.00000 0.00000 0.5902 0.3307 26.72E+00 245 0.37647 0.00000 0.12549 0.4566 0.2444 28.24E+00 246 0.37647 0.00000 0.25098 0.3658 0.1858 30.33E+00 247 0.37647 0.00000 0.37647 0.3068 0.1483 3.32E+01 248 0.37647 0.00000 0.50196 0.2692 0.1245 3.63E+01 249 0.37647 0.00000 0.62353 0.2506 0.1133 3.89E+01 250 0.37647 0.00000 0.74902 0.2353 0.1043 4.18E+01 251 0.37647 0.00000 0.87451 0.2176 0.0943 4.69E+01 252 0.37647 0.00000 1.00000 0.2032 0.0864 5.35E+01 253 0.37647 0.12549 0.00000 0.5050 0.4206 48.27E+00 254 0.37647 0.12549 0.12549 0.4213 0.3337 50.02E+00 255 0.37647 0.12549 0.25098 0.3546 0.2638 52.18E+00 256 0.37647 0.12549 0.37647 0.3061 0.2134 5.52E+01 257 0.37647 0.12549 0.50196 0.2727 0.1786 5.83E+01 258 0.37647 0.12549 0.62353 0.2553 0.1611 6.09E+01 259 0.37647 0.12549 0.74902 0.2406 0.1465 6.38E+01 260 0.37647 0.12549 0.87451 0.2232 0.1296 6.90E+01 261 0.37647 0.12549 1.00000 0.2086 0.1160 7.59E+01 262 0.37647 0.25098 0.00000 0.4563 0.4717 70.67E+00 263 0.37647 0.25098 0.12549 0.3976 0.3920 72.64E+00 264 0.37647 0.25098 0.25098 0.3459 0.3210 74.91E+00 265 0.37647 0.25098 0.37647 0.3049 0.2649 7.80E+01 266 0.37647 0.25098 0.50196 0.2750 0.2239 8.11E+01 267 0.37647 0.25098 0.62353 0.2589 0.2024 8.38E+01 268 0.37647 0.25098 0.74902 0.2450 0.1839 8.67E+01 269 0.37647 0.25098 0.87451 0.2279 0.1619 9.20E+01 270 0.37647 0.25098 1.00000 0.2133 0.1435 9.91E+01 271 0.37647 0.37647 0.00000 0.4197 0.5102 9.97E+01 272 0.37647 0.37647 0.12549 0.3785 0.4407 10.19E+01 273 0.37647 0.37647 0.25098 0.3381 0.3732 10.43E+01 274 0.37647 0.37647 0.37647 0.3041 0.3153 10.72E+01 275 0.37647 0.37647 0.50196 0.2778 0.2705 11.04E+01 276 0.37647 0.37647 0.62353 0.2629 0.2458 11.30E+01 277 0.37647 0.37647 0.74902 0.2498 0.2243 11.61E+01 278 0.37647 0.37647 0.87451 0.2334 0.1976 12.14E+01 279 0.37647 0.37647 1.00000 0.2187 0.1746 12.87E+01 280 0.37647 0.50196 0.00000 0.4020 0.5295 12.21E+01 281 0.37647 0.50196 0.12549 0.3682 0.4668 12.45E+01 282 0.37647 0.50196 0.25098 0.3345 0.4027 12.69E+01 283 0.37647 0.50196 0.37647 0.3040 0.3455 12.98E+01 284 0.37647 0.50196 0.50196 0.2797 0.3000 13.32E+01 285 0.37647 0.50196 0.62353 0.2657 0.2740 13.58E+01 286 0.37647 0.50196 0.74902 0.2531 0.2509 13.89E+01 287 0.37647 0.50196 0.87451 0.2370 0.2218 14.43E+01 288 0.37647 0.50196 1.00000 0.2226 0.1962 15.17E+01 289 0.37647 0.62353 0.00000 0.3897 0.5432 14.33E+01 290 0.37647 0.62353 0.12549 0.3611 0.4857 14.58E+01 291 0.37647 0.62353 0.25098 0.3314 0.4253 14.82E+01 292 0.37647 0.62353 0.37647 0.3041 0.3693 15.12E+01 293 0.37647 0.62353 0.50196 0.2814 0.3237 15.46E+01 294 0.37647 0.62353 0.62353 0.2683 0.2970 15.72E+01 295 0.37647 0.62353 0.74902 0.2561 0.2728 16.02E+01 296 0.37647 0.62353 0.87451 0.2404 0.2423 16.57E+01 297 0.37647 0.62353 1.00000 0.2261 0.2146 17.32E+01 298 0.37647 0.74902 0.00000 0.3759 0.5582 17.64E+01 299 0.37647 0.74902 0.12549 0.3529 0.5081 17.91E+01 300 0.37647 0.74902 0.25098 0.3283 0.4527 18.15E+01 301 0.37647 0.74902 0.37647 0.3043 0.3994 18.44E+01 302 0.37647 0.74902 0.50196 0.2839 0.3545 18.79E+01 303 0.37647 0.74902 0.62353 0.2716 0.3275 19.05E+01 304 0.37647 0.74902 0.74902 0.2602 0.3026 19.35E+01 305 0.37647 0.74902 0.87451 0.2451 0.2702 19.90E+01 306 0.37647 0.74902 1.00000 0.2309 0.2404 20.66E+01 307 0.37647 0.87451 0.00000 0.3630 0.5733 22.52E+01 308 0.37647 0.87451 0.12549 0.3452 0.5308 22.77E+01 309 0.37647 0.87451 0.25098 0.3252 0.4819 23.01E+01 310 0.37647 0.87451 0.37647 0.3050 0.4330 23.31E+01 311 0.37647 0.87451 0.50196 0.2872 0.3899 23.65E+01 312 0.37647 0.87451 0.62353 0.2761 0.3633 23.91E+01 313 0.37647 0.87451 0.74902 0.2656 0.3380 24.21E+01 314 0.37647 0.87451 0.87451 0.2513 0.3044 24.75E+01 315 0.37647 0.87451 1.00000 0.2374 0.2726 25.51E+01 316 0.37647 1.00000 0.00000 0.3533 0.5854 28.76E+01 317 0.37647 1.00000 0.12549 0.3395 0.5495 28.92E+01 318 0.37647 1.00000 0.25098 0.3235 0.5072 29.13E+01 319 0.37647 1.00000 0.37647 0.3066 0.4633 29.39E+01 320 0.37647 1.00000 0.50196 0.2909 0.4230 29.72E+01 321 0.37647 1.00000 0.62353 0.2809 0.3974 29.96E+01 322 0.37647 1.00000 0.74902 0.2713 0.3728 30.26E+01 323 0.37647 1.00000 0.87451 0.2578 0.3388 30.77E+01 324 0.37647 1.00000 1.00000 0.2445 0.3054 31.44E+01 325 0.50196 0.00000 0.00000 0.6010 0.3317 32.27E+00 326 0.50196 0.00000 0.12549 0.4812 0.2558 33.79E+00 327 0.50196 0.00000 0.25098 0.3921 0.1995 35.89E+00 328 0.50196 0.00000 0.37647 0.3303 0.1612 3.88E+01 329 0.50196 0.00000 0.50196 0.2898 0.1358 4.19E+01 330 0.50196 0.00000 0.62353 0.2690 0.1234 4.44E+01 331 0.50196 0.00000 0.74902 0.2520 0.1133 4.73E+01 332 0.50196 0.00000 0.87451 0.2317 0.1019 5.24E+01 333 0.50196 0.00000 1.00000 0.2149 0.0930 5.91E+01 334 0.50196 0.12549 0.00000 0.5238 0.4100 53.88E+00 335 0.50196 0.12549 0.12549 0.4444 0.3340 55.64E+00 336 0.50196 0.12549 0.25098 0.3777 0.2694 57.80E+00 337 0.50196 0.12549 0.37647 0.3272 0.2204 6.07E+01 338 0.50196 0.12549 0.50196 0.2909 0.1864 6.40E+01 339 0.50196 0.12549 0.62353 0.2720 0.1684 6.65E+01 340 0.50196 0.12549 0.74902 0.2559 0.1533 6.94E+01 341 0.50196 0.12549 0.87451 0.2363 0.1358 7.46E+01 342 0.50196 0.12549 1.00000 0.2197 0.1215 8.15E+01 343 0.50196 0.25098 0.00000 0.4761 0.4581 76.30E+00 344 0.50196 0.25098 0.12549 0.4186 0.3874 78.28E+00 345 0.50196 0.25098 0.25098 0.3663 0.3219 80.55E+00 346 0.50196 0.25098 0.37647 0.3238 0.2686 8.36E+01 347 0.50196 0.25098 0.50196 0.2916 0.2288 8.68E+01 348 0.50196 0.25098 0.62353 0.2741 0.2075 8.94E+01 349 0.50196 0.25098 0.74902 0.2587 0.1891 9.24E+01 350 0.50196 0.25098 0.87451 0.2401 0.1666 9.75E+01 351 0.50196 0.25098 1.00000 0.2236 0.1480 10.47E+01 352 0.50196 0.37647 0.00000 0.4387 0.4962 10.53E+01 353 0.50196 0.37647 0.12549 0.3969 0.4336 10.75E+01 354 0.50196 0.37647 0.25098 0.3558 0.3710 11.00E+01 355 0.50196 0.37647 0.37647 0.3204 0.3160 11.28E+01 356 0.50196 0.37647 0.50196 0.2925 0.2730 11.61E+01 357 0.50196 0.37647 0.62353 0.2766 0.2489 11.87E+01 358 0.50196 0.37647 0.74902 0.2623 0.2277 12.18E+01 359 0.50196 0.37647 0.87451 0.2443 0.2013 12.71E+01 360 0.50196 0.37647 1.00000 0.2284 0.1782 13.44E+01 361 0.50196 0.50196 0.00000 0.4188 0.5166 12.78E+01 362 0.50196 0.50196 0.12549 0.3850 0.4591 13.02E+01 363 0.50196 0.50196 0.25098 0.3505 0.3993 13.26E+01 364 0.50196 0.50196 0.37647 0.3187 0.3452 13.56E+01 365 0.50196 0.50196 0.50196 0.2933 0.3013 13.89E+01 366 0.50196 0.50196 0.62353 0.2783 0.2760 14.15E+01 367 0.50196 0.50196 0.74902 0.2648 0.2534 14.46E+01 368 0.50196 0.50196 0.87451 0.2475 0.2246 14.99E+01 369 0.50196 0.50196 1.00000 0.2317 0.1992 15.74E+01 370 0.50196 0.62353 0.00000 0.4054 0.5308 14.90E+01 371 0.50196 0.62353 0.12549 0.3764 0.4776 15.15E+01 372 0.50196 0.62353 0.25098 0.3460 0.4212 15.40E+01 373 0.50196 0.62353 0.37647 0.3176 0.3681 15.69E+01 374 0.50196 0.62353 0.50196 0.2941 0.3240 16.03E+01 375 0.50196 0.62353 0.62353 0.2800 0.2981 16.29E+01 376 0.50196 0.62353 0.74902 0.2671 0.2746 16.59E+01 377 0.50196 0.62353 0.87451 0.2503 0.2443 17.13E+01 378 0.50196 0.62353 1.00000 0.2348 0.2172 17.90E+01 379 0.50196 0.74902 0.00000 0.3900 0.5472 18.21E+01 380 0.50196 0.74902 0.12549 0.3665 0.5000 18.47E+01 381 0.50196 0.74902 0.25098 0.3412 0.4480 18.72E+01 382 0.50196 0.74902 0.37647 0.3165 0.3973 19.02E+01 383 0.50196 0.74902 0.50196 0.2952 0.3537 19.35E+01 384 0.50196 0.74902 0.62353 0.2824 0.3276 19.62E+01 385 0.50196 0.74902 0.74902 0.2702 0.3034 19.93E+01 386 0.50196 0.74902 0.87451 0.2542 0.2715 20.46E+01 387 0.50196 0.74902 1.00000 0.2390 0.2422 21.23E+01 388 0.50196 0.87451 0.00000 0.3750 0.5637 23.09E+01 389 0.50196 0.87451 0.12549 0.3569 0.5232 23.34E+01 390 0.50196 0.87451 0.25098 0.3364 0.4767 23.58E+01 391 0.50196 0.87451 0.37647 0.3156 0.4300 23.88E+01 392 0.50196 0.87451 0.50196 0.2971 0.3882 24.21E+01 393 0.50196 0.87451 0.62353 0.2854 0.3624 24.48E+01 394 0.50196 0.87451 0.74902 0.2744 0.3379 24.78E+01 395 0.50196 0.87451 0.87451 0.2593 0.3050 25.32E+01 396 0.50196 0.87451 1.00000 0.2448 0.2737 26.08E+01 397 0.50196 1.00000 0.00000 0.3634 0.5770 29.33E+01 398 0.50196 1.00000 0.12549 0.3494 0.5429 29.49E+01 399 0.50196 1.00000 0.25098 0.3330 0.5023 29.70E+01 400 0.50196 1.00000 0.37647 0.3155 0.4599 29.97E+01 401 0.50196 1.00000 0.50196 0.2994 0.4208 30.29E+01 402 0.50196 1.00000 0.62353 0.2891 0.3959 30.54E+01 403 0.50196 1.00000 0.74902 0.2790 0.3718 30.82E+01 404 0.50196 1.00000 0.87451 0.2651 0.3387 31.34E+01 405 0.50196 1.00000 1.00000 0.2511 0.3058 32.01E+01 406 0.62353 0.00000 0.00000 0.6093 0.3325 38.17E+00 407 0.62353 0.00000 0.12549 0.5015 0.2652 39.70E+00 408 0.62353 0.00000 0.25098 0.4153 0.2116 41.81E+00 409 0.62353 0.00000 0.37647 0.3524 0.1729 4.47E+01 410 0.62353 0.00000 0.50196 0.3093 0.1465 4.78E+01 411 0.62353 0.00000 0.62353 0.2868 0.1332 5.03E+01 412 0.62353 0.00000 0.74902 0.2681 0.1222 5.32E+01 413 0.62353 0.00000 0.87451 0.2456 0.1098 5.84E+01 414 0.62353 0.00000 1.00000 0.2268 0.0995 6.50E+01 415 0.62353 0.12549 0.00000 0.5393 0.4014 59.83E+00 416 0.62353 0.12549 0.12549 0.4645 0.3341 61.59E+00 417 0.62353 0.12549 0.25098 0.3987 0.2744 63.77E+00 418 0.62353 0.12549 0.37647 0.3467 0.2274 6.67E+01 419 0.62353 0.12549 0.50196 0.3088 0.1934 6.99E+01 420 0.62353 0.12549 0.62353 0.2883 0.1754 7.24E+01 421 0.62353 0.12549 0.74902 0.2710 0.1600 7.53E+01 422 0.62353 0.12549 0.87451 0.2493 0.1421 8.06E+01 423 0.62353 0.12549 1.00000 0.2309 0.1269 8.74E+01 424 0.62353 0.25098 0.00000 0.4935 0.4464 8.24E+01 425 0.62353 0.25098 0.12549 0.4378 0.3833 8.44E+01 426 0.62353 0.25098 0.25098 0.3852 0.3230 8.67E+01 427 0.62353 0.25098 0.37647 0.3413 0.2721 8.96E+01 428 0.62353 0.25098 0.50196 0.3077 0.2336 9.28E+01 429 0.62353 0.25098 0.62353 0.2889 0.2125 9.54E+01 430 0.62353 0.25098 0.74902 0.2727 0.1941 9.83E+01 431 0.62353 0.25098 0.87451 0.2523 0.1717 10.36E+01 432 0.62353 0.25098 1.00000 0.2342 0.1526 11.06E+01 433 0.62353 0.37647 0.00000 0.4552 0.4839 11.13E+01 434 0.62353 0.37647 0.12549 0.4139 0.4271 11.36E+01 435 0.62353 0.37647 0.25098 0.3729 0.3688 11.59E+01 436 0.62353 0.37647 0.37647 0.3363 0.3168 11.88E+01 437 0.62353 0.37647 0.50196 0.3069 0.2755 12.21E+01 438 0.62353 0.37647 0.62353 0.2901 0.2519 12.47E+01 439 0.62353 0.37647 0.74902 0.2748 0.2310 12.77E+01 440 0.62353 0.37647 0.87451 0.2556 0.2048 13.30E+01 441 0.62353 0.37647 1.00000 0.2382 0.1819 14.04E+01 442 0.62353 0.50196 0.00000 0.4349 0.5043 13.37E+01 443 0.62353 0.50196 0.12549 0.4011 0.4516 13.61E+01 444 0.62353 0.50196 0.25098 0.3658 0.3961 13.86E+01 445 0.62353 0.50196 0.37647 0.3334 0.3446 14.15E+01 446 0.62353 0.50196 0.50196 0.3065 0.3025 14.49E+01 447 0.62353 0.50196 0.62353 0.2909 0.2777 14.74E+01 448 0.62353 0.50196 0.74902 0.2766 0.2557 15.05E+01 449 0.62353 0.50196 0.87451 0.2581 0.2275 15.59E+01 450 0.62353 0.50196 1.00000 0.2410 0.2023 16.34E+01 451 0.62353 0.62353 0.00000 0.4203 0.5191 15.50E+01 452 0.62353 0.62353 0.12549 0.3913 0.4701 15.74E+01 453 0.62353 0.62353 0.25098 0.3603 0.4172 15.99E+01 454 0.62353 0.62353 0.37647 0.3311 0.3666 16.29E+01 455 0.62353 0.62353 0.50196 0.3063 0.3243 16.62E+01 456 0.62353 0.62353 0.62353 0.2916 0.2993 16.89E+01 457 0.62353 0.62353 0.74902 0.2780 0.2763 17.19E+01 458 0.62353 0.62353 0.87451 0.2602 0.2467 17.74E+01 459 0.62353 0.62353 1.00000 0.2437 0.2197 18.49E+01 460 0.62353 0.74902 0.00000 0.4035 0.5364 18.81E+01 461 0.62353 0.74902 0.12549 0.3796 0.4925 19.07E+01 462 0.62353 0.74902 0.25098 0.3540 0.4432 19.32E+01 463 0.62353 0.74902 0.37647 0.3286 0.3949 19.61E+01 464 0.62353 0.74902 0.50196 0.3064 0.3531 19.96E+01 465 0.62353 0.74902 0.62353 0.2930 0.3278 20.22E+01 466 0.62353 0.74902 0.74902 0.2803 0.3042 20.53E+01 467 0.62353 0.74902 0.87451 0.2634 0.2730 21.07E+01 468 0.62353 0.74902 1.00000 0.2473 0.2441 21.83E+01 469 0.62353 0.87451 0.00000 0.3867 0.5542 23.69E+01 470 0.62353 0.87451 0.12549 0.3682 0.5161 23.94E+01 471 0.62353 0.87451 0.25098 0.3475 0.4718 24.18E+01 472 0.62353 0.87451 0.37647 0.3261 0.4269 24.48E+01 473 0.62353 0.87451 0.50196 0.3069 0.3867 24.81E+01 474 0.62353 0.87451 0.62353 0.2948 0.3616 25.08E+01 475 0.62353 0.87451 0.74902 0.2834 0.3378 25.38E+01 476 0.62353 0.87451 0.87451 0.2676 0.3056 25.92E+01 477 0.62353 0.87451 1.00000 0.2523 0.2749 26.68E+01 478 0.62353 1.00000 0.00000 0.3732 0.5690 29.94E+01 479 0.62353 1.00000 0.12549 0.3591 0.5363 30.09E+01 480 0.62353 1.00000 0.25098 0.3424 0.4973 30.30E+01 481 0.62353 1.00000 0.37647 0.3246 0.4564 30.57E+01 482 0.62353 1.00000 0.50196 0.3079 0.4187 30.89E+01 483 0.62353 1.00000 0.62353 0.2973 0.3944 31.14E+01 484 0.62353 1.00000 0.74902 0.2870 0.3710 31.43E+01 485 0.62353 1.00000 0.87451 0.2725 0.3385 31.94E+01 486 0.62353 1.00000 1.00000 0.2579 0.3063 32.61E+01 487 0.74902 0.00000 0.00000 0.6186 0.3334 47.84E+00 488 0.74902 0.00000 0.12549 0.5262 0.2767 49.38E+00 489 0.74902 0.00000 0.25098 0.4458 0.2278 5.17E+01 490 0.74902 0.00000 0.37647 0.3829 0.1890 5.43E+01 491 0.74902 0.00000 0.50196 0.3372 0.1618 5.75E+01 492 0.74902 0.00000 0.62353 0.3129 0.1475 6.00E+01 493 0.74902 0.00000 0.74902 0.2920 0.1354 6.29E+01 494 0.74902 0.00000 0.87451 0.2666 0.1213 6.80E+01 495 0.74902 0.00000 1.00000 0.2449 0.1095 7.47E+01 496 0.74902 0.12549 0.00000 0.5584 0.3911 6.97E+01 497 0.74902 0.12549 0.12549 0.4902 0.3347 7.15E+01 498 0.74902 0.12549 0.25098 0.4270 0.2813 7.36E+01 499 0.74902 0.12549 0.37647 0.3742 0.2370 7.64E+01 500 0.74902 0.12549 0.50196 0.3343 0.2039 7.96E+01 501 0.74902 0.12549 0.62353 0.3121 0.1859 8.22E+01 502 0.74902 0.12549 0.74902 0.2927 0.1705 8.52E+01 503 0.74902 0.12549 0.87451 0.2689 0.1514 9.03E+01 504 0.74902 0.12549 1.00000 0.2480 0.1353 9.71E+01 505 0.74902 0.25098 0.00000 0.5152 0.4319 9.22E+01 506 0.74902 0.25098 0.12549 0.4631 0.3776 9.41E+01 507 0.74902 0.25098 0.25098 0.4116 0.3241 9.64E+01 508 0.74902 0.25098 0.37647 0.3665 0.2771 9.93E+01 509 0.74902 0.25098 0.50196 0.3312 0.2405 10.26E+01 510 0.74902 0.25098 0.62353 0.3112 0.2198 10.51E+01 511 0.74902 0.25098 0.74902 0.2932 0.2017 10.81E+01 512 0.74902 0.25098 0.87451 0.2706 0.1792 11.33E+01 513 0.74902 0.25098 1.00000 0.2504 0.1597 12.04E+01 514 0.74902 0.37647 0.00000 0.4772 0.4679 12.11E+01 515 0.74902 0.37647 0.12549 0.4376 0.4180 12.33E+01 516 0.74902 0.37647 0.25098 0.3967 0.3659 12.56E+01 517 0.74902 0.37647 0.37647 0.3587 0.3182 12.86E+01 518 0.74902 0.37647 0.50196 0.3282 0.2791 13.19E+01 519 0.74902 0.37647 0.62353 0.3101 0.2565 13.45E+01 520 0.74902 0.37647 0.74902 0.2938 0.2362 13.75E+01 521 0.74902 0.37647 0.87451 0.2725 0.2105 14.29E+01 522 0.74902 0.37647 1.00000 0.2533 0.1875 15.02E+01 523 0.74902 0.50196 0.00000 0.4565 0.4881 14.35E+01 524 0.74902 0.50196 0.12549 0.4231 0.4416 14.59E+01 525 0.74902 0.50196 0.25098 0.3880 0.3914 14.83E+01 526 0.74902 0.50196 0.37647 0.3543 0.3440 15.13E+01 527 0.74902 0.50196 0.50196 0.3263 0.3043 15.47E+01 528 0.74902 0.50196 0.62353 0.3097 0.2808 15.73E+01 529 0.74902 0.50196 0.74902 0.2943 0.2595 16.04E+01 530 0.74902 0.50196 0.87451 0.2740 0.2319 16.57E+01 531 0.74902 0.50196 1.00000 0.2554 0.2069 17.31E+01 532 0.74902 0.62353 0.00000 0.4411 0.5031 16.47E+01 533 0.74902 0.62353 0.12549 0.4122 0.4595 16.72E+01 534 0.74902 0.62353 0.25098 0.3810 0.4113 16.97E+01 535 0.74902 0.62353 0.37647 0.3507 0.3647 17.27E+01 536 0.74902 0.62353 0.50196 0.3250 0.3248 17.60E+01 537 0.74902 0.62353 0.62353 0.3092 0.3010 17.87E+01 538 0.74902 0.62353 0.74902 0.2948 0.2788 18.17E+01 539 0.74902 0.62353 0.87451 0.2755 0.2501 18.72E+01 540 0.74902 0.62353 1.00000 0.2573 0.2236 19.47E+01 541 0.74902 0.74902 0.00000 0.4226 0.5213 19.79E+01 542 0.74902 0.74902 0.12549 0.3990 0.4816 20.05E+01 543 0.74902 0.74902 0.25098 0.3727 0.4366 20.30E+01 544 0.74902 0.74902 0.37647 0.3465 0.3916 20.60E+01 545 0.74902 0.74902 0.50196 0.3234 0.3521 20.93E+01 546 0.74902 0.74902 0.62353 0.3091 0.3280 21.20E+01 547 0.74902 0.74902 0.74902 0.2956 0.3054 21.51E+01 548 0.74902 0.74902 0.87451 0.2775 0.2752 22.05E+01 549 0.74902 0.74902 1.00000 0.2601 0.2470 22.81E+01 550 0.74902 0.87451 0.00000 0.4036 0.5405 24.67E+01 551 0.74902 0.87451 0.12549 0.3851 0.5055 24.91E+01 552 0.74902 0.87451 0.25098 0.3639 0.4645 25.16E+01 553 0.74902 0.87451 0.37647 0.3419 0.4225 25.46E+01 554 0.74902 0.87451 0.50196 0.3218 0.3844 25.80E+01 555 0.74902 0.87451 0.62353 0.3093 0.3604 26.06E+01 556 0.74902 0.87451 0.74902 0.2971 0.3376 26.36E+01 557 0.74902 0.87451 0.87451 0.2804 0.3065 26.90E+01 558 0.74902 0.87451 1.00000 0.2640 0.2766 27.65E+01 559 0.74902 1.00000 0.00000 0.3881 0.5567 30.91E+01 560 0.74902 1.00000 0.12549 0.3737 0.5264 31.06E+01 561 0.74902 1.00000 0.25098 0.3565 0.4900 31.28E+01 562 0.74902 1.00000 0.37647 0.3382 0.4514 31.55E+01 563 0.74902 1.00000 0.50196 0.3210 0.4154 31.87E+01 564 0.74902 1.00000 0.62353 0.3100 0.3922 32.11E+01 565 0.74902 1.00000 0.74902 0.2990 0.3698 32.41E+01 566 0.74902 1.00000 0.87451 0.2839 0.3383 32.92E+01 567 0.74902 1.00000 1.00000 0.2684 0.3072 33.59E+01 568 0.87451 0.00000 0.00000 0.6269 0.3344 6.14E+01 569 0.87451 0.00000 0.12549 0.5499 0.2877 6.29E+01 570 0.87451 0.00000 0.25098 0.4768 0.2436 6.50E+01 571 0.87451 0.00000 0.37647 0.4155 0.2068 6.77E+01 572 0.87451 0.00000 0.50196 0.3689 0.1793 7.09E+01 573 0.87451 0.00000 0.62353 0.3431 0.1642 7.34E+01 574 0.87451 0.00000 0.74902 0.3205 0.1512 7.63E+01 575 0.87451 0.00000 0.87451 0.2923 0.1354 8.14E+01 576 0.87451 0.00000 1.00000 0.2675 0.1220 8.81E+01 577 0.87451 0.12549 0.00000 0.5760 0.3813 8.30E+01 578 0.87451 0.12549 0.12549 0.5162 0.3349 8.48E+01 579 0.87451 0.12549 0.25098 0.4569 0.2887 8.70E+01 580 0.87451 0.12549 0.37647 0.4047 0.2477 8.97E+01 581 0.87451 0.12549 0.50196 0.3635 0.2160 9.30E+01 582 0.87451 0.12549 0.62353 0.3403 0.1981 9.55E+01 583 0.87451 0.12549 0.74902 0.3194 0.1825 9.85E+01 584 0.87451 0.12549 0.87451 0.2930 0.1628 10.36E+01 585 0.87451 0.12549 1.00000 0.2693 0.1458 11.04E+01 586 0.87451 0.25098 0.00000 0.5372 0.4170 10.55E+01 587 0.87451 0.25098 0.12549 0.4894 0.3720 10.74E+01 588 0.87451 0.25098 0.25098 0.4402 0.3254 10.97E+01 589 0.87451 0.25098 0.37647 0.3952 0.2827 11.25E+01 590 0.87451 0.25098 0.50196 0.3585 0.2485 11.59E+01 591 0.87451 0.25098 0.62353 0.3373 0.2285 11.84E+01 592 0.87451 0.25098 0.74902 0.3179 0.2108 12.14E+01 593 0.87451 0.25098 0.87451 0.2931 0.1884 12.67E+01 594 0.87451 0.25098 1.00000 0.2705 0.1685 13.37E+01 595 0.87451 0.37647 0.00000 0.5012 0.4506 13.44E+01 596 0.87451 0.37647 0.12549 0.4634 0.4084 13.66E+01 597 0.87451 0.37647 0.25098 0.4233 0.3627 13.90E+01 598 0.87451 0.37647 0.37647 0.3851 0.3196 14.19E+01 599 0.87451 0.37647 0.50196 0.3532 0.2834 14.52E+01 600 0.87451 0.37647 0.62353 0.3343 0.2619 14.78E+01 601 0.87451 0.37647 0.74902 0.3167 0.2424 15.08E+01 602 0.87451 0.37647 0.87451 0.2937 0.2172 15.61E+01 603 0.87451 0.37647 1.00000 0.2723 0.1946 16.35E+01 604 0.87451 0.50196 0.00000 0.4801 0.4702 15.69E+01 605 0.87451 0.50196 0.12549 0.4480 0.4304 15.93E+01 606 0.87451 0.50196 0.25098 0.4131 0.3861 16.17E+01 607 0.87451 0.50196 0.37647 0.3790 0.3431 16.46E+01 608 0.87451 0.50196 0.50196 0.3500 0.3064 16.80E+01 609 0.87451 0.50196 0.62353 0.3323 0.2843 17.06E+01 610 0.87451 0.50196 0.74902 0.3159 0.2639 17.37E+01 611 0.87451 0.50196 0.87451 0.2939 0.2372 17.90E+01 612 0.87451 0.50196 1.00000 0.2735 0.2127 18.64E+01 613 0.87451 0.62353 0.00000 0.4642 0.4854 17.81E+01 614 0.87451 0.62353 0.12549 0.4362 0.4473 18.05E+01 615 0.87451 0.62353 0.25098 0.4050 0.4046 18.30E+01 616 0.87451 0.62353 0.37647 0.3742 0.3623 18.60E+01 617 0.87451 0.62353 0.50196 0.3474 0.3254 18.94E+01 618 0.87451 0.62353 0.62353 0.3308 0.3030 19.21E+01 619 0.87451 0.62353 0.74902 0.3154 0.2820 19.51E+01 620 0.87451 0.62353 0.87451 0.2944 0.2543 20.05E+01 621 0.87451 0.62353 1.00000 0.2746 0.2285 20.80E+01 622 0.87451 0.74902 0.00000 0.4448 0.5039 21.12E+01 623 0.87451 0.74902 0.12549 0.4212 0.4691 21.38E+01 624 0.87451 0.74902 0.25098 0.3947 0.4286 21.63E+01 625 0.87451 0.74902 0.37647 0.3678 0.3876 21.94E+01 626 0.87451 0.74902 0.50196 0.3439 0.3510 22.27E+01 627 0.87451 0.74902 0.62353 0.3290 0.3282 22.53E+01 628 0.87451 0.74902 0.74902 0.3146 0.3070 22.85E+01 629 0.87451 0.74902 0.87451 0.2952 0.2781 23.39E+01 630 0.87451 0.74902 1.00000 0.2764 0.2508 24.15E+01 631 0.87451 0.87451 0.00000 0.4238 0.5242 26.00E+01 632 0.87451 0.87451 0.12549 0.4053 0.4930 26.25E+01 633 0.87451 0.87451 0.25098 0.3836 0.4557 26.49E+01 634 0.87451 0.87451 0.37647 0.3610 0.4170 26.80E+01 635 0.87451 0.87451 0.50196 0.3403 0.3815 27.13E+01 636 0.87451 0.87451 0.62353 0.3270 0.3591 27.40E+01 637 0.87451 0.87451 0.74902 0.3143 0.3374 27.69E+01 638 0.87451 0.87451 0.87451 0.2964 0.3078 28.24E+01 639 0.87451 0.87451 1.00000 0.2789 0.2789 28.99E+01 640 0.87451 1.00000 0.00000 0.4059 0.5423 32.23E+01 641 0.87451 1.00000 0.12549 0.3913 0.5144 32.39E+01 642 0.87451 1.00000 0.25098 0.3737 0.4810 32.61E+01 643 0.87451 1.00000 0.37647 0.3551 0.4450 32.87E+01 644 0.87451 1.00000 0.50196 0.3373 0.4113 33.20E+01 645 0.87451 1.00000 0.62353 0.3257 0.3895 33.45E+01 646 0.87451 1.00000 0.74902 0.3144 0.3681 33.73E+01 647 0.87451 1.00000 0.87451 0.2982 0.3383 34.26E+01 648 0.87451 1.00000 1.00000 0.2819 0.3082 34.92E+01 649 1.00000 0.00000 0.00000 0.6340 0.3345 7.86E+01 650 1.00000 0.00000 0.12549 0.5703 0.2964 8.01E+01 651 1.00000 0.00000 0.25098 0.5055 0.2581 8.23E+01 652 1.00000 0.00000 0.37647 0.4476 0.2237 8.50E+01 653 1.00000 0.00000 0.50196 0.4014 0.1965 8.81E+01 654 1.00000 0.00000 0.62353 0.3749 0.1813 9.07E+01 655 1.00000 0.00000 0.74902 0.3510 0.1678 9.36E+01 656 1.00000 0.00000 0.87451 0.3208 0.1508 9.86E+01 657 1.00000 0.00000 1.00000 0.2935 0.1361 10.52E+01 658 1.00000 0.12549 0.00000 0.5915 0.3727 10.00E+01 659 1.00000 0.12549 0.12549 0.5398 0.3344 10.16E+01 660 1.00000 0.12549 0.25098 0.4853 0.2947 10.39E+01 661 1.00000 0.12549 0.37647 0.4350 0.2576 10.66E+01 662 1.00000 0.12549 0.50196 0.3939 0.2278 10.99E+01 663 1.00000 0.12549 0.62353 0.3696 0.2104 11.24E+01 664 1.00000 0.12549 0.74902 0.3477 0.1950 11.54E+01 665 1.00000 0.12549 0.87451 0.3193 0.1751 12.05E+01 666 1.00000 0.12549 1.00000 0.2935 0.1576 12.73E+01 667 1.00000 0.25098 0.00000 0.5575 0.4036 12.24E+01 668 1.00000 0.25098 0.12549 0.5140 0.3666 12.44E+01 669 1.00000 0.25098 0.25098 0.4679 0.3262 12.66E+01 670 1.00000 0.25098 0.37647 0.4239 0.2879 12.94E+01 671 1.00000 0.25098 0.50196 0.3870 0.2562 13.28E+01 672 1.00000 0.25098 0.62353 0.3650 0.2373 13.53E+01 673 1.00000 0.25098 0.74902 0.3448 0.2203 13.83E+01 674 1.00000 0.25098 0.87451 0.3182 0.1982 14.35E+01 675 1.00000 0.25098 1.00000 0.2936 0.1784 15.05E+01 676 1.00000 0.37647 0.00000 0.5241 0.4340 15.12E+01 677 1.00000 0.37647 0.12549 0.4886 0.3987 15.35E+01 678 1.00000 0.37647 0.25098 0.4499 0.3593 15.59E+01 679 1.00000 0.37647 0.37647 0.4122 0.3203 15.87E+01 680 1.00000 0.37647 0.50196 0.3797 0.2873 16.21E+01 681 1.00000 0.37647 0.62353 0.3599 0.2674 16.48E+01 682 1.00000 0.37647 0.74902 0.3414 0.2488 16.77E+01 683 1.00000 0.37647 0.87451 0.3170 0.2246 17.30E+01 684 1.00000 0.37647 1.00000 0.2939 0.2024 18.02E+01 685 1.00000 0.50196 0.00000 0.5035 0.4527 17.37E+01 686 1.00000 0.50196 0.12549 0.4726 0.4189 17.61E+01 687 1.00000 0.50196 0.25098 0.4386 0.3802 17.85E+01 688 1.00000 0.50196 0.37647 0.4048 0.3417 18.15E+01 689 1.00000 0.50196 0.50196 0.3750 0.3082 18.49E+01 690 1.00000 0.50196 0.62353 0.3566 0.2876 18.75E+01 691 1.00000 0.50196 0.74902 0.3395 0.2685 19.05E+01 692 1.00000 0.50196 0.87451 0.3163 0.2430 19.59E+01 693 1.00000 0.50196 1.00000 0.2942 0.2194 20.32E+01 694 1.00000 0.62353 0.00000 0.4875 0.4674 19.49E+01 695 1.00000 0.62353 0.12549 0.4603 0.4350 19.74E+01 696 1.00000 0.62353 0.25098 0.4295 0.3973 19.99E+01 697 1.00000 0.62353 0.37647 0.3988 0.3593 20.28E+01 698 1.00000 0.62353 0.50196 0.3711 0.3257 20.63E+01 699 1.00000 0.62353 0.62353 0.3541 0.3047 20.89E+01 700 1.00000 0.62353 0.74902 0.3379 0.2850 21.19E+01 701 1.00000 0.62353 0.87451 0.3157 0.2588 21.73E+01 702 1.00000 0.62353 1.00000 0.2944 0.2341 22.48E+01 703 1.00000 0.74902 0.00000 0.4675 0.4860 22.79E+01 704 1.00000 0.74902 0.12549 0.4443 0.4557 23.06E+01 705 1.00000 0.74902 0.25098 0.4180 0.4197 23.30E+01 706 1.00000 0.74902 0.37647 0.3908 0.3827 23.61E+01 707 1.00000 0.74902 0.50196 0.3662 0.3493 23.95E+01 708 1.00000 0.74902 0.62353 0.3506 0.3282 24.22E+01 709 1.00000 0.74902 0.74902 0.3357 0.3082 24.53E+01 710 1.00000 0.74902 0.87451 0.3151 0.2809 25.06E+01 711 1.00000 0.74902 1.00000 0.2951 0.2549 25.81E+01 712 1.00000 0.87451 0.00000 0.4452 0.5071 27.67E+01 713 1.00000 0.87451 0.12549 0.4268 0.4793 27.91E+01 714 1.00000 0.87451 0.25098 0.4048 0.4459 28.16E+01 715 1.00000 0.87451 0.37647 0.3818 0.4105 28.46E+01 716 1.00000 0.87451 0.50196 0.3605 0.3779 28.80E+01 717 1.00000 0.87451 0.62353 0.3468 0.3569 29.06E+01 718 1.00000 0.87451 0.74902 0.3334 0.3367 29.36E+01 719 1.00000 0.87451 0.87451 0.3147 0.3088 29.90E+01 720 1.00000 0.87451 1.00000 0.2961 0.2816 30.65E+01 721 1.00000 1.00000 0.00000 0.4251 0.5266 33.88E+01 722 1.00000 1.00000 0.12549 0.4105 0.5014 34.03E+01 723 1.00000 1.00000 0.25098 0.3928 0.4707 34.24E+01 724 1.00000 1.00000 0.37647 0.3735 0.4376 34.52E+01 725 1.00000 1.00000 0.50196 0.3553 0.4062 34.83E+01 726 1.00000 1.00000 0.62353 0.3432 0.3859 35.09E+01 727 1.00000 1.00000 0.74902 0.3314 0.3659 35.38E+01 728 1.00000 1.00000 0.87451 0.3145 0.3377 35.89E+01 729 1.00000 1.00000 1.00000 0.2974 0.3093 36.55E+01 730 1.00000 1.00000 1.00000 0.2974 0.3093 36.54E+01 731 0.87451 1.00000 1.00000 0.2819 0.3082 34.92E+01 732 0.74902 1.00000 1.00000 0.2684 0.3071 33.59E+01 733 0.62353 1.00000 1.00000 0.2579 0.3063 32.62E+01 734 0.50196 1.00000 1.00000 0.2511 0.3058 32.02E+01 735 0.37647 1.00000 1.00000 0.2444 0.3053 31.45E+01 736 0.25098 1.00000 1.00000 0.2360 0.3047 30.75E+01 737 0.12549 1.00000 1.00000 0.2266 0.3040 30.01E+01 738 0.00000 1.00000 1.00000 0.2155 0.3031 29.15E+01 739 1.00000 0.87451 0.87451 0.3147 0.3088 29.90E+01 740 0.87451 0.87451 0.87451 0.2965 0.3078 28.24E+01 741 0.74902 0.87451 0.87451 0.2803 0.3066 26.90E+01 742 0.62353 0.87451 0.87451 0.2676 0.3056 25.93E+01 743 0.50196 0.87451 0.87451 0.2593 0.3050 25.33E+01 744 0.37647 0.87451 0.87451 0.2512 0.3044 24.76E+01 745 0.25098 0.87451 0.87451 0.2406 0.3037 24.07E+01 746 0.12549 0.87451 0.87451 0.2290 0.3029 23.32E+01 747 0.00000 0.87451 0.87451 0.2150 0.3025 22.44E+01 748 1.00000 0.74902 0.74902 0.3357 0.3082 24.52E+01 749 0.87451 0.74902 0.74902 0.3147 0.3070 22.85E+01 750 0.74902 0.74902 0.74902 0.2956 0.3054 21.51E+01 751 0.62353 0.74902 0.74902 0.2804 0.3041 20.53E+01 752 0.50196 0.74902 0.74902 0.2702 0.3033 19.93E+01 753 0.37647 0.74902 0.74902 0.2602 0.3027 19.37E+01 754 0.25098 0.74902 0.74902 0.2472 0.3016 18.67E+01 755 0.12549 0.74902 0.74902 0.2324 0.3006 17.93E+01 756 0.00000 0.74902 0.74902 0.2143 0.3002 17.05E+01 757 1.00000 0.62353 0.62353 0.3541 0.3046 20.88E+01 758 0.87451 0.62353 0.62353 0.3308 0.3029 19.20E+01 759 0.74902 0.62353 0.62353 0.3093 0.3009 17.87E+01 760 0.62353 0.62353 0.62353 0.2916 0.2992 16.90E+01 761 0.50196 0.62353 0.62353 0.2799 0.2982 16.31E+01 762 0.37647 0.62353 0.62353 0.2682 0.2969 15.73E+01 763 0.25098 0.62353 0.62353 0.2526 0.2955 15.03E+01 764 0.12549 0.62353 0.62353 0.2347 0.2940 14.29E+01 765 0.00000 0.62353 0.62353 0.2124 0.2932 13.43E+01 766 1.00000 0.50196 0.50196 0.3750 0.3081 18.48E+01 767 0.87451 0.50196 0.50196 0.3499 0.3063 16.80E+01 768 0.74902 0.50196 0.50196 0.3263 0.3041 15.47E+01 769 0.62353 0.50196 0.50196 0.3066 0.3024 14.50E+01 770 0.50196 0.50196 0.50196 0.2932 0.3010 13.89E+01 771 0.37647 0.50196 0.50196 0.2797 0.3000 13.33E+01 772 0.25098 0.50196 0.50196 0.2616 0.2984 12.64E+01 773 0.12549 0.50196 0.50196 0.2403 0.2967 11.90E+01 774 0.00000 0.50196 0.50196 0.2135 0.2957 11.04E+01 775 1.00000 0.37647 0.37647 0.4121 0.3204 15.87E+01 776 0.87451 0.37647 0.37647 0.3852 0.3195 14.19E+01 777 0.74902 0.37647 0.37647 0.3588 0.3180 12.86E+01 778 0.62353 0.37647 0.37647 0.3362 0.3167 11.89E+01 779 0.50196 0.37647 0.37647 0.3204 0.3159 11.29E+01 780 0.37647 0.37647 0.37647 0.3042 0.3150 10.73E+01 781 0.25098 0.37647 0.37647 0.2817 0.3138 10.04E+01 782 0.12549 0.37647 0.37647 0.2548 0.3126 9.30E+01 783 0.00000 0.37647 0.37647 0.2186 0.3122 8.44E+01 784 1.00000 0.25098 0.25098 0.4678 0.3261 12.66E+01 785 0.87451 0.25098 0.25098 0.4398 0.3254 10.98E+01 786 0.74902 0.25098 0.25098 0.4115 0.3242 9.65E+01 787 0.62353 0.25098 0.25098 0.3853 0.3228 8.67E+01 788 0.50196 0.25098 0.25098 0.3664 0.3222 8.08E+01 789 0.37647 0.25098 0.25098 0.3458 0.3209 75.00E+00 790 0.25098 0.25098 0.25098 0.3163 0.3196 68.11E+00 791 0.12549 0.25098 0.25098 0.2782 0.3180 60.79E+00 792 0.00000 0.25098 0.25098 0.2227 0.3172 52.32E+00 793 1.00000 0.12549 0.12549 0.5395 0.3345 10.17E+01 794 0.87451 0.12549 0.12549 0.5162 0.3349 8.48E+01 795 0.74902 0.12549 0.12549 0.4902 0.3347 7.15E+01 796 0.62353 0.12549 0.12549 0.4644 0.3341 61.63E+00 797 0.50196 0.12549 0.12549 0.4443 0.3339 55.69E+00 798 0.37647 0.12549 0.12549 0.4211 0.3337 50.09E+00 799 0.25098 0.12549 0.12549 0.3846 0.3334 43.22E+00 800 0.12549 0.12549 0.12549 0.3310 0.3331 35.94E+00 801 0.00000 0.12549 0.12549 0.2352 0.3339 27.55E+00 802 1.00000 0.00000 0.00000 0.6340 0.3345 7.86E+01 803 0.87451 0.00000 0.00000 0.6272 0.3341 6.13E+01 804 0.74902 0.00000 0.00000 0.6187 0.3333 47.84E+00 805 0.62353 0.00000 0.00000 0.6093 0.3325 38.19E+00 806 0.50196 0.00000 0.00000 0.6010 0.3318 32.30E+00 807 0.37647 0.00000 0.00000 0.5902 0.3308 26.75E+00 808 0.25098 0.00000 0.00000 0.5691 0.3288 19.95E+00 809 0.12549 0.00000 0.00000 0.5236 0.3246 12.77E+00 810 0.00000 0.00000 0.00000 0.3097 0.3050 45.18E-01 811 1.00000 1.00000 1.00000 0.2974 0.3092 36.55E+01 812 0.87451 0.87451 1.00000 0.2788 0.2789 28.99E+01 813 0.74902 0.74902 1.00000 0.2602 0.2470 22.81E+01 814 0.62353 0.62353 1.00000 0.2437 0.2197 18.50E+01 815 0.50196 0.50196 1.00000 0.2318 0.1992 15.75E+01 816 0.37647 0.37647 1.00000 0.2187 0.1748 12.89E+01 817 0.25098 0.25098 1.00000 0.1997 0.1375 9.22E+01 818 0.12549 0.12549 1.00000 0.1780 0.1007 6.17E+01 819 0.00000 0.00000 1.00000 0.1495 0.0566 3.13E+01 820 1.00000 1.00000 0.87451 0.3144 0.3377 35.88E+01 821 0.87451 0.87451 0.87451 0.2964 0.3078 28.24E+01 822 0.74902 0.74902 0.87451 0.2774 0.2753 22.06E+01 823 0.62353 0.62353 0.87451 0.2603 0.2467 17.75E+01 824 0.50196 0.50196 0.87451 0.2475 0.2246 15.00E+01 825 0.37647 0.37647 0.87451 0.2332 0.1976 12.15E+01 826 0.25098 0.25098 0.87451 0.2119 0.1553 8.51E+01 827 0.12549 0.12549 0.87451 0.1864 0.1119 5.48E+01 828 0.00000 0.00000 0.87451 0.1509 0.0572 2.45E+01 829 1.00000 1.00000 0.74902 0.3313 0.3659 35.37E+01 830 0.87451 0.87451 0.74902 0.3142 0.3375 27.70E+01 831 0.74902 0.74902 0.74902 0.2957 0.3055 21.52E+01 832 0.62353 0.62353 0.74902 0.2780 0.2764 17.21E+01 833 0.50196 0.50196 0.74902 0.2649 0.2534 14.47E+01 834 0.37647 0.37647 0.74902 0.2498 0.2243 11.62E+01 835 0.25098 0.25098 0.74902 0.2263 0.1771 7.99E+01 836 0.12549 0.12549 0.74902 0.1965 0.1262 4.96E+01 837 0.00000 0.00000 0.74902 0.1530 0.0583 1.93E+01 838 1.00000 1.00000 0.62353 0.3431 0.3859 35.08E+01 839 0.87451 0.87451 0.62353 0.3270 0.3590 27.39E+01 840 0.74902 0.74902 0.62353 0.3090 0.3281 21.21E+01 841 0.62353 0.62353 0.62353 0.2916 0.2992 16.90E+01 842 0.50196 0.50196 0.62353 0.2784 0.2759 14.16E+01 843 0.37647 0.37647 0.62353 0.2628 0.2459 11.32E+01 844 0.25098 0.25098 0.62353 0.2382 0.1955 7.69E+01 845 0.12549 0.12549 0.62353 0.2055 0.1393 4.67E+01 846 0.00000 0.00000 0.62353 0.1545 0.0600 1.64E+01 847 1.00000 1.00000 0.50196 0.3552 0.4063 34.82E+01 848 0.87451 0.87451 0.50196 0.3403 0.3815 27.13E+01 849 0.74902 0.74902 0.50196 0.3234 0.3521 20.94E+01 850 0.62353 0.62353 0.50196 0.3063 0.3242 16.64E+01 851 0.50196 0.50196 0.50196 0.2931 0.3012 13.89E+01 852 0.37647 0.37647 0.50196 0.2777 0.2706 11.06E+01 853 0.25098 0.25098 0.50196 0.2521 0.2176 7.44E+01 854 0.12549 0.12549 0.50196 0.2163 0.1557 4.42E+01 855 0.00000 0.00000 0.50196 0.1569 0.0629 1.40E+01 856 1.00000 1.00000 0.37647 0.3734 0.4376 34.51E+01 857 0.87451 0.87451 0.37647 0.3610 0.4170 26.80E+01 858 0.74902 0.74902 0.37647 0.3464 0.3914 20.60E+01 859 0.62353 0.62353 0.37647 0.3309 0.3665 16.29E+01 860 0.50196 0.50196 0.37647 0.3187 0.3450 13.56E+01 861 0.37647 0.37647 0.37647 0.3040 0.3151 10.73E+01 862 0.25098 0.25098 0.37647 0.2787 0.2597 7.11E+01 863 0.12549 0.12549 0.37647 0.2389 0.1894 4.09E+01 864 0.00000 0.00000 0.37647 0.1616 0.0702 1.09E+01 865 1.00000 1.00000 0.25098 0.3927 0.4706 34.23E+01 866 0.87451 0.87451 0.25098 0.3836 0.4558 26.50E+01 867 0.74902 0.74902 0.25098 0.3726 0.4365 20.30E+01 868 0.62353 0.62353 0.25098 0.3604 0.4170 16.00E+01 869 0.50196 0.50196 0.25098 0.3503 0.3993 13.27E+01 870 0.37647 0.37647 0.25098 0.3381 0.3731 10.44E+01 871 0.25098 0.25098 0.25098 0.3163 0.3196 68.07E+00 872 0.12549 0.12549 0.25098 0.2742 0.2446 38.06E+00 873 0.00000 0.00000 0.25098 0.1711 0.0840 8.05E+00 874 1.00000 1.00000 0.12549 0.4104 0.5013 34.02E+01 875 0.87451 0.87451 0.12549 0.4052 0.4929 26.25E+01 876 0.74902 0.74902 0.12549 0.3990 0.4816 20.05E+01 877 0.62353 0.62353 0.12549 0.3910 0.4701 15.75E+01 878 0.50196 0.50196 0.12549 0.3850 0.4590 13.03E+01 879 0.37647 0.37647 0.12549 0.3784 0.4406 10.20E+01 880 0.25098 0.25098 0.12549 0.3657 0.3990 65.82E+00 881 0.12549 0.12549 0.12549 0.3309 0.3330 35.92E+00 882 0.00000 0.00000 0.12549 0.1955 0.1230 6.02E+00 883 1.00000 1.00000 0.00000 0.4251 0.5267 33.86E+01 884 0.87451 0.87451 0.00000 0.4240 0.5242 25.99E+01 885 0.74902 0.74902 0.00000 0.4228 0.5213 19.79E+01 886 0.62353 0.62353 0.00000 0.4204 0.5193 15.50E+01 887 0.50196 0.50196 0.00000 0.4192 0.5166 12.78E+01 888 0.37647 0.37647 0.00000 0.4202 0.5102 9.98E+01 889 0.25098 0.25098 0.00000 0.4251 0.4931 63.86E+00 890 0.12549 0.12549 0.00000 0.4192 0.4695 34.20E+00 891 0.00000 0.00000 0.00000 0.3097 0.3051 45.16E-01 892 1.00000 1.00000 1.00000 0.2974 0.3093 36.56E+01 893 1.00000 0.87451 1.00000 0.2961 0.2815 30.64E+01 894 1.00000 0.74902 1.00000 0.2951 0.2549 25.81E+01 895 1.00000 0.62353 1.00000 0.2945 0.2341 22.47E+01 896 1.00000 0.50196 1.00000 0.2941 0.2194 20.32E+01 897 1.00000 0.37647 1.00000 0.2938 0.2024 18.02E+01 898 1.00000 0.25098 1.00000 0.2936 0.1784 15.05E+01 899 1.00000 0.12549 1.00000 0.2934 0.1575 12.72E+01 900 1.00000 0.00000 1.00000 0.2935 0.1361 10.52E+01 901 0.87451 1.00000 0.87451 0.2982 0.3382 34.25E+01 902 0.87451 0.87451 0.87451 0.2964 0.3078 28.24E+01 903 0.87451 0.74902 0.87451 0.2952 0.2781 23.39E+01 904 0.87451 0.62353 0.87451 0.2944 0.2542 20.05E+01 905 0.87451 0.50196 0.87451 0.2939 0.2372 17.91E+01 906 0.87451 0.37647 0.87451 0.2936 0.2171 15.61E+01 907 0.87451 0.25098 0.87451 0.2932 0.1884 12.67E+01 908 0.87451 0.12549 0.87451 0.2929 0.1629 10.37E+01 909 0.87451 0.00000 0.87451 0.2922 0.1355 8.15E+01 910 0.74902 1.00000 0.74902 0.2991 0.3696 32.40E+01 911 0.74902 0.87451 0.74902 0.2971 0.3376 26.37E+01 912 0.74902 0.74902 0.74902 0.2957 0.3054 21.51E+01 913 0.74902 0.62353 0.74902 0.2947 0.2789 18.18E+01 914 0.74902 0.50196 0.74902 0.2942 0.2594 16.04E+01 915 0.74902 0.37647 0.74902 0.2937 0.2362 13.75E+01 916 0.74902 0.25098 0.74902 0.2931 0.2018 10.82E+01 917 0.74902 0.12549 0.74902 0.2928 0.1702 8.51E+01 918 0.74902 0.00000 0.74902 0.2920 0.1354 6.29E+01 919 0.62353 1.00000 0.62353 0.2973 0.3943 31.14E+01 920 0.62353 0.87451 0.62353 0.2949 0.3616 25.09E+01 921 0.62353 0.74902 0.62353 0.2929 0.3277 20.23E+01 922 0.62353 0.62353 0.62353 0.2916 0.2992 16.90E+01 923 0.62353 0.50196 0.62353 0.2909 0.2779 14.76E+01 924 0.62353 0.37647 0.62353 0.2901 0.2520 12.48E+01 925 0.62353 0.25098 0.62353 0.2890 0.2124 9.54E+01 926 0.62353 0.12549 0.62353 0.2882 0.1755 7.25E+01 927 0.62353 0.00000 0.62353 0.2869 0.1333 5.04E+01 928 0.50196 1.00000 0.50196 0.2994 0.4206 30.29E+01 929 0.50196 0.87451 0.50196 0.2970 0.3881 24.22E+01 930 0.50196 0.74902 0.50196 0.2952 0.3538 19.37E+01 931 0.50196 0.62353 0.50196 0.2939 0.3238 16.03E+01 932 0.50196 0.50196 0.50196 0.2932 0.3012 13.90E+01 933 0.50196 0.37647 0.50196 0.2925 0.2730 11.62E+01 934 0.50196 0.25098 0.50196 0.2915 0.2289 8.69E+01 935 0.50196 0.12549 0.50196 0.2910 0.1862 6.40E+01 936 0.50196 0.00000 0.50196 0.2894 0.1360 4.20E+01 937 0.37647 1.00000 0.37647 0.3065 0.4631 29.40E+01 938 0.37647 0.87451 0.37647 0.3050 0.4329 23.32E+01 939 0.37647 0.74902 0.37647 0.3042 0.3994 18.46E+01 940 0.37647 0.62353 0.37647 0.3037 0.3694 15.14E+01 941 0.37647 0.50196 0.37647 0.3038 0.3456 13.00E+01 942 0.37647 0.37647 0.37647 0.3040 0.3151 10.73E+01 943 0.37647 0.25098 0.37647 0.3047 0.2647 7.80E+01 944 0.37647 0.12549 0.37647 0.3059 0.2132 5.52E+01 945 0.37647 0.00000 0.37647 0.3064 0.1481 3.32E+01 946 0.25098 1.00000 0.25098 0.3110 0.5137 28.43E+01 947 0.25098 0.87451 0.25098 0.3105 0.4884 22.32E+01 948 0.25098 0.74902 0.25098 0.3106 0.4591 17.47E+01 949 0.25098 0.62353 0.25098 0.3114 0.4308 14.14E+01 950 0.25098 0.50196 0.25098 0.3119 0.4077 12.01E+01 951 0.25098 0.37647 0.25098 0.3134 0.3759 9.74E+01 952 0.25098 0.25098 0.25098 0.3163 0.3195 68.08E+00 953 0.25098 0.12549 0.25098 0.3202 0.2556 45.37E+00 954 0.25098 0.00000 0.25098 0.3252 0.1645 23.55E+00 955 0.12549 1.00000 0.12549 0.3120 0.5685 27.48E+01 956 0.12549 0.87451 0.12549 0.3114 0.5521 21.35E+01 957 0.12549 0.74902 0.12549 0.3119 0.5316 16.48E+01 958 0.12549 0.62353 0.12549 0.3129 0.5107 13.17E+01 959 0.12549 0.50196 0.12549 0.3146 0.4915 11.03E+01 960 0.12549 0.37647 0.12549 0.3167 0.4641 87.56E+00 961 0.12549 0.25098 0.12549 0.3223 0.4087 58.54E+00 962 0.12549 0.12549 0.12549 0.3310 0.3331 35.93E+00 963 0.12549 0.00000 0.12549 0.3466 0.1931 14.29E+00 964 0.00000 1.00000 0.00000 0.3051 0.6254 26.48E+01 965 0.00000 0.87451 0.00000 0.3030 0.6226 20.24E+01 966 0.00000 0.74902 0.00000 0.3010 0.6185 15.37E+01 967 0.00000 0.62353 0.00000 0.2994 0.6141 12.06E+01 968 0.00000 0.50196 0.00000 0.2984 0.6097 9.95E+01 969 0.00000 0.37647 0.00000 0.2975 0.6013 76.90E+00 970 0.00000 0.25098 0.00000 0.2972 0.5811 48.16E+00 971 0.00000 0.12549 0.00000 0.2985 0.5382 25.84E+00 972 0.00000 0.00000 0.00000 0.3097 0.3051 45.14E-01 973 0.00000 0.00000 0.00000 0.3098 0.3050 45.15E-01 974 0.12549 0.12549 0.12549 0.3310 0.3331 35.91E+00 975 0.25098 0.25098 0.25098 0.3163 0.3196 68.09E+00 976 0.37647 0.37647 0.37647 0.3042 0.3150 10.73E+01 977 0.50196 0.50196 0.50196 0.2932 0.3012 13.90E+01 978 0.62353 0.62353 0.62353 0.2916 0.2992 16.90E+01 979 0.74902 0.74902 0.74902 0.2956 0.3054 21.51E+01 980 0.87451 0.87451 0.87451 0.2965 0.3077 28.23E+01 981 1.00000 1.00000 1.00000 0.2974 0.3092 36.53E+01 982 0.00000 0.00000 0.00000 0.3098 0.3050 45.14E-01 983 0.12549 0.12549 0.12549 0.3310 0.3330 35.91E+00 984 0.25098 0.25098 0.25098 0.3163 0.3196 68.07E+00 985 0.37647 0.37647 0.37647 0.3041 0.3149 10.73E+01 986 0.50196 0.50196 0.50196 0.2932 0.3012 13.90E+01 987 0.62353 0.62353 0.62353 0.2916 0.2992 16.90E+01 988 0.74902 0.74902 0.74902 0.2956 0.3054 21.51E+01 989 0.87451 0.87451 0.87451 0.2965 0.3077 28.23E+01 990 1.00000 1.00000 1.00000 0.2973 0.3093 36.54E+01 991 0.00000 0.00000 0.00000 0.3098 0.3050 45.14E-01 992 0.12549 0.12549 0.12549 0.3309 0.3330 35.91E+00 993 0.25098 0.25098 0.25098 0.3163 0.3196 68.08E+00 994 0.37647 0.37647 0.37647 0.3041 0.3149 10.73E+01 995 0.50196 0.50196 0.50196 0.2932 0.3013 13.90E+01 996 0.62353 0.62353 0.62353 0.2917 0.2992 16.90E+01 997 0.74902 0.74902 0.74902 0.2956 0.3054 21.51E+01 998 0.87451 0.87451 0.87451 0.2965 0.3077 28.23E+01 999 1.00000 1.00000 1.00000 0.2973 0.3093 36.54E+01 1000 0.00000 0.00000 0.00000 0.3098 0.3050 45.14E-01 1001 0.12549 0.12549 0.12549 0.3310 0.3330 35.91E+00 1002 0.25098 0.25098 0.25098 0.3163 0.3196 68.08E+00 1003 0.37647 0.37647 0.37647 0.3041 0.3149 10.73E+01 1004 0.50196 0.50196 0.50196 0.2932 0.3012 13.90E+01 1005 0.62353 0.62353 0.62353 0.2916 0.2992 16.90E+01 1006 0.74902 0.74902 0.74902 0.2956 0.3054 21.51E+01 1007 0.87451 0.87451 0.87451 0.2965 0.3077 28.23E+01 1008 1.00000 1.00000 1.00000 0.2973 0.3093 36.53E+01 1009 0.00000 0.00000 0.00000 0.3097 0.3050 45.13E-01 1010 0.06667 0.06667 0.06667 0.3403 0.3353 21.42E+00 1011 0.13333 0.13333 0.13333 0.3302 0.3312 37.55E+00 1012 0.20000 0.20000 0.20000 0.3224 0.3246 54.66E+00 1013 0.26667 0.26667 0.26667 0.3141 0.3184 73.26E+00 1014 0.33333 0.33333 0.33333 0.3088 0.3159 9.33E+01 1015 0.40000 0.40000 0.40000 0.3014 0.3108 11.27E+01 1016 0.46667 0.46667 0.46667 0.2946 0.3025 13.03E+01 1017 0.53333 0.53333 0.53333 0.2924 0.3010 14.66E+01 1018 0.60000 0.60000 0.60000 0.2907 0.2996 16.25E+01 1019 0.66667 0.66667 0.66667 0.2929 0.2995 18.08E+01 1020 0.73333 0.73333 0.73333 0.2963 0.3056 20.86E+01 1021 0.80000 0.80000 0.80000 0.2958 0.3065 23.99E+01 1022 0.86667 0.86667 0.86667 0.2966 0.3070 27.64E+01 1023 0.93333 0.93333 0.93333 0.2993 0.3114 32.59E+01 1024 1.00000 1.00000 1.00000 0.2974 0.3092 36.53E+01 1025 0.00000 0.00000 0.00000 0.3098 0.3050 45.14E-01 1026 0.06667 0.06667 0.06667 0.3403 0.3354 21.43E+00 1027 0.13333 0.13333 0.13333 0.3303 0.3312 37.54E+00 1028 0.20000 0.20000 0.20000 0.3224 0.3246 54.66E+00 1029 0.26667 0.26667 0.26667 0.3141 0.3185 73.25E+00 1030 0.33333 0.33333 0.33333 0.3089 0.3161 9.33E+01 1031 0.40000 0.40000 0.40000 0.3014 0.3111 11.28E+01 1032 0.46667 0.46667 0.46667 0.2946 0.3025 13.03E+01 1033 0.53333 0.53333 0.53333 0.2925 0.3010 14.66E+01 1034 0.60000 0.60000 0.60000 0.2909 0.2995 16.24E+01 1035 0.66667 0.66667 0.66667 0.2930 0.2994 18.07E+01 1036 0.73333 0.73333 0.73333 0.2962 0.3056 20.86E+01 1037 0.80000 0.80000 0.80000 0.2958 0.3065 23.99E+01 1038 0.86667 0.86667 0.86667 0.2966 0.3070 27.64E+01 1039 0.93333 0.93333 0.93333 0.2993 0.3114 32.59E+01 1040 1.00000 1.00000 1.00000 0.2974 0.3092 36.53E+01 1041 0.00000 0.00000 0.00000 0.3098 0.3050 45.13E-01 1042 0.06667 0.06667 0.06667 0.3404 0.3354 21.42E+00 1043 0.13333 0.13333 0.13333 0.3303 0.3311 37.53E+00 1044 0.20000 0.20000 0.20000 0.3224 0.3246 54.65E+00 1045 0.26667 0.26667 0.26667 0.3141 0.3184 73.24E+00 1046 0.33333 0.33333 0.33333 0.3089 0.3161 9.33E+01 1047 0.40000 0.40000 0.40000 0.3012 0.3109 11.27E+01 1048 0.46667 0.46667 0.46667 0.2945 0.3026 13.03E+01 1049 0.53333 0.53333 0.53333 0.2925 0.3010 14.66E+01 1050 0.60000 0.60000 0.60000 0.2908 0.2996 16.25E+01 1051 0.66667 0.66667 0.66667 0.2927 0.2995 18.08E+01 1052 0.73333 0.73333 0.73333 0.2962 0.3057 20.86E+01 1053 0.80000 0.80000 0.80000 0.2958 0.3065 23.99E+01 1054 0.86667 0.86667 0.86667 0.2966 0.3070 27.64E+01 1055 0.93333 0.93333 0.93333 0.2993 0.3114 32.60E+01 1056 1.00000 1.00000 1.00000 0.2974 0.3092 36.53E+01 1057 0.00000 0.00000 0.00000 0.3097 0.3051 45.14E-01 1058 0.06667 0.06667 0.06667 0.3404 0.3354 21.42E+00 1059 0.13333 0.13333 0.13333 0.3303 0.3312 37.54E+00 1060 0.20000 0.20000 0.20000 0.3224 0.3246 54.66E+00 1061 0.26667 0.26667 0.26667 0.3141 0.3185 73.25E+00 1062 0.33333 0.33333 0.33333 0.3088 0.3159 9.33E+01 1063 0.40000 0.40000 0.40000 0.3014 0.3108 11.27E+01 1064 0.46667 0.46667 0.46667 0.2946 0.3025 13.03E+01 1065 0.53333 0.53333 0.53333 0.2925 0.3010 14.66E+01 1066 0.60000 0.60000 0.60000 0.2907 0.2996 16.25E+01 1067 0.66667 0.66667 0.66667 0.2929 0.2994 18.07E+01 1068 0.73333 0.73333 0.73333 0.2962 0.3056 20.85E+01 1069 0.80000 0.80000 0.80000 0.2958 0.3065 23.99E+01 1070 0.86667 0.86667 0.86667 0.2966 0.3070 27.64E+01 1071 0.93333 0.93333 0.93333 0.2993 0.3114 32.59E+01 1072 1.00000 1.00000 1.00000 0.2974 0.3093 36.54E+01 1073 0.00000 0.00000 0.00000 0.3098 0.3050 45.14E-01 1074 1.00000 1.00000 1.00000 0.2974 0.3093 36.56E+01 1075 1.00000 0.00000 0.00000 0.6338 0.3348 7.87E+01 1076 0.00000 1.00000 1.00000 0.2154 0.3031 29.15E+01 1077 1.00000 1.00000 0.00000 0.4251 0.5266 33.87E+01 1078 0.00000 0.00000 1.00000 0.1494 0.0567 3.14E+01 1079 0.00000 1.00000 0.00000 0.3051 0.6254 26.48E+01 1080 1.00000 0.00000 1.00000 0.2934 0.1361 10.52E+01 ] def /cvishow {cvi 6 string cvs show} def /cvsshow1 {10 mul cvi 0.1 mul 7 string cvs show} def /cvsshow2 {100 mul cvi 0.01 mul 7 string cvs show} def /cvsshow3 {1000 mul cvi 0.001 mul 7 string cvs show} def /cvishowb {cvi 6 string cvs show ( ) show} def /cvsshow1b {10 mul cvi 0.1 mul 7 string cvs show ( ) show} def /cvsshow2b {100 mul cvi 0.01 mul 7 string cvs show ( ) show} def /cvsshow3b {1000 mul cvi 0.001 mul 7 string cvs show ( ) show} def /cvishowr {0.5 add cvi 6 string cvs show} def /cvsshow1r {0.05 add 10 mul cvi 0.1 mul 7 string cvs show} def /cvsshow2r {0.005 add 100 mul cvi 0.01 mul 7 string cvs show} def /cvsshow3r {0.0005 add 1000 mul cvi 0.001 mul 7 string cvs show} def /cvi100 {100 mul cvi /xi exch def xi 0 lt {/vorz -1 def} {/vorz 1 def} ifelse /xia xi abs def vorz -1 eq {(\255) show} {(0) show} ifelse xia 0 ge xia 9 le {(0000) show} if xia 10 ge xia 99 le and {(000) show} if xia 100 ge xia 999 le and {(00) show} if xia 1000 ge xia 9999 le and {(0) show} if xia cvishow } bind def /rec %x, y width heigth {/heigth exch def /width exch def moveto width 0 rlineto 0 heigth rlineto width neg 0 rlineto closepath } bind def /colrecfi %x y width heigth c m y k {setcmykcolor rec fill} bind def /colrecst %x y width heigth c m y k {setcmykcolor rec stroke} bind def %%EndProlog gsave /lanind 0 def /lantex [(G) (E) (S) (N) (I) (J) (M)] def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind eq {show} {pop} ifelse} bind def /showes {2 lanind eq {show} {pop} ifelse} bind def /showfr {3 lanind eq {show} {pop} ifelse} bind def /showit {4 lanind eq {show} {pop} ifelse} bind def /showjp {5 lanind eq {show} {pop} ifelse} bind def /showea {1 lanind le {show} {pop} ifelse} bind def /lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def /lanindd laninddf def} {/lanind1 1 def /lanind2 1 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} {/xcolor1 0 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 4 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} if %colorm=0, deintp=0 colorm 0 eq deintp 1 eq and {/Txx (e) def} if %colorm=0, deintp=1 colorm 1 eq deintp 0 eq and {/Txx (dd) def} if %colorm=1, deintp=0 colorm 1 eq deintp 1 eq and {/Txx (de) def} if %colorm=1, deintp=1 xchart xchart3 lt {/Txx (-) def} if %always independent of intended output gsave %LANINDL2 END /GSS$ where {pop /LSS$ GSS$ def} {/LSS$ (1) def} ifelse /GSC$ where {pop /LSC$ GSC$ def} {/LSC$ (N) def} ifelse /GSX$ where {pop /LSX$ GSX$ def} {/LSX$ (0) def} ifelse /GSY$ where {pop /LSY$ GSY$ def} {/LSY$ (0) def} ifelse /GEX$ where {pop /LEX$ GEX$ def} {/LEX$ (P.PS./PDF) def} ifelse /GEY$ where {pop /LEY$ GEY$ def} {/LEY$ (P.DAT) def} ifelse /IMES where {pop} %/IMES IMES def {/IMES 0 def} ifelse gsave 72 90 translate 0.01 MM dup scale TK 100 -180 moveto (SE610-7N, ) show (Test chart with ) showea (Pr\374fvorlage mit ) showde (1080 standard colours) showea (1080 Norm\255Farben) showde (; digital equidistant 9 step hue and achromatic scales;) showea (; digital gleichabst\344ndige 9stufige Button- und unbunte Reihen;) showde (; luminance factor measured:) showea (; Leuchtdichtefaktor gemessen:) showde TIK ( Ym) show TK ( and normalized:) showea ( und normiert:) showde TIK ( Yn = Yw) show TK ( = 100) show TK (; for low glossy LECD display) showea (; f\374r LECD\255Display (wenig Glanz)) showde (, page ) showea (, Seite ) showde xchart 1 add (/) show xchartm cvishow (; display type: ) showea (; Display\255Typ: ) showde LAB*TE 0 get show /ix0 100 def /iymax 16600 def /idy 206 def /ixxd 3560 def gsave /xchartl xchart def %00 1 03 {/xchartl exch def %beg xchartl=0,3 gsave %Start-transformation 1 dup dup setrgbcolor 0 0 moveto 25000 0 rlineto 0 17000 rlineto 25000 neg 0 rlineto closepath fill 0 dup dup setrgbcolor 0 0 moveto 25000 0 rlineto 0 17000 rlineto 25000 neg 0 rlineto closepath stroke 1 1 6 {/i exch def ixxd i mul 030 add 0 moveto 0 17000 rlineto stroke } for TBIK 0 1 6 {/i exch def ixxd i mul 0100 add iymax idy add moveto (no.) show ixxd i mul 0600 add iymax idy add moveto (r, g, b) show ixxd i mul 2100 add iymax idy add moveto (x, y, Y) show xchart 1 le {(m)} {(n)} ifelse show } for TK xchartl 0 eq {/xch1 0000 def /xch2 0566 def} if xchartl 1 eq {/xch1 0567 def /xch2 1079 def} if xchartl 2 eq {/xch1 0000 def /xch2 0566 def} if xchartl 3 eq {/xch1 0567 def /xch2 1079 def} if xchartl 1 le {%xchartl=0,1 /fakt 1 def } %xchartl=0,1 {%xchartl=2,3 /jend 1073 7 mul 6 add def %White-Measurement /fakt 100 xyY0 jend get div def } ifelse %xchartl=2,3 xch1 1 xch2 {/xcharti exch def %beg xcharti=0,1079 xcharti 567 lt {/ilp xcharti 81 idiv def} %range 0..7 {/ilp xcharti 81 idiv 7 sub def} ifelse %range 0..7 /ils xcharti 81 idiv def /ilj xcharti ils 81 mul sub def %range 0..81 /iks xcharti 567 idiv def %range 0..01 /ikj xcharti iks 567 mul sub def %range 0..512 /j00 xcharti 7 mul 0 add def /j01 j00 1 add def /j02 j00 2 add def /j03 j00 3 add def /j04 j00 4 add def /j05 j00 5 add def /j06 j00 6 add def /ixx ix0 ilp ixxd mul add def ixx iymax ilj idy mul sub moveto xyY0 j00 get cvishowr ixx 500 1 mul add iymax ilj idy mul sub moveto xyY0 j01 get cvsshow3r ixx 500 2 mul add iymax ilj idy mul sub moveto xyY0 j02 get cvsshow3r ixx 500 3 mul add iymax ilj idy mul sub moveto xyY0 j03 get cvsshow3r ixx 500 4 mul add iymax ilj idy mul sub moveto xyY0 j04 get cvsshow3r ixx 500 5 mul add iymax ilj idy mul sub moveto xyY0 j05 get cvsshow3 ixx 500 6 mul add iymax ilj idy mul sub moveto xyY0 j06 get fakt mul cvsshow1r } for %xcharti=xch1,xch2 showpage grestore %} for %xchartl=0,3 %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 86 MM 020 MM translate 12 /Times-ISOL1 FS -9 MM -7 MM moveto ( ) show 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 18 %line 409 %!PS-Adobe-3.0 EPSF-3.0 SE610-8, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (SE610-8,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 197 MM translate 10 /Times-ISOL1 FS 1 1 scale -77 -91 translate %%BeginDocument: Bild 12 %line 419 %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 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 %!PS-Adobe-3.0 EPSF-3.0 SE611-2, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (SE611-2,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 219 MM 152 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 22 %line 439 %!PS-Adobe-3.0 EPSF-3.0 SE611-2, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (SE611-2,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 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 %!PS-Adobe-3.0 EPSF-3.0 SE611-3, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (SE611-3,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 219 MM 108 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 24 %line 459 %!PS-Adobe-3.0 EPSF-3.0 SE611-4, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (SE611-4,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 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 %!PS-Adobe-3.0 EPSF-3.0 SE611-5, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (SE611-5,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 219 MM 064 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 26 %line 479 %!PS-Adobe-3.0 EPSF-3.0 SE611-6, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (SE611-6,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 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 %!PS-Adobe-3.0 EPSF-3.0 SE611-7, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (SE611-7,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 219 MM 020 MM translate 12 /Times-ISOL1 FS -9 MM -7 MM moveto ( ) show 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 28 %line 499 %!PS-Adobe-3.0 EPSF-3.0 SE611-8, %%BoundingBox: 70 90 226 206 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def %%EndProlog gsave 8 /Times-Roman FS 72 83 moveto %!2 (SE611-8,) show 72 90 translate %! 0.01 MM 0.01 MM scale %! 15 setlinewidth %! 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto %! closepath stroke grestore showpage %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 219 MM 080 MM add 008 MM translate %80 MM Breite von TestStreifen 10 /Times-ISOL1 FS 53 MM 1 MM moveto () show 1 1 scale -77 21 MM sub -91 translate %%BeginDocument: Bild 29 Teststreifen Ueberlaenge %line 509 %%EndDocument EndEPSF grestore gsave BeginEPSF -0.0 MM -0.0 MM translate %xy-Verschiebung Rechteckrahmen nach innen% %%BeginDocument: Bild 30 %Rechteckrahmen %line 519 %!PS-Adobe-3.0 EPSF-3.0 Frame arround with Internet text DG02 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 00 def /xcolor2 00 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 4 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/SE61/SE61) show colorm cvishow deintp cvishow colorm 0 eq {(N) show} {(F) show} ifelse (P.PDF & ) show (http://130.149.60.45/~farbmetrik/SE61/SE61) show colorm cvishow deintp cvishow colorm 0 eq {(N) show} {(F) show} ifelse (P.TXT & ) show (http://130.149.60.45/~farbmetrik/SE61/SE61.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 /TELi 8 array def 809 /TELi [(D65) (D50) (P40) (A00) (E00) (C00) (P00) (Q00)] def 0 setgray 12 /Times-ISOL1 FS 61 MM 13.5 MM moveto (TUB\255Pr\374fvorlage SE61; ) showde %0SE61X-Y 0000# (TUB\255test chart SE61; ) showen %1SE61X-Y 0000# (gr\341fico TUB\255SE61; ) showes %2SE61X-Y 0000# (TUB\255test graphique SE61; ) showfr %3SE61X-Y 0000# (grafico TUB\255SE61; ) showit %4SE61X-Y 0000# (TUB\255test chart SE61; ) showjp %5SE61X-Y 0000# xchart4 0 eq {%xchart4=0 (Farbmetrisches Display\255System) showde %0SE61X-Y 0100# (colorimetric display system) showea %ASE61X-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 (LECD: rgb, x,y und Ym & Yn (n=normiert=100)) showde %0SE61X-Y 0200# (LECD: rgb, x,y and Ym & Yn (n=normalized=100)) showea %ASE61X-Y 0200# } if %xchart4=0 xchart4 1 eq { 12 /Times-ISOL1 FS (Chromatische Pr\374fvorlage) showde %0SE61X-Y 0300# (chromatic test chart) showen %1SE61X-Y 0300# (test crom\341tico gr\341fico) showes %2SE61X-Y 0300# (chromatic graphique de test) showfr %3SE61X-Y 0300# (prova cromatica grafico) showit %4SE61X-Y 0300# (chromatic test chart) showjp %5SE61X-Y 0300# 12 /TimesI-ISOL1 FS ( RGB) show } if xchart4 2 eq { 12 /Times-ISOL1 FS (Chromatische Pr\374fvorlage) showde %0SE61X-Y 0400# (chromatic test chart) showen %1SE61X-Y 0400# (test crom\341tico gr\341fico) showes %2SE61X-Y 0400# (chromatic graphique de test) showfr %3SE61X-Y 0400# (prova cromatica grafico) showit %4SE61X-Y 0400# (chromatic test chart) showjp %5SE61X-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 %0SE61X-Y 0500# (input: ) showen %1SE61X-Y 0500# (entrada: ) showes %2SE61X-Y 0500# (entr\351e: ) showfr %3SE61X-Y 0500# (immettere: ) showit %4SE61X-Y 0500# (input: ) showjp %5SE61X-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 %0SE61X-Y 0600# (output: ) showen %1SE61X-Y 0600# (salida: ) showes %2SE61X-Y 0600# (sortie: ) showfr %3SE61X-Y 0600# (uscita: ) showit %4SE61X-Y 0600# (output: ) showjp %5SE61X-Y 0600# %colorm=0,1! 12 /Times-ISOL1 FS xchart xchart3 lt {%xchart=xchart3 12 /Times-ISOL1 FS (keine \304nderung) showde %0SE61X-Y 0700# (no change) showen %1SE61X-Y 0700# (ning\372n cambio) showes %2SE61X-Y 0700# (aucun changement) showfr %3SE61X-Y 0700# (nessun cambiamento) showit %4SE61X-Y 0700# (no change compared) showjp %5SE61X-Y 0700# }%xchart=xchart3 12 /Times-ISOL1 FS colorm 0 eq {%colorm=0 (Transfer nach ) showde %0SE61X-Y 0800# (transfer to ) showen %1SE61X-Y 0800# (transfiera a ) showes %2SE61X-Y 0800# (transf\351rer \340 ) showfr %3SE61X-Y 0800# (trasferire a ) showit %4SE61X-Y 0800# (transfer to ) showjp %5SE61X-Y 0800# }%colorm=0 {%colorm=1 (3D\255Linearisierung ) showde %0SE61X-Y 0900# (3D\255linearization to ) showen %1SE61X-Y 0900# (3D\255linealizaci\363n a ) showes %2SE61X-Y 0900# (linearisation 3D selon ) showfr %3SE61X-Y 0900# (3D\255linearizzazione a ) showit %4SE61X-Y 0900# (3D\255linearization to ) showjp %5SE61X-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=xchart3 %0 setgray %end white and unvisible 12 /Times-ISOL1 FS 62 MM 198.5 MM moveto (http://130.149.60.45/~farbmetrik/SE61/SE61L) show (0) show LSC$ show LEX$ show %1 setgray %start white and unvisible (; ) show xchart xchart3 lt { (Start\255Ausgabe) showde %0SE61X-Y 1000# (start output) showen %1SE61X-Y 1000# (comience salida) showes %2SE61X-Y 1000# (sortie de production) showfr %3SE61X-Y 1000# (cominciare l'uscita) showit %4SE61X-Y 1000# (start output) showjp %5SE61X-Y 1000# } if LSC$ (C) eq { (Start\255Ausgabe) showde %0SE61X-Y 1100# (start output) showen %1SE61X-Y 1100# (comience salida) showes %2SE61X-Y 1100# (sortie de production) showfr %3SE61X-Y 1100# (cominciare l'uscita) showit %4SE61X-Y 1100# (start output) showjp %5SE61X-Y 1100# } if xchart xchart3 ge {%xchart>=xchart3 colorm 0 eq {%colorm=0,1 (Transfer Ausgabe) showde %0SE61X-Y 1200# (transfer output) showen %1SE61X-Y 1200# (salida de transferencia) showes %2SE61X-Y 1200# (sortie de transfert) showfr %3SE61X-Y 1200# (uscita di trasferimento) showit %4SE61X-Y 1200# (transfer output) showjp %5SE61X-Y 1200# }%colorm=0 {%colorm=1 (3D\255Linearisierung) showde %0SE61X-Y 1300# (3D\255linearization) showen %1SE61X-Y 1300# (3D\255linealizaci\363n) showes %2SE61X-Y 1300# (linearisation 3D) showfr %3SE61X-Y 1300# (3D\255linearizzzazione) showit %4SE61X-Y 1300# (3D\255linearization) showjp %5SE61X-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 %0SE61X-Y 1400# (N: no 3D\255linearization (OL) ) showen %1SE61X-Y 1400# (N: ninguna 3D\255linealizaci\363n (OL) ) showes %2SE61X-Y 1400# (N: aucun linearisation 3D (OL) ) showfr %3SE61X-Y 1400# (N: nessun 3D\255linearizzazione (OL) ) showit %4SE61X-Y 1400# (N: no 3D\255linearization (OL) ) showjp %5SE61X-Y 1400# (in Datei (F) oder PS\255Startup (S)) showde %0SE61X-Y 1500# (in file (F) or PS\255startup (S)) showen %1SE61X-Y 1500# (en archivo (F) o PS\255startup (S)) showes %2SE61X-Y 1500# (dans fichier (F) ou PS\255startup (S)) showfr %3SE61X-Y 1500# (nel file (F) o PS\255startup (S)) showit %4SE61X-Y 1500# (in file (F) or PS\255startup (S)) showjp %5SE61X-Y 1500# } {LSC$ show (: ) show (3D\255Linearisierung) showde %0SE61X-Y 1600# (3D\255linearization) showen %1SE61X-Y 1600# (3D\255linealizaci\363n) showes %2SE61X-Y 1600# (linearisation 3D) showfr %3SE61X-Y 1600# (3D\255linearizzzazione) showit %4SE61X-Y 1600# (3D\255linearization) showjp %5SE61X-Y 1600# ( SE61/SE61L) show LSS$ show LSX$ show (0) show LSC$ show LEY$ show } ifelse LSC$ (F) eq { ( in Datei (F)) showde %0SE61X-Y 1700# ( in file (F)) showen %1SE61X-Y 1700# ( en archivo (F)) showes %2SE61X-Y 1700# ( dans fichier (F)) showfr %3SE61X-Y 1700# ( nel file (F)) showit %4SE61X-Y 1700# ( in file (F)) showjp %5SE61X-Y 1700# } if LSC$ (S) eq { ( im Distiller Startup (S) Directory) showde %0SE61X-Y 1800# ( in Distiller Startup (S) Directory) showen %1SE61X-Y 1800# ( en el Distiller Startup (S) Directory) showes %2SE61X-Y 1800# ( dans le Distiller Startup (S) Directory) showfr %3SE61X-Y 1800# ( nel Distiller Startup (S) Directory) showit %4SE61X-Y 1800# ( in Distiller Startup (S) Directory) showjp %5SE61X-Y 1800# } if LSC$ (D) eq { ( in PS\255Device (D)) showde %0SE61X-Y 1900# ( in PS\255device (D)) showen %1SE61X-Y 1900# ( en el PS\255device (D)) showes %2SE61X-Y 1900# ( dans l'appareil PS (D)) showfr %3SE61X-Y 1900# ( nel PS\255dispositivo (D)) showit %4SE61X-Y 1900# ( in PS\255Device (D)) showjp %5SE61X-Y 1900# } if LSC$ (T) eq { ( im Distiller Startup (S) Directory) showde %0SE61X-Y 2000# ( in Distiller Startup (S) Directory) showen %1SE61X-Y 2000# ( en el Distiller Startup (S) Directory) showes %2SE61X-Y 2000# ( dans le Distiller Startup (S) Directory) showfr %3SE61X-Y 2000# ( nel Distiller Startup (S) Directory) showit %4SE61X-Y 2000# ( in Distiller Startup (S) Directory) showjp %5SE61X-Y 2000# } if LSC$ (E) eq { ( in PS\255Device (D)) showde %0SE61X-Y 2100# ( in PS\255device (D)) showen %1SE61X-Y 2100# ( en el PS\255device (D)) showes %2SE61X-Y 2100# ( dans appareil PS (D)) showfr %3SE61X-Y 2100# ( nel PS\255dispositivo (D)) showit %4SE61X-Y 2100# ( in PS\255Device (D)) showjp %5SE61X-Y 2100# } if %0 setgray %end white and unvisible (, Seite ) showde %0SE61X-Y 2200# (, page ) showen %1SE61X-Y 2200# (, p\341gina ) showes %2SE61X-Y 2200# (, page ) showfr %3SE61X-Y 2200# (, pagina ) showit %4SE61X-Y 2200# (, page ) showjp %5SE61X-Y 2200# xchart 1 add xcolor 8 mul add cvishow (/) show xchartm cvishow 16 MM 185 MM moveto -90 rotate (Siehe \344hnliche Dateien: ) showde %0SE61X-Y 2300# (see similar files: ) showen %1SE61X-Y 2300# (vea archivos semejantes: ) showes %2SE61X-Y 2300# (voir des fichiers similaires: ) showfr %3SE61X-Y 2300# (vedere dei file simili: ) showit %4SE61X-Y 2300# (see similar files: ) showjp %5SE61X-Y 2300# (http://130.149.60.45/~farbmetrik/SE61/SE61.HTM) show %(0) show %LSC$ show LEX$ show 90 rotate 12 MM 185 MM moveto -90 rotate (Technische Information: ) showde %0SE61X-Y 2400# (technical information: ) showen %1SE61X-Y 2400# (informaci\363n t\351cnica: ) showes %2SE61X-Y 2400# (informations techniques: ) showfr %3SE61X-Y 2400# (informazioni tecniche: ) showit %4SE61X-Y 2400# (technical information: ) showjp %5SE61X-Y 2400# (http://www.ps.bam.de) show ( oder ) showde %0SE61X-Y 2500# ( or ) showen %1SE61X-Y 2500# ( o ) showes %2SE61X-Y 2500# ( ou ) showfr %3SE61X-Y 2500# ( o ) showit %4SE61X-Y 2500# ( or ) showjp %5SE61X-Y 2500# (http://130.149.60.45/~farbmetrik) show 90 rotate 281 MM 185 MM moveto -90 rotate (TUB\255Registrierung: 20130201\255SE61/SE61L) showde %0SE61X-Y 2600# (TUB registration: 20130201\255SE61/SE61L) showen %1SE61X-Y 2600# (TUB matr\355cula: 20130201\255SE61/SE61L) showes %2SE61X-Y 2600# (TUB enregistrement: 20130201\255SE61/SE61L) showfr %3SE61X-Y 2600# (TUB iscrizione: 20130201\255SE61/SE61L) showit %4SE61X-Y 2600# (TUB registration: 20130201\255SE61/SE61L) showjp %5SE61X-Y 2600# (0) show LSC$ show LEX$ show 90 rotate 281 MM 74 MM moveto -90 rotate (TUB\255Material: Code=rha4ta) showde %0SE61X-Y 2700# (TUB material: code=rha4ta) showen %1SE61X-Y 2700# (TUB material: code=rha4ta) showes %2SE61X-Y 2700# (TUB mat\351riel: code=rha4ta) showfr %3SE61X-Y 2700# (TUB materiale: code=rha4ta) showit %4SE61X-Y 2700# (TUB material: code=rha4ta) showjp %5SE61X-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 %0SE61X-Y 2800# ( application for measurement ) showen %1SE61X-Y 2800# ( aplicaci\363n para la medida ) showes %2SE61X-Y 2800# ( application pour la mesure ) showfr %3SE61X-Y 2800# ( la domanda per la misura ) showit %4SE61X-Y 2800# ( application for measurement ) showjp %5SE61X-Y 2800# xchart5f 0 eq {%xchart5f=0 (von Display-Ausgabe) showde %0SE61X-Y 2900# (of display output) showen %1SE61X-Y 2900# (de display output) showes %2SE61X-Y 2900# (de sortie sur \350cran) showfr %3SE61X-Y 2900# (di stampa di display) showit %4SE61X-Y 2900# (of display output) showjp %5SE61X-Y 2900# } if %xchart5f=0 xchart5f 1 eq xchart5f 2 eq or {%xchart5f=1,2 (von Offsetdruck\255Ausgabe) showde %0SE61X-Y 3000# (of offset print output) showen %1SE61X-Y 3000# (salida en la impressi\363n offset) showes %2SE61X-Y 3000# (des sorties sur offset) showfr %3SE61X-Y 3000# (uscita nella stampa di offset) showit %4SE61X-Y 3000# (of offset print output) showjp %5SE61X-Y 3000# } if %xchart5f=1,2 xchart5f 3 eq {%xchart5f=3 (von Laserdrucker\255Ausgabe) showde %0SE61X-Y 3100# (of laser printer output) showen %1SE61X-Y 3100# (salida de impresora l\341ser) showes %2SE61X-Y 3100# (des sorties sur imprimante laser) showfr %3SE61X-Y 3100# (di uscita della stampante laser) showit %4SE61X-Y 3100# (of laser printer output) showjp %5SE61X-Y 3100# } if %xchart5f=3 xchart xchart3 ge {%xchart>=xchart3 xchart5f 0 eq {%xchart5f=0 (, keine Separation) showde %0SE61X-Y 3200# (, no separation) showen %1SE61X-Y 3200# (, ninguna separaci\363n) showes %2SE61X-Y 3200# (, aucune s\351paration) showfr %3SE61X-Y 3200# (, nessuna separazione) showit %4SE61X-Y 3200# (, no separation) showjp %5SE61X-Y 3200# } if %chart5f=0 xchart5f 1 ge {%xchart5f>=1 (, Separation) showde %0SE61X-Y 3300# (, separation) showen %1SE61X-Y 3300# (, separaci\363n) showes %2SE61X-Y 3300# (, s\351paration) showfr %3SE61X-Y 3300# (, separazione) showit %4SE61X-Y 3300# (, separation) showjp %5SE61X-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,3 %} for %xcolorf=0,1 %} for %deintpf=0,1 %} for %colormf=0,1 %} for %lanindf=0,0 %%Trailer