%!PS-Adobe-3.0 EPSF-3.0 http://130.149.60.45/~farbmetrik/QI84/QI84L00XX.PS 20120401 %%BoundingBox: 00 00 414 292 /pdfmark where {pop} {userdict /pdfmark /cleartomark load put} ifelse /languagelevel where {pop languagelevel} {1} ifelse 2 lt { userdict (<<) cvn ([) cvn load put userdict (>>) cvn (]) cvn load put} if [ /Title (PostScript pictures: www.ps.bam.de/QI84/QI84.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 /ypaper 0 def /ybunta 0 def %Early FF definition /sfrgbcolor {setrgbcolor} bind def /sfcmykcolor {setcmykcolor} bind def %line 20****************************************************** %BEG QI84/OUTLIN10.PS Emty 20120301 %END QI84/OUTLIN10.PS Emty 20120301 %**************************************************** %BEG 'QI84'OUTLIN1X.PS Other procedures for Offset output linearization %**************************************************** %********************************************************************* %BEG Procedure PROC_COLSEP_IOF different procedures 20100301 %********************************************************************* /PROC_COLSEP_IOF {%BEG PROC_COLSEP_IOF different procedures 20100301 %********************************************************************* /proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL { %BEG proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL %assumes input of rgb, which is called rgb_dyF %calculation of intended rgb*dyF, LABCh*dyF %Lab2RGBinterpolation for colorm=1 %calculation of inverse rgb'*dyF, LABCh'*dyF, which produces rgb*dyF, LABCh*dyF %requires /hab*dy362Mi 362 array def %(y=s,d,e) %requires /rgb*dy362Mi 362 array def %(y=s,d,e) %requires /LAB*dyx362Mi 362 array def %(y=s,d,e, x=LabCh) /b_dyF exch def /g_dyF exch def /r_dyF exch def %calculation of i_dyF, c_dyF, and t_dyF /maxd r_dyF def g_dyF maxd gt {/maxd g_dyF def} if b_dyF maxd gt {/maxd b_dyF def} if /mind r_dyF def g_dyF mind lt {/mind g_dyF def} if b_dyF mind lt {/mind b_dyF def} if /i_dyF maxd def /c_dyF maxd mind sub def /t_dyF i_dyF c_dyF 0.5 mul sub def /hsiF r_dyF 030 sin mul g_dyF 150 sin mul add b_dyF 270 sin mul add %y_e r_dyF 030 cos mul g_dyF 150 cos mul add %x_e 0.0001 add atan 0.5 add cvi def %range 30 ... 390 %perhaps change %to decide hab*dyF/dsF/deF ! hsiF hab*ds362Mi 0 get sub 0 le {/hsiF hsiF 360 add def} if /hsiFm30 hsiF 30 sub def %range 00 ... 360 %test grey r_dyF g_dyF sub abs 0.002 le g_dyF b_dyF sub abs 0.002 le and {%grey, not grey /r*dyM 1 def /g*dyM 1 def /b*dyM 1 def /hsiM r*dyM 030 sin mul g*dyM 150 sin mul add b*dyM 270 sin mul add %y_d r*dyM 030 cos mul g*dyM 150 cos mul add %x_d 0.0001 add atan def hsiM hab*ds362Mi 0 get sub 0 le {/hsiM hsiM 360 add def} if /hsiMm30 hsiM 30 sub def /LAB*LdyM L*Wioa def /LAB*adyM 0 def /LAB*bdyM 0 def /LAB*LdyF L*Nioa r_dyF L*Wioa L*Nioa sub mul add def /LAB*adyF 0 def /LAB*bdyF 0 def /r*dyF r_dyF def /g*dyF g_dyF def /b*dyF b_dyF def /r'*dyF r_dyF def /g'*dyF g_dyF def /b'*dyF b_dyF def }%grey {%color hsiFm30 0 lt {/hsiFm30 0 def} if %for correction to be deleted! hsiFm30 360 gt {/hsiFm30 360 def} if %calculation of intended rgb*dyM, LAB*LabdyM deintp 0 eq {%deintp=0 /r*dyM r*dd362Mi hsiFm30 get def /g*dyM g*dd362Mi hsiFm30 get def /b*dyM b*dd362Mi hsiFm30 get def /LAB*LdyM LAB*Ldd362Mi hsiFm30 get def /LAB*adyM LAB*add362Mi hsiFm30 get def /LAB*bdyM LAB*bdd362Mi hsiFm30 get def } if %deintp=0 deintp 1 eq {%deintp=1 /r*dyM r*de362Mi hsiFm30 get def /g*dyM g*de362Mi hsiFm30 get def /b*dyM b*de362Mi hsiFm30 get def /LAB*LdyM LAB*Lde362Mi hsiFm30 get def /LAB*adyM LAB*ade362Mi hsiFm30 get def /LAB*bdyM LAB*bde362Mi hsiFm30 get def } if %deintp=1 %calculation of intended rgb*dyF, LAB*LabdyF c_dyF 1 eq {%c_dy=1,#1 /r*dyF r*dyM def /g*dyF g*dyM def /b*dyF b*dyM def /LAB*LdyF LAB*LdyM def /LAB*adyF LAB*adyM def /LAB*bdyF LAB*bdyM def }%c_dyF=1 {%c_dyF#1 /t00 1.0 c_dyF 0.5 mul sub def /t0x 0.5 t_dyF 0.5 sub 0.5 mul t00 0.5 sub div add def /r*dyF t0x r*dyM t0x sub c_dyF mul add def /g*dyF t0x g*dyM t0x sub c_dyF mul add def /b*dyF t0x b*dyM t0x sub c_dyF mul add def %/LAB*LdyF L*Nioa r_dyF L*Wioa L*Nioa sub mul add def /L*Xioa L*Nioa t0x L*Wioa L*Nioa sub mul add def /LAB*LdyF L*Xioa LAB*LdyM L*Xioa sub c_dyF mul add def /LAB*adyF 0 LAB*adyM 0 sub c_dyF mul add def /LAB*bdyF 0 LAB*bdyM 0 sub c_dyF mul add def } ifelse %c_dyF=1,#1 } ifelse %grey or color %only for control, not used: calculation of hsiM /hsiM r*dyM 030 sin mul g*dyM 150 sin mul add b*dyM 270 sin mul add %y_d r*dyM 030 cos mul g*dyM 150 cos mul add %x_d 0.0001 add atan def hsiM hab*ds362Mi 0 get sub 0 le {/hsiM hsiM 360 add def} if /hsiMm30 hsiM 30 sub def %only for control, not used: calculation of ict*dyM and ict*dyF %calculation of i*dyM, c*dyM, and t*dyM /maxd r*dyM def g*dyM maxd gt {/maxd g*dyM def} if b*dyM maxd gt {/maxd b*dyM def} if /mind r*dyM def g*dyM mind lt {/mind g*dyM def} if b*dyM mind lt {/mind b*dyM def} if /i*dyM maxd def /c*dyM maxd mind sub def /t*dyM i*dyM c*dyM 0.5 mul sub def %%only for control, not used: calculation of i*dyF, c*dyF, and t*dyF /maxd r*dyF def g*dyF maxd gt {/maxd g*dyF def} if b*dyF maxd gt {/maxd b*dyF def} if /mind r*dyF def g*dyF mind lt {/mind g*dyF def} if b*dyF mind lt {/mind b*dyF def} if /i*dyF maxd def /c*dyF maxd mind sub def /t*dyF i*dyF c*dyF 0.5 mul sub def colorm 0 eq {%colorm=0 r*dyF g*dyF b*dyF }%colorm=0 {%colorm=1 LAB*LdyF LAB*adyF LAB*bdyF Lab2RGBinterpolation /b'*dyF exch def /g'*dyF exch def /r'*dyF exch def r'*dyF g'*dyF b'*dyF } ifelse %colorm=1 } bind def %END proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL %********************************************************************* /proc_trans_rgb3*_cmyn4*ioL {%BEG Procedure proc_trans_rgb3*_cmyn4*ioL %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 /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 } def %END Procedure proc_trans_rgb3*_cmyn4*ioL %******************************************************************* /proc_trans_rgb3*_cmyn5*ioL {%BEG Procedure proc_trans_rgb3*_cmyn5*ioL %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 /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 } def %END Procedure proc_trans_rgb3*_cmyn5*ioL 'zm60'CMYN559LT.PS %********************************************************************* /proc_trans_rgb3*_cmyn6*ioL {%BEG Procedure proc_trans_rgb3*_cmyn6*ioL %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 def %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 } def %END Procedure proc_trans_rgb3*_cmyn6*ioL 'zm60'CMYN559LT.PS %************************************************************* /cmyk_olv*_cmyn4* {%BEG procedure cmyk_olv*_cmyn4* /k*n exch def /y*n exch def /m*n exch def /c*n exch def k*n 0 eq {%k*n=0 /o* 1 c*n sub def /l* 1 m*n sub def /v* 1 y*n sub def /n4*Fa 0 def }%k*n=0 {%k*n#0 c*n 0 eq m*n 0 eq and y*n 0 eq and {%k*n#0 and c=m=y=0 achromatic /o* 1 k*n sub def /v* o* def /l* o* def /n4*Fa k*n def }%k*n#0 and c=m=y=0 achromatic {%k*n#0 and c or m or y#0 chromatic /o* 1 c*n sub 1 k*n sub mul def /l* 1 m*n sub 1 k*n sub mul def /v* 1 y*n sub 1 k*n sub mul def /n4*Fa 0 def %change of k*n!!! } ifelse %k*n#0 and c or m or y#0 chromatic } ifelse %k*n#0 /c4*Fa 1 o* sub def /m4*Fa 1 l* sub def /y4*Fa 1 v* sub def } def %END procedure cmyk_olv*_cmyn4* %*********************************************************** colsep 3 eq {%colsep=3 cmyn5* /tLAB 0 def xchart 1 ge {%xchart>=1 'zm60'COLM559LT.PS cmyn5* 20120301 colorm 0 eq {%BEG colorm=0 /setrgbcolor {/v* exch def /l* exch def /o* exch def o* l* v* proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL /v* exch def /l* exch def /o* exch def proc_trans_rgb3*_cmyn5*ioL %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 o* l* v* proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL /v* exch def /l* exch def /o* exch def proc_trans_rgb3*_cmyn5*ioL %in: olv*, out: cmyn5 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def /setcmykcolor {cmyk_olv*_cmyn4* o* l* v* proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL /v* exch def /l* exch def /o* exch def proc_trans_rgb3*_cmyn5*ioL %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 o* l* v* proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL /v* exch def /l* exch def /o* exch def proc_trans_rgb3*_cmyn5*ioL %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 o* l* v* proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL /v* exch def /l* exch def /o* exch def proc_trans_rgb3*_cmyn5*ioL %in: olv*, out: cmyn5 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def /setcmykcolor {cmyk_olv*_cmyn4* o* l* v* proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL /v* exch def /l* exch def /o* exch def proc_trans_rgb3*_cmyn5*ioL %in: olv*, out: cmyn5 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def } ifelse %END colorm=1 }%END %xchart>=0 {%BEG %xchart=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* sfrgbcolor } 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* sfgray } def /setcmykcolor {cmyk_olv*_cmyn4* c4*Fa m4*Fa y4*Fa n4*Fa sfcmykcolor } def } ifelse %END %xchart=0 'zm60'COLM559LT.PS cmyn5* 20120301 } if %colsep=3 cmyn5* %********************************************************************* colsep 1 eq {%colsep=1 /tLAB 0 def xchart 1 ge {%xchart>=1 'zm60'COLM57LT.PS cmy0* 20120301 colorm 0 eq {%BEG colorm=0 /setrgbcolor {/v* exch def /l* exch def /o* exch def o* l* v* proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL /v* exch def /l* exch def /o* exch def %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 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def /setgray {dup dup /v* exch def /l* exch def /o* exch def o* l* v* proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL /v* exch def /l* exch def /o* exch def %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 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def /setcmykcolor {cmyk_olv*_cmyn4* o* l* v* proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL /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 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 o* l* v* proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL /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 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def /setgray {/w*w exch def /o* w*w def /l* w*w def /v* w*w def o* l* v* proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL /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 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def /setcmykcolor {cmyk_olv*_cmyn4* o* l* v* proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL /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 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def } ifelse %END colorm=1 }%END %xchart>=1 {%BEG %xchart=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* sfrgbcolor } 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* sfgray } def /setcmykcolor {cmyk_olv*_cmyn4* c4*Fa m4*Fa y4*Fa n4*Fa sfcmykcolor } def } ifelse %END %xchart=0 'zm60'COLM57LT.PS cmy0* 20120301 } if %colsep=1 %*************************************************************** colsep 2 eq {%colsep=2 /tLAB 0 def xchart 1 ge {%xchart>=1 'zm60'COLM58LT.PS cmyn4* 20120301 colorm 0 eq {%BEG colorm=0 /setrgbcolor {/v* exch def /l* exch def /o* exch def o* l* v* proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL /v* exch def /l* exch def /o* exch def proc_trans_rgb3*_cmyn4*ioL %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 o* l* v* proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL /v* exch def /l* exch def /o* exch def proc_trans_rgb3*_cmyn4*ioL %in: olv*, out: cmyn4 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def /setcmykcolor {cmyk_olv*_cmyn4* o* l* v* proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL /v* exch def /l* exch def /o* exch def proc_trans_rgb3*_cmyn4*ioL %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 o* l* v* proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL /v* exch def /l* exch def /o* exch def proc_trans_rgb3*_cmyn4*ioL %needs olv* for input %produces cmyn4*ioL as output c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def /setgray {dup dup /v* exch def /l* exch def /o* exch def o* l* v* proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL /v* exch def /l* exch def /o* exch def proc_trans_rgb3*_cmyn4*ioL %in: olv*, out: cmyn4 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def /setcmykcolor {cmyk_olv*_cmyn4* o* l* v* proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL /v* exch def /l* exch def /o* exch def proc_trans_rgb3*_cmyn4*ioL %in: olv*, out: cmyn4 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def } ifelse %END colorm=1 }%END %xchart>=0 {%BEG %xchart=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* sfrgbcolor } 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* sfgray } def /setcmykcolor {cmyk_olv*_cmyn4* c4*Fa m4*Fa y4*Fa n4*Fa sfcmykcolor } def } ifelse %END %xchart=0 'zm60'COLM58LT.PS cmyn4* 20120301 } if %colsep=2 %********************************************************************* colsep 0 eq {%colsep=0 cmyn6* /tLAB 0 def xchart 1 ge {%xchart>=1 'zm60'COLM559LT.PS cmyn6* 20120201 colorm 0 eq {%BEG colorm=0 /olvtrans 1 def %changes olv* to olvk* /setrgbcolor {/v* exch def /l* exch def /o* exch def o* l* v* proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL /v* exch def /l* exch def /o* exch def proc_trans_rgb3*_cmyn6*ioL %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 o* l* v* proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL /v* exch def /l* exch def /o* exch def proc_trans_rgb3*_cmyn6*ioL %in: olv*, out: cmyn6 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def /setcmykcolor {cmyk_olv*_cmyn4* o* l* v* proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL /v* exch def /l* exch def /o* exch def proc_trans_rgb3*_cmyn6*ioL %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 o* l* v* proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL /v* exch def /l* exch def /o* exch def proc_trans_rgb3*_cmyn6*ioL %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 o* l* v* proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL /v* exch def /l* exch def /o* exch def proc_trans_rgb3*_cmyn6*ioL %in: olv*, out: cmyn6 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def /setcmykcolor {cmyk_olv*_cmyn4* o* l* v* proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL /v* exch def /l* exch def /o* exch def proc_trans_rgb3*_cmyn6*ioL %in: olv*, out: cmyn6 c4*Fa m4*Fa y4*Fa n4*Fa setcmyknew } def } ifelse %END colorm=1 }%END %xchart>=0 {%BEG %xchart=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* sfrgbcolor } 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* sfgray } def /setcmykcolor {cmyk_olv*_cmyn4* c4*Fa m4*Fa y4*Fa n4*Fa sfcmykcolor } def } ifelse %END %xchart=0 'zm60'COLM559LT.PS cmyn6* 20120301 } if %colsep=0 cmyn6* %********************************************************************* /setgc {pop pop pop 1 exch sub sfgray} bind def /setgm {pop pop 1 exch sub sfgray pop} bind def /setgy {pop 1 exch sub sfgray pop pop} bind def /setgn {1 exch sub sfgray 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 lggray} {1 ccolor sub 0.71 mul 1 mcolor sub 0.22 mul add 1 ycolor sub 0.07 mul add sfgray} ifelse } bind def /setcmykcolorf { sfcmykcolor} 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 %END different procedures } bind def %END Procedure PROC_COLSEP_IOF 20100301 %********************************************************************* %END Procedure PROC_COLSEP_IOF different procedures 20100301 %********************************************************************* %********************************************************************* %BEG Procedure PROC_LAB_IOF %********************************************************************* /PROC_LAB_IOF {%BEG Procedure PROC_LAB_IOF %calculation of LAB data from spectral data %calculation of 48 step hue circles %calculation of rgb-LAB tables /SDx 80 array def %380 bis 775 mit deltalambda=05 /SD65 80 array def %380 bis 775 mit deltalambda=05 /SD50 80 array def %380 bis 775 mit deltalambda=05 /SDP4 80 array def %380 bis 775 mit deltalambda=05 /SDA0 80 array def %380 bis 775 mit deltalambda=05 /SDE0 80 array def %380 bis 775 mit deltalambda=05 /SDC0 80 array def %380 bis 775 mit deltalambda=05 /SDAK 80 array def %380 bis 775 mit deltalambda=05 /RA 80 array def %380 bis 770 nm /F2 240 array def %3 x 80 Daten fuer Bereich 380 bis 770nm /F2N 240 array def %normiert auf Y=100 fuer D65 und 10nm %C %C LITERATURQUELLEN LICHTARTEN %C SA,SC,SD65, CIE-DOKUMENT NR.15 FARBMESSUNG, 1971 %C TABELLE 1.1.1, SEITE 81 %C SD55,SD75, CIE-DOKUMENT NR.15 FARBMESSUNG, 1971 %C TABELLE 1.1.4, SEITE 85 %C LINEAR INTERPOLIERT VON 5 ZU 5NM %C SG,SP,SXE, DIN 5033, BLATT 7 ,SEITE 8-9 %C AUSGABE 1966 /SD65 %80 data 5 nm [50.0 52.3 54.6 68.7 82.8 87.1 91.5 92.5 93.4 90.1 86.7 95.8 104.9 110.9 117.0 117.4 117.8 116.3 114.9 115.4 115.9 112.4 108.8 109.1 109.4 108.6 107.8 106.3 104.8 106.2 107.7 106.0 104.4 104.2 104.0 102.0 100.0 98.2 96.3 96.1 95.8 92.2 88.7 89.3 90.0 89.8 89.6 88.6 87.7 85.5 83.3 83.5 83.7 81.9 80.0 80.1 80.2 81.2 82.3 80.3 78.3 74.0 69.7 70.7 71.6 73.0 74.3 68.0 61.6 65.7 69.9 72.5 75.1 69.3 63.6 55.0 46.4 56.6 66.8 65.1] def /SD50 %80 data 5 nm CIE 15.3, Seite 30; aus JE540-1N.PS [24.5 27.2 29.9 39.6 49.3 52.9 56.5 58.3 60.0 58.9 57.8 66.3 74.8 81.0 87.2 88.9 90.6 91.0 91.4 93.2 95.1 93.5 92.0 93.8 95.7 96.2 96.6 96.8 97.1 99.6 102.1 101.4 100.8 101.5 102.3 101.2 100.0 98.9 97.7 98.3 98.9 96.2 93.5 95.6 97.7 98.5 99.3 99.2 99.0 97.4 95.7 97.3 98.9 97.3 95.7 96.9 98.2 100.6 103.0 101.1 99.1 93.3 87.4 89.5 91.6 92.2 92.9 84.9 76.9 81.7 86.5 89.5 92.6 85.4 78.2 68.0 57.7 70.3 82.9 0.0] def %0.0 not used /SDA0 %80 data 5 nm CIE 15.3 Seite 30; aus JE540-1N.PS [9.80 10.90 12.09 13.35 14.71 16.15 17.68 19.29 20.99 22.79 24.67 26.64 28.70 30.85 33.09 35.41 37.81 40.30 42.87 45.52 48.24 51.04 53.91 56.85 59.86 62.93 66.06 69.25 72.50 75.79 79.13 82.52 85.95 89.41 92.91 96.44 100.00 103.58 107.18 110.80 114.44 118.08 121.73 125.39 129.04 132.70 136.35 139.99 143.62 147.24 150.84 154.42 157.98 161.52 165.03 168.51 171.96 175.38 178.77 182.12 185.43 188.70 191.93 195.12 198.26 201.36 204.41 207.41 210.36 213.27 216.12 218.92 221.67 224.36 227.00 229.59 232.12 234.59 237.01 239.37 0.0] def %0.0 not used % AUS BILDPLA.FOR aus vrbam/wrpos:KRPROG.FOR, 5987-6023 5.10.92 %C PROGRAMM ZUR BERECHNUNG DER RELATIVEN SPEKTRALEN STRAHLUNGSVERTEI- %C LUNG EINES HOHLRAUMSTRAHLERS ALS FUNKTION DER WELLENLAENGE LAMDA %C BEI GEGEBENER TEMPERATUR T %C VERWENDETE VARIABLE %C T TEMPERATUR %C C2 PLANCKSCHE KONSTANTE (=1.4388 CM K (1967)) %C LAMDA(I) WELLENLAENGE %C S(I) STRAHLUNGSVERTEILUNG DES HOHLRAUMSTRAHLERS %C %C LITERATUR OFFIZIELLE EMPFEHLUNGEN DER CIE,DEUTSCHE VERSION, %C CA. 1969, SEITE 21 UND TABELLE 1.1.1 %C %SDP4 80 array def %380 bis 775 mit deltalambda=05 % DO 50 I=1,54 % 50 S(I)=100. % 1*(560./FLOAT(LAMDA(I)))**5 % 2*(EXP(C2/(560.*10.**(-7)*T))-1.) % 3/(EXP(C2/(FLOAT(LAMDA(I))*10.**(-7)*T))-1.) %new CIE 15.3:2004, Eq. (3.1) page 2 %S(I) = [100{560/lambda}**5] [exp{(c2*10**7)/(TNC*560 )} - 1] % /[exp{(c2*10**7)/(TNC*lambda)} - 1] % exp = e {...} = 2.71 {...} %/TNC 2848 def %NLA /TNC 4000 def /EE 2.718281 def %e=mac pocket calculator /C2 1.4350000 10 7 exp mul def /lamd 80 array def 0 1 79 {%i=0,79 /i exch def /lambda 380 i 5 mul add def lamd i lambda put /E1 560 lambda div 5 exp def /E4 C2 TNC 560 mul div def /E5 C2 TNC lambda mul div def /E6 EE E4 exp def /E7 EE E5 exp def SDP4 i E1 100 mul E6 1 sub E7 1 sub div mul put } for %i=0,79 /xex 10 2 exp def /yex EE 2 exp def /SDE0 %80 data 5 nm [100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0 100.0] def %0.0 not used /SDC0 %80 data 5 nm [ 33.00 39.92 47.40 55.17 63.30 71.81 80.60 89.53 98.10 105.80 112.40 117.75 121.50 123.45 124.00 123.60 123.10 123.30 123.80 124.09 123.90 122.92 120.70 116.90 112.10 106.98 102.30 98.81 96.90 96.78 98.00 99.94 102.10 103.95 105.20 105.67 105.30 104.11 102.30 100.15 97.80 95.43 93.20 91.22 89.70 88.83 88.40 88.19 88.10 88.06 88.00 87.86 87.80 87.99 88.20 88.20 87.90 87.22 86.30 85.30 84.00 82.21 80.20 78.24 76.30 74.36 72.40 70.40 68.30 66.30 64.40 62.80 61.50 60.20 59.20 58.50 58.10 58.00 58.20 58.50 ] def %0.0 not used %C LITERATURQUELLEN SPEKTRALWERTE %C F2 CIE-DOKUMENT NR.15 FARBMESSUNG, 1971 %C TABELLE 2.1, SEITE 93-102 /F2 %3x80 data [.001368 .002236 .004243 .007650 .01431 .02319 .04351 .07763 .1344 .2148 .2839 .3285 .3483 .3481 .3362 .3187 .2908 .2511 .1954 .1421 .09564 .05795 .03201 .01470 .0049 .0024 .0093 .0291 .06327 .1096 .1655 .2257 .2904 .3597 .4334 .5121 .5945 .6784 .7621 .8425 .9163 .9786 1.0263 1.0567 1.0622 1.0456 1.0026 .9384 .8544 .7514 .6424 .5419 .4479 .3608 .2835 .2187 .1649 .1212 .0874 .0636 .04677 .03290 .02270 .01584 .01136 .00811 .00579 .004109 .002899 .002049 .001440 .0009999 .0006901 .000476 .0003323 .0002348 .0001662 .0001174 .00008308 .00005871 .000039 .000064 .00012 .000217 .000396 .00064 .00121 .00218 .004 .0073 .0116 .01684 .023 .0298 .0380 .048 .06 .0739 .09098 .1126 .139 .1693 .208 .2586 .323 .4073 .503 .6082 .71 .7932 .862 .9149 .954 .9803 .995 1.0 .995 .9786 .952 .9154 .870 .8163 .757 .6949 .631 .5668 .503 .4412 .381 .321 .265 .217 .175 .1382 .107 .0816 .061 .04458 .032 .0232 .017 .01192 .00821 .005723 .004102 .002929 .002091 .001484 .001047 .00074 .00052 .0003611 .0002492 .0001719 .00012 .0000848 .00006 .0000424 .00003 .0000212 .00645 .01055 .02005 .03621 .06785 .1102 .2074 .3713 .6456 1.0391 1.3856 1.623 1.7471 1.7826 1.7721 1.7441 1.6692 1.5281 1.2876 1.0419 .8130 .6162 .4652 .3533 .2720 .2123 .1582 .1117 .07825 .05725 .04216 .02984 .0203 .0134 .00875 .00575 .0039 .00275 .0021 .0018 .00165 .0014 .0011 .0010 .0008 .0006 .00034 .00024 .00019 .0001 .00005 .00003 .00002 .00001 % 26*0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 %10 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 %20 0.0 0.0 0.0 0.0 0.0 0.0 %26 ] def /indxi 1080 array def /indxi %indxt=0,1079 [0000 0001 0002 0003 0004 0005 0006 0007 0008 %A 0243 0244 0245 0246 0247 0248 0249 0250 0251 0486 0487 0488 0489 0490 0491 0492 0493 0494 0009 0010 0011 0012 0013 0014 0015 0016 0017 %B 0252 0253 0254 0255 0256 0257 0258 0259 0260 0495 0496 0497 0498 0499 0500 0501 0502 0503 0018 0019 0020 0021 0022 0023 0024 0025 0026 %C 0261 0262 0263 0264 0265 0266 0267 0268 0269 0504 0505 0506 0507 0508 0509 0510 0511 0512 0027 0028 0029 0030 0031 0032 0033 0034 0035 %D 0270 0271 0272 0273 0274 0275 0276 0277 0278 0513 0514 0515 0516 0517 0518 0519 0520 0521 0036 0037 0038 0039 0040 0041 0042 0043 0044 %E 0279 0280 0281 0282 0283 0284 0285 0286 0287 0522 0523 0524 0525 0526 0527 0528 0529 0530 0045 0046 0047 0048 0049 0050 0051 0052 0053 %F 0288 0289 0290 0291 0292 0293 0294 0295 0296 0531 0532 0533 0534 0535 0536 0537 0538 0539 0054 0055 0056 0057 0058 0059 0060 0061 0062 %G 0297 0298 0299 0300 0301 0302 0303 0304 0305 0540 0541 0542 0543 0544 0545 0546 0547 0548 0063 0064 0065 0066 0067 0068 0069 0070 0071 %H 0306 0307 0308 0309 0310 0311 0312 0313 0314 0549 0550 0551 0552 0553 0554 0555 0556 0557 0072 0073 0074 0075 0076 0077 0078 0079 0080 %I 0315 0316 0317 0318 0319 0320 0321 0322 0323 0558 0559 0560 0561 0562 0563 0564 0565 0566 0081 0082 0083 0084 0085 0086 0087 0088 0089 %J 0324 0325 0326 0327 0328 0329 0330 0331 0332 0567 0568 0569 0570 0571 0572 0573 0574 0575 0090 0091 0092 0093 0094 0095 0096 0097 0098 %K 0333 0334 0335 0336 0337 0338 0339 0340 0341 0576 0577 0578 0579 0580 0581 0582 0583 0584 0099 0100 0101 0102 0103 0104 0105 0106 0107 %L 0342 0343 0344 0345 0346 0347 0348 0349 0350 0585 0586 0587 0588 0589 0590 0591 0592 0593 0108 0109 0110 0111 0112 0113 0114 0115 0116 %M 0351 0352 0353 0354 0355 0356 0357 0358 0359 0594 0595 0596 0597 0598 0599 0600 0601 0602 0117 0118 0119 0120 0121 0122 0123 0124 0125 %N 0360 0361 0362 0363 0364 0365 0366 0367 0368 0603 0604 0605 0606 0607 0608 0609 0610 0611 0126 0127 0128 0129 0130 0131 0132 0133 0134 %O 0369 0370 0371 0372 0373 0374 0375 0376 0377 0612 0613 0614 0615 0616 0617 0618 0619 0620 0135 0136 0137 0138 0139 0140 0141 0142 0143 %P 0378 0379 0380 0381 0382 0383 0384 0385 0386 0621 0622 0623 0624 0625 0626 0627 0628 0629 0144 0145 0146 0147 0148 0149 0150 0151 0152 %Q 0387 0388 0389 0390 0391 0392 0393 0394 0395 0630 0631 0632 0633 0634 0635 0636 0637 0638 0153 0154 0155 0156 0157 0158 0159 0160 0161 %R 0396 0397 0398 0399 0400 0401 0402 0403 0404 0639 0640 0641 0642 0643 0644 0645 0646 0647 0162 0163 0164 0165 0166 0167 0168 0169 0170 %S 0405 0406 0407 0408 0409 0410 0411 0412 0413 0648 0649 0650 0651 0652 0653 0654 0655 0656 0171 0172 0173 0174 0175 0176 0177 0178 0179 %T 0414 0415 0416 0417 0418 0419 0420 0421 0422 0657 0658 0659 0660 0661 0662 0663 0664 0665 0180 0181 0182 0183 0184 0185 0186 0187 0188 %U 0423 0424 0425 0426 0427 0428 0429 0430 0431 0666 0667 0668 0669 0670 0671 0672 0673 0674 0189 0190 0191 0192 0193 0194 0195 0196 0197 %V 0432 0433 0434 0435 0436 0437 0438 0439 0440 0675 0676 0677 0678 0679 0680 0681 0682 0683 0198 0199 0200 0201 0202 0203 0204 0205 0206 %W 0441 0442 0443 0444 0445 0446 0447 0448 0449 0684 0685 0686 0687 0688 0689 0690 0691 0692 0207 0208 0209 0210 0211 0212 0213 0214 0215 %X 0450 0451 0452 0453 0454 0455 0456 0457 0458 0693 0694 0695 0696 0697 0698 0699 0700 0701 0216 0217 0218 0219 0220 0221 0222 0223 0224 %Y 0459 0460 0461 0462 0463 0464 0465 0466 0467 0702 0703 0704 0705 0706 0707 0708 0709 0710 0225 0226 0227 0228 0229 0230 0231 0232 0233 %Z 0468 0469 0470 0471 0472 0473 0474 0475 0476 0711 0712 0713 0714 0715 0716 0717 0718 0719 0234 0235 0236 0237 0238 0239 0240 0241 0242 %a 0477 0478 0479 0480 0481 0482 0483 0484 0485 0720 0721 0722 0723 0724 0725 0726 0727 0728 0729 0730 0731 0732 0733 0734 0735 0736 0737 %b 0810 0811 0812 0813 0814 0815 0816 0817 0818 0891 0892 0893 0894 0895 0896 0897 0898 0899 0738 0739 0740 0741 0742 0743 0744 0745 0746 %c 0819 0820 0821 0822 0823 0824 0825 0826 0827 0900 0901 0902 0903 0904 0905 0906 0907 0908 0747 0748 0749 0750 0751 0752 0753 0754 0755 %d 0828 0829 0830 0831 0832 0833 0834 0835 0836 0909 0910 0911 0912 0913 0914 0915 0916 0917 0756 0757 0758 0759 0760 0761 0762 0763 0764 %e 0837 0838 0839 0840 0841 0842 0843 0844 0845 0918 0919 0920 0921 0922 0923 0924 0925 0926 0765 0766 0767 0768 0769 0770 0771 0772 0773 %f 0846 0847 0848 0849 0850 0851 0852 0853 0854 0927 0928 0929 0930 0931 0932 0933 0934 0935 0774 0775 0776 0777 0778 0779 0780 0781 0782 %g 0855 0856 0857 0858 0859 0860 0861 0862 0863 0936 0937 0938 0939 0940 0941 0942 0943 0944 0783 0784 0785 0786 0787 0788 0789 0790 0791 %h 0864 0865 0866 0867 0868 0869 0870 0871 0872 0945 0946 0947 0948 0949 0950 0951 0952 0953 0792 0793 0794 0795 0796 0797 0798 0799 0800 %i 0873 0874 0875 0876 0877 0878 0879 0880 0881 0954 0955 0956 0957 0958 0959 0960 0961 0962 0801 0802 0803 0804 0805 0806 0807 0808 0809 %j 0882 0883 0884 0885 0886 0887 0888 0889 0890 0963 0964 0965 0966 0967 0968 0969 0970 0971 0972 0973 0974 0975 0976 0977 0978 0979 0980 %k 1008 1009 1010 1011 1012 1013 1014 1015 1016 1017 1018 1019 1020 1021 1022 1023 1072 1073 0981 0982 0983 0984 0985 0986 0987 0988 0989 %l 1024 1025 1026 1027 1028 1029 1030 1031 1032 1033 1034 1035 1036 1037 1038 1039 1074 1075 0990 0991 0992 0993 0994 0995 0996 0997 0998 %m 1040 1041 1042 1043 1044 1045 1046 1047 1048 1049 1050 1051 1052 1053 1054 1055 1076 1077 0999 1000 1001 1002 1003 1004 1005 1006 1007 %n 1056 1057 1058 1059 1060 1061 1062 1063 1064 1065 1066 1067 1068 1069 1070 1071 1078 1079 ] def %indxi=0,1079 %parameters for calculations /FileData colsep 0 eq {FILEDATA_RX0F_IOF def} if %cmyn6* colsep 1 eq {FILEDATA_RX1F_IOF def} if %cmy0* %colsep 2 eq {FileData2L def} if %cmyn4* not used %colsep 3 eq {FileData3L def} if %cmyn6* not used 0 1 79 {/i exch def %i=0,79 SDx i SD65 i get put } for %i=0,79 /YKSUM 0 def 0 2 78 {/i exch def %i=0,2,79 /YKSUM YKSUM SDx i get F2 80 i add get mul add def } for %i=0,2,79 0 2 78 {/i exch def %i=0,2,79 /i2 i 2 idiv def F2N 00 i2 add SDx i get F2 00 i add get mul YKSUM div 100 mul put F2N 40 i2 add SDx i get F2 80 i add get mul YKSUM div 100 mul put F2N 80 i2 add SDx i get F2 160 i add get mul YKSUM div 100 mul put } for %i=0,2,79 /XDx 0 def /YDx 0 def /ZDx 0 def 0 1 039 {/i exch def %i=0,39 /XDx XDx F2N 00 i add get add def /YDx YDx F2N 40 i add get add def /ZDx ZDx F2N 80 i add get add def } for %i=0,39 /Xj 1080 array def /Yj 1080 array def /Zj 1080 array def /LAB*Lj 1080 array def /LAB*aj 1080 array def /LAB*bj 1080 array def /LAB*Lja 1080 array def /LAB*aja 1080 array def /LAB*bja 1080 array def /jmax 1079 def 00 1 jmax {/j exch def %j=0,jmac 0 1 040 {/i exch def %i=0,40 i 35 le {/n i 2 add j 38 mul add def RA i colsep 0 eq {RX0F} if %cmyn6* colsep 1 eq {RX1F} if colsep 2 eq {RX2F} if colsep 3 eq {RX3F} if n get 10000 div put} {RA i RA 35 get put } ifelse } for %i=0,40 /X 0 def /Y 0 def /Z 0 def 0 1 039 {/i exch def %i=0,39 /X X F2N 00 i add get RA i get mul add def /Y Y F2N 40 i add get RA i get mul add def /Z Z F2N 80 i add get RA i get mul add def } for %i=0,39 /XQ X XDx div def /YQ Y YDx div def /ZQ Z ZDx div def XQ 0 lt {/XQ 0.00000001 def} if YQ 0 lt {/YQ 0.00000001 def} if ZQ 0 lt {/ZQ 0.00000001 def} if /LAB*L YQ 0.008856 lt {903.3 YQ mul} {YQ 0.33333333 exp 116 mul 16 sub} ifelse def /LAB*a XQ 0.008856 lt {7.787 XQ mul 16 116 div add} {XQ 0.33333333 exp} ifelse YQ 0.008856 lt {7.787 YQ mul 16 116 div add} {YQ 0.33333333 exp} ifelse sub 500 mul def /LAB*b YQ 0.008856 lt {7.787 YQ mul 16 116 div add} {YQ 0.33333333 exp} ifelse ZQ 0.008856 lt {7.787 ZQ mul 16 116 div add} {ZQ 0.33333333 exp} ifelse sub 200 mul def /k indxi j get def Xj k X put Yj k Y put Zj k Z put LAB*Lj k LAB*L put LAB*aj k LAB*a put LAB*bj k LAB*b put } for %j=0,jmax %Adaptation /L*Nio LAB*Lj 0 get def /A*Nio LAB*aj 0 get def /B*Nio LAB*bj 0 get def /L*Wio LAB*Lj 728 get def /A*Wio LAB*aj 728 get def /B*Wio LAB*bj 728 get def /A*Dio A*Wio A*Nio sub def /B*Dio B*Wio B*Nio sub def 0 1 jmax {/j exch def %j=0,jmax LAB*Lja j LAB*Lj j get put /l*CIE LAB*Lj j get L*Nio sub L*Wio L*Nio sub div def %system rel. lightn. /a*s A*Wio A*Nio sub l*CIE mul def /b*s B*Wio B*Nio sub l*CIE mul def LAB*aja j LAB*aj j get A*Nio sub a*s sub put LAB*bja j LAB*bj j get B*Nio sub b*s sub put } for %j=0,jmax /L*Nioa LAB*Lja 0 get def /A*Nioa LAB*aja 0 get def /B*Nioa LAB*bja 0 get def /L*Wioa LAB*Lja 728 get def /A*Wioa LAB*aja 728 get def /B*Wioa LAB*bja 728 get def %only 729 data used /nR 9 def %LUT size /nG 9 def /nB 9 def /nges nR nG nB mul mul def /lut 2187 array def %729x3=2187 (only 9x9x9 used) 0 1 728 {/i exch def %i=0,728 /i3 i 3 mul def lut i3 LAB*Lja i get put lut i3 1 add LAB*aja i get put lut i3 2 add LAB*bja i get put } for %i=0,729 } bind def %END Procedure PROC_LAB_IOF %*********************************************************** %END Procedure PROC_LAB_IOF %*********************************************************** %***************************************************************************** %BEG Procedure PROC_SPEC_IOF Colour special for NP-file 20120401 %***************************************************************************** %different procedures: % proc_LAB729a_to_LAB*LabCh64M and proc_LAB*LabCh64M_to_tab362_dy %*********************************************************** /proc_LAB729a_to_LAB*LabCh64M { %BEG Procedure proc_LAB729a_to_LAB*LabCh64M %transfer from proc_LAB729a_to_LAB*LabCh64M, %9x9x9=729 steps used for LAB729a %requires /LAB*LabCh64M 64 array def %requires in addition /LAB729a 729 array def /LAB*Ldd64M 64 array def /LAB*add64M 64 array def /LAB*bdd64M 64 array def /LAB*Cdd64M 64 array def /LAB*hdd64M 64 array def /hab*dd64M 64 array def /M1jx 49 array def 0 1 5 {/xtonj exch def %xtonj=0,5 0 1 7 {/j exch def %j=0,7 /ja xtonj 8 mul j add def xtonj 0 eq {/jx 648 j 09 mul add def} if %see O00Y-O83Y, -0 xtonj 1 eq {/jx 720 j 81 mul sub def} if %see Y00L-Y83L, -81 xtonj 2 eq {/jx 072 j add def} if %see L00C-L83C, +01 xtonj 3 eq {/jx 080 j 09 mul sub def} if %see C00V-C83V, -09 xtonj 4 eq {/jx 008 j 81 mul add def} if %see V00M-V83M, -81 xtonj 5 eq {/jx 656 j sub def} if %see M00O-M83O, +01 LAB*Ldd64M ja LAB*Lja jx get put LAB*add64M ja LAB*aja jx get put LAB*bdd64M ja LAB*bja jx get put LAB*Cdd64M ja LAB*add64M ja get dup mul LAB*bdd64M ja get dup mul add sqrt put LAB*hdd64M ja LAB*bdd64M ja get LAB*add64M ja get 0.0001 add atan put xtonj 5 eq LAB*hdd64M ja get 90 le and {LAB*hdd64M ja LAB*hdd64M ja get 360 add put} if M1jx ja jx put } for %j=0,7 } for %xtonj=0,5 M1jx 48 M1jx 0 get put 0 1 15 {/i exch def %i=0,15 LAB*Ldd64M 48 i add LAB*Ldd64M i get put LAB*add64M 48 i add LAB*add64M i get put LAB*bdd64M 48 i add LAB*bdd64M i get put LAB*Cdd64M 48 i add LAB*Cdd64M i get put LAB*hdd64M 48 i add LAB*hdd64M i get 360 add put } for %i=1,15 0 1 63 {/i exch def %i=0,63 hab*dd64M i LAB*hdd64M i get put } for %i=0,63 %data test according to increasing hue angle and appropriate correction /xtesthuea -1 def /xtesthuei 64 array def 0 1 48 {/i exch def %i=0,49 hab*dd64M i get hab*dd64M i 1 add get gt {/xtesthuea xtesthuea 1 add def xtesthuei xtesthuea i put hab*dd64M i 1 add hab*dd64M i get put LAB*Ldd64M i 1 add LAB*Ldd64M i get put LAB*add64M i 1 add LAB*add64M i get put LAB*bdd64M i 1 add LAB*bdd64M i get put LAB*Cdd64M i 1 add LAB*Cdd64M i get put LAB*hdd64M i 1 add LAB*hdd64M i get put } if } for %i=0,49 } bind def %END proc_LAB729a_to_LAB*LabCh64M %*********************************************************** /proc_LAB*LabCh64M_to_tab362_dy { %BEG procedure proc_LAB*LabCh64M_to_tab362_dy /LAB*e 40 array def %8x5=40 LabCh* /LAB*e [39.92 58.74 27.99 0.0 0.0 %0 00_04 R CIE No.09 elementary in LAB 81.26 -2.89 71.56 0.0 0.0 %1 05_09 J CIE No.10 52.23 -42.42 13.60 0.0 0.0 %2 10_14 G CIE No.11 0.0 0.0 0.0 0.0 0.0 %3 15_19 Cgb to be calculated 30.57 1.41 -46.47 0.0 0.0 %4 20_24 B CIE No.12 0.0 0.0 0.0 0.0 0.0 %5 25_29 Mbr to be calculated 39.92 58.74 27.99 0.0 0.0 %6 30_34 Re+360 to be calculated 81.26 -2.89 71.56 0.0 0.0 %7 35_39 Ye+360 to be calculated ] def %add no. 03_04 Re LAB*e 03 LAB*e 01 get dup mul LAB*e 02 get dup mul add sqrt put LAB*e 04 LAB*e 02 get LAB*e 01 get 0.0001 add atan put %add no. 08_09 Ye LAB*e 08 LAB*e 06 get dup mul LAB*e 07 get dup mul add sqrt put LAB*e 09 LAB*e 07 get LAB*e 06 get 0.0001 add atan put %add no. 13_14 Ge LAB*e 13 LAB*e 11 get dup mul LAB*e 12 get dup mul add sqrt put LAB*e 14 LAB*e 12 get LAB*e 11 get 0.0001 add atan put %add no. 23_24 Be LAB*e 23 LAB*e 21 get dup mul LAB*e 22 get dup mul add sqrt put LAB*e 24 LAB*e 22 get LAB*e 21 get 0.0001 add atan put %add no. 33_34 Re+360 LAB*e 33 LAB*e 31 get dup mul LAB*e 32 get dup mul add sqrt put LAB*e 34 LAB*e 32 get LAB*e 31 get 0.0001 add atan 360 add put %add no. 38_39 Ye+360 LAB*e 38 LAB*e 36 get dup mul LAB*e 37 get dup mul add sqrt put LAB*e 39 LAB*e 37 get LAB*e 36 get 0.0001 add atan 360 add put %new no. 15_19 Cgb with Ge_Be LAB*e 19 LAB*e 14 get LAB*e 24 get add 0.5 mul put %hab LAB*e 18 LAB*e 13 get LAB*e 23 get add 0.5 mul put %C*ab LAB*e 15 LAB*e 10 get LAB*e 20 get add 0.5 mul put %L* LAB*e 16 LAB*e 18 get LAB*e 19 get cos mul put %a* LAB*e 17 LAB*e 18 get LAB*e 19 get sin mul put %b* %new no. 25_29 Mbr with Be_Re+360 LAB*e 29 LAB*e 24 get LAB*e 34 get add 0.5 mul put %hab LAB*e 28 LAB*e 23 get LAB*e 33 get add 0.5 mul put %C*ab LAB*e 25 LAB*e 20 get LAB*e 00 get add 0.5 mul put %L* LAB*e 26 LAB*e 28 get LAB*e 29 get cos mul put %a* LAB*e 27 LAB*e 28 get LAB*e 29 get sin mul put %b* /LAB*He 8 array def 0 1 7 {/i exch def %i=0,7 LAB*He i LAB*e i 5 mul 4 add get put } for %i=0,7 /hab*de64M 50 array def 0 1 47 {/i exch def %i=0,47 /i8 i 8 idiv def /i8d i i8 8 mul sub def /dLAB*He LAB*He i8 1 add get LAB*He i8 get sub 8 div def hab*de64M i LAB*He i8 get dLAB*He i8d mul add put } for %i=0,47 hab*de64M 48 hab*de64M 0 get 360 add put hab*de64M 49 hab*de64M 1 get 360 add put /LAB*Hs 8 array def /LAB*Hs [30. 90. 150. 210. 270. 330. 390. 450.] def /hab*ds64M 50 array def 0 1 47 {/i exch def %i=0,47 /i8 i 8 idiv def /i8d i i8 8 mul sub def /dLAB*Hs LAB*Hs i8 1 add get LAB*Hs i8 get sub 8 div def hab*ds64M i LAB*Hs i8 get dLAB*Hs i8d mul add put } for %i=0,47 hab*ds64M 48 hab*ds64M 0 get 360 add put hab*ds64M 49 hab*ds64M 1 get 360 add put %***************** calculation of LAB*LabChd362Mi and rgb*dd362Mi %***************** for 362 elementary hue angles /LAB*Ldd362Mi 362 array def /LAB*add362Mi 362 array def /LAB*bdd362Mi 362 array def /LAB*Cdd362Mi 362 array def /LAB*hdd362Mi 362 array def /r*dd362Mi 362 array def /g*dd362Mi 362 array def /b*dd362Mi 362 array def %******default rgb-input data for output of device colours /r*dd64M 64 array def /r*dd64M [1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %R 1.000 0.875 0.750 0.625 0.500 0.375 0.250 0.125 %J 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %G 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %C 0.000 0.125 0.250 0.375 0.500 0.625 0.750 0.875 %B 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %M 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %R 1.000 0.875 0.750 0.625 0.500 0.375 0.250 0.125 %J ] def /g*dd64M 64 array def /g*dd64M [0.000 0.125 0.250 0.375 0.500 0.625 0.750 0.875 %R 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %J 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %G 1.000 0.875 0.750 0.625 0.500 0.375 0.250 0.125 %C 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %B 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %M 0.000 0.125 0.250 0.375 0.500 0.625 0.750 0.875 %R 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %J ] def /b*dd64M 64 array def /b*dd64M [0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %R 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %J 0.000 0.125 0.250 0.375 0.500 0.625 0.750 0.875 %G 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %C 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %B 1.000 0.875 0.750 0.625 0.500 0.375 0.250 0.125 %M 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %R 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %J ] def %calculate all data of 16+1=17 step elementary colour circle /ind64M 17 array def /ind64M %R00Y R25Y R50Y R75Y Y00G Y25G Y50G Y75G [0 2 4 6 8 10 12 14 %G00B G25B G50B G75G B00R B25R B50R B75R R00Y 16 20 24 28 32 36 40 44 0 ] def %actual 16 step device circle + N + W /r*dd18M 18 array def /g*dd18M 18 array def /b*dd18M 18 array def 0 1 15 {/i exch def %i=0,15 /indi ind64M i get def r*dd18M i r*dd64M indi get put %16 device colours g*dd18M i g*dd64M indi get put b*dd18M i b*dd64M indi get put } for %i=0,15 r*dd18M 16 0 put %N g*dd18M 16 0 put b*dd18M 16 0 put r*dd18M 17 1 put %W g*dd18M 17 1 put b*dd18M 17 1 put %actual 6 step device circle + N + W /r*dd08M 08 array def /g*dd08M 08 array def /b*dd08M 08 array def 0 1 5 {/i exch def %i=0,5 r*dd08M i r*dd64M i 8 mul get put %6 device colours g*dd08M i g*dd64M i 8 mul get put b*dd08M i b*dd64M i 8 mul get put } for %i=0,5 r*dd08M 6 0 put %N g*dd08M 6 0 put b*dd08M 6 0 put r*dd08M 7 1 put %W g*dd08M 7 1 put b*dd08M 7 1 put 0 1 361 {/i exch def %i=0,361 %default only for test r*dd362Mi i 0 put %of irregularities g*dd362Mi i 0 put b*dd362Mi i 0 put LAB*Ldd362Mi i 0.0001 put LAB*add362Mi i 0 put LAB*bdd362Mi i 0 put LAB*Cdd362Mi i 0 put LAB*hdd362Mi i 0 put } for %i=0,361 % s-data 030,0 -> LAB*hdd64M 0 get -> LAB*Ldd362Mi 30,0 put: LAB*hdd362Mi=40 % s-data 037,5 -> LAB*hdd64M 1 get -> LAB*Ldd362Mi 37,5 put: LAB*hdd362Mi=41,3 % s-data 045,0 -> LAB*hdd64M 2 get -> LAB*Ldd362Mi 45,0 put: LAB*hdd362Mi=44,6 % s-data 052,5 -> LAB*hdd64M 3 get -> LAB*Ldd362Mi 52,5 put: LAB*hdd362Mi=50,7 %... % s-data 090,0 -> LAB*hdd64M 8 get -> LAB*Ldd362Mi 90,0 put: LAB*hdd362Mi=102,8 % s-data 330,0 -> LAB*hdd64M 41 get -> LAB*Ldd362Mi 330,0 put: LAB*hdd362Mi=328 % s-data 337,5 -> LAB*hdd64M 42 get -> LAB*Ldd362Mi 337,5 put: LAB*hdd362Mi=334 % s-data 345,0 -> LAB*hdd64M 43 get -> LAB*Ldd362Mi 345,0 put: LAB*hdd362Mi=341 % s-data 352,5 -> LAB*hdd64M 44 get -> LAB*Ldd362Mi 352,5 put: LAB*hdd362Mi=351 % s-data 360,0 -> LAB*hdd64M 45 get -> LAB*Ldd362Mi 360,0 put: LAB*hdd362Mi=352 %... % s-data 390,0 -> LAB*hdd64M 49 get -> LAB*Ldd362Mi 390,0 put: LAB*hdd362Mi=400 0 15 345 {/i exch def %i=0,15,345 /ix00 i 15 idiv 2 mul def /ix01 ix00 1 add def /ix02 ix00 2 add def 0 1 14 {/j exch def %j=0,14 j 07 le {%j<=7 /XIE j 7.5 div def /i0 i j add def /ix0 ix00 def /ix1 ix01 def }%j<=7 {%j>7 /XIE j 8 sub 0.5 add 7.5 div def /i0 i j add def /ix0 ix01 def /ix1 ix02 def } ifelse %j>7 LAB*Ldd362Mi i0 LAB*Ldd64M ix0 get LAB*Ldd64M ix1 get LAB*Ldd64M ix0 get sub XIE mul add put LAB*Cdd362Mi i0 LAB*Cdd64M ix0 get LAB*Cdd64M ix1 get LAB*Cdd64M ix0 get sub XIE mul add put LAB*hdd362Mi i0 LAB*hdd64M ix0 get LAB*hdd64M ix1 get LAB*hdd64M ix0 get sub XIE mul add dup 90 gt i0 45 le and {360 sub} if put LAB*add362Mi i0 LAB*Cdd362Mi i0 get LAB*hdd362Mi i0 get cos mul put LAB*bdd362Mi i0 LAB*Cdd362Mi i0 get LAB*hdd362Mi i0 get sin mul put r*dd362Mi i0 r*dd64M ix0 get r*dd64M ix1 get r*dd64M ix0 get sub XIE mul add put g*dd362Mi i0 g*dd64M ix0 get g*dd64M ix1 get g*dd64M ix0 get sub XIE mul add put b*dd362Mi i0 b*dd64M ix0 get b*dd64M ix1 get b*dd64M ix0 get sub XIE mul add put } for %j=0,14 } for %i0=0,15,345 0 1 1 {/i exch def %i=0,1 LAB*Ldd362Mi 360 i add LAB*Ldd362Mi i get put LAB*add362Mi 360 i add LAB*add362Mi i get put LAB*bdd362Mi 360 i add LAB*bdd362Mi i get put LAB*Cdd362Mi 360 i add LAB*Cdd362Mi i get put LAB*hdd362Mi 360 i add LAB*hdd362Mi i get 360 add put r*dd362Mi 360 i add r*dd362Mi i get put g*dd362Mi 360 i add g*dd362Mi i get put b*dd362Mi 360 i add b*dd362Mi i get put } for %i=0,1 /hab*dd362Fi 362 array def 0 1 361 {/i exch def %i=0,361 hab*dd362Fi i LAB*hdd362Mi i get put %floating point F } for %i=0,361 %***************** calculation of hab*ds362Mi %integer %***************** for 362 standard hue angles /hab*ds362Mi 362 array def 0 1 361 {/i exch def %i=0,361 %range 30..391 hab*ds362Mi i 30 i add put %always integer } for %i=0,361 %***************** calculation of LAB*LabChs362Mi and rgb*ds362Mi %***************** for 362 device hue angles /LAB*Lds362Mi 362 array def /LAB*ads362Mi 362 array def /LAB*bds362Mi 362 array def /LAB*Cds362Mi 362 array def /LAB*hds362Mi 362 array def /r*ds362Mi 362 array def /g*ds362Mi 362 array def /b*ds362Mi 362 array def 0 1 361 {/i exch def %i=0,361 %default only for test r*ds362Mi i 0 put %of irregularities g*ds362Mi i 0 put b*ds362Mi i 0 put LAB*Lds362Mi i 0.0001 put LAB*ads362Mi i 0 put LAB*bds362Mi i 0 put LAB*Cds362Mi i 0 put LAB*hds362Mi i 0 put } for %i=0,361 0 1 359 {/i0 exch def %i=0,359 /i0i hab*ds362Mi i0 get def %integer range 30...390 i0i hab*dd362Fi 0 get lt {/i0i i0i 360 add def} if 0 1 47 {/ix0 exch def %ix0=0,48 /ix1 ix0 1 add def i0i LAB*hdd64M ix0 get sub 0 ge i0i LAB*hdd64M ix1 get sub 0 lt and {%ge..lt /XIE i0i LAB*hdd64M ix0 get sub LAB*hdd64M ix1 get LAB*hdd64M ix0 get sub div def LAB*Lds362Mi i0 LAB*Ldd64M ix0 get LAB*Ldd64M ix1 get LAB*Ldd64M ix0 get sub XIE mul add put LAB*Cds362Mi i0 LAB*Cdd64M ix0 get LAB*Cdd64M ix1 get LAB*Cdd64M ix0 get sub XIE mul add put LAB*hds362Mi i0 LAB*hdd64M ix0 get LAB*hdd64M ix1 get LAB*hdd64M ix0 get sub XIE mul add dup 90 gt i0 45 le and {360 sub} if put LAB*ads362Mi i0 LAB*Cds362Mi i0 get LAB*hds362Mi i0 get cos mul put LAB*bds362Mi i0 LAB*Cds362Mi i0 get LAB*hds362Mi i0 get sin mul put r*ds362Mi i0 r*dd64M ix0 get r*dd64M ix1 get r*dd64M ix0 get sub XIE mul add put g*ds362Mi i0 g*dd64M ix0 get g*dd64M ix1 get g*dd64M ix0 get sub XIE mul add put b*ds362Mi i0 b*dd64M ix0 get b*dd64M ix1 get b*dd64M ix0 get sub XIE mul add put exit } if %ge..lt } for %ix0=0,47 } for %i=0,359 0 1 1 {/i exch def %i=0,1 LAB*Lds362Mi 360 i add LAB*Lds362Mi i get put LAB*ads362Mi 360 i add LAB*ads362Mi i get put LAB*bds362Mi 360 i add LAB*bds362Mi i get put LAB*Cds362Mi 360 i add LAB*Cds362Mi i get put LAB*hds362Mi 360 i add LAB*hds362Mi i get 360 add put r*ds362Mi 360 i add r*ds362Mi i get put g*ds362Mi 360 i add g*ds362Mi i get put b*ds362Mi 360 i add b*ds362Mi i get put } for %i=0,1 %***************** calculation of hab*de382Fi %***************** for 362 elementary hue angles /hab*de382Fi 382 array def %floating point %range 26..386 30 1 389 {/i exch def %i=30,389 /im30 i 30 sub def /hab*sM i def %alphas = [habs - LAB*Hs(h)]/[LAB*Hs(n+1) - LAB*Hs(n)] % = [habs - LAB*Hs(h)]/60 %habe = LAB*He(n) + alphas [LAB*He(n+1) - LAB*He(n)] %use of LAB*He 0..7 Re_to_Ye i 030 ge i 089 le and {/ipan0 0 def /ipan1 1 def} if i 090 ge i 149 le and {/ipan0 1 def /ipan1 2 def} if i 150 ge i 209 le and {/ipan0 2 def /ipan1 3 def} if i 210 ge i 269 le and {/ipan0 3 def /ipan1 4 def} if i 270 ge i 329 le and {/ipan0 4 def /ipan1 5 def} if i 330 ge i 359 le and {/ipan0 5 def /ipan1 6 def} if i 360 ge i 389 le and {/ipan0 6 def /ipan1 7 def} if /alphas {hab*sM LAB*Hs ipan0 get sub 60 div} bind def /habe {LAB*He ipan0 get LAB*He ipan1 get LAB*He ipan0 get sub alphas mul add} bind def hab*de382Fi im30 habe put %floating point } for %i=30,389 0 1 20 {/i exch def %i=0,20 hab*de382Fi 360 i add hab*de382Fi i get 360 add put } for %i=0,20 %***************** calculation LAB*LabChe32Mi and rgb*de362Mi %***************** for 362 elementary hue angles /LAB*Lde362Mi 362 array def /LAB*ade362Mi 362 array def /LAB*bde362Mi 362 array def /LAB*Cde362Mi 362 array def /LAB*hde362Mi 362 array def /r*de362Mi 362 array def /g*de362Mi 362 array def /b*de362Mi 362 array def 0 1 361 {/i exch def %i=0,361 %default only for test r*de362Mi i 0 put %of irregularities g*de362Mi i 0 put b*de362Mi i 0 put LAB*Lde362Mi i 0.0001 put LAB*ade362Mi i 0 put LAB*bde362Mi i 0 put LAB*Cde362Mi i 0 put LAB*hde362Mi i 0 put } for %i=0,361 0 1 359 {/i0 exch def %i=0,359 /i0i hab*de382Fi i0 get def %range 26...386 i0i hab*dd362Fi 0 get lt {/i0i i0i 360 add def} if 0 1 47 {/ix0 exch def %ix0=0,48 /ix1 ix0 1 add def i0i LAB*hdd64M ix0 get sub 0 ge i0i LAB*hdd64M ix1 get sub 0 lt and {%ge..lt /XIE i0i LAB*hdd64M ix0 get sub LAB*hdd64M ix1 get LAB*hdd64M ix0 get sub div def LAB*Lde362Mi i0 LAB*Ldd64M ix0 get LAB*Ldd64M ix1 get LAB*Ldd64M ix0 get sub XIE mul add put LAB*Cde362Mi i0 LAB*Cdd64M ix0 get LAB*Cdd64M ix1 get LAB*Cdd64M ix0 get sub XIE mul add put LAB*hde362Mi i0 LAB*hdd64M ix0 get LAB*hdd64M ix1 get LAB*hdd64M ix0 get sub XIE mul add dup 90 gt i0 45 le and {360 sub} if put LAB*ade362Mi i0 LAB*Cde362Mi i0 get LAB*hde362Mi i0 get cos mul put LAB*bde362Mi i0 LAB*Cde362Mi i0 get LAB*hde362Mi i0 get sin mul put r*de362Mi i0 r*dd64M ix0 get r*dd64M ix1 get r*dd64M ix0 get sub XIE mul add put g*de362Mi i0 g*dd64M ix0 get g*dd64M ix1 get g*dd64M ix0 get sub XIE mul add put b*de362Mi i0 b*dd64M ix0 get b*dd64M ix1 get b*dd64M ix0 get sub XIE mul add put exit } if %ge..lt } for %ix0=0,47 } for %i=0,359 0 1 1 {/i exch def %i=0,1 LAB*Lde362Mi 360 i add LAB*Lde362Mi i get put LAB*ade362Mi 360 i add LAB*ade362Mi i get put LAB*bde362Mi 360 i add LAB*bde362Mi i get put LAB*Cde362Mi 360 i add LAB*Cde362Mi i get put LAB*hde362Mi 360 i add LAB*hde362Mi i get 360 add put r*de362Mi 360 i add r*de362Mi i get put g*de362Mi 360 i add g*de362Mi i get put b*de362Mi 360 i add b*de362Mi i get put } for %i=0,1 %special LAB* data calculation of 17 step colour circle %needs LAB*LabCh64M, hab*dd64M /ind64M 17 array def /ind64M %R00Y R25Y R50Y R75Y Y00G Y25G Y50G Y75G [0 2 4 6 8 10 12 14 %G00B G25B G50B G75G B00R B25R B50R B75R R00Y 16 20 24 28 32 36 40 44 0 ] def /LAB*Ldd18M 17 array def /LAB*add18M 17 array def /LAB*bdd18M 17 array def /LAB*Cdd18M 17 array def /LAB*hdd18M 17 array def /hab*dd18M 17 array def 0 1 16 {/i exch def %i=0,16 /indi ind64M i get def LAB*Ldd18M i LAB*Ldd64M indi get put LAB*add18M i LAB*add64M indi get put LAB*bdd18M i LAB*bdd64M indi get put LAB*Cdd18M i LAB*Cdd64M indi get put LAB*hdd18M i LAB*hdd64M indi get put hab*dd18M i hab*dd64M indi get put } for %i=0,16 } bind def %END proc_LAB*LabCh64M_to_tab362_dy %***************************************************************************** %END Procedure PROC_SPEC_IOF Colour special for NP-file 20120401 %***************************************************************************** /FileDaten (Offset standard print; separation cmyn6*, D65) def /FileDatde (Offset\255Normdruck; Separation cmyn6*, D65) def /RGB0_F 3240 array def %1080*3 /RGB0_F [%1000 x rgb* nr. pos 1080 colours 0000 0000 0000 %0000 A01 0000 0000 0125 %0001 A02 0000 0000 0250 %0002 A03 0000 0000 0375 %0003 A04 0000 0000 0500 %0004 A05 0000 0000 0625 %0005 A06 0000 0000 0750 %0006 A07 0000 0000 0875 %0007 A08 0000 0000 1000 %0008 A09 0000 0125 0000 %0009 B01 0000 0125 0125 %0010 B02 0000 0125 0250 %0011 B03 0000 0125 0375 %0012 B04 0000 0125 0500 %0013 B05 0000 0125 0625 %0014 B06 0000 0125 0750 %0015 B07 0000 0125 0875 %0016 B08 0000 0125 1000 %0017 B09 0000 0250 0000 %0018 C01 0000 0250 0125 %0019 C02 0000 0250 0250 %0020 C03 0000 0250 0375 %0021 C04 0000 0250 0500 %0022 C05 0000 0250 0625 %0023 C06 0000 0250 0750 %0024 C07 0000 0250 0875 %0025 C08 0000 0250 1000 %0026 C09 0000 0375 0000 %0027 D01 0000 0375 0125 %0028 D02 0000 0375 0250 %0029 D03 0000 0375 0375 %0030 D04 0000 0375 0500 %0031 D05 0000 0375 0625 %0032 D06 0000 0375 0750 %0033 D07 0000 0375 0875 %0034 D08 0000 0375 1000 %0035 D09 0000 0500 0000 %0036 E01 0000 0500 0125 %0037 E02 0000 0500 0250 %0038 E03 0000 0500 0375 %0039 E04 0000 0500 0500 %0040 E05 0000 0500 0625 %0041 E06 0000 0500 0750 %0042 E07 0000 0500 0875 %0043 E08 0000 0500 1000 %0044 E09 0000 0625 0000 %0045 F01 0000 0625 0125 %0046 F02 0000 0625 0250 %0047 F03 0000 0625 0375 %0048 F04 0000 0625 0500 %0049 F05 0000 0625 0625 %0050 F06 0000 0625 0750 %0051 F07 0000 0625 0875 %0052 F08 0000 0625 1000 %0053 F09 0000 0750 0000 %0054 G01 0000 0750 0125 %0055 G02 0000 0750 0250 %0056 G03 0000 0750 0375 %0057 G04 0000 0750 0500 %0058 G05 0000 0750 0625 %0059 G06 0000 0750 0750 %0060 G07 0000 0750 0875 %0061 G08 0000 0750 1000 %0062 G09 0000 0875 0000 %0063 H01 0000 0875 0125 %0064 H02 0000 0875 0250 %0065 H03 0000 0875 0375 %0066 H04 0000 0875 0500 %0067 H05 0000 0875 0625 %0068 H06 0000 0875 0750 %0069 H07 0000 0875 0875 %0070 H08 0000 0875 1000 %0071 H09 0000 1000 0000 %0072 I01 0000 1000 0125 %0073 I02 0000 1000 0250 %0074 I03 0000 1000 0375 %0075 I04 0000 1000 0500 %0076 I05 0000 1000 0625 %0077 I06 0000 1000 0750 %0078 I07 0000 1000 0875 %0079 I08 0000 1000 1000 %0080 I09 0125 0000 0000 %0081 J01 0125 0000 0125 %0082 J02 0125 0000 0250 %0083 J03 0125 0000 0375 %0084 J04 0125 0000 0500 %0085 J05 0125 0000 0625 %0086 J06 0125 0000 0750 %0087 J07 0125 0000 0875 %0088 J08 0125 0000 1000 %0089 J09 0125 0125 0000 %0090 K01 0125 0125 0125 %0091 K02 0125 0125 0250 %0092 K03 0125 0125 0375 %0093 K04 0125 0125 0500 %0094 K05 0125 0125 0625 %0095 K06 0125 0125 0750 %0096 K07 0125 0125 0875 %0097 K08 0125 0125 1000 %0098 K09 0125 0250 0000 %0099 L01 0125 0250 0125 %0100 L02 0125 0250 0250 %0101 L03 0125 0250 0375 %0102 L04 0125 0250 0500 %0103 L05 0125 0250 0625 %0104 L06 0125 0250 0750 %0105 L07 0125 0250 0875 %0106 L08 0125 0250 1000 %0107 L09 0125 0375 0000 %0108 M01 0125 0375 0125 %0109 M02 0125 0375 0250 %0110 M03 0125 0375 0375 %0111 M04 0125 0375 0500 %0112 M05 0125 0375 0625 %0113 M06 0125 0375 0750 %0114 M07 0125 0375 0875 %0115 M08 0125 0375 1000 %0116 M09 0125 0500 0000 %0117 N01 0125 0500 0125 %0118 N02 0125 0500 0250 %0119 N03 0125 0500 0375 %0120 N04 0125 0500 0500 %0121 N05 0125 0500 0625 %0122 N06 0125 0500 0750 %0123 N07 0125 0500 0875 %0124 N08 0125 0500 1000 %0125 N09 0125 0625 0000 %0126 O01 0125 0625 0125 %0127 O02 0125 0625 0250 %0128 O03 0125 0625 0375 %0129 O04 0125 0625 0500 %0130 O05 0125 0625 0625 %0131 O06 0125 0625 0750 %0132 O07 0125 0625 0875 %0133 O08 0125 0625 1000 %0134 O09 0125 0750 0000 %0135 P01 0125 0750 0125 %0136 P02 0125 0750 0250 %0137 P03 0125 0750 0375 %0138 P04 0125 0750 0500 %0139 P05 0125 0750 0625 %0140 P06 0125 0750 0750 %0141 P07 0125 0750 0875 %0142 P08 0125 0750 1000 %0143 P09 0125 0875 0000 %0144 Q01 0125 0875 0125 %0145 Q02 0125 0875 0250 %0146 Q03 0125 0875 0375 %0147 Q04 0125 0875 0500 %0148 Q05 0125 0875 0625 %0149 Q06 0125 0875 0750 %0150 Q07 0125 0875 0875 %0151 Q08 0125 0875 1000 %0152 Q09 0125 1000 0000 %0153 R01 0125 1000 0125 %0154 R02 0125 1000 0250 %0155 R03 0125 1000 0375 %0156 R04 0125 1000 0500 %0157 R05 0125 1000 0625 %0158 R06 0125 1000 0750 %0159 R07 0125 1000 0875 %0160 R08 0125 1000 1000 %0161 R09 0250 0000 0000 %0162 S01 0250 0000 0125 %0163 S02 0250 0000 0250 %0164 S03 0250 0000 0375 %0165 S04 0250 0000 0500 %0166 S05 0250 0000 0625 %0167 S06 0250 0000 0750 %0168 S07 0250 0000 0875 %0169 S08 0250 0000 1000 %0170 S09 0250 0125 0000 %0171 T01 0250 0125 0125 %0172 T02 0250 0125 0250 %0173 T03 0250 0125 0375 %0174 T04 0250 0125 0500 %0175 T05 0250 0125 0625 %0176 T06 0250 0125 0750 %0177 T07 0250 0125 0875 %0178 T08 0250 0125 1000 %0179 T09 0250 0250 0000 %0180 U01 0250 0250 0125 %0181 U02 0250 0250 0250 %0182 U03 0250 0250 0375 %0183 U04 0250 0250 0500 %0184 U05 0250 0250 0625 %0185 U06 0250 0250 0750 %0186 U07 0250 0250 0875 %0187 U08 0250 0250 1000 %0188 U09 0250 0375 0000 %0189 V01 0250 0375 0125 %0190 V02 0250 0375 0250 %0191 V03 0250 0375 0375 %0192 V04 0250 0375 0500 %0193 V05 0250 0375 0625 %0194 V06 0250 0375 0750 %0195 V07 0250 0375 0875 %0196 V08 0250 0375 1000 %0197 V09 0250 0500 0000 %0198 W01 0250 0500 0125 %0199 W02 0250 0500 0250 %0200 W03 0250 0500 0375 %0201 W04 0250 0500 0500 %0202 W05 0250 0500 0625 %0203 W06 0250 0500 0750 %0204 W07 0250 0500 0875 %0205 W08 0250 0500 1000 %0206 W09 0250 0625 0000 %0207 X01 0250 0625 0125 %0208 X02 0250 0625 0250 %0209 X03 0250 0625 0375 %0210 X04 0250 0625 0500 %0211 X05 0250 0625 0625 %0212 X06 0250 0625 0750 %0213 X07 0250 0625 0875 %0214 X08 0250 0625 1000 %0215 X09 0250 0750 0000 %0216 Y01 0250 0750 0125 %0217 Y02 0250 0750 0250 %0218 Y03 0250 0750 0375 %0219 Y04 0250 0750 0500 %0220 Y05 0250 0750 0625 %0221 Y06 0250 0750 0750 %0222 Y07 0250 0750 0875 %0223 Y08 0250 0750 1000 %0224 Y09 0250 0875 0000 %0225 Z01 0250 0875 0125 %0226 Z02 0250 0875 0250 %0227 Z03 0250 0875 0375 %0228 Z04 0250 0875 0500 %0229 Z05 0250 0875 0625 %0230 Z06 0250 0875 0750 %0231 Z07 0250 0875 0875 %0232 Z08 0250 0875 1000 %0233 Z09 0250 1000 0000 %0234 a01 0250 1000 0125 %0235 a02 0250 1000 0250 %0236 a03 0250 1000 0375 %0237 a04 0250 1000 0500 %0238 a05 0250 1000 0625 %0239 a06 0250 1000 0750 %0240 a07 0250 1000 0875 %0241 a08 0250 1000 1000 %0242 a09 0375 0000 0000 %0243 A10 0375 0000 0125 %0244 A11 0375 0000 0250 %0245 A12 0375 0000 0375 %0246 A13 0375 0000 0500 %0247 A14 0375 0000 0625 %0248 A15 0375 0000 0750 %0249 A16 0375 0000 0875 %0250 A17 0375 0000 1000 %0251 A18 0375 0125 0000 %0252 B10 0375 0125 0125 %0253 B11 0375 0125 0250 %0254 B12 0375 0125 0375 %0255 B13 0375 0125 0500 %0256 B14 0375 0125 0625 %0257 B15 0375 0125 0750 %0258 B16 0375 0125 0875 %0259 B17 0375 0125 1000 %0260 B18 0375 0250 0000 %0261 C10 0375 0250 0125 %0262 C11 0375 0250 0250 %0263 C12 0375 0250 0375 %0264 C13 0375 0250 0500 %0265 C14 0375 0250 0625 %0266 C15 0375 0250 0750 %0267 C16 0375 0250 0875 %0268 C17 0375 0250 1000 %0269 C18 0375 0375 0000 %0270 D10 0375 0375 0125 %0271 D11 0375 0375 0250 %0272 D12 0375 0375 0375 %0273 D13 0375 0375 0500 %0274 D14 0375 0375 0625 %0275 D15 0375 0375 0750 %0276 D16 0375 0375 0875 %0277 D17 0375 0375 1000 %0278 D18 0375 0500 0000 %0279 E10 0375 0500 0125 %0280 E11 0375 0500 0250 %0281 E12 0375 0500 0375 %0282 E13 0375 0500 0500 %0283 E14 0375 0500 0625 %0284 E15 0375 0500 0750 %0285 E16 0375 0500 0875 %0286 E17 0375 0500 1000 %0287 E18 0375 0625 0000 %0288 F10 0375 0625 0125 %0289 F11 0375 0625 0250 %0290 F12 0375 0625 0375 %0291 F13 0375 0625 0500 %0292 F14 0375 0625 0625 %0293 F15 0375 0625 0750 %0294 F16 0375 0625 0875 %0295 F17 0375 0625 1000 %0296 F18 0375 0750 0000 %0297 G10 0375 0750 0125 %0298 G11 0375 0750 0250 %0299 G12 0375 0750 0375 %0300 G13 0375 0750 0500 %0301 G14 0375 0750 0625 %0302 G15 0375 0750 0750 %0303 G16 0375 0750 0875 %0304 G17 0375 0750 1000 %0305 G18 0375 0875 0000 %0306 H10 0375 0875 0125 %0307 H11 0375 0875 0250 %0308 H12 0375 0875 0375 %0309 H13 0375 0875 0500 %0310 H14 0375 0875 0625 %0311 H15 0375 0875 0750 %0312 H16 0375 0875 0875 %0313 H17 0375 0875 1000 %0314 H18 0375 1000 0000 %0315 I10 0375 1000 0125 %0316 I11 0375 1000 0250 %0317 I12 0375 1000 0375 %0318 I13 0375 1000 0500 %0319 I14 0375 1000 0625 %0320 I15 0375 1000 0750 %0321 I16 0375 1000 0875 %0322 I17 0375 1000 1000 %0323 I18 0500 0000 0000 %0324 J10 0500 0000 0125 %0325 J11 0500 0000 0250 %0326 J12 0500 0000 0375 %0327 J13 0500 0000 0500 %0328 J14 0500 0000 0625 %0329 J15 0500 0000 0750 %0330 J16 0500 0000 0875 %0331 J17 0500 0000 1000 %0332 J18 0500 0125 0000 %0333 K10 0500 0125 0125 %0334 K11 0500 0125 0250 %0335 K12 0500 0125 0375 %0336 K13 0500 0125 0500 %0337 K14 0500 0125 0625 %0338 K15 0500 0125 0750 %0339 K16 0500 0125 0875 %0340 K17 0500 0125 1000 %0341 K18 0500 0250 0000 %0342 L10 0500 0250 0125 %0343 L11 0500 0250 0250 %0344 L12 0500 0250 0375 %0345 L13 0500 0250 0500 %0346 L14 0500 0250 0625 %0347 L15 0500 0250 0750 %0348 L16 0500 0250 0875 %0349 L17 0500 0250 1000 %0350 L18 0500 0375 0000 %0351 M10 0500 0375 0125 %0352 M11 0500 0375 0250 %0353 M12 0500 0375 0375 %0354 M13 0500 0375 0500 %0355 M14 0500 0375 0625 %0356 M15 0500 0375 0750 %0357 M16 0500 0375 0875 %0358 M17 0500 0375 1000 %0359 M18 0500 0500 0000 %0360 N10 0500 0500 0125 %0361 N11 0500 0500 0250 %0362 N12 0500 0500 0375 %0363 N13 0500 0500 0500 %0364 N14 0500 0500 0625 %0365 N15 0500 0500 0750 %0366 N16 0500 0500 0875 %0367 N17 0500 0500 1000 %0368 N18 0500 0625 0000 %0369 O10 0500 0625 0125 %0370 O11 0500 0625 0250 %0371 O12 0500 0625 0375 %0372 O13 0500 0625 0500 %0373 O14 0500 0625 0625 %0374 O15 0500 0625 0750 %0375 O16 0500 0625 0875 %0376 O17 0500 0625 1000 %0377 O18 0500 0750 0000 %0378 P10 0500 0750 0125 %0379 P11 0500 0750 0250 %0380 P12 0500 0750 0375 %0381 P13 0500 0750 0500 %0382 P14 0500 0750 0625 %0383 P15 0500 0750 0750 %0384 P16 0500 0750 0875 %0385 P17 0500 0750 1000 %0386 P18 0500 0875 0000 %0387 Q10 0500 0875 0125 %0388 Q11 0500 0875 0250 %0389 Q12 0500 0875 0375 %0390 Q13 0500 0875 0500 %0391 Q14 0500 0875 0625 %0392 Q15 0500 0875 0750 %0393 Q16 0500 0875 0875 %0394 Q17 0500 0875 1000 %0395 Q18 0500 1000 0000 %0396 R10 0500 1000 0125 %0397 R11 0500 1000 0250 %0398 R12 0500 1000 0375 %0399 R13 0500 1000 0500 %0400 R14 0500 1000 0625 %0401 R15 0500 1000 0750 %0402 R16 0500 1000 0875 %0403 R17 0500 1000 1000 %0404 R18 0625 0000 0000 %0405 S10 0625 0000 0125 %0406 S11 0625 0000 0250 %0407 S12 0625 0000 0375 %0408 S13 0625 0000 0500 %0409 S14 0625 0000 0625 %0410 S15 0625 0000 0750 %0411 S16 0625 0000 0875 %0412 S17 0625 0000 1000 %0413 S18 0625 0125 0000 %0414 T10 0625 0125 0125 %0415 T11 0625 0125 0250 %0416 T12 0625 0125 0375 %0417 T13 0625 0125 0500 %0418 T14 0625 0125 0625 %0419 T15 0625 0125 0750 %0420 T16 0625 0125 0875 %0421 T17 0625 0125 1000 %0422 T18 0625 0250 0000 %0423 U10 0625 0250 0125 %0424 U11 0625 0250 0250 %0425 U12 0625 0250 0375 %0426 U13 0625 0250 0500 %0427 U14 0625 0250 0625 %0428 U15 0625 0250 0750 %0429 U16 0625 0250 0875 %0430 U17 0625 0250 1000 %0431 U18 0625 0375 0000 %0432 V10 0625 0375 0125 %0433 V11 0625 0375 0250 %0434 V12 0625 0375 0375 %0435 V13 0625 0375 0500 %0436 V14 0625 0375 0625 %0437 V15 0625 0375 0750 %0438 V16 0625 0375 0875 %0439 V17 0625 0375 1000 %0440 V18 0625 0500 0000 %0441 W10 0625 0500 0125 %0442 W11 0625 0500 0250 %0443 W12 0625 0500 0375 %0444 W13 0625 0500 0500 %0445 W14 0625 0500 0625 %0446 W15 0625 0500 0750 %0447 W16 0625 0500 0875 %0448 W17 0625 0500 1000 %0449 W18 0625 0625 0000 %0450 X10 0625 0625 0125 %0451 X11 0625 0625 0250 %0452 X12 0625 0625 0375 %0453 X13 0625 0625 0500 %0454 X14 0625 0625 0625 %0455 X15 0625 0625 0750 %0456 X16 0625 0625 0875 %0457 X17 0625 0625 1000 %0458 X18 0625 0750 0000 %0459 Y10 0625 0750 0125 %0460 Y11 0625 0750 0250 %0461 Y12 0625 0750 0375 %0462 Y13 0625 0750 0500 %0463 Y14 0625 0750 0625 %0464 Y15 0625 0750 0750 %0465 Y16 0625 0750 0875 %0466 Y17 0625 0750 1000 %0467 Y18 0625 0875 0000 %0468 Z10 0625 0875 0125 %0469 Z11 0625 0875 0250 %0470 Z12 0625 0875 0375 %0471 Z13 0625 0875 0500 %0472 Z14 0625 0875 0625 %0473 Z15 0625 0875 0750 %0474 Z16 0625 0875 0875 %0475 Z17 0625 0875 1000 %0476 Z18 0625 1000 0000 %0477 a10 0625 1000 0125 %0478 a11 0625 1000 0250 %0479 a12 0625 1000 0375 %0480 a13 0625 1000 0500 %0481 a14 0625 1000 0625 %0482 a15 0625 1000 0750 %0483 a16 0625 1000 0875 %0484 a17 0625 1000 1000 %0485 a18 0750 0000 0000 %0486 A19 0750 0000 0125 %0487 A20 0750 0000 0250 %0488 A21 0750 0000 0375 %0489 A22 0750 0000 0500 %0490 A23 0750 0000 0625 %0491 A24 0750 0000 0750 %0492 A25 0750 0000 0875 %0493 A26 0750 0000 1000 %0494 A27 0750 0125 0000 %0495 B19 0750 0125 0125 %0496 B20 0750 0125 0250 %0497 B21 0750 0125 0375 %0498 B22 0750 0125 0500 %0499 B23 0750 0125 0625 %0500 B24 0750 0125 0750 %0501 B25 0750 0125 0875 %0502 B26 0750 0125 1000 %0503 B27 0750 0250 0000 %0504 C19 0750 0250 0125 %0505 C20 0750 0250 0250 %0506 C21 0750 0250 0375 %0507 C22 0750 0250 0500 %0508 C23 0750 0250 0625 %0509 C24 0750 0250 0750 %0510 C25 0750 0250 0875 %0511 C26 0750 0250 1000 %0512 C27 0750 0375 0000 %0513 D19 0750 0375 0125 %0514 D20 0750 0375 0250 %0515 D21 0750 0375 0375 %0516 D22 0750 0375 0500 %0517 D23 0750 0375 0625 %0518 D24 0750 0375 0750 %0519 D25 0750 0375 0875 %0520 D26 0750 0375 1000 %0521 D27 0750 0500 0000 %0522 E19 0750 0500 0125 %0523 E20 0750 0500 0250 %0524 E21 0750 0500 0375 %0525 E22 0750 0500 0500 %0526 E23 0750 0500 0625 %0527 E24 0750 0500 0750 %0528 E25 0750 0500 0875 %0529 E26 0750 0500 1000 %0530 E27 0750 0625 0000 %0531 F19 0750 0625 0125 %0532 F20 0750 0625 0250 %0533 F21 0750 0625 0375 %0534 F22 0750 0625 0500 %0535 F23 0750 0625 0625 %0536 F24 0750 0625 0750 %0537 F25 0750 0625 0875 %0538 F26 0750 0625 1000 %0539 F27 0750 0750 0000 %0540 G19 0750 0750 0125 %0541 G20 0750 0750 0250 %0542 G21 0750 0750 0375 %0543 G22 0750 0750 0500 %0544 G23 0750 0750 0625 %0545 G24 0750 0750 0750 %0546 G25 0750 0750 0875 %0547 G26 0750 0750 1000 %0548 G27 0750 0875 0000 %0549 H19 0750 0875 0125 %0550 H20 0750 0875 0250 %0551 H21 0750 0875 0375 %0552 H22 0750 0875 0500 %0553 H23 0750 0875 0625 %0554 H24 0750 0875 0750 %0555 H25 0750 0875 0875 %0556 H26 0750 0875 1000 %0557 H27 0750 1000 0000 %0558 I19 0750 1000 0125 %0559 I20 0750 1000 0250 %0560 I21 0750 1000 0375 %0561 I22 0750 1000 0500 %0562 I23 0750 1000 0625 %0563 I24 0750 1000 0750 %0564 I25 0750 1000 0875 %0565 I26 0750 1000 1000 %0566 I27 0875 0000 0000 %0567 J19 0875 0000 0125 %0568 J20 0875 0000 0250 %0569 J21 0875 0000 0375 %0570 J22 0875 0000 0500 %0571 J23 0875 0000 0625 %0572 J24 0875 0000 0750 %0573 J25 0875 0000 0875 %0574 J26 0875 0000 1000 %0575 J27 0875 0125 0000 %0576 K19 0875 0125 0125 %0577 K20 0875 0125 0250 %0578 K21 0875 0125 0375 %0579 K22 0875 0125 0500 %0580 K23 0875 0125 0625 %0581 K24 0875 0125 0750 %0582 K25 0875 0125 0875 %0583 K26 0875 0125 1000 %0584 K27 0875 0250 0000 %0585 L19 0875 0250 0125 %0586 L20 0875 0250 0250 %0587 L21 0875 0250 0375 %0588 L22 0875 0250 0500 %0589 L23 0875 0250 0625 %0590 L24 0875 0250 0750 %0591 L25 0875 0250 0875 %0592 L26 0875 0250 1000 %0593 L27 0875 0375 0000 %0594 M19 0875 0375 0125 %0595 M20 0875 0375 0250 %0596 M21 0875 0375 0375 %0597 M22 0875 0375 0500 %0598 M23 0875 0375 0625 %0599 M24 0875 0375 0750 %0600 M25 0875 0375 0875 %0601 M26 0875 0375 1000 %0602 M27 0875 0500 0000 %0603 N19 0875 0500 0125 %0604 N20 0875 0500 0250 %0605 N21 0875 0500 0375 %0606 N22 0875 0500 0500 %0607 N23 0875 0500 0625 %0608 N24 0875 0500 0750 %0609 N25 0875 0500 0875 %0610 N26 0875 0500 1000 %0611 N27 0875 0625 0000 %0612 O19 0875 0625 0125 %0613 O20 0875 0625 0250 %0614 O21 0875 0625 0375 %0615 O22 0875 0625 0500 %0616 O23 0875 0625 0625 %0617 O24 0875 0625 0750 %0618 O25 0875 0625 0875 %0619 O26 0875 0625 1000 %0620 O27 0875 0750 0000 %0621 P19 0875 0750 0125 %0622 P20 0875 0750 0250 %0623 P21 0875 0750 0375 %0624 P22 0875 0750 0500 %0625 P23 0875 0750 0625 %0626 P24 0875 0750 0750 %0627 P25 0875 0750 0875 %0628 P26 0875 0750 1000 %0629 P27 0875 0875 0000 %0630 Q19 0875 0875 0125 %0631 Q20 0875 0875 0250 %0632 Q21 0875 0875 0375 %0633 Q22 0875 0875 0500 %0634 Q23 0875 0875 0625 %0635 Q24 0875 0875 0750 %0636 Q25 0875 0875 0875 %0637 Q26 0875 0875 1000 %0638 Q27 0875 1000 0000 %0639 R19 0875 1000 0125 %0640 R20 0875 1000 0250 %0641 R21 0875 1000 0375 %0642 R22 0875 1000 0500 %0643 R23 0875 1000 0625 %0644 R24 0875 1000 0750 %0645 R25 0875 1000 0875 %0646 R26 0875 1000 1000 %0647 R27 1000 0000 0000 %0648 S19 1000 0000 0125 %0649 S20 1000 0000 0250 %0650 S21 1000 0000 0375 %0651 S22 1000 0000 0500 %0652 S23 1000 0000 0625 %0653 S24 1000 0000 0750 %0654 S25 1000 0000 0875 %0655 S26 1000 0000 1000 %0656 S27 1000 0125 0000 %0657 T19 1000 0125 0125 %0658 T20 1000 0125 0250 %0659 T21 1000 0125 0375 %0660 T22 1000 0125 0500 %0661 T23 1000 0125 0625 %0662 T24 1000 0125 0750 %0663 T25 1000 0125 0875 %0664 T26 1000 0125 1000 %0665 T27 1000 0250 0000 %0666 U19 1000 0250 0125 %0667 U20 1000 0250 0250 %0668 U21 1000 0250 0375 %0669 U22 1000 0250 0500 %0670 U23 1000 0250 0625 %0671 U24 1000 0250 0750 %0672 U25 1000 0250 0875 %0673 U26 1000 0250 1000 %0674 U27 1000 0375 0000 %0675 V19 1000 0375 0125 %0676 V20 1000 0375 0250 %0677 V21 1000 0375 0375 %0678 V22 1000 0375 0500 %0679 V23 1000 0375 0625 %0680 V24 1000 0375 0750 %0681 V25 1000 0375 0875 %0682 V26 1000 0375 1000 %0683 V27 1000 0500 0000 %0684 W19 1000 0500 0125 %0685 W20 1000 0500 0250 %0686 W21 1000 0500 0375 %0687 W22 1000 0500 0500 %0688 W23 1000 0500 0625 %0689 W24 1000 0500 0750 %0690 W25 1000 0500 0875 %0691 W26 1000 0500 1000 %0692 W27 1000 0625 0000 %0693 X19 1000 0625 0125 %0694 X20 1000 0625 0250 %0695 X21 1000 0625 0375 %0696 X22 1000 0625 0500 %0697 X23 1000 0625 0625 %0698 X24 1000 0625 0750 %0699 X25 1000 0625 0875 %0700 X26 1000 0625 1000 %0701 X27 1000 0750 0000 %0702 Y19 1000 0750 0125 %0703 Y20 1000 0750 0250 %0704 Y21 1000 0750 0375 %0705 Y22 1000 0750 0500 %0706 Y23 1000 0750 0625 %0707 Y24 1000 0750 0750 %0708 Y25 1000 0750 0875 %0709 Y26 1000 0750 1000 %0710 Y27 1000 0875 0000 %0711 Z19 1000 0875 0125 %0712 Z20 1000 0875 0250 %0713 Z21 1000 0875 0375 %0714 Z22 1000 0875 0500 %0715 Z23 1000 0875 0625 %0716 Z24 1000 0875 0750 %0717 Z25 1000 0875 0875 %0718 Z26 1000 0875 1000 %0719 Z27 1000 1000 0000 %0720 a19 1000 1000 0125 %0721 a20 1000 1000 0250 %0722 a21 1000 1000 0375 %0723 a22 1000 1000 0500 %0724 a23 1000 1000 0625 %0725 a24 1000 1000 0750 %0726 a25 1000 1000 0875 %0727 a26 1000 1000 1000 %0728 a27 1000 1000 1000 %0729 b01 0875 1000 1000 %0730 b02 0750 1000 1000 %0731 b03 0625 1000 1000 %0732 b04 0500 1000 1000 %0733 b05 0375 1000 1000 %0734 b06 0250 1000 1000 %0735 b07 0125 1000 1000 %0736 b08 0000 1000 1000 %0737 b09 1000 0875 0875 %0738 c01 0875 0875 0875 %0739 c02 0750 0875 0875 %0740 c03 0625 0875 0875 %0741 c04 0500 0875 0875 %0742 c05 0375 0875 0875 %0743 c06 0250 0875 0875 %0744 c07 0125 0875 0875 %0745 c08 0000 0875 0875 %0746 c09 1000 0750 0750 %0747 d01 0875 0750 0750 %0748 d02 0750 0750 0750 %0749 d03 0625 0750 0750 %0750 d04 0500 0750 0750 %0751 d05 0375 0750 0750 %0752 d06 0250 0750 0750 %0753 d07 0125 0750 0750 %0754 d08 0000 0750 0750 %0755 d09 1000 0625 0625 %0756 e01 0875 0625 0625 %0757 e02 0750 0625 0625 %0758 e03 0625 0625 0625 %0759 e04 0500 0625 0625 %0760 e05 0375 0625 0625 %0761 e06 0250 0625 0625 %0762 e07 0125 0625 0625 %0763 e08 0000 0625 0625 %0764 e09 1000 0500 0500 %0765 f01 0875 0500 0500 %0766 f02 0750 0500 0500 %0767 f03 0625 0500 0500 %0768 f04 0500 0500 0500 %0769 f05 0375 0500 0500 %0770 f06 0250 0500 0500 %0771 f07 0125 0500 0500 %0772 f08 0000 0500 0500 %0773 f09 1000 0375 0375 %0774 g01 0875 0375 0375 %0775 g02 0750 0375 0375 %0776 g03 0625 0375 0375 %0777 g04 0500 0375 0375 %0778 g05 0375 0375 0375 %0779 g06 0250 0375 0375 %0780 g07 0125 0375 0375 %0781 g08 0000 0375 0375 %0782 g09 1000 0250 0250 %0783 h01 0875 0250 0250 %0784 h02 0750 0250 0250 %0785 h03 0625 0250 0250 %0786 h04 0500 0250 0250 %0787 h05 0375 0250 0250 %0788 h06 0250 0250 0250 %0789 h07 0125 0250 0250 %0790 h08 0000 0250 0250 %0791 h09 1000 0125 0125 %0792 i01 0875 0125 0125 %0793 i02 0750 0125 0125 %0794 i03 0625 0125 0125 %0795 i04 0500 0125 0125 %0796 i05 0375 0125 0125 %0797 i06 0250 0125 0125 %0798 i07 0125 0125 0125 %0799 i08 0000 0125 0125 %0800 i09 1000 0000 0000 %0801 j01 0875 0000 0000 %0802 j02 0750 0000 0000 %0803 j03 0625 0000 0000 %0804 j04 0500 0000 0000 %0805 j05 0375 0000 0000 %0806 j06 0250 0000 0000 %0807 j07 0125 0000 0000 %0808 j08 0000 0000 0000 %0809 j09 1000 1000 1000 %0810 b10 0875 0875 1000 %0811 b11 0750 0750 1000 %0812 b12 0625 0625 1000 %0813 b13 0500 0500 1000 %0814 b14 0375 0375 1000 %0815 b15 0250 0250 1000 %0816 b16 0125 0125 1000 %0817 b17 0000 0000 1000 %0818 b18 1000 1000 0875 %0819 c10 0875 0875 0875 %0820 c11 0750 0750 0875 %0821 c12 0625 0625 0875 %0822 c13 0500 0500 0875 %0823 c14 0375 0375 0875 %0824 c15 0250 0250 0875 %0825 c16 0125 0125 0875 %0826 c17 0000 0000 0875 %0827 c18 1000 1000 0750 %0828 d10 0875 0875 0750 %0829 d11 0750 0750 0750 %0830 d12 0625 0625 0750 %0831 d13 0500 0500 0750 %0832 d14 0375 0375 0750 %0833 d15 0250 0250 0750 %0834 d16 0125 0125 0750 %0835 d17 0000 0000 0750 %0836 d18 1000 1000 0625 %0837 e10 0875 0875 0625 %0838 e11 0750 0750 0625 %0839 e12 0625 0625 0625 %0840 e13 0500 0500 0625 %0841 e14 0375 0375 0625 %0842 e15 0250 0250 0625 %0843 e16 0125 0125 0625 %0844 e17 0000 0000 0625 %0845 e18 1000 1000 0500 %0846 f10 0875 0875 0500 %0847 f11 0750 0750 0500 %0848 f12 0625 0625 0500 %0849 f13 0500 0500 0500 %0850 f14 0375 0375 0500 %0851 f15 0250 0250 0500 %0852 f16 0125 0125 0500 %0853 f17 0000 0000 0500 %0854 f18 1000 1000 0375 %0855 g10 0875 0875 0375 %0856 g11 0750 0750 0375 %0857 g12 0625 0625 0375 %0858 g13 0500 0500 0375 %0859 g14 0375 0375 0375 %0860 g15 0250 0250 0375 %0861 g16 0125 0125 0375 %0862 g17 0000 0000 0375 %0863 g18 1000 1000 0250 %0864 h10 0875 0875 0250 %0865 h11 0750 0750 0250 %0866 h12 0625 0625 0250 %0867 h13 0500 0500 0250 %0868 h14 0375 0375 0250 %0869 h15 0250 0250 0250 %0870 h16 0125 0125 0250 %0871 h17 0000 0000 0250 %0872 h18 1000 1000 0125 %0873 i10 0875 0875 0125 %0874 i11 0750 0750 0125 %0875 i12 0625 0625 0125 %0876 i13 0500 0500 0125 %0877 i14 0375 0375 0125 %0878 i15 0250 0250 0125 %0879 i16 0125 0125 0125 %0880 i17 0000 0000 0125 %0881 i18 1000 1000 0000 %0882 j10 0875 0875 0000 %0883 j11 0750 0750 0000 %0884 j12 0625 0625 0000 %0885 j13 0500 0500 0000 %0886 j14 0375 0375 0000 %0887 j15 0250 0250 0000 %0888 j16 0125 0125 0000 %0889 j17 0000 0000 0000 %0890 j18 1000 1000 1000 %0891 b19 1000 0875 1000 %0892 b20 1000 0750 1000 %0893 b21 1000 0625 1000 %0894 b22 1000 0500 1000 %0895 b23 1000 0375 1000 %0896 b24 1000 0250 1000 %0897 b25 1000 0125 1000 %0898 b26 1000 0000 1000 %0899 b27 0875 1000 0875 %0900 c19 0875 0875 0875 %0901 c20 0875 0750 0875 %0902 c21 0875 0625 0875 %0903 c22 0875 0500 0875 %0904 c23 0875 0375 0875 %0905 c24 0875 0250 0875 %0906 c25 0875 0125 0875 %0907 c26 0875 0000 0875 %0908 c27 0750 1000 0750 %0909 d19 0750 0875 0750 %0910 d20 0750 0750 0750 %0911 d21 0750 0625 0750 %0912 d22 0750 0500 0750 %0913 d23 0750 0375 0750 %0914 d24 0750 0250 0750 %0915 d25 0750 0125 0750 %0916 d26 0750 0000 0750 %0917 d27 0625 1000 0625 %0918 e19 0625 0875 0625 %0919 e20 0625 0750 0625 %0920 e21 0625 0625 0625 %0921 e22 0625 0500 0625 %0922 e23 0625 0375 0625 %0923 e24 0625 0250 0625 %0924 e25 0625 0125 0625 %0925 e26 0625 0000 0625 %0926 e27 0500 1000 0500 %0927 f19 0500 0875 0500 %0928 f20 0500 0750 0500 %0929 f21 0500 0625 0500 %0930 f22 0500 0500 0500 %0931 f23 0500 0375 0500 %0932 f24 0500 0250 0500 %0933 f25 0500 0125 0500 %0934 f26 0500 0000 0500 %0935 f27 0375 1000 0375 %0936 g19 0375 0875 0375 %0937 g20 0375 0750 0375 %0938 g21 0375 0625 0375 %0939 g22 0375 0500 0375 %0940 g23 0375 0375 0375 %0941 g24 0375 0250 0375 %0942 g25 0375 0125 0375 %0943 g26 0375 0000 0375 %0944 g27 0250 1000 0250 %0945 h19 0250 0875 0250 %0946 h20 0250 0750 0250 %0947 h21 0250 0625 0250 %0948 h22 0250 0500 0250 %0949 h23 0250 0375 0250 %0950 h24 0250 0250 0250 %0951 h25 0250 0125 0250 %0952 h26 0250 0000 0250 %0953 h27 0125 1000 0125 %0954 i19 0125 0875 0125 %0955 i20 0125 0750 0125 %0956 i21 0125 0625 0125 %0957 i22 0125 0500 0125 %0958 i23 0125 0375 0125 %0959 i24 0125 0250 0125 %0960 i25 0125 0125 0125 %0961 i26 0125 0000 0125 %0962 i27 0000 1000 0000 %0963 j19 0000 0875 0000 %0964 j20 0000 0750 0000 %0965 j21 0000 0625 0000 %0966 j22 0000 0500 0000 %0967 j23 0000 0375 0000 %0968 j24 0000 0250 0000 %0969 j25 0000 0125 0000 %0970 j26 0000 0000 0000 %0971 j27 0000 0000 0000 %0972 k01 0125 0125 0125 %0973 k02 0250 0250 0250 %0974 k03 0375 0375 0375 %0975 k04 0500 0500 0500 %0976 k05 0625 0625 0625 %0977 k06 0750 0750 0750 %0978 k07 0875 0875 0875 %0979 k08 1000 1000 1000 %0980 k09 0000 0000 0000 %0981 l01 0125 0125 0125 %0982 l02 0250 0250 0250 %0983 l03 0375 0375 0375 %0984 l04 0500 0500 0500 %0985 l05 0625 0625 0625 %0986 l06 0750 0750 0750 %0987 l07 0875 0875 0875 %0988 l08 1000 1000 1000 %0989 l09 0000 0000 0000 %0990 m01 0125 0125 0125 %0991 m02 0250 0250 0250 %0992 m03 0375 0375 0375 %0993 m04 0500 0500 0500 %0994 m05 0625 0625 0625 %0995 m06 0750 0750 0750 %0996 m07 0875 0875 0875 %0997 m08 1000 1000 1000 %0998 m09 0000 0000 0000 %0999 n01 0125 0125 0125 %1000 n02 0250 0250 0250 %1001 n03 0375 0375 0375 %1002 n04 0500 0500 0500 %1003 n05 0625 0625 0625 %1004 n06 0750 0750 0750 %1005 n07 0875 0875 0875 %1006 n08 1000 1000 1000 %1007 n09 0000 0000 0000 %1008 k10 0066 0066 0066 %1009 k11 0133 0133 0133 %1010 k12 0200 0200 0200 %1011 k13 0266 0266 0266 %1012 k14 0333 0333 0333 %1013 k15 0400 0400 0400 %1014 k16 0466 0466 0466 %1015 k17 0533 0533 0533 %1016 k18 0600 0600 0600 %1017 k19 0666 0666 0666 %1018 k20 0734 0734 0734 %1019 k21 0800 0800 0800 %1020 k22 0866 0866 0866 %1021 k23 0933 0933 0933 %1022 k24 1000 1000 1000 %1023 k25 0000 0000 0000 %1024 l10 0066 0066 0066 %1025 l11 0133 0133 0133 %1026 l12 0200 0200 0200 %1027 l13 0266 0266 0266 %1028 l14 0333 0333 0333 %1029 l15 0400 0400 0400 %1030 l16 0466 0466 0466 %1031 l17 0533 0533 0533 %1032 l18 0600 0600 0600 %1033 l19 0666 0666 0666 %1034 l20 0734 0734 0734 %1035 l21 0800 0800 0800 %1036 l22 0866 0866 0866 %1037 l23 0933 0933 0933 %1038 l24 1000 1000 1000 %1039 l25 0000 0000 0000 %1040 m10 0066 0066 0066 %1041 m11 0133 0133 0133 %1042 m12 0200 0200 0200 %1043 m13 0266 0266 0266 %1044 m14 0333 0333 0333 %1045 m15 0400 0400 0400 %1046 m16 0466 0466 0466 %1047 m17 0533 0533 0533 %1048 m18 0600 0600 0600 %1049 m19 0666 0666 0666 %1050 m20 0734 0734 0734 %1051 m21 0800 0800 0800 %1052 m22 0866 0866 0866 %1053 m23 0933 0933 0933 %1054 m24 1000 1000 1000 %1055 m25 0000 0000 0000 %1056 n10 0066 0066 0066 %1057 n11 0133 0133 0133 %1058 n12 0200 0200 0200 %1059 n13 0266 0266 0266 %1060 n14 0333 0333 0333 %1061 n15 0400 0400 0400 %1062 n16 0466 0466 0466 %1063 n17 0533 0533 0533 %1064 n18 0600 0600 0600 %1065 n19 0666 0666 0666 %1066 n20 0734 0734 0734 %1067 n21 0800 0800 0800 %1068 n22 0866 0866 0866 %1069 n23 0933 0933 0933 %1070 n24 1000 1000 1000 %1071 n25 0000 0000 0000 %1072 k26 1000 1000 1000 %1073 k27 1000 0000 0000 %1074 l26 0000 1000 1000 %1075 l27 1000 1000 0000 %1076 m26 0000 0000 1000 %1077 m27 0000 1000 0000 %1078 n26 1000 0000 1000 %1079 n27 0000 1000 0000 %1078 nx6 1000 0000 1000 %1079 nx7 ] def %END RGB0_F %**************************************************** %END 'QI84'OUTLIN1X.PS Other procedures for Offset output linearization %**************************************************** %BEG_OUTLIN1Y_PK8320********************************************************** %BEG 'QI84'OUTLIN1Y2_PK8320.PS %BEG spectral reflection data, cmyn6*, 1080 colours, offset A,B,L,G, printer P %***************************************************************************** %reflection 380 to 720 nm extrapolated to 770 /RX0F 45360 array def %1080x42=45360 %cmyn6* /ypaper 2 def ypaper 2 eq {%ypaper=2 /FILEDATA_RX0F_IOF (PE4300L_120830.TXT, 1080 colors, Separation cmyn6*) def /RX0F [ %PE4300L_120830_01.txt 1 1 0184 0198 0209 0216 0230 0229 0234 0235 0239 0241 0243 0245 0246 0247 0246 0244 0242 0240 0239 0239 0240 0243 0247 0254 0260 0268 0277 0287 0297 0307 0320 0331 0344 0357 0374 0388 2 2 0248 0268 0297 0341 0359 0375 0386 0389 0384 0370 0355 0340 0325 0308 0288 0272 0258 0242 0227 0228 0247 0285 0315 0323 0324 0325 0329 0336 0349 0361 0364 0368 0365 0366 0380 0409 3 3 0327 0388 0459 0557 0613 0646 0681 0688 0661 0614 0563 0517 0470 0420 0372 0334 0308 0278 0251 0249 0279 0356 0426 0445 0448 0447 0449 0461 0482 0498 0498 0492 0475 0468 0479 0524 4 4 0352 0446 0570 0710 0794 0857 0926 0940 0893 0808 0720 0638 0561 0478 0397 0340 0302 0259 0220 0215 0252 0348 0446 0480 0486 0487 0489 0508 0539 0564 0560 0546 0516 0496 0513 0574 5 5 0337 0480 0647 0834 0952 1045 1148 1175 1105 0984 0855 0738 0629 0513 0403 0327 0278 0225 0178 0173 0213 0318 0435 0478 0486 0487 0491 0514 0556 0585 0582 0558 0519 0490 0508 0582 6 6 0377 0547 0771 1025 1192 1323 1471 1512 1413 1248 1070 0910 0762 0605 0458 0358 0295 0226 0168 0159 0199 0313 0439 0484 0492 0495 0500 0528 0584 0623 0615 0585 0532 0493 0512 0607 7 7 0380 0607 0882 1202 1404 1573 1766 1819 1693 1481 1257 1055 0867 0674 0494 0375 0301 0223 0157 0147 0188 0303 0430 0468 0475 0477 0483 0517 0585 0632 0622 0584 0521 0470 0493 0604 8 8 0412 0680 1022 1417 1678 1890 2138 2207 2046 1778 1493 1240 1007 0767 0547 0404 0319 0228 0151 0138 0179 0295 0408 0428 0427 0427 0433 0476 0559 0617 0603 0558 0479 0417 0442 0575 9 9 0426 0726 1115 1576 1868 2117 2405 2488 2303 1995 1667 1377 1112 0839 0591 0432 0338 0237 0156 0142 0183 0292 0378 0376 0365 0361 0365 0410 0496 0557 0542 0494 0412 0348 0376 0511 10 10 0344 0326 0298 0289 0273 0269 0262 0265 0268 0256 0255 0306 0402 0457 0438 0409 0396 0378 0355 0349 0416 0755 1302 1664 1825 1892 1930 1959 1982 1997 2012 2027 2047 2070 2087 2108 11 11 0481 0453 0439 0456 0464 0460 0459 0455 0445 0412 0387 0408 0462 0481 0449 0419 0408 0391 0368 0366 0436 0778 1330 1698 1859 1928 1966 1994 2019 2033 2049 2065 2083 2105 2120 2143 12 12 0607 0605 0601 0673 0704 0715 0731 0713 0675 0610 0549 0519 0505 0475 0428 0398 0389 0374 0354 0359 0434 0770 1319 1690 1856 1927 1966 1994 2019 2034 2050 2067 2083 2107 2117 2139 13 13 0715 0720 0742 0846 0920 0946 0972 0949 0882 0787 0694 0616 0546 0479 0424 0395 0387 0372 0356 0365 0444 0774 1320 1692 1860 1932 1971 2000 2024 2040 2056 2072 2090 2112 2128 2149 14 14 0789 0811 0869 0996 1098 1149 1197 1170 1071 0937 0802 0686 0586 0488 0407 0365 0349 0327 0301 0308 0395 0786 1456 1914 2119 2209 2256 2300 2345 2373 2383 2386 2378 2374 2395 2441 15 15 0893 0954 1036 1231 1380 1458 1542 1515 1383 1193 1006 0843 0702 0564 0447 0383 0358 0322 0283 0285 0380 0828 1619 2169 2417 2520 2574 2634 2701 2742 2743 2728 2692 2662 2682 2766 16 16 0905 1004 1152 1404 1594 1716 1838 1822 1658 1419 1180 0975 0794 0617 0463 0376 0338 0286 0235 0233 0324 0781 1596 2159 2412 2516 2575 2647 2739 2794 2789 2754 2685 2630 2654 2773 17 17 0930 1088 1288 1618 1851 2010 2180 2177 1974 1679 1381 1125 0899 0680 0488 0378 0328 0263 0200 0196 0286 0757 1618 2209 2476 2589 2652 2741 2862 2936 2925 2872 2771 2684 2711 2878 18 18 0943 1136 1371 1749 2020 2211 2419 2427 2196 1859 1520 1229 0972 0724 0508 0386 0326 0254 0188 0184 0270 0729 1582 2176 2444 2558 2619 2718 2856 2938 2920 2853 2731 2627 2653 2842 19 19 0600 0525 0442 0410 0370 0346 0334 0333 0341 0319 0307 0382 0525 0576 0502 0436 0413 0377 0324 0299 0427 1283 2935 4219 4845 5109 5231 5307 5362 5385 5398 5409 5427 5450 5464 5495 20 20 0687 0608 0542 0526 0499 0479 0465 0459 0458 0416 0384 0437 0556 0585 0504 0437 0415 0380 0324 0303 0434 1293 2950 4243 4876 5144 5269 5347 5398 5421 5436 5448 5465 5490 5502 5526 21 21 0810 0747 0688 0703 0705 0689 0684 0671 0647 0573 0508 0528 0603 0595 0502 0434 0412 0376 0322 0303 0438 1302 2972 4278 4920 5189 5316 5392 5445 5468 5482 5491 5512 5533 5545 5571 22 22 0981 0929 0891 0947 0986 0989 1001 0975 0911 0795 0683 0647 0653 0598 0489 0422 0401 0367 0317 0304 0442 1288 2932 4232 4877 5154 5283 5360 5413 5436 5452 5463 5481 5502 5518 5541 23 23 1136 1079 1060 1177 1264 1292 1322 1282 1172 1006 0842 0744 0681 0582 0463 0397 0379 0347 0301 0295 0432 1262 2903 4220 4884 5166 5299 5381 5434 5459 5474 5486 5505 5530 5542 5566 24 24 1249 1218 1230 1397 1529 1587 1638 1586 1435 1220 1011 0854 0728 0589 0460 0391 0374 0342 0298 0296 0436 1269 2920 4246 4916 5200 5334 5416 5468 5492 5508 5519 5538 5559 5573 5595 25 25 1359 1346 1368 1583 1756 1837 1913 1850 1657 1399 1150 0939 0760 0592 0455 0389 0374 0342 0301 0306 0448 1272 2909 4228 4897 5185 5323 5407 5462 5487 5504 5517 5540 5560 5578 5601 26 26 1494 1502 1549 1817 2038 2148 2255 2190 1947 1628 1318 1057 0835 0627 0458 0376 0354 0315 0264 0268 0418 1338 3208 4728 5501 5833 5993 6109 6204 6250 6258 6244 6221 6207 6226 6302 27 27 1493 1545 1638 1962 2223 2369 2506 2441 2166 1803 1448 1150 0896 0659 0463 0367 0337 0289 0231 0231 0377 1317 3258 4841 5647 5990 6153 6284 6406 6468 6464 6428 6363 6307 6324 6448 28 1 0234 0262 0276 0288 0301 0304 0306 0313 0322 0325 0338 0378 0442 0486 0488 0467 0440 0408 0373 0347 0332 0324 0319 0317 0320 0323 0328 0338 0352 0365 0369 0372 0372 0374 0387 0414 29 2 0305 0336 0380 0438 0471 0481 0495 0504 0508 0508 0507 0507 0504 0495 0480 0456 0429 0397 0362 0337 0321 0314 0309 0308 0311 0316 0321 0332 0347 0358 0363 0365 0364 0365 0383 0407 30 3 0423 0524 0637 0786 0865 0907 0954 0970 0962 0935 0905 0873 0838 0790 0731 0669 0609 0540 0472 0429 0423 0447 0463 0460 0459 0460 0463 0477 0500 0517 0517 0509 0496 0484 0501 0541 31 4 0454 0590 0761 0967 1083 1163 1246 1272 1241 1177 1105 1032 0957 0868 0769 0678 0602 0514 0429 0384 0393 0454 0502 0508 0506 0507 0510 0528 0562 0586 0584 0567 0539 0520 0536 0595 32 5 0432 0614 0827 1075 1227 1334 1454 1495 1440 1339 1222 1111 0999 0871 0735 0622 0533 0435 0341 0298 0318 0403 0480 0496 0497 0496 0500 0522 0567 0595 0591 0568 0529 0500 0518 0594 33 6 0461 0673 0942 1265 1463 1611 1783 1841 1760 1611 1444 1287 1134 0961 0784 0642 0535 0416 0308 0259 0281 0379 0475 0498 0502 0502 0507 0538 0594 0634 0625 0596 0542 0502 0524 0616 34 7 0459 0698 1016 1399 1634 1820 2034 2105 1993 1795 1573 1371 1176 0963 0752 0595 0483 0361 0251 0208 0235 0344 0454 0481 0483 0486 0492 0530 0600 0648 0636 0599 0534 0480 0506 0618 35 8 0459 0780 1171 1642 1934 2175 2450 2542 2395 2136 1852 1592 1347 1081 0820 0632 0503 0363 0237 0191 0219 0331 0433 0446 0443 0445 0452 0499 0584 0645 0631 0583 0503 0439 0467 0600 36 9 0463 0797 1245 1766 2104 2375 2699 2805 2635 2334 2004 1704 1423 1122 0832 0628 0492 0347 0219 0175 0205 0309 0384 0376 0365 0361 0369 0415 0504 0567 0550 0501 0416 0351 0378 0518 37 10 0436 0419 0394 0382 0366 0348 0339 0341 0356 0348 0356 0442 0635 0807 0851 0838 0830 0812 0779 0760 0825 1118 1518 1761 1869 1918 1948 1973 1995 2010 2024 2040 2059 2079 2095 2120 38 11 0577 0582 0570 0595 0602 0594 0589 0581 0584 0560 0550 0604 0733 0832 0841 0818 0808 0789 0756 0742 0811 1109 1524 1781 1896 1946 1977 2004 2027 2042 2056 2070 2092 2112 2129 2149 39 12 0768 0793 0820 0908 0960 0966 0970 0954 0929 0879 0836 0834 0867 0880 0852 0822 0810 0789 0759 0749 0822 1115 1530 1789 1905 1956 1987 2015 2034 2049 2065 2081 2098 2119 2134 2155 40 13 0930 0989 1052 1222 1332 1357 1377 1350 1292 1213 1135 1065 1003 0938 0882 0846 0833 0812 0782 0777 0851 1142 1559 1826 1945 1999 2029 2056 2077 2092 2104 2119 2138 2155 2174 2190 41 14 1008 1082 1180 1388 1526 1579 1622 1594 1505 1383 1258 1148 1048 0947 0856 0800 0776 0740 0692 0679 0765 1130 1675 2020 2173 2238 2277 2318 2360 2385 2395 2394 2385 2384 2398 2450 42 15 1091 1201 1346 1621 1809 1895 1976 1957 1833 1662 1485 1329 1187 1044 0912 0829 0786 0728 0660 0637 0724 1136 1772 2179 2361 2438 2481 2535 2601 2637 2639 2621 2586 2555 2576 2660 43 16 1101 1241 1448 1794 2030 2159 2291 2283 2128 1900 1668 1460 1272 1080 0903 0788 0724 0643 0551 0517 0605 1054 1770 2234 2438 2525 2574 2645 2733 2786 2781 2745 2677 2619 2640 2765 44 17 1123 1321 1576 1992 2279 2451 2638 2640 2445 2158 1863 1602 1365 1123 0901 0757 0676 0575 0466 0425 0515 1001 1805 2331 2565 2666 2723 2811 2928 3000 2986 2932 2835 2748 2776 2935 45 18 1070 1319 1624 2106 2432 2647 2877 2900 2680 2346 2005 1702 1430 1149 0892 0726 0630 0515 0395 0352 0439 0918 1723 2255 2493 2594 2651 2745 2878 2958 2939 2874 2752 2648 2674 2858 46 19 0659 0568 0490 0448 0402 0368 0351 0352 0370 0352 0347 0459 0707 0886 0874 0820 0800 0758 0686 0643 0789 1664 3198 4334 4879 5110 5220 5293 5342 5364 5375 5385 5404 5422 5442 5470 47 20 0809 0715 0647 0637 0607 0575 0558 0553 0561 0521 0494 0586 0804 0951 0924 0868 0847 0805 0733 0692 0841 1712 3234 4365 4908 5138 5248 5321 5370 5392 5405 5414 5433 5455 5469 5493 48 21 0935 0868 0822 0853 0850 0823 0814 0800 0785 0722 0669 0726 0893 0990 0943 0880 0860 0817 0745 0706 0857 1724 3242 4375 4923 5156 5266 5339 5389 5410 5422 5432 5448 5471 5485 5510 49 22 1117 1100 1070 1159 1212 1201 1201 1175 1128 1023 0926 0931 1020 1047 0970 0902 0879 0837 0765 0732 0886 1748 3260 4396 4949 5182 5298 5368 5417 5438 5451 5461 5480 5498 5514 5542 50 23 1317 1316 1335 1506 1611 1635 1654 1612 1518 1362 1212 1139 1126 1070 0963 0890 0866 0825 0757 0732 0886 1732 3233 4374 4938 5180 5297 5370 5420 5441 5454 5467 5485 5507 5525 5550 51 24 1485 1501 1561 1800 1964 2014 2059 2004 1864 1664 1467 1330 1233 1114 0981 0904 0880 0838 0771 0749 0905 1746 3246 4389 4952 5194 5311 5385 5435 5456 5469 5479 5498 5520 5536 5560 52 25 1651 1662 1753 2058 2283 2366 2436 2369 2182 1935 1692 1484 1301 1125 0976 0895 0871 0830 0767 0750 0907 1741 3244 4398 4972 5221 5341 5418 5468 5489 5505 5516 5534 5555 5570 5593 53 26 1779 1824 1953 2323 2605 2726 2833 2761 2521 2209 1899 1633 1402 1178 0984 0881 0847 0788 0705 0679 0851 1809 3565 4918 5592 5885 6027 6131 6222 6265 6270 6257 6236 6220 6239 6314 54 27 1772 1854 2018 2440 2769 2919 3065 2998 2729 2366 2009 1701 1433 1169 0944 0818 0769 0696 0597 0563 0733 1728 3578 5016 5734 6046 6197 6321 6437 6496 6490 6455 6394 6339 6356 6476 55 1 0268 0331 0374 0404 0403 0402 0404 0416 0442 0452 0474 0584 0812 1013 1054 0992 0899 0788 0673 0589 0540 0516 0498 0486 0484 0486 0493 0510 0537 0556 0557 0549 0534 0523 0538 0588 56 2 0394 0491 0593 0710 0761 0782 0811 0834 0856 0860 0867 0927 1037 1110 1091 1011 0909 0794 0677 0592 0542 0516 0498 0486 0486 0489 0495 0512 0540 0558 0559 0553 0536 0526 0542 0594 57 3 0500 0641 0807 1001 1113 1173 1232 1264 1276 1272 1264 1252 1230 1190 1125 1030 0927 0811 0693 0608 0558 0533 0514 0504 0503 0507 0514 0531 0558 0575 0577 0568 0553 0544 0558 0605 58 4 0560 0766 1010 1310 1487 1584 1697 1753 1748 1712 1664 1611 1545 1451 1326 1181 1035 0874 0712 0604 0563 0566 0565 0553 0550 0551 0557 0582 0620 0646 0641 0626 0593 0573 0589 0663 59 5 0578 0796 1095 1458 1669 1808 1970 2041 2013 1937 1840 1740 1630 1485 1311 1133 0968 0788 0611 0504 0479 0520 0550 0545 0542 0543 0548 0576 0624 0656 0650 0626 0583 0552 0573 0650 60 6 0564 0832 1189 1619 1879 2066 2274 2365 2308 2180 2023 1870 1708 1510 1285 1079 0900 0704 0516 0409 0397 0469 0527 0530 0528 0530 0537 0572 0634 0675 0667 0635 0578 0532 0559 0660 61 7 0546 0858 1258 1735 2027 2253 2510 2617 2526 2342 2128 1923 1715 1472 1209 0985 0803 0606 0419 0322 0323 0417 0502 0514 0515 0517 0525 0567 0642 0694 0680 0641 0570 0516 0545 0662 62 8 0560 0915 1382 1947 2304 2578 2900 3030 2905 2662 2384 2122 1860 1562 1250 0993 0794 0580 0379 0280 0284 0385 0471 0476 0473 0474 0485 0536 0626 0689 0676 0626 0538 0472 0501 0641 63 9 0535 0917 1434 2057 2450 2767 3136 3283 3134 2846 2519 2217 1918 1583 1239 0965 0760 0540 0339 0243 0250 0341 0408 0396 0385 0385 0393 0445 0541 0607 0592 0540 0447 0378 0408 0556 64 10 0583 0550 0533 0520 0499 0471 0456 0457 0480 0487 0505 0646 0982 1337 1492 1517 1521 1508 1478 1459 1500 1680 1886 2007 2066 2099 2126 2151 2172 2189 2204 2221 2238 2263 2279 2298 65 11 0766 0775 0791 0847 0857 0841 0824 0818 0830 0822 0823 0926 1169 1405 1492 1495 1491 1473 1442 1425 1471 1667 1907 2048 2115 2151 2178 2205 2226 2241 2255 2271 2290 2314 2329 2354 66 12 1018 1071 1125 1280 1358 1358 1348 1333 1321 1291 1267 1308 1421 1517 1532 1514 1504 1482 1450 1434 1483 1685 1938 2090 2163 2200 2225 2251 2273 2288 2302 2319 2336 2356 2371 2392 67 13 1257 1364 1498 1762 1923 1949 1961 1927 1883 1825 1767 1715 1666 1617 1570 1533 1516 1492 1458 1446 1495 1693 1943 2096 2168 2205 2233 2259 2280 2293 2308 2323 2341 2363 2376 2397 68 14 1319 1461 1643 1971 2180 2240 2284 2260 2180 2078 1969 1871 1780 1680 1584 1509 1466 1406 1331 1291 1352 1645 2029 2253 2354 2402 2434 2475 2518 2542 2550 2548 2537 2534 2548 2604 69 15 1347 1546 1788 2195 2461 2569 2662 2647 2536 2379 2214 2064 1922 1768 1616 1500 1424 1328 1213 1150 1217 1578 2077 2371 2500 2558 2596 2650 2717 2756 2752 2733 2692 2659 2680 2769 70 16 1357 1566 1865 2339 2657 2805 2953 2952 2809 2596 2371 2168 1975 1767 1562 1409 1308 1183 1039 0960 1035 1458 2063 2427 2585 2657 2701 2770 2862 2915 2907 2872 2800 2740 2763 2891 71 17 1371 1633 1988 2544 2928 3132 3341 3356 3173 2896 2604 2339 2090 1825 1561 1368 1241 1085 0912 0819 0897 1383 2115 2569 2770 2856 2911 2998 3116 3185 3170 3117 3017 2928 2954 3117 72 18 1321 1608 1997 2587 2995 3241 3500 3542 3333 3014 2676 2371 2085 1781 1481 1263 1117 0944 0760 0666 0739 1215 1962 2437 2649 2741 2798 2894 3029 3110 3090 3024 2900 2796 2820 3008 73 19 0760 0668 0577 0532 0468 0426 0400 0397 0430 0420 0424 0591 0999 1385 1483 1458 1448 1403 1314 1252 1414 2277 3638 4603 5061 5261 5361 5428 5479 5497 5511 5522 5540 5562 5578 5605 74 20 0912 0848 0793 0779 0743 0698 0676 0668 0686 0656 0640 0782 1139 1459 1519 1483 1470 1424 1335 1275 1438 2306 3681 4664 5131 5332 5435 5504 5550 5571 5584 5593 5607 5636 5648 5675 75 21 1134 1093 1060 1113 1121 1088 1065 1049 1047 0989 0944 1050 1344 1591 1617 1570 1554 1506 1415 1359 1523 2380 3740 4711 5174 5374 5476 5543 5591 5612 5622 5630 5647 5674 5686 5710 76 22 1345 1340 1352 1493 1547 1536 1526 1494 1461 1367 1284 1333 1533 1678 1655 1594 1573 1523 1433 1380 1545 2394 3743 4711 5176 5379 5480 5548 5596 5615 5627 5635 5654 5679 5687 5715 77 23 1592 1623 1686 1929 2067 2081 2091 2047 1966 1825 1691 1660 1732 1759 1683 1609 1583 1531 1442 1395 1560 2406 3761 4742 5219 5426 5532 5602 5650 5669 5684 5694 5709 5737 5746 5773 78 24 1830 1903 2028 2379 2614 2666 2700 2635 2505 2316 2131 2016 1959 1874 1749 1662 1633 1578 1491 1448 1616 2455 3804 4784 5256 5462 5567 5634 5681 5700 5712 5725 5739 5763 5776 5796 79 25 2036 2126 2296 2743 3059 3147 3209 3132 2949 2714 2481 2277 2095 1914 1753 1659 1627 1573 1489 1453 1619 2442 3776 4749 5225 5434 5541 5610 5657 5676 5689 5701 5718 5743 5755 5781 80 26 2161 2285 2510 3041 3427 3557 3666 3583 3350 3045 2743 2477 2240 2004 1791 1662 1612 1531 1413 1354 1536 2496 4090 5257 5830 6077 6207 6307 6393 6433 6436 6425 6400 6384 6401 6479 81 27 2105 2267 2522 3100 3525 3693 3844 3777 3514 3164 2810 2502 2227 1949 1699 1543 1470 1365 1223 1154 1324 2306 4000 5264 5886 6158 6296 6414 6528 6584 6577 6543 6476 6425 6437 6563 82 1 0304 0358 0423 0455 0443 0433 0431 0451 0491 0506 0537 0708 1093 1453 1530 1417 1246 1046 0845 0700 0618 0578 0547 0526 0522 0524 0530 0552 0591 0616 0615 0599 0570 0548 0567 0632 83 2 0376 0505 0634 0744 0779 0798 0821 0850 0893 0905 0926 1059 1340 1565 1570 1432 1252 1047 0842 0695 0614 0571 0540 0520 0516 0518 0524 0549 0587 0614 0611 0596 0565 0543 0563 0627 84 3 0504 0681 0893 1132 1250 1317 1392 1441 1478 1484 1485 1543 1653 1703 1627 1464 1273 1062 0854 0705 0621 0577 0546 0526 0523 0526 0533 0557 0594 0620 0617 0602 0571 0549 0570 0631 85 4 0611 0842 1126 1484 1687 1807 1936 2015 2035 2030 2010 1983 1934 1846 1711 1527 1324 1106 0888 0733 0645 0600 0568 0548 0545 0548 0556 0581 0621 0646 0643 0628 0595 0574 0591 0663 86 5 0646 0905 1274 1722 1984 2156 2344 2449 2457 2418 2353 2279 2182 2037 1837 1598 1356 1096 0842 0672 0595 0579 0563 0542 0536 0539 0546 0577 0627 0658 0653 0628 0585 0553 0576 0660 87 6 0662 0959 1414 1952 2270 2494 2747 2884 2869 2783 2664 2537 2385 2175 1911 1624 1349 1055 0773 0592 0527 0540 0546 0528 0522 0524 0533 0568 0631 0673 0665 0630 0573 0532 0556 0657 88 7 0623 0995 1485 2095 2468 2737 3048 3208 3155 3009 2820 2632 2421 2152 1832 1518 1236 0934 0648 0473 0427 0476 0514 0506 0500 0502 0512 0556 0633 0685 0673 0633 0561 0508 0535 0654 89 8 0623 1031 1594 2278 2711 3040 3423 3600 3514 3304 3046 2791 2523 2193 1817 1471 1175 0860 0563 0390 0354 0422 0471 0460 0454 0457 0468 0520 0613 0678 0662 0613 0525 0457 0489 0634 90 9 0591 1022 1629 2359 2824 3194 3621 3821 3706 3447 3135 2835 2523 2151 1742 1382 1087 0773 0483 0323 0297 0365 0409 0389 0377 0378 0387 0442 0538 0607 0591 0539 0445 0375 0403 0554 91 10 0656 0649 0623 0623 0597 0563 0540 0541 0575 0587 0618 0800 1245 1747 2002 2070 2088 2088 2075 2071 2073 2088 2098 2112 2130 2150 2171 2196 2217 2231 2243 2259 2281 2303 2320 2337 92 11 0888 0924 0958 1033 1052 1020 1000 0994 1021 1025 1048 1199 1546 1914 2091 2128 2135 2128 2115 2110 2107 2117 2125 2139 2160 2179 2202 2224 2245 2259 2272 2289 2306 2331 2346 2368 93 12 1189 1283 1380 1578 1677 1666 1651 1628 1635 1633 1637 1722 1912 2098 2179 2185 2180 2168 2152 2146 2141 2145 2150 2161 2179 2198 2219 2240 2261 2273 2287 2301 2321 2343 2358 2373 94 13 1521 1684 1886 2261 2481 2511 2513 2475 2449 2424 2404 2387 2372 2356 2343 2318 2302 2284 2264 2260 2251 2248 2250 2262 2279 2296 2315 2337 2355 2367 2378 2392 2410 2430 2442 2457 95 14 1566 1762 2028 2471 2753 2821 2865 2842 2788 2715 2640 2572 2502 2423 2337 2255 2187 2107 2010 1947 1959 2110 2291 2388 2438 2467 2493 2529 2570 2595 2600 2597 2586 2580 2597 2651 96 15 1610 1860 2190 2714 3059 3173 3273 3266 3181 3059 2926 2800 2676 2535 2381 2242 2131 2001 1848 1750 1772 2021 2338 2513 2593 2633 2665 2714 2779 2816 2812 2792 2753 2720 2740 2827 97 16 1581 1884 2263 2867 3261 3437 3594 3607 3485 3302 3104 2917 2735 2527 2307 2118 1975 1801 1605 1481 1520 1865 2323 2580 2695 2749 2789 2853 2943 2994 2987 2949 2880 2820 2843 2967 98 17 1625 1968 2401 3094 3564 3791 4021 4053 3899 3652 3383 3133 2889 2614 2324 2084 1902 1687 1449 1301 1347 1771 2369 2721 2878 2952 3002 3085 3204 3273 3256 3203 3103 3016 3041 3204 99 18 1519 1873 2352 3083 3575 3850 4137 4193 4009 3711 3385 3086 2795 2470 2133 1863 1662 1429 1178 1027 1078 1531 2203 2614 2800 2882 2935 3031 3167 3247 3225 3157 3034 2928 2954 3143 100 19 0855 0782 0680 0623 0550 0493 0457 0459 0504 0505 0524 0758 1370 2041 2315 2348 2356 2318 2226 2156 2307 3056 4113 4823 5158 5306 5391 5452 5496 5512 5525 5535 5548 5577 5589 5614 101 20 1047 0990 0928 0928 0889 0837 0807 0796 0827 0809 0806 1011 1537 2080 2275 2282 2281 2239 2144 2076 2233 3000 4106 4856 5212 5370 5455 5517 5563 5582 5592 5603 5618 5645 5659 5679 102 21 1311 1275 1261 1343 1359 1313 1283 1264 1276 1232 1203 1368 1807 2237 2371 2355 2347 2301 2204 2141 2297 3060 4165 4918 5278 5436 5525 5587 5632 5647 5657 5668 5684 5707 5720 5742 103 22 1608 1631 1678 1883 1972 1952 1925 1893 1873 1799 1731 1835 2155 2442 2497 2457 2439 2389 2293 2231 2386 3132 4214 4950 5303 5461 5549 5609 5654 5669 5680 5691 5707 5731 5743 5768 104 23 1869 1944 2062 2386 2576 2579 2574 2522 2463 2350 2241 2266 2445 2587 2572 2512 2486 2432 2336 2278 2431 3170 4250 4993 5351 5511 5600 5659 5704 5720 5732 5742 5759 5784 5794 5817 105 24 2173 2292 2491 2960 3264 3309 3330 3256 3146 2986 2826 2750 2748 2719 2623 2539 2506 2448 2352 2298 2449 3171 4236 4973 5330 5487 5576 5636 5679 5695 5706 5718 5734 5761 5772 5796 106 25 2395 2570 2836 3446 3868 3956 4008 3920 3752 3546 3340 3155 2989 2822 2667 2567 2528 2469 2374 2324 2477 3197 4263 5005 5364 5524 5613 5674 5716 5733 5745 5755 5770 5796 5806 5826 107 26 2487 2718 3035 3746 4250 4390 4493 4411 4195 3918 3639 3392 3168 2938 2722 2577 2506 2405 2259 2177 2338 3196 4525 5462 5916 6118 6226 6317 6398 6433 6435 6424 6396 6380 6394 6474 108 27 2421 2648 3008 3752 4292 4479 4632 4566 4317 3985 3649 3351 3079 2797 2530 2349 2249 2113 1934 1831 1993 2923 4419 5497 6025 6255 6377 6489 6597 6649 6642 6607 6539 6489 6505 6623 109 1 0304 0398 0459 0497 0475 0457 0447 0471 0524 0546 0584 0818 1372 1912 2028 1852 1588 1289 0995 0785 0668 0612 0569 0539 0531 0534 0541 0570 0620 0656 0651 0628 0582 0550 0573 0652 110 2 0379 0523 0656 0771 0786 0795 0813 0847 0907 0925 0958 1168 1636 2047 2090 1889 1617 1311 1011 0799 0681 0620 0577 0548 0541 0544 0551 0581 0633 0667 0662 0638 0593 0561 0584 0664 111 3 0510 0703 0940 1187 1284 1341 1408 1470 1531 1547 1561 1709 2013 2226 2167 1932 1646 1333 1026 0810 0689 0629 0585 0556 0549 0551 0560 0591 0642 0678 0671 0647 0602 0568 0593 0677 112 4 0604 0879 1215 1608 1816 1936 2078 2180 2231 2238 2229 2284 2389 2402 2248 1980 1677 1350 1035 0811 0687 0626 0580 0550 0546 0549 0557 0590 0642 0676 0670 0646 0601 0566 0589 0673 113 5 0692 0992 1413 1917 2223 2412 2629 2758 2792 2789 2756 2710 2629 2488 2272 1987 1678 1351 1035 0814 0690 0629 0584 0556 0551 0555 0564 0596 0647 0680 0674 0650 0607 0574 0594 0681 114 6 0725 1098 1615 2250 2634 2888 3183 3360 3382 3339 3253 3154 3015 2798 2497 2138 1771 1385 1014 0763 0644 0605 0570 0540 0531 0534 0544 0583 0647 0690 0680 0648 0589 0548 0573 0676 115 7 0717 1138 1728 2451 2900 3211 3578 3789 3782 3683 3529 3363 3161 2874 2501 2098 1707 1299 0909 0656 0556 0553 0547 0520 0513 0516 0526 0572 0650 0703 0690 0650 0576 0521 0550 0669 116 8 0724 1203 1894 2736 3282 3679 4139 4392 4360 4198 3972 3735 3461 3091 2635 2164 1729 1275 0845 0575 0479 0496 0506 0479 0470 0474 0487 0541 0639 0703 0688 0637 0547 0478 0511 0658 117 9 0663 1159 1865 2728 3281 3708 4209 4474 4401 4175 3880 3585 3260 2845 2361 1896 1489 1064 0668 0433 0365 0404 0422 0393 0382 0384 0395 0452 0555 0624 0608 0553 0457 0385 0416 0571 118 10 0700 0684 0658 0644 0595 0551 0522 0529 0578 0597 0637 0893 1546 2312 2694 2764 2739 2675 2589 2522 2482 2476 2468 2466 2483 2502 2527 2563 2604 2629 2634 2634 2628 2627 2647 2699 119 11 0906 0952 0980 1043 1045 1004 0981 0980 1028 1041 1074 1302 1856 2464 2744 2773 2732 2657 2563 2492 2447 2435 2423 2420 2434 2453 2477 2513 2553 2578 2582 2580 2572 2572 2589 2644 120 12 1204 1307 1429 1629 1713 1693 1685 1679 1712 1718 1736 1911 2309 2709 2864 2846 2781 2688 2583 2506 2452 2430 2414 2409 2422 2441 2464 2500 2542 2568 2570 2567 2558 2550 2571 2626 121 13 1490 1674 1890 2267 2468 2494 2507 2494 2505 2495 2491 2577 2778 2956 2995 2936 2854 2754 2641 2561 2503 2475 2456 2449 2461 2477 2498 2533 2574 2596 2600 2597 2586 2582 2598 2652 122 14 1762 2012 2340 2887 3230 3298 3345 3331 3305 3276 3244 3213 3178 3130 3066 2972 2876 2769 2652 2569 2509 2477 2455 2449 2462 2478 2503 2536 2576 2598 2603 2599 2587 2580 2597 2651 123 15 1853 2169 2584 3261 3696 3830 3941 3945 3890 3809 3714 3621 3522 3396 3245 3078 2921 2745 2547 2409 2370 2469 2587 2645 2680 2704 2729 2777 2840 2875 2872 2851 2808 2779 2795 2882 124 16 1846 2183 2671 3434 3945 4138 4316 4345 4257 4111 3947 3788 3623 3421 3189 2959 2758 2527 2272 2097 2077 2298 2579 2728 2800 2839 2873 2938 3026 3075 3065 3029 2958 2898 2917 3047 125 17 1885 2302 2844 3714 4312 4575 4830 4887 4759 4547 4305 4075 3840 3559 3242 2947 2699 2414 2103 1895 1890 2222 2661 2904 3017 3072 3116 3199 3314 3382 3364 3310 3209 3123 3151 3313 126 18 1729 2146 2706 3583 4183 4494 4809 4892 4729 4452 4140 3849 3555 3212 2840 2513 2252 1956 1635 1433 1451 1860 2435 2773 2928 3000 3050 3145 3280 3358 3335 3269 3143 3037 3061 3251 127 19 0965 0877 0778 0713 0628 0556 0511 0513 0571 0585 0618 0929 1763 2758 3249 3363 3398 3376 3297 3236 3355 3911 4631 5092 5319 5425 5496 5550 5591 5608 5617 5624 5643 5665 5678 5699 128 20 1203 1160 1102 1116 1067 1000 0954 0945 0995 0993 1012 1301 2058 2923 3327 3408 3431 3403 3318 3259 3379 3940 4667 5139 5372 5483 5555 5610 5650 5667 5676 5685 5704 5727 5738 5763 129 21 1516 1518 1517 1639 1667 1604 1557 1537 1566 1545 1537 1780 2408 3090 3381 3423 3431 3395 3310 3252 3371 3934 4686 5180 5422 5537 5608 5665 5703 5718 5729 5736 5754 5775 5785 5811 130 22 1856 1903 1994 2261 2384 2347 2311 2271 2271 2220 2179 2352 2823 3301 3474 3474 3467 3424 3337 3282 3397 3960 4720 5224 5473 5588 5661 5714 5753 5767 5775 5784 5799 5822 5834 5855 131 23 2195 2321 2502 2938 3192 3188 3163 3107 3067 2979 2900 2982 3272 3547 3613 3578 3558 3509 3420 3365 3482 4032 4785 5286 5535 5650 5721 5776 5816 5826 5835 5844 5859 5880 5892 5914 132 24 2535 2715 2987 3595 3986 4021 4024 3943 3856 3732 3609 3589 3681 3748 3710 3643 3609 3553 3463 3411 3524 4067 4813 5312 5560 5678 5748 5803 5840 5854 5864 5871 5887 5910 5918 5940 133 25 2846 3102 3465 4275 4846 4943 4978 4876 4728 4557 4386 4235 4099 3960 3832 3736 3695 3635 3544 3497 3606 4134 4874 5373 5621 5737 5807 5861 5897 5910 5917 5926 5941 5960 5967 5992 134 26 2953 3255 3697 4634 5300 5460 5556 5463 5266 5025 4778 4557 4351 4136 3926 3766 3675 3554 3383 3279 3404 4114 5132 5821 6162 6317 6410 6494 6572 6606 6603 6592 6565 6550 6561 6635 135 27 2760 3078 3531 4464 5127 5335 5501 5436 5206 4898 4581 4295 4029 3742 3459 3244 3113 2941 2719 2580 2716 3558 4820 5690 6115 6301 6408 6511 6621 6674 6661 6621 6555 6496 6512 6634 136 1 0331 0440 0530 0563 0526 0499 0487 0510 0583 0607 0655 0962 1716 2468 2625 2369 1995 1574 1167 0880 0722 0644 0586 0547 0538 0539 0549 0587 0654 0699 0690 0656 0596 0553 0575 0682 137 2 0411 0546 0709 0815 0818 0816 0827 0869 0941 0971 1009 1296 1962 2583 2666 2389 2007 1587 1177 0890 0732 0653 0594 0556 0547 0548 0559 0597 0663 0709 0699 0666 0607 0562 0587 0694 138 3 0513 0717 0967 1210 1294 1341 1401 1469 1552 1575 1601 1840 2363 2786 2758 2441 2042 1608 1191 0897 0737 0655 0596 0557 0549 0551 0561 0600 0667 0712 0702 0669 0609 0565 0586 0694 139 4 0615 0909 1280 1684 1883 1993 2137 2249 2329 2348 2353 2507 2820 3003 2854 2493 2074 1628 1200 0900 0734 0652 0592 0553 0544 0548 0558 0599 0666 0711 0702 0667 0608 0562 0588 0698 140 5 0711 1060 1533 2086 2398 2595 2821 2979 3054 3062 3044 3092 3184 3148 2897 2503 2070 1617 1186 0886 0721 0639 0580 0542 0535 0538 0549 0589 0655 0698 0688 0655 0597 0554 0578 0687 141 6 0740 1180 1737 2434 2855 3137 3456 3665 3720 3715 3664 3592 3471 3259 2937 2523 2083 1627 1192 0890 0726 0645 0585 0548 0541 0545 0557 0596 0661 0704 0695 0663 0603 0559 0586 0694 142 7 0796 1274 1948 2784 3300 3669 4089 4353 4395 4348 4238 4104 3915 3614 3193 2694 2189 1668 1174 0842 0681 0621 0572 0532 0523 0526 0539 0586 0666 0719 0707 0665 0591 0538 0566 0690 143 8 0763 1324 2095 3051 3659 4102 4623 4932 4947 4834 4646 4435 4167 3775 3262 2697 2150 1588 1057 0711 0562 0534 0508 0469 0459 0464 0478 0536 0634 0699 0684 0634 0542 0472 0506 0654 144 9 0718 1294 2106 3120 3770 4265 4854 5198 5183 5014 4756 4483 4153 3701 3132 2540 1989 1426 0903 0574 0446 0438 0423 0385 0373 0376 0391 0450 0554 0625 0609 0552 0455 0383 0416 0570 145 10 0753 0747 0726 0704 0638 0579 0546 0556 0622 0648 0695 1026 1894 2924 3417 3462 3367 3211 3023 2878 2792 2762 2734 2716 2726 2747 2774 2821 2883 2918 2913 2896 2864 2841 2859 2943 146 11 0943 0999 1029 1105 1091 1046 1016 1025 1089 1112 1154 1463 2240 3109 3490 3484 3359 3182 2979 2824 2728 2689 2654 2634 2643 2660 2685 2732 2795 2833 2828 2808 2772 2745 2768 2850 147 12 1176 1304 1444 1654 1722 1700 1690 1701 1761 1777 1803 2066 2690 3336 3573 3508 3353 3156 2938 2773 2668 2620 2582 2560 2568 2584 2611 2658 2720 2755 2750 2730 2693 2661 2680 2769 148 13 1467 1687 1935 2313 2504 2527 2549 2560 2602 2604 2613 2802 3235 3646 3755 3646 3477 3271 3049 2884 2776 2722 2680 2659 2665 2681 2704 2751 2814 2849 2844 2823 2783 2755 2771 2862 149 14 1763 2050 2414 2993 3341 3418 3481 3498 3515 3501 3483 3567 3767 3919 3895 3740 3549 3335 3107 2937 2825 2766 2723 2699 2705 2719 2743 2790 2852 2885 2880 2859 2820 2789 2806 2896 150 15 2026 2385 2872 3638 4141 4287 4408 4428 4407 4371 4322 4273 4207 4109 3970 3781 3579 3359 3128 2959 2844 2782 2737 2713 2722 2735 2760 2807 2866 2901 2896 2876 2837 2804 2822 2911 151 16 2079 2510 3102 4022 4643 4867 5068 5122 5073 4982 4866 4749 4614 4428 4187 3909 3639 3337 3016 2786 2689 2745 2823 2852 2879 2902 2932 2993 3078 3127 3115 3077 3006 2949 2971 3095 152 17 2106 2589 3238 4265 4967 5259 5549 5632 5541 5375 5176 4978 4763 4484 4150 3800 3480 3122 2743 2476 2406 2605 2869 3003 3072 3111 3151 3234 3349 3415 3396 3341 3242 3158 3182 3348 153 18 1980 2484 3188 4245 4981 5333 5694 5819 5695 5468 5196 4931 4649 4296 3884 3480 3126 2735 2323 2043 1995 2287 2687 2908 3014 3066 3112 3204 3339 3415 3392 3324 3199 3092 3117 3309 154 19 1059 0975 0863 0791 0691 0609 0557 0558 0632 0656 0703 1083 2127 3442 4163 4365 4433 4432 4375 4332 4403 4719 5061 5271 5389 5459 5516 5565 5604 5618 5627 5633 5653 5679 5688 5719 155 20 1341 1304 1251 1273 1230 1144 1084 1074 1142 1156 1192 1554 2517 3682 4294 4455 4505 4497 4436 4394 4462 4780 5134 5352 5476 5548 5606 5656 5695 5708 5714 5724 5741 5768 5779 5803 156 21 1689 1708 1743 1889 1924 1857 1795 1774 1827 1824 1844 2165 2994 3952 4429 4539 4569 4549 4484 4443 4510 4822 5180 5405 5529 5598 5655 5704 5741 5751 5759 5766 5784 5808 5815 5840 157 22 2104 2202 2335 2668 2831 2782 2728 2682 2708 2684 2674 2926 3572 4274 4594 4649 4655 4626 4558 4517 4579 4879 5233 5458 5585 5655 5711 5758 5793 5805 5811 5818 5834 5857 5866 5888 158 23 2489 2654 2901 3428 3741 3724 3686 3624 3607 3553 3511 3662 4083 4512 4680 4679 4666 4627 4554 4512 4575 4885 5259 5499 5634 5707 5763 5809 5846 5857 5864 5871 5887 5913 5920 5941 159 24 2855 3108 3468 4225 4716 4747 4736 4645 4584 4497 4416 4453 4633 4800 4832 4785 4755 4706 4631 4590 4647 4947 5318 5557 5689 5762 5816 5863 5896 5906 5913 5920 5934 5957 5963 5982 160 25 3203 3549 4027 5022 5706 5812 5832 5720 5598 5473 5350 5240 5140 5040 4947 4861 4816 4759 4681 4643 4697 4989 5358 5600 5734 5807 5862 5905 5941 5953 5957 5966 5978 6000 6010 6026 161 26 3255 3632 4173 5266 6043 6209 6309 6217 6048 5848 5641 5453 5275 5082 4886 4716 4601 4457 4271 4150 4221 4743 5454 5918 6157 6274 6355 6434 6511 6542 6541 6522 6494 6475 6486 6570 162 27 3112 3526 4117 5287 6127 6369 6543 6486 6284 6024 5748 5498 5257 4986 4704 4460 4283 4067 3804 3629 3704 4348 5269 5881 6187 6327 6418 6515 6619 6668 6654 6614 6547 6485 6498 6623 163 1 0341 0500 0602 0648 0598 0561 0542 0566 0658 0693 0748 1136 2104 3084 3279 2926 2422 1871 1341 0971 0772 0673 0600 0551 0538 0541 0551 0599 0681 0738 0724 0683 0607 0551 0576 0707 164 2 0412 0587 0754 0870 0859 0844 0846 0887 0983 1019 1068 1439 2329 3181 3301 2927 2416 1863 1332 0962 0762 0661 0589 0540 0527 0530 0541 0589 0672 0727 0715 0674 0599 0542 0569 0694 165 3 0494 0727 0986 1218 1282 1301 1349 1419 1525 1559 1599 1938 2702 3364 3373 2961 2438 1878 1342 0969 0768 0667 0594 0545 0533 0537 0548 0596 0678 0734 0721 0678 0603 0546 0572 0702 166 4 0611 0927 1327 1740 1921 2022 2157 2281 2393 2420 2440 2700 3256 3650 3514 3048 2498 1918 1367 0985 0778 0674 0600 0550 0539 0542 0555 0604 0687 0744 0731 0689 0612 0554 0585 0708 167 5 0685 1085 1600 2200 2518 2718 2958 3137 3244 3264 3258 3410 3720 3850 3584 3072 2503 1914 1358 0973 0764 0662 0587 0539 0528 0532 0545 0593 0675 0729 0716 0675 0601 0543 0573 0700 168 6 0771 1216 1842 2593 3028 3323 3659 3898 3996 4007 3971 4007 4078 3975 3605 3065 2486 1894 1338 0954 0747 0645 0573 0526 0516 0520 0533 0583 0662 0715 0702 0661 0591 0534 0564 0686 169 7 0817 1324 2052 2960 3527 3917 4378 4679 4762 4759 4685 4579 4406 4103 3654 3087 2497 1896 1336 0951 0744 0641 0568 0522 0513 0518 0531 0579 0659 0712 0700 0658 0586 0533 0563 0687 170 8 0833 1437 2280 3362 4054 4552 5143 5521 5590 5535 5389 5207 4946 4531 3956 3283 2609 1928 1293 0867 0661 0581 0518 0469 0458 0463 0479 0536 0635 0699 0684 0633 0543 0474 0507 0661 171 9 0783 1409 2315 3455 4207 4765 5436 5854 5897 5781 5562 5311 4980 4490 3843 3131 2445 1754 1118 0705 0523 0472 0429 0382 0371 0376 0392 0454 0560 0630 0613 0557 0462 0389 0424 0585 172 10 0769 0788 0774 0748 0666 0594 0555 0568 0654 0689 0745 1156 2253 3562 4153 4136 3927 3639 3317 3071 2925 2863 2806 2770 2775 2791 2818 2879 2966 3017 3006 2969 2904 2850 2873 2997 173 11 0904 1009 1072 1148 1123 1064 1035 1052 1138 1170 1221 1613 2618 3757 4223 4150 3909 3597 3258 3000 2845 2775 2715 2674 2675 2689 2716 2778 2867 2916 2905 2866 2798 2740 2765 2890 174 12 1157 1313 1470 1679 1733 1704 1691 1717 1802 1826 1867 2224 3099 4027 4358 4233 3974 3654 3307 3047 2888 2812 2750 2709 2710 2726 2752 2814 2900 2951 2938 2899 2834 2776 2799 2922 175 13 1424 1670 1946 2331 2509 2523 2549 2581 2654 2667 2687 2978 3663 4329 4508 4330 4051 3722 3375 3113 2953 2872 2807 2767 2768 2783 2807 2868 2954 3001 2989 2952 2884 2828 2851 2970 176 14 1688 1992 2396 2972 3289 3368 3442 3481 3540 3540 3536 3738 4204 4608 4644 4418 4119 3778 3422 3158 2992 2906 2838 2798 2799 2813 2837 2898 2983 3030 3016 2980 2913 2858 2878 2999 177 15 1987 2386 2919 3728 4232 4388 4532 4591 4617 4597 4566 4636 4815 4908 4787 4508 4189 3838 3477 3210 3039 2947 2878 2838 2840 2853 2881 2940 3025 3072 3059 3022 2953 2897 2917 3042 178 16 2209 2695 3341 4376 5057 5301 5516 5592 5580 5539 5471 5393 5291 5125 4891 4579 4248 3893 3530 3263 3089 2994 2924 2882 2884 2901 2928 2988 3074 3120 3107 3071 3001 2944 2963 3091 179 17 2337 2891 3664 4882 5711 6048 6369 6490 6447 6344 6199 6044 5857 5588 5232 4815 4400 3952 3488 3152 2994 3023 3077 3090 3112 3134 3169 3248 3361 3425 3404 3348 3250 3166 3193 3359 180 18 2197 2777 3578 4823 5684 6091 6500 6661 6586 6413 6185 5954 5690 5330 4882 4401 3950 3466 2967 2618 2498 2659 2886 3000 3063 3100 3137 3228 3358 3435 3410 3339 3217 3112 3138 3327 181 19 1122 1045 0942 0869 0762 0671 0609 0612 0697 0728 0786 1217 2411 3969 4881 5169 5266 5294 5275 5266 5274 5323 5352 5389 5441 5485 5532 5577 5613 5624 5633 5641 5658 5679 5688 5710 182 20 1425 1404 1358 1389 1340 1246 1179 1170 1248 1274 1324 1739 2848 4241 5033 5271 5348 5363 5342 5331 5334 5373 5398 5436 5490 5537 5582 5628 5664 5676 5684 5692 5707 5731 5744 5766 183 21 1812 1848 1899 2079 2123 2037 1970 1948 2012 2028 2067 2447 3420 4591 5229 5410 5463 5468 5441 5430 5427 5456 5475 5511 5562 5608 5654 5696 5731 5742 5748 5755 5772 5797 5806 5826 184 22 2272 2376 2550 2932 3124 3061 2993 2947 2990 2989 3006 3319 4096 4981 5436 5546 5570 5562 5529 5519 5507 5525 5540 5573 5624 5666 5710 5752 5785 5796 5801 5807 5824 5848 5853 5871 185 23 2663 2898 3186 3816 4184 4166 4114 4046 4053 4028 4022 4236 4772 5351 5630 5678 5678 5655 5618 5607 5589 5594 5606 5636 5686 5727 5771 5812 5843 5852 5855 5862 5878 5900 5908 5929 186 24 3094 3407 3834 4719 5296 5328 5299 5206 5164 5118 5082 5177 5443 5709 5817 5803 5782 5749 5707 5694 5670 5668 5673 5703 5752 5791 5836 5875 5906 5914 5917 5922 5937 5960 5965 5987 187 25 3501 3894 4454 5598 6386 6488 6494 6377 6283 6206 6138 6077 6027 5980 5937 5874 5829 5788 5740 5726 5696 5683 5688 5719 5773 5818 5862 5902 5934 5943 5946 5953 5966 5988 5997 6012 188 26 3656 4121 4786 6117 7064 7257 7346 7253 7115 6972 6823 6683 6549 6397 6232 6057 5919 5757 5561 5429 5423 5672 5984 6182 6306 6379 6443 6513 6584 6611 6607 6589 6564 6547 6561 6636 189 27 3432 3916 4615 5990 6986 7249 7420 7362 7184 6965 6733 6516 6301 6055 5786 5527 5321 5080 4796 4601 4620 5088 5733 6149 6362 6469 6542 6632 6729 6776 6761 6719 6655 6598 6611 6724 190 1 0358 0562 0690 0735 0673 0619 0591 0620 0732 0777 0841 1321 2553 3817 4050 3566 2894 2173 1494 1026 0776 0652 0562 0502 0487 0489 0503 0561 0663 0733 0718 0664 0571 0498 0531 0682 191 2 0431 0656 0869 1000 0988 0961 0961 1009 1128 1175 1234 1703 2852 3964 4106 3588 2906 2181 1497 1027 0774 0649 0558 0499 0484 0487 0501 0560 0661 0730 0714 0662 0569 0497 0527 0681 192 3 0499 0762 1049 1287 1332 1344 1383 1460 1592 1638 1691 2138 3184 4128 4166 3613 2915 2181 1491 1018 0765 0639 0549 0489 0474 0478 0493 0551 0652 0719 0704 0652 0558 0487 0520 0669 193 4 0594 0936 1347 1761 1917 2005 2127 2255 2397 2441 2477 2861 3711 4383 4265 3660 2939 2193 1494 1016 0760 0633 0542 0483 0469 0474 0488 0547 0647 0715 0700 0648 0556 0486 0517 0672 194 5 0670 1108 1677 2300 2611 2801 3040 3237 3384 3424 3432 3713 4299 4645 4359 3698 2956 2198 1493 1012 0755 0629 0538 0480 0467 0472 0487 0546 0645 0710 0695 0643 0553 0484 0517 0666 195 6 0746 1268 1961 2763 3219 3523 3889 4161 4303 4330 4306 4457 4769 4835 4419 3717 2960 2195 1485 1002 0745 0619 0529 0472 0460 0465 0480 0539 0637 0704 0688 0637 0546 0477 0512 0664 196 7 0820 1395 2208 3195 3792 4205 4695 5040 5176 5191 5135 5158 5208 5019 4490 3754 2981 2207 1493 1006 0747 0621 0531 0474 0462 0468 0484 0542 0642 0707 0690 0639 0550 0482 0514 0666 197 8 0894 1504 2432 3593 4348 4890 5530 5965 6084 6081 5981 5836 5593 5169 4548 3782 3000 2217 1494 1001 0740 0612 0522 0465 0454 0460 0476 0537 0636 0701 0685 0635 0543 0473 0508 0660 198 9 0825 1513 2508 3772 4605 5222 5974 6473 6576 6520 6347 6124 5797 5274 4551 3715 2892 2075 1327 0834 0595 0498 0422 0369 0357 0362 0379 0442 0547 0619 0602 0547 0450 0375 0409 0573 199 10 0791 0847 0845 0815 0714 0629 0581 0597 0705 0749 0815 1324 2696 4336 5030 4925 4572 4120 3637 3271 3057 2959 2873 2816 2814 2829 2860 2940 3058 3126 3106 3050 2949 2865 2890 3056 200 11 0967 1087 1166 1245 1204 1139 1094 1121 1232 1273 1334 1831 3124 4603 5181 5028 4655 4191 3701 3335 3120 3018 2932 2873 2870 2883 2913 2990 3104 3170 3151 3093 2995 2909 2936 3101 201 12 1189 1370 1532 1745 1782 1739 1721 1756 1870 1905 1956 2426 3601 4875 5317 5112 4720 4247 3755 3386 3167 3060 2973 2915 2911 2927 2957 3034 3149 3215 3194 3136 3038 2952 2978 3143 202 13 1451 1730 2024 2416 2570 2577 2606 2651 2759 2784 2816 3223 4212 5213 5493 5236 4825 4349 3853 3486 3264 3152 3063 3004 3001 3017 3047 3123 3238 3302 3282 3226 3127 3041 3066 3230 203 14 1691 2047 2481 3075 3374 3441 3522 3586 3686 3701 3715 4043 4813 5517 5622 5302 4865 4370 3864 3489 3260 3143 3049 2991 2988 3004 3038 3115 3228 3291 3271 3214 3118 3034 3059 3226 204 15 1980 2429 2996 3835 4327 4483 4645 4737 4809 4808 4788 4996 5480 5858 5789 5410 4950 4444 3931 3552 3318 3196 3101 3041 3038 3051 3083 3161 3273 3337 3316 3261 3160 3076 3100 3267 205 16 2264 2793 3513 4608 5311 5574 5821 5945 5986 5965 5911 5973 6140 6178 5941 5507 5028 4518 4000 3617 3378 3249 3152 3094 3094 3110 3138 3219 3331 3397 3378 3320 3218 3133 3157 3323 206 17 2465 3077 3927 5275 6203 6575 6932 7082 7081 7032 6940 6831 6676 6426 6065 5598 5106 4587 4065 3682 3442 3309 3211 3152 3150 3164 3195 3273 3386 3447 3427 3370 3271 3187 3216 3374 207 18 2407 3074 3983 5424 6417 6868 7330 7540 7518 7408 7235 7046 6802 6441 5958 5394 4835 4246 3654 3230 3025 3029 3066 3067 3087 3108 3141 3230 3361 3436 3411 3340 3214 3107 3136 3326 208 19 1229 1140 1020 0921 0789 0677 0603 0609 0714 0755 0823 1355 2860 4860 6017 6332 6373 6308 6176 6070 6020 6042 6043 6061 6115 6165 6221 6290 6363 6393 6385 6371 6349 6336 6353 6426 209 20 1516 1521 1470 1489 1422 1305 1227 1225 1324 1360 1422 1943 3365 5191 6214 6472 6490 6412 6275 6168 6111 6124 6123 6140 6193 6243 6299 6368 6438 6468 6465 6447 6424 6409 6423 6499 210 21 1863 1920 1963 2132 2161 2060 1983 1968 2062 2090 2140 2634 3936 5543 6411 6607 6602 6514 6371 6264 6202 6204 6197 6213 6264 6311 6365 6432 6500 6527 6520 6501 6480 6464 6480 6553 211 22 2292 2440 2602 2994 3171 3101 3033 3002 3074 3084 3116 3548 4657 5958 6614 6724 6678 6566 6410 6296 6220 6207 6194 6208 6257 6304 6356 6422 6492 6519 6514 6497 6470 6453 6469 6540 212 23 2735 2986 3293 3935 4300 4271 4222 4171 4215 4206 4212 4557 5424 6379 6824 6855 6777 6649 6490 6376 6294 6268 6252 6266 6319 6367 6419 6485 6555 6583 6580 6560 6536 6519 6531 6603 213 24 3113 3471 3925 4839 5409 5444 5430 5367 5371 5338 5318 5548 6136 6747 6987 6941 6830 6681 6506 6385 6293 6255 6232 6241 6291 6338 6390 6456 6524 6550 6546 6528 6500 6481 6493 6568 214 25 3531 3974 4575 5787 6608 6718 6744 6667 6625 6564 6512 6606 6884 7136 7184 7070 6932 6770 6589 6468 6370 6321 6293 6302 6351 6395 6448 6512 6580 6608 6600 6582 6554 6538 6547 6619 215 26 3880 4423 5195 6726 7826 8029 8115 8017 7910 7820 7728 7643 7560 7460 7343 7177 7019 6851 6667 6545 6441 6385 6355 6365 6413 6459 6509 6574 6639 6665 6659 6640 6611 6595 6609 6676 216 27 3793 4380 5219 6843 8029 8327 8504 8451 8311 8154 7979 7813 7642 7429 7178 6897 6647 6367 6053 5833 5769 5975 6241 6404 6509 6573 6633 6713 6809 6850 6834 6793 6728 6674 6685 6797 217 1 0388 0606 0760 0809 0739 0673 0640 0675 0803 0853 0923 1478 2919 4410 4653 4034 3209 2345 1546 1005 0722 0583 0483 0419 0402 0406 0420 0483 0594 0671 0652 0596 0492 0413 0447 0613 218 2 0443 0688 0915 1048 1024 0983 0975 1026 1171 1226 1299 1864 3254 4599 4738 4078 3238 2362 1552 1004 0716 0576 0475 0410 0393 0397 0412 0476 0588 0665 0646 0587 0485 0405 0441 0608 219 3 0507 0808 1118 1359 1404 1403 1438 1525 1677 1731 1792 2323 3596 4762 4801 4110 3258 2378 1566 1016 0728 0586 0485 0420 0404 0408 0423 0487 0600 0676 0659 0600 0497 0419 0452 0619 220 4 0569 0936 1379 1779 1912 1982 2093 2225 2391 2443 2491 2977 4080 4991 4881 4142 3271 2380 1562 1008 0718 0575 0474 0409 0394 0398 0414 0479 0591 0667 0648 0590 0487 0409 0445 0611 221 5 0640 1084 1662 2260 2528 2694 2913 3111 3292 3341 3368 3773 4642 5236 4949 4150 3255 2354 1531 0979 0690 0549 0450 0388 0374 0378 0395 0457 0566 0640 0623 0565 0466 0391 0426 0589 222 6 0709 1238 1946 2747 3174 3460 3808 4086 4269 4309 4303 4588 5185 5476 5043 4194 3278 2365 1534 0974 0682 0541 0442 0379 0366 0371 0387 0451 0561 0634 0618 0560 0460 0386 0417 0583 223 7 0785 1381 2240 3264 3851 4265 4780 5156 5338 5367 5321 5459 5737 5702 5114 4218 3286 2364 1527 0965 0674 0533 0434 0373 0360 0366 0382 0446 0554 0629 0611 0553 0454 0381 0416 0578 224 8 0848 1500 2470 3659 4400 4934 5581 6043 6221 6240 6160 6160 6169 5876 5179 4252 3306 2376 1533 0966 0672 0530 0431 0370 0357 0364 0381 0446 0555 0629 0611 0554 0454 0380 0414 0579 225 9 0898 1617 2685 4069 4978 5652 6482 7054 7215 7215 7087 6896 6576 6026 5235 4278 3321 2383 1534 0964 0668 0525 0427 0366 0355 0361 0380 0445 0554 0627 0610 0554 0454 0380 0416 0577 226 10 0817 0884 0907 0885 0773 0679 0618 0639 0763 0815 0887 1473 3082 5028 5826 5639 5155 4562 3946 3487 3223 3101 2995 2922 2912 2926 2957 3047 3182 3262 3235 3163 3038 2931 2956 3149 227 11 0962 1107 1203 1281 1223 1140 1092 1120 1255 1305 1376 1961 3498 5265 5916 5662 5146 4534 3904 3439 3168 3042 2933 2860 2849 2861 2891 2979 3115 3192 3167 3092 2969 2859 2887 3075 228 12 1168 1382 1571 1779 1795 1741 1724 1761 1900 1945 2004 2563 3983 5542 6054 5750 5217 4595 3962 3496 3222 3090 2979 2906 2898 2912 2942 3032 3168 3247 3219 3148 3022 2914 2941 3135 229 13 1415 1686 1994 2381 2511 2501 2520 2581 2715 2752 2795 3307 4567 5874 6232 5881 5335 4711 4080 3615 3342 3207 3096 3022 3014 3027 3059 3147 3281 3356 3328 3257 3133 3024 3055 3244 230 14 1630 2005 2435 3017 3285 3336 3411 3495 3628 3656 3681 4129 5191 6206 6381 5962 5387 4750 4109 3640 3361 3220 3108 3034 3025 3038 3069 3158 3289 3366 3338 3268 3142 3036 3065 3252 231 15 1856 2301 2884 3705 4157 4300 4462 4576 4692 4704 4700 5040 5837 6524 6519 6037 5437 4783 4136 3666 3382 3236 3123 3049 3038 3050 3079 3166 3297 3371 3345 3273 3147 3044 3069 3259 232 16 2177 2734 3481 4585 5263 5519 5789 5946 6038 6031 5993 6185 6642 6938 6727 6178 5555 4891 4235 3756 3466 3313 3195 3120 3112 3126 3157 3246 3379 3454 3426 3354 3229 3121 3147 3339 233 17 2390 3043 3935 5308 6202 6572 6952 7156 7219 7193 7116 7154 7281 7229 6852 6250 5609 4935 4273 3792 3497 3340 3220 3146 3138 3150 3181 3271 3403 3478 3451 3379 3252 3145 3173 3363 234 18 2579 3296 4322 5923 7038 7527 8036 8287 8318 8265 8148 8002 7788 7438 6936 6297 5640 4959 4292 3807 3510 3350 3229 3154 3146 3159 3192 3279 3411 3486 3458 3388 3261 3154 3181 3375 235 19 1261 1175 1060 0952 0803 0678 0597 0606 0726 0773 0848 1454 3204 5575 6929 7230 7183 6998 6736 6526 6413 6409 6382 6378 6422 6470 6529 6613 6712 6759 6741 6699 6633 6585 6597 6712 236 20 1549 1545 1501 1503 1411 1282 1198 1199 1322 1366 1434 2041 3723 5905 7101 7333 7259 7059 6791 6581 6462 6446 6417 6412 6456 6505 6563 6648 6748 6792 6778 6736 6673 6621 6635 6749 237 21 1884 1937 1987 2148 2145 2041 1958 1955 2072 2105 2164 2742 4299 6248 7273 7433 7327 7110 6833 6618 6492 6466 6430 6424 6464 6512 6570 6654 6752 6795 6778 6736 6675 6622 6632 6751 238 22 2228 2388 2564 2923 3053 2967 2899 2882 2986 3008 3050 3584 4981 6654 7484 7567 7429 7195 6911 6693 6560 6521 6481 6474 6517 6563 6618 6704 6800 6843 6826 6785 6717 6664 6674 6790 239 23 2640 2905 3222 3818 4108 4061 4022 3998 4087 4092 4113 4581 5762 7082 7660 7634 7444 7177 6871 6640 6487 6430 6383 6376 6421 6471 6530 6616 6715 6761 6747 6700 6634 6577 6593 6712 240 24 3034 3386 3862 4754 5272 5298 5300 5271 5323 5307 5300 5656 6555 7507 7867 7766 7544 7262 6947 6714 6555 6487 6434 6422 6458 6502 6556 6639 6735 6776 6758 6714 6646 6594 6603 6719 241 25 3441 3910 4539 5725 6495 6598 6648 6614 6623 6579 6542 6769 7359 7932 8082 7905 7661 7367 7051 6819 6657 6580 6525 6515 6556 6603 6658 6744 6840 6881 6862 6823 6754 6700 6712 6829 242 26 3807 4360 5150 6655 7687 7881 8000 7958 7921 7854 7783 7862 8119 8319 8267 8023 7752 7447 7124 6892 6723 6637 6579 6566 6608 6655 6710 6793 6889 6931 6912 6870 6805 6752 6759 6874 243 27 4133 4794 5742 7552 8864 9174 9364 9322 9225 9125 9014 8902 8778 8611 8394 8098 7806 7494 7167 6934 6762 6669 6608 6596 6634 6679 6735 6815 6910 6950 6932 6890 6824 6773 6781 6893 244 1 0247 0251 0250 0264 0271 0266 0268 0268 0269 0263 0265 0288 0327 0348 0343 0331 0324 0317 0310 0312 0338 0415 0502 0546 0567 0579 0590 0604 0615 0629 0641 0655 0671 0687 0707 0719 245 2 0308 0317 0334 0363 0386 0395 0402 0398 0389 0376 0363 0349 0336 0323 0310 0302 0298 0294 0289 0296 0324 0396 0477 0519 0538 0550 0561 0574 0586 0598 0610 0626 0640 0659 0673 0689 246 3 0463 0509 0562 0650 0705 0729 0751 0746 0713 0661 0609 0560 0515 0469 0427 0397 0384 0363 0343 0343 0388 0533 0715 0812 0850 0866 0879 0897 0921 0938 0943 0947 0941 0941 0956 0993 247 4 0544 0614 0703 0850 0939 0994 1045 1045 0987 0894 0800 0714 0635 0553 0474 0423 0394 0358 0320 0314 0364 0548 0793 0923 0973 0995 1009 1037 1077 1103 1103 1093 1067 1049 1067 1132 248 5 0537 0635 0768 0959 1081 1166 1253 1264 1179 1050 0912 0790 0676 0559 0450 0378 0337 0289 0242 0234 0289 0488 0768 0921 0978 1002 1017 1052 1104 1138 1135 1114 1073 1042 1060 1143 249 6 0556 0706 0898 1148 1317 1442 1572 1593 1483 1305 1119 0952 0798 0640 0492 0395 0339 0274 0214 0201 0257 0467 0768 0930 0991 1015 1033 1077 1146 1191 1183 1151 1091 1041 1062 1171 250 7 0571 0772 1022 1340 1553 1712 1893 1931 1789 1564 1327 1116 0921 0722 0536 0417 0346 0267 0195 0181 0236 0454 0772 0946 1013 1041 1060 1112 1195 1251 1240 1199 1121 1057 1079 1209 251 8 0633 0867 1168 1571 1839 2049 2282 2331 2155 1871 1573 1310 1067 0820 0591 0447 0363 0268 0184 0168 0225 0457 0803 0989 1062 1093 1116 1180 1284 1351 1338 1283 1184 1104 1132 1288 252 9 0633 0918 1279 1737 2045 2287 2563 2627 2427 2102 1760 1458 1181 0898 0639 0474 0379 0273 0180 0160 0216 0443 0773 0944 1007 1035 1058 1127 1243 1318 1301 1239 1130 1040 1067 1235 253 10 0447 0414 0365 0347 0325 0306 0300 0300 0308 0288 0284 0343 0460 0516 0478 0434 0417 0392 0354 0339 0429 0947 1835 2455 2734 2850 2910 2949 2980 2999 3015 3029 3048 3070 3084 3111 254 11 0571 0516 0484 0499 0496 0482 0479 0472 0464 0425 0396 0426 0507 0533 0484 0440 0423 0398 0361 0349 0444 0962 1852 2475 2758 2877 2937 2978 3008 3026 3042 3057 3076 3098 3116 3141 255 12 0716 0677 0667 0716 0746 0748 0759 0742 0702 0629 0560 0543 0559 0534 0469 0424 0408 0385 0351 0346 0444 0957 1846 2476 2763 2884 2947 2989 3019 3037 3052 3068 3087 3109 3124 3152 256 13 0853 0834 0844 0940 1011 1035 1059 1032 0958 0845 0735 0662 0609 0538 0460 0415 0401 0380 0348 0349 0451 0957 1843 2476 2770 2893 2956 2998 3030 3050 3065 3081 3101 3125 3139 3161 257 14 0940 0928 0965 1105 1218 1265 1306 1270 1162 1014 0871 0747 0639 0536 0449 0407 0395 0373 0346 0351 0455 0955 1840 2477 2774 2899 2963 3005 3037 3054 3072 3087 3106 3129 3147 3169 258 15 1076 1093 1155 1347 1493 1568 1636 1597 1451 1252 1055 0886 0739 0597 0476 0413 0393 0361 0320 0320 0434 1017 2060 2813 3162 3312 3386 3449 3508 3542 3550 3549 3537 3528 3545 3607 259 16 1159 1207 1307 1561 1749 1858 1960 1926 1741 1489 1238 1024 0835 0652 0497 0413 0383 0337 0282 0277 0396 1036 2205 3056 3454 3622 3709 3788 3873 3919 3921 3901 3857 3819 3840 3935 260 17 1216 1299 1455 1780 2027 2174 2328 2300 2078 1764 1451 1184 0949 0719 0522 0414 0370 0307 0238 0229 0346 1018 2271 3186 3614 3795 3886 3987 4104 4170 4161 4118 4034 3962 3980 4128 261 18 1176 1324 1533 1919 2200 2385 2582 2564 2316 1961 1608 1303 1037 0776 0551 0425 0369 0294 0217 0206 0316 0961 2182 3072 3488 3666 3756 3867 4008 4089 4073 4009 3895 3791 3816 3991 262 19 0755 0645 0545 0504 0458 0420 0395 0389 0406 0375 0353 0437 0604 0648 0543 0457 0429 0383 0311 0276 0433 1543 3740 5512 6402 6783 6959 7063 7132 7160 7171 7179 7193 7217 7228 7263 263 20 0843 0736 0646 0627 0596 0561 0546 0535 0533 0481 0437 0498 0634 0653 0539 0453 0425 0379 0308 0275 0434 1545 3745 5522 6417 6799 6980 7081 7151 7178 7187 7194 7207 7234 7246 7276 264 21 0934 0856 0776 0787 0775 0751 0739 0722 0701 0621 0548 0579 0677 0667 0543 0455 0428 0383 0311 0282 0447 1560 3764 5543 6438 6824 7004 7107 7177 7205 7215 7223 7237 7261 7273 7304 265 22 1104 1026 0967 1016 1038 1037 1041 1011 0953 0829 0708 0687 0723 0669 0531 0443 0418 0373 0305 0279 0447 1559 3760 5542 6442 6829 7009 7116 7185 7212 7225 7232 7247 7269 7281 7315 266 23 1278 1201 1171 1284 1359 1387 1409 1366 1258 1076 0900 0811 0773 0668 0516 0429 0404 0362 0297 0280 0449 1554 3755 5546 6457 6851 7037 7143 7214 7241 7255 7261 7280 7301 7317 7346 267 24 1442 1391 1372 1550 1680 1728 1781 1721 1564 1326 1096 0941 0830 0678 0514 0426 0403 0361 0297 0284 0458 1565 3760 5543 6449 6842 7025 7130 7200 7227 7240 7249 7264 7290 7300 7332 268 25 1560 1525 1530 1751 1933 2010 2085 2018 1813 1527 1251 1037 0863 0673 0499 0412 0391 0350 0290 0283 0459 1558 3743 5524 6431 6824 7008 7116 7187 7216 7228 7240 7258 7282 7290 7324 269 26 1670 1645 1675 1947 2183 2296 2398 2317 2064 1728 1403 1128 0894 0673 0490 0403 0384 0343 0285 0283 0461 1562 3760 5550 6465 6859 7045 7154 7224 7253 7267 7275 7293 7318 7333 7363 270 27 1713 1711 1788 2107 2375 2513 2636 2558 2272 1891 1525 1215 0951 0702 0497 0397 0371 0323 0258 0254 0429 1557 3836 5692 6639 7046 7237 7369 7478 7526 7527 7511 7479 7454 7465 7554 271 1 0311 0321 0317 0338 0341 0338 0337 0337 0346 0348 0359 0400 0474 0535 0555 0554 0551 0546 0541 0539 0540 0544 0548 0555 0564 0573 0584 0597 0610 0622 0635 0649 0665 0682 0697 0712 272 2 0403 0444 0466 0519 0554 0557 0563 0560 0560 0560 0559 0559 0559 0557 0555 0549 0545 0541 0536 0536 0536 0538 0542 0549 0558 0567 0578 0589 0602 0614 0627 0642 0657 0675 0687 0702 273 3 0563 0641 0738 0874 0953 0987 1013 1011 0990 0956 0919 0883 0847 0805 0760 0718 0686 0647 0602 0580 0596 0666 0737 0764 0777 0784 0792 0810 0832 0850 0854 0852 0844 0840 0856 0896 274 4 0658 0769 0924 1126 1256 1317 1377 1383 1340 1265 1186 1111 1038 0955 0868 0796 0744 0679 0609 0573 0600 0724 0859 0914 0936 0946 0957 0984 1022 1047 1046 1035 1008 0989 1005 1074 275 5 0661 0819 1012 1261 1427 1521 1617 1636 1568 1455 1331 1215 1102 0978 0850 0751 0680 0596 0510 0468 0505 0670 0860 0944 0976 0989 1002 1035 1085 1120 1116 1095 1051 1020 1038 1126 276 6 0687 0889 1137 1463 1678 1812 1955 1992 1899 1738 1563 1401 1245 1074 0903 0772 0680 0573 0465 0415 0454 0642 0877 0987 1029 1047 1062 1105 1173 1217 1208 1175 1116 1067 1087 1196 277 7 0672 0923 1233 1632 1892 2070 2269 2320 2199 1987 1761 1549 1349 1131 0914 0752 0640 0514 0390 0336 0376 0580 0847 0979 1028 1051 1069 1120 1203 1257 1245 1204 1128 1065 1088 1218 278 8 0721 1010 1384 1867 2183 2419 2681 2753 2593 2322 2029 1761 1507 1235 0968 0774 0643 0495 0354 0293 0338 0566 0880 1037 1097 1125 1147 1210 1313 1381 1365 1314 1213 1133 1159 1315 279 9 0713 1030 1455 1996 2362 2634 2944 3038 2853 2538 2197 1889 1596 1283 0978 0760 0618 0458 0308 0248 0292 0517 0824 0976 1034 1059 1081 1149 1263 1337 1319 1260 1149 1059 1087 1255 280 10 0549 0490 0433 0418 0388 0364 0351 0350 0366 0356 0358 0458 0685 0880 0913 0888 0875 0847 0796 0764 0863 1359 2107 2599 2818 2913 2965 3002 3032 3051 3064 3078 3097 3118 3135 3158 281 11 0666 0629 0601 0616 0609 0590 0576 0573 0575 0546 0529 0599 0773 0907 0910 0875 0862 0834 0784 0756 0856 1354 2110 2610 2836 2931 2983 3021 3051 3069 3082 3098 3117 3138 3158 3177 282 12 0860 0842 0846 0918 0950 0945 0945 0927 0903 0845 0793 0815 0909 0966 0936 0894 0878 0849 0801 0778 0881 1376 2132 2636 2863 2962 3014 3050 3079 3096 3110 3124 3144 3166 3179 3204 283 13 1058 1078 1120 1273 1371 1384 1404 1374 1312 1212 1116 1065 1049 1012 0944 0894 0877 0847 0801 0785 0892 1376 2125 2630 2861 2959 3013 3050 3079 3095 3109 3125 3143 3168 3179 3204 284 14 1204 1249 1335 1550 1704 1748 1784 1745 1647 1511 1379 1262 1156 1051 0959 0905 0888 0858 0813 0802 0909 1393 2140 2647 2879 2978 3033 3072 3100 3116 3132 3147 3166 3189 3201 3221 285 15 1356 1420 1543 1838 2043 2116 2185 2141 2002 1814 1626 1461 1315 1167 1035 0958 0928 0881 0816 0794 0911 1478 2386 3006 3288 3409 3475 3531 3587 3618 3625 3620 3605 3597 3614 3675 286 16 1404 1507 1680 2037 2291 2407 2516 2476 2302 2059 1815 1599 1406 1212 1037 0932 0882 0813 0724 0691 0812 1443 2479 3194 3522 3662 3738 3812 3897 3943 3941 3920 3874 3836 3851 3955 287 17 1388 1539 1771 2197 2504 2666 2835 2818 2605 2300 1993 1722 1477 1229 1003 0862 0789 0693 0581 0535 0653 1307 2414 3180 3535 3685 3765 3860 3976 4043 4033 3989 3902 3829 3847 3991 288 18 1344 1554 1839 2328 2675 2878 3095 3092 2856 2508 2152 1839 1555 1267 1001 0833 0741 0625 0496 0443 0556 1200 2299 3060 3409 3557 3639 3747 3886 3967 3947 3884 3768 3663 3688 3868 289 19 0826 0723 0613 0566 0507 0460 0434 0432 0460 0435 0426 0556 0849 1045 1010 0936 0910 0856 0761 0703 0889 2045 4129 5739 6535 6874 7036 7133 7200 7226 7236 7243 7261 7286 7301 7333 290 20 0925 0831 0746 0727 0688 0645 0619 0612 0620 0574 0539 0644 0903 1067 1018 0942 0916 0862 0767 0709 0895 2043 4108 5707 6504 6850 7015 7114 7184 7209 7221 7227 7242 7267 7275 7314 291 21 1072 0972 0906 0925 0911 0880 0861 0845 0832 0760 0698 0772 0984 1103 1035 0954 0927 0873 0779 0723 0913 2062 4131 5738 6536 6880 7044 7140 7207 7231 7241 7248 7260 7283 7294 7324 292 22 1260 1197 1148 1231 1275 1256 1253 1220 1174 1061 0950 0971 1104 1154 1058 0972 0944 0889 0796 0747 0939 2084 4158 5771 6574 6917 7080 7176 7240 7265 7274 7279 7295 7318 7328 7358 293 23 1464 1420 1416 1579 1673 1686 1698 1653 1560 1391 1228 1177 1212 1178 1048 0956 0926 0872 0781 0738 0931 2069 4136 5750 6556 6905 7072 7172 7239 7264 7275 7282 7300 7325 7333 7365 294 24 1685 1658 1694 1940 2119 2165 2204 2143 1996 1766 1545 1413 1349 1238 1079 0980 0951 0896 0804 0766 0965 2110 4182 5794 6598 6942 7105 7203 7267 7290 7303 7309 7323 7347 7357 7390 295 25 1856 1848 1921 2235 2475 2557 2627 2551 2352 2070 1795 1588 1428 1247 1064 0961 0932 0877 0790 0759 0957 2089 4149 5764 6574 6924 7094 7194 7260 7284 7298 7306 7320 7346 7355 7390 296 26 1973 1988 2107 2501 2810 2924 3020 2932 2680 2351 2031 1756 1514 1281 1081 0976 0947 0892 0807 0779 0981 2110 4170 5783 6589 6937 7103 7202 7268 7291 7301 7311 7327 7353 7361 7391 297 27 2018 2068 2209 2635 2971 3117 3250 3160 2879 2501 2131 1815 1539 1271 1039 0915 0873 0804 0702 0665 0867 2040 4202 5891 6738 7101 7277 7402 7504 7550 7550 7534 7496 7474 7483 7573 298 1 0400 0411 0436 0451 0449 0440 0429 0437 0457 0464 0485 0587 0809 1026 1106 1095 1057 1005 0947 0903 0876 0865 0857 0852 0856 0862 0871 0888 0911 0927 0932 0933 0930 0932 0948 0985 299 2 0472 0534 0592 0673 0707 0709 0714 0722 0739 0743 0753 0821 0955 1070 1091 1053 0997 0930 0856 0803 0769 0753 0741 0734 0736 0740 0748 0766 0789 0805 0808 0807 0800 0795 0811 0852 300 3 0634 0742 0870 1049 1157 1191 1224 1238 1238 1231 1223 1214 1199 1174 1136 1079 1018 0948 0874 0819 0784 0765 0752 0745 0748 0753 0761 0778 0800 0814 0818 0817 0810 0809 0822 0862 301 4 0776 0919 1121 1385 1547 1619 1685 1703 1687 1644 1595 1548 1493 1423 1336 1241 1150 1047 0936 0861 0842 0881 0916 0923 0927 0933 0944 0968 1005 1029 1027 1015 0991 0974 0991 1051 302 5 0795 0999 1250 1597 1802 1910 2021 2056 2015 1929 1833 1738 1637 1516 1376 1243 1128 0995 0857 0771 0769 0863 0956 0987 1000 1008 1017 1051 1099 1132 1126 1106 1064 1035 1053 1133 303 6 0817 1061 1381 1804 2065 2217 2382 2437 2365 2230 2077 1930 1781 1604 1411 1238 1096 0935 0770 0674 0679 0817 0969 1027 1048 1060 1074 1115 1180 1223 1215 1183 1123 1075 1098 1204 304 7 0788 1077 1452 1944 2249 2454 2683 2755 2654 2464 2250 2047 1845 1611 1363 1156 0993 0811 0629 0529 0547 0720 0928 1017 1050 1067 1082 1134 1216 1270 1258 1215 1137 1074 1102 1231 305 8 0794 1144 1588 2158 2535 2794 3089 3190 3054 2805 2524 2261 2002 1708 1401 1153 0966 0757 0553 0444 0466 0666 0920 1035 1081 1104 1124 1186 1287 1355 1341 1286 1189 1109 1137 1292 306 9 0791 1160 1652 2290 2708 3013 3362 3486 3322 3027 2696 2387 2087 1751 1404 1131 0927 0706 0491 0384 0407 0613 0880 1004 1051 1075 1096 1164 1279 1353 1335 1274 1163 1073 1101 1271 307 10 0612 0575 0535 0507 0473 0438 0415 0418 0446 0445 0462 0617 0996 1396 1555 1572 1572 1550 1500 1465 1544 1914 2398 2697 2833 2896 2936 2969 2994 3010 3022 3037 3055 3077 3091 3113 308 11 0779 0755 0748 0772 0764 0736 0718 0712 0726 0711 0709 0830 1123 1407 1499 1494 1488 1463 1411 1380 1462 1839 2344 2661 2804 2869 2909 2941 2968 2982 2995 3010 3028 3051 3066 3088 309 12 1022 1032 1055 1168 1218 1204 1191 1174 1167 1125 1095 1161 1347 1507 1536 1512 1500 1471 1419 1389 1475 1860 2381 2708 2856 2922 2962 2993 3019 3035 3047 3062 3078 3102 3112 3130 310 13 1266 1329 1406 1622 1744 1754 1756 1727 1683 1614 1545 1538 1592 1625 1593 1552 1533 1502 1449 1425 1511 1892 2410 2740 2890 2958 3000 3032 3058 3072 3084 3098 3115 3135 3146 3168 311 14 1477 1571 1723 2050 2266 2306 2328 2283 2202 2093 1989 1894 1809 1720 1639 1584 1561 1529 1477 1455 1544 1917 2435 2766 2917 2986 3028 3060 3085 3098 3112 3124 3141 3164 3176 3200 312 15 1607 1745 1955 2347 2623 2702 2757 2714 2594 2431 2267 2121 1986 1847 1715 1625 1580 1517 1430 1385 1485 1965 2658 3103 3303 3392 3446 3498 3549 3577 3582 3576 3563 3553 3567 3629 313 16 1624 1811 2068 2545 2867 2989 3099 3067 2911 2691 2465 2262 2073 1876 1686 1556 1483 1383 1259 1192 1299 1859 2692 3230 3477 3585 3648 3718 3801 3845 3842 3815 3769 3729 3745 3847 314 17 1623 1857 2187 2756 3162 3346 3527 3519 3324 3040 2745 2478 2231 1969 1715 1532 1420 1279 1113 1020 1125 1731 2664 3274 3550 3670 3740 3829 3942 4006 3994 3946 3857 3784 3804 3952 315 18 1556 1824 2193 2807 3235 3469 3704 3721 3500 3170 2826 2516 2227 1921 1623 1409 1273 1106 0920 0821 0916 1524 2502 3152 3451 3580 3654 3759 3898 3976 3959 3893 3774 3669 3692 3877 316 19 0870 0748 0650 0583 0514 0457 0425 0421 0455 0443 0441 0623 1075 1492 1579 1539 1524 1469 1357 1278 1476 2603 4478 5874 6559 6855 7003 7095 7158 7181 7190 7196 7211 7234 7247 7277 317 20 1026 0931 0845 0824 0780 0729 0696 0686 0706 0672 0648 0805 1207 1562 1614 1565 1547 1490 1378 1302 1502 2631 4510 5915 6603 6902 7052 7143 7207 7230 7238 7243 7258 7283 7296 7327 318 21 1221 1162 1100 1132 1126 1081 1050 1033 1036 0973 0922 1052 1408 1705 1730 1672 1650 1590 1475 1400 1604 2728 4580 5955 6633 6929 7075 7167 7230 7252 7262 7266 7282 7307 7320 7346 319 22 1438 1393 1367 1484 1531 1502 1485 1454 1424 1326 1235 1311 1576 1778 1756 1684 1658 1597 1484 1414 1619 2741 4597 5980 6662 6958 7105 7195 7258 7278 7285 7293 7306 7329 7338 7363 320 23 1679 1674 1700 1922 2042 2041 2042 1993 1922 1773 1633 1635 1782 1867 1789 1702 1672 1610 1497 1431 1639 2754 4606 5988 6670 6969 7119 7209 7273 7294 7304 7310 7325 7349 7359 7386 321 24 1943 1979 2074 2415 2641 2676 2705 2639 2507 2300 2095 2001 2007 1966 1834 1732 1699 1636 1523 1463 1674 2787 4642 6026 6709 7005 7154 7244 7304 7328 7337 7345 7359 7384 7394 7418 322 25 2164 2239 2382 2813 3125 3196 3253 3172 2986 2724 2468 2289 2168 2022 1844 1732 1695 1628 1518 1463 1675 2782 4631 6015 6700 7000 7148 7240 7302 7323 7334 7340 7354 7383 7390 7418 323 26 2368 2446 2645 3192 3595 3712 3799 3704 3459 3146 2836 2568 2331 2093 1883 1763 1725 1658 1550 1499 1710 2816 4663 6047 6733 7032 7185 7275 7337 7357 7367 7375 7392 7416 7426 7453 324 27 2351 2484 2716 3315 3756 3910 4033 3943 3664 3300 2940 2629 2352 2077 1831 1686 1630 1542 1408 1344 1552 2708 4699 6207 6957 7283 7446 7565 7661 7704 7703 7685 7653 7633 7640 7725 325 1 0380 0440 0461 0487 0465 0455 0441 0454 0487 0501 0529 0692 1074 1466 1600 1551 1446 1311 1169 1060 0996 0967 0943 0926 0924 0928 0939 0963 0999 1024 1023 1013 0990 0973 0992 1047 326 2 0496 0585 0663 0753 0781 0776 0785 0802 0836 0844 0866 1000 1292 1560 1625 1547 1430 1286 1137 1025 0957 0924 0897 0880 0879 0883 0894 0917 0954 0978 0977 0966 0943 0926 0945 1002 327 3 0703 0823 0990 1200 1297 1336 1373 1400 1426 1429 1431 1500 1638 1736 1714 1609 1478 1328 1173 1058 0986 0951 0924 0906 0906 0911 0921 0945 0981 1005 1003 0992 0969 0952 0973 1034 328 4 0826 1034 1286 1618 1810 1894 1975 2015 2021 2012 1994 1971 1937 1877 1786 1660 1520 1366 1208 1091 1018 0980 0951 0933 0933 0939 0949 0974 1010 1034 1033 1021 0996 0979 0996 1057 329 5 0890 1140 1466 1908 2175 2307 2441 2501 2488 2442 2379 2311 2229 2113 1960 1779 1600 1399 1195 1053 0994 1001 1008 0998 0997 1002 1012 1044 1094 1125 1120 1099 1056 1026 1044 1123 330 6 0931 1243 1645 2176 2513 2698 2897 2982 2944 2845 2723 2598 2459 2277 2054 1823 1607 1369 1127 0969 0923 0987 1050 1060 1066 1074 1087 1128 1194 1236 1228 1195 1135 1088 1110 1218 331 7 0912 1239 1703 2291 2666 2898 3160 3268 3196 3039 2850 2664 2465 2218 1935 1665 1432 1175 0918 0759 0737 0859 0992 1037 1054 1064 1080 1129 1212 1265 1254 1211 1134 1072 1096 1222 332 8 0944 1343 1880 2591 3054 3366 3707 3850 3747 3528 3269 3014 2750 2432 2074 1748 1473 1173 0879 0702 0683 0841 1030 1106 1136 1154 1173 1235 1339 1406 1390 1334 1237 1157 1183 1338 333 9 0873 1289 1862 2597 3079 3418 3808 3968 3835 3560 3244 2939 2629 2267 1873 1536 1264 0971 0688 0528 0522 0703 0924 1018 1056 1076 1096 1165 1279 1355 1335 1275 1164 1072 1099 1270 334 10 0712 0662 0619 0589 0546 0499 0475 0477 0515 0524 0552 0759 1282 1884 2175 2242 2259 2249 2212 2186 2231 2437 2669 2806 2877 2916 2948 2978 3002 3015 3030 3043 3061 3085 3099 3121 335 11 0918 0923 0908 0957 0952 0912 0883 0874 0905 0905 0919 1096 1530 2001 2212 2251 2258 2241 2202 2177 2223 2435 2681 2827 2902 2941 2973 3002 3028 3041 3052 3067 3085 3108 3123 3141 336 12 1182 1250 1301 1452 1517 1494 1470 1451 1460 1440 1431 1550 1846 2140 2253 2257 2252 2230 2186 2162 2211 2436 2705 2867 2947 2988 3021 3049 3073 3085 3097 3110 3129 3148 3162 3182 337 13 1489 1590 1725 2009 2177 2174 2166 2132 2109 2063 2025 2063 2193 2312 2336 2312 2296 2269 2224 2201 2250 2472 2748 2919 3002 3044 3076 3106 3126 3140 3150 3162 3180 3197 3213 3231 338 14 1791 1948 2171 2608 2889 2928 2941 2886 2823 2747 2674 2608 2546 2483 2425 2374 2349 2318 2272 2251 2299 2517 2794 2966 3052 3096 3129 3158 3180 3192 3204 3215 3234 3254 3266 3282 339 15 1897 2112 2409 2961 3320 3406 3465 3421 3322 3191 3059 2939 2825 2703 2578 2476 2410 2324 2215 2147 2203 2543 2989 3258 3384 3444 3484 3531 3582 3610 3611 3604 3585 3576 3588 3652 340 16 1891 2159 2506 3135 3556 3697 3822 3796 3660 3469 3270 3084 2908 2713 2516 2354 2245 2107 1939 1833 1904 2362 2980 3355 3527 3606 3658 3725 3805 3848 3844 3818 3764 3723 3741 3842 341 17 1903 2209 2637 3367 3868 4077 4277 4281 4109 3856 3583 3334 3094 2828 2553 2332 2173 1981 1759 1620 1691 2219 2978 3454 3672 3770 3830 3917 4027 4091 4077 4028 3939 3863 3887 4033 342 18 1794 2135 2589 3349 3870 4127 4386 4416 4216 3910 3579 3277 2987 2666 2335 2074 1889 1668 1419 1269 1342 1911 2767 3319 3574 3687 3757 3858 3995 4072 4053 3987 3869 3766 3790 3969 343 19 0969 0834 0724 0656 0573 0502 0459 0460 0507 0504 0515 0763 1413 2115 2378 2394 2398 2347 2229 2137 2336 3381 4980 6126 6684 6929 7058 7140 7198 7218 7225 7231 7244 7270 7278 7308 344 20 1164 1055 0972 0953 0897 0833 0792 0782 0817 0794 0786 1009 1600 2209 2414 2410 2408 2353 2232 2143 2343 3386 4987 6132 6695 6945 7074 7159 7219 7240 7248 7252 7266 7293 7304 7332 345 21 1375 1313 1278 1327 1314 1258 1218 1198 1216 1168 1134 1326 1846 2354 2500 2475 2465 2406 2285 2201 2401 3440 5031 6170 6730 6979 7113 7198 7257 7277 7285 7291 7308 7334 7344 7374 346 22 1663 1668 1678 1836 1900 1856 1826 1792 1778 1694 1621 1755 2168 2550 2627 2581 2562 2501 2378 2297 2496 3524 5088 6207 6760 7009 7140 7226 7285 7304 7312 7320 7334 7361 7369 7394 347 23 1939 1969 2055 2330 2486 2470 2458 2405 2350 2226 2107 2169 2445 2674 2673 2603 2577 2511 2389 2312 2512 3534 5111 6247 6806 7056 7187 7273 7331 7352 7358 7362 7380 7403 7412 7439 348 24 2261 2352 2501 2944 3220 3248 3258 3185 3077 2895 2720 2681 2790 2856 2780 2687 2654 2585 2463 2391 2593 3610 5179 6308 6861 7107 7235 7317 7373 7388 7396 7404 7418 7442 7450 7474 349 25 2559 2683 2905 3493 3891 3967 4009 3916 3750 3516 3285 3142 3078 2984 2832 2720 2680 2607 2486 2417 2619 3627 5190 6317 6871 7116 7245 7330 7385 7403 7409 7417 7430 7459 7469 7493 350 26 2753 2921 3226 3964 4502 4622 4701 4588 4362 4078 3796 3548 3326 3103 2901 2775 2731 2657 2537 2475 2674 3665 5217 6339 6892 7135 7262 7345 7399 7416 7424 7429 7443 7469 7477 7501 351 27 2696 2903 3226 3982 4534 4695 4821 4723 4458 4114 3773 3471 3199 2925 2669 2504 2431 2319 2156 2064 2265 3355 5106 6385 7015 7291 7434 7545 7640 7679 7676 7657 7620 7601 7610 7690 352 1 0407 0467 0506 0528 0496 0471 0460 0475 0525 0545 0581 0811 1365 1942 2125 2022 1832 1602 1365 1189 1089 1039 1000 0973 0969 0974 0984 1017 1069 1103 1097 1077 1036 1005 1026 1108 353 2 0506 0608 0708 0797 0810 0803 0808 0833 0887 0904 0933 1142 1617 2073 2183 2051 1847 1608 1362 1183 1080 1028 0988 0960 0956 0959 0970 1002 1052 1085 1080 1058 1019 0990 1008 1092 354 3 0661 0832 1017 1222 1316 1335 1374 1413 1463 1473 1492 1645 1970 2238 2249 2088 1875 1632 1387 1207 1103 1049 1008 0981 0976 0980 0992 1024 1074 1106 1101 1079 1041 1012 1034 1110 355 4 0866 1097 1396 1763 1966 2051 2147 2210 2249 2250 2244 2306 2434 2495 2403 2202 1968 1710 1453 1264 1155 1096 1052 1025 1020 1025 1038 1072 1122 1156 1150 1128 1087 1057 1077 1161 356 5 0950 1240 1616 2108 2402 2548 2707 2793 2810 2799 2769 2729 2667 2559 2397 2177 1937 1678 1420 1233 1123 1066 1024 0996 0992 0997 1008 1041 1092 1122 1117 1096 1054 1025 1045 1125 357 6 1054 1395 1875 2511 2903 3117 3346 3467 3465 3412 3327 3232 3111 2930 2684 2393 2097 1778 1460 1240 1136 1119 1106 1082 1077 1082 1095 1138 1205 1247 1238 1205 1144 1097 1121 1227 358 7 1013 1422 1973 2695 3145 3416 3722 3874 3849 3743 3595 3437 3252 2997 2678 2330 2000 1644 1293 1058 0970 1003 1037 1031 1033 1042 1059 1113 1196 1249 1235 1193 1120 1062 1093 1221 359 8 1055 1526 2172 3009 3556 3908 4309 4505 4447 4274 4046 3814 3552 3211 2800 2384 2007 1603 1209 0957 0882 0972 1074 1099 1112 1123 1142 1206 1309 1375 1359 1304 1204 1126 1153 1308 360 9 0996 1464 2125 2993 3564 3956 4406 4620 4525 4284 3988 3692 3377 2984 2530 2105 1736 1345 0965 0732 0684 0821 0987 1049 1075 1092 1114 1183 1300 1374 1355 1292 1181 1092 1122 1291 361 10 0772 0744 0693 0665 0616 0562 0530 0532 0579 0596 0635 0883 1525 2298 2716 2835 2871 2875 2861 2855 2856 2879 2893 2910 2936 2961 2988 3015 3039 3051 3063 3076 3096 3118 3133 3152 362 11 1010 1025 1034 1084 1082 1036 0998 0991 1032 1042 1072 1295 1843 2467 2788 2873 2894 2891 2874 2869 2867 2882 2893 2911 2935 2959 2985 3012 3033 3046 3058 3072 3089 3112 3125 3142 363 12 1347 1441 1527 1715 1797 1759 1726 1704 1730 1729 1744 1915 2316 2744 2949 2990 2996 2985 2965 2957 2950 2959 2966 2982 3008 3031 3056 3082 3104 3113 3125 3139 3154 3176 3190 3208 364 13 1713 1857 2042 2396 2594 2582 2562 2522 2520 2504 2499 2586 2795 3000 3088 3089 3079 3060 3037 3029 3018 3019 3022 3038 3063 3084 3108 3134 3154 3165 3176 3187 3201 3224 3237 3256 365 14 2091 2291 2591 3143 3506 3543 3541 3486 3443 3403 3370 3341 3317 3294 3273 3239 3215 3192 3165 3158 3143 3139 3139 3153 3175 3196 3219 3243 3264 3273 3283 3295 3309 3332 3340 3360 366 15 2163 2441 2821 3486 3926 4020 4074 4036 3962 3871 3777 3688 3601 3502 3393 3280 3188 3079 2949 2863 2862 3030 3235 3350 3413 3449 3484 3529 3578 3604 3606 3597 3576 3565 3579 3640 367 16 2180 2500 2949 3728 4266 4417 4543 4526 4416 4263 4101 3950 3798 3625 3435 3256 3112 2942 2744 2611 2628 2932 3332 3568 3681 3740 3781 3842 3917 3956 3950 3924 3873 3833 3851 3949 368 17 2207 2593 3130 4029 4642 4879 5093 5113 4973 4758 4522 4301 4077 3815 3525 3260 3047 2796 2513 2323 2343 2752 3307 3637 3791 3867 3920 4002 4111 4170 4154 4107 4018 3945 3965 4108 369 18 2059 2463 3018 3926 4562 4848 5130 5181 5001 4720 4411 4121 3834 3502 3148 2839 2602 2325 2015 1815 1858 2372 3105 3559 3770 3867 3929 4028 4161 4235 4216 4149 4033 3933 3954 4133 370 19 1052 0945 0825 0741 0631 0550 0497 0498 0564 0574 0602 0934 1843 2926 3438 3542 3574 3537 3422 3333 3510 4381 5588 6410 6814 7002 7111 7186 7241 7261 7267 7270 7285 7313 7323 7347 371 20 1281 1211 1121 1112 1045 0965 0908 0899 0953 0947 0957 1262 2084 3024 3441 3511 3528 3487 3370 3281 3460 4340 5574 6420 6839 7033 7147 7226 7282 7298 7306 7311 7325 7350 7359 7390 372 21 1534 1503 1477 1556 1552 1479 1427 1404 1438 1407 1391 1659 2380 3162 3478 3511 3519 3468 3349 3263 3442 4334 5595 6468 6898 7093 7206 7282 7334 7351 7357 7362 7376 7403 7410 7434 373 22 1894 1902 1953 2169 2261 2207 2162 2122 2127 2063 2014 2222 2809 3417 3633 3633 3627 3573 3452 3369 3547 4422 5666 6525 6948 7140 7250 7324 7377 7395 7398 7404 7418 7445 7453 7474 374 23 2263 2342 2467 2843 3044 3015 2983 2925 2894 2795 2702 2835 3261 3675 3782 3742 3722 3658 3536 3454 3629 4487 5703 6541 6959 7154 7264 7340 7395 7412 7416 7424 7439 7466 7475 7497 375 24 2581 2713 2940 3494 3841 3855 3849 3770 3688 3541 3403 3432 3671 3882 3885 3814 3782 3713 3590 3513 3687 4536 5750 6591 7011 7204 7317 7393 7445 7460 7466 7472 7485 7512 7519 7546 376 25 2924 3143 3470 4228 4747 4813 4836 4737 4594 4397 4204 4116 4135 4126 4023 3920 3878 3804 3681 3609 3780 4611 5809 6646 7061 7250 7358 7433 7484 7497 7502 7508 7520 7549 7552 7576 377 26 3219 3494 3917 4852 5532 5658 5723 5600 5393 5146 4901 4682 4485 4285 4099 3971 3919 3841 3716 3647 3818 4646 5842 6676 7092 7282 7392 7466 7517 7533 7538 7542 7556 7583 7586 7609 378 27 3060 3341 3770 4713 5398 5573 5696 5593 5344 5026 4707 4422 4161 3892 3634 3453 3361 3230 3043 2928 3112 4106 5603 6657 7177 7412 7540 7643 7733 7769 7763 7743 7710 7687 7696 7777 379 1 0434 0514 0571 0593 0549 0511 0492 0514 0582 0607 0653 0957 1720 2535 2783 2611 2312 1962 1607 1350 1203 1130 1074 1034 1027 1030 1043 1086 1155 1199 1189 1158 1097 1050 1073 1180 380 2 0529 0663 0783 0880 0880 0861 0864 0895 0966 0990 1031 1318 2002 2682 2849 2648 2339 1982 1624 1364 1215 1141 1084 1043 1035 1040 1053 1096 1166 1209 1199 1167 1107 1062 1084 1192 381 3 0665 0867 1065 1281 1359 1372 1412 1458 1535 1556 1586 1832 2388 2886 2947 2710 2385 2019 1654 1388 1236 1159 1100 1060 1051 1055 1069 1112 1181 1225 1216 1183 1124 1078 1102 1209 382 4 0843 1104 1425 1803 1975 2053 2151 2229 2297 2310 2319 2487 2846 3111 3050 2771 2430 2054 1684 1416 1260 1182 1121 1081 1073 1078 1091 1136 1205 1248 1237 1205 1146 1100 1125 1232 383 5 0991 1324 1757 2308 2617 2777 2954 3069 3122 3126 3107 3162 3281 3297 3115 2795 2438 2054 1679 1409 1254 1173 1112 1074 1065 1070 1084 1128 1194 1237 1227 1193 1136 1091 1113 1220 384 6 1093 1483 2020 2722 3148 3387 3646 3798 3831 3817 3771 3706 3604 3428 3165 2821 2454 2065 1685 1414 1257 1175 1114 1076 1069 1074 1087 1131 1198 1240 1229 1197 1137 1092 1114 1221 385 7 1161 1617 2270 3122 3664 3979 4340 4542 4560 4500 4391 4263 4091 3827 3463 3029 2592 2132 1685 1377 1226 1183 1149 1114 1107 1113 1127 1179 1262 1316 1302 1258 1182 1119 1146 1275 386 8 1200 1724 2465 3453 4091 4494 4951 5199 5188 5061 4871 4666 4412 4053 3591 3084 2599 2089 1595 1264 1129 1148 1176 1166 1167 1176 1196 1259 1364 1431 1411 1356 1259 1178 1206 1368 387 9 1124 1686 2475 3514 4205 4662 5194 5483 5443 5260 5003 4732 4416 3988 3456 2907 2400 1873 1366 1037 0922 0987 1071 1090 1101 1114 1134 1206 1324 1398 1377 1313 1201 1109 1141 1309 388 10 0860 0827 0777 0746 0672 0606 0565 0568 0632 0657 0703 1034 1916 3009 3588 3712 3701 3629 3525 3443 3398 3396 3387 3389 3411 3435 3466 3508 3556 3585 3588 3581 3569 3561 3579 3633 389 11 1088 1112 1121 1175 1153 1089 1049 1047 1105 1124 1164 1470 2258 3190 3661 3746 3718 3639 3532 3450 3399 3392 3381 3382 3404 3429 3459 3503 3551 3576 3579 3575 3562 3554 3568 3627 390 12 1383 1496 1591 1791 1856 1813 1779 1769 1816 1827 1853 2116 2767 3487 3821 3853 3800 3706 3590 3503 3445 3429 3413 3411 3430 3455 3484 3527 3574 3598 3599 3593 3581 3572 3589 3643 391 13 1742 1906 2127 2487 2669 2658 2642 2623 2654 2649 2656 2847 3306 3776 3962 3936 3855 3745 3615 3520 3453 3428 3407 3404 3423 3446 3474 3517 3564 3592 3593 3584 3566 3553 3569 3627 392 14 2047 2326 2653 3223 3560 3596 3616 3592 3589 3564 3547 3635 3853 4052 4094 4017 3916 3792 3654 3557 3486 3451 3425 3420 3438 3460 3487 3531 3577 3602 3600 3595 3573 3563 3577 3638 393 15 2380 2727 3179 3974 4490 4594 4653 4617 4572 4523 4476 4430 4380 4317 4236 4119 4002 3872 3732 3633 3556 3517 3490 3483 3501 3522 3550 3591 3639 3664 3664 3656 3638 3628 3641 3701 394 16 2460 2851 3403 4335 4970 5142 5278 5271 5195 5090 4973 4858 4735 4582 4397 4190 4003 3787 3550 3382 3332 3464 3626 3714 3767 3803 3840 3896 3971 4010 4001 3974 3923 3884 3897 3997 395 17 2428 2877 3502 4537 5245 5501 5732 5767 5657 5480 5278 5083 4878 4624 4329 4031 3770 3471 3144 2916 2882 3168 3548 3763 3872 3930 3978 4059 4168 4227 4212 4163 4074 4000 4019 4161 396 18 2315 2797 3457 4557 5312 5635 5951 6024 5884 5647 5375 5112 4839 4506 4127 3761 3452 3103 2724 2464 2443 2830 3363 3680 3832 3908 3964 4061 4192 4264 4241 4175 4058 3955 3980 4157 397 19 1140 1030 0901 0810 0691 0599 0538 0539 0616 0638 0680 1080 2201 3618 4369 4566 4631 4615 4520 4444 4585 5245 6089 6641 6923 7061 7151 7221 7271 7286 7291 7294 7309 7333 7340 7370 398 20 1408 1349 1269 1263 1197 1096 1033 1022 1093 1100 1128 1514 2561 3826 4465 4617 4665 4640 4540 4465 4605 5269 6119 6678 6963 7104 7197 7266 7317 7333 7338 7341 7356 7381 7387 7411 399 21 1716 1709 1684 1793 1798 1706 1639 1615 1672 1660 1667 2019 2958 4048 4571 4680 4712 4679 4579 4506 4642 5299 6157 6728 7019 7163 7254 7322 7371 7385 7388 7394 7408 7430 7437 7455 400 22 2108 2142 2219 2484 2590 2521 2465 2424 2448 2409 2384 2668 3434 4280 4649 4702 4714 4669 4562 4490 4627 5291 6166 6749 7046 7194 7287 7356 7404 7419 7425 7428 7442 7469 7474 7498 401 23 2474 2593 2768 3217 3466 3428 3386 3323 3308 3230 3163 3357 3918 4502 4720 4719 4710 4655 4545 4474 4609 5278 6181 6790 7100 7250 7346 7415 7463 7478 7482 7485 7501 7527 7533 7556 402 24 2892 3069 3359 4015 4428 4431 4413 4328 4266 4150 4043 4132 4479 4819 4904 4859 4833 4771 4658 4590 4720 5372 6249 6842 7144 7291 7384 7451 7498 7509 7514 7518 7532 7560 7565 7588 403 25 3206 3494 3894 4782 5380 5448 5456 5346 5230 5068 4914 4879 4979 5058 5010 4921 4880 4809 4694 4629 4758 5400 6275 6870 7173 7321 7417 7485 7532 7545 7547 7552 7565 7593 7596 7616 404 26 3555 3915 4428 5557 6362 6500 6550 6415 6225 6018 5810 5626 5459 5290 5131 5010 4955 4879 4764 4702 4828 5460 6327 6919 7221 7368 7461 7526 7572 7584 7587 7592 7606 7628 7634 7656 405 27 3481 3873 4444 5637 6509 6709 6823 6713 6489 6218 5946 5697 5467 5223 4983 4791 4677 4527 4322 4191 4320 5102 6220 6983 7368 7548 7656 7751 7836 7865 7858 7834 7804 7783 7787 7865 406 1 0451 0565 0644 0668 0606 0559 0535 0559 0644 0681 0735 1121 2106 3167 3472 3211 2787 2303 1824 1481 1290 1195 1123 1072 1060 1065 1079 1130 1216 1271 1258 1214 1137 1074 1098 1229 407 2 0560 0712 0847 0953 0937 0912 0907 0943 1034 1067 1118 1489 2398 3324 3545 3257 2823 2336 1855 1510 1317 1222 1148 1097 1085 1089 1104 1157 1244 1299 1285 1241 1163 1104 1128 1259 408 3 0663 0878 1102 1317 1363 1365 1398 1449 1551 1582 1623 1966 2770 3528 3644 3319 2871 2375 1889 1540 1344 1246 1171 1120 1106 1112 1127 1180 1266 1322 1306 1264 1185 1123 1150 1283 409 4 0819 1110 1453 1832 1985 2050 2139 2229 2327 2354 2376 2661 3285 3803 3783 3406 2934 2422 1924 1568 1366 1263 1187 1135 1123 1128 1145 1199 1286 1341 1326 1281 1203 1140 1167 1295 410 5 0984 1364 1845 2443 2757 2919 3115 3251 3340 3354 3348 3510 3856 4062 3882 3453 2960 2438 1934 1576 1374 1271 1192 1142 1130 1135 1150 1205 1289 1342 1329 1284 1207 1144 1172 1304 411 6 1104 1535 2138 2895 3329 3576 3859 4044 4121 4123 4089 4137 4246 4208 3915 3449 2944 2417 1911 1552 1349 1247 1170 1121 1109 1114 1131 1183 1267 1320 1306 1263 1184 1122 1150 1280 412 7 1234 1714 2415 3356 3946 4299 4689 4927 4987 4969 4900 4802 4649 4386 3999 3502 2982 2444 1930 1567 1360 1254 1176 1126 1116 1122 1138 1192 1277 1328 1314 1271 1192 1136 1161 1291 413 8 1284 1878 2720 3838 4562 5017 5535 5848 5891 5824 5683 5510 5269 4896 4379 3770 3162 2537 1940 1529 1326 1262 1214 1168 1160 1166 1183 1250 1353 1420 1400 1344 1247 1169 1199 1357 414 9 1248 1853 2738 3917 4695 5205 5804 6156 6168 6036 5818 5572 5260 4807 4216 3563 2940 2301 1694 1290 1116 1114 1132 1117 1118 1127 1147 1219 1337 1411 1392 1327 1214 1122 1155 1328 415 10 0881 0875 0831 0781 0691 0609 0560 0567 0650 0682 0738 1149 2278 3703 4441 4551 4463 4290 4077 3908 3810 3784 3754 3739 3757 3783 3818 3876 3950 3991 3985 3959 3917 3880 3897 3993 416 11 1132 1158 1178 1228 1184 1111 1066 1071 1153 1181 1229 1625 2663 3910 4516 4569 4455 4267 4042 3866 3761 3727 3692 3675 3694 3720 3754 3813 3888 3928 3924 3899 3853 3816 3832 3928 417 12 1385 1500 1611 1797 1839 1788 1750 1756 1833 1852 1890 2253 3163 4191 4648 4638 4491 4282 4042 3858 3744 3700 3660 3640 3656 3680 3712 3772 3845 3885 3878 3851 3804 3764 3782 3877 418 13 1703 1890 2123 2495 2653 2639 2628 2632 2697 2704 2723 3024 3753 4520 4809 4732 4555 4325 4072 3882 3760 3706 3661 3639 3651 3674 3705 3765 3838 3878 3870 3841 3792 3752 3768 3869 419 14 2017 2305 2669 3258 3579 3619 3641 3647 3683 3672 3667 3871 4367 4851 4985 4857 4661 4426 4172 3983 3857 3799 3751 3730 3745 3766 3796 3856 3927 3965 3959 3928 3880 3841 3857 3954 420 15 2349 2735 3216 4024 4520 4616 4692 4695 4702 4672 4643 4730 4958 5137 5111 4928 4712 4465 4205 4015 3884 3816 3766 3746 3760 3782 3814 3872 3945 3982 3976 3949 3900 3860 3872 3973 421 16 2654 3095 3722 4782 5494 5685 5824 5833 5791 5735 5668 5599 5516 5396 5233 5009 4779 4523 4261 4068 3933 3862 3811 3789 3803 3823 3854 3910 3982 4019 4009 3981 3934 3894 3909 4007 422 17 2771 3289 4037 5283 6144 6440 6700 6761 6698 6581 6439 6290 6117 5883 5583 5229 4889 4515 4119 3834 3711 3792 3904 3956 3998 4031 4070 4147 4254 4310 4292 4244 4156 4083 4103 4244 423 18 2573 3140 3922 5192 6063 6420 6767 6864 6763 6575 6345 6114 5859 5532 5132 4710 4329 3907 3460 3146 3059 3305 3638 3826 3924 3978 4028 4124 4255 4327 4303 4236 4119 4019 4039 4217 424 19 1233 1123 0984 0879 0744 0639 0568 0570 0664 0695 0750 1223 2564 4326 5329 5624 5723 5728 5660 5603 5694 6098 6535 6812 6979 7080 7161 7229 7277 7293 7299 7301 7318 7343 7355 7378 425 20 1544 1487 1409 1398 1324 1209 1129 1122 1208 1231 1277 1743 3024 4652 5556 5812 5897 5895 5825 5772 5857 6239 6654 6917 7073 7170 7247 7309 7357 7370 7375 7378 7394 7419 7429 7451 426 21 1894 1895 1896 2021 2016 1907 1825 1801 1880 1888 1920 2361 3535 4964 5725 5923 5983 5970 5896 5843 5922 6291 6697 6956 7111 7207 7283 7346 7393 7406 7411 7412 7429 7455 7461 7484 427 22 2310 2413 2517 2836 2958 2875 2798 2753 2806 2789 2797 3169 4156 5304 5880 6011 6045 6020 5940 5889 5963 6332 6753 7024 7184 7278 7354 7415 7460 7471 7474 7477 7490 7516 7520 7544 428 23 2776 2962 3192 3744 4044 3989 3923 3855 3871 3829 3804 4088 4849 5683 6067 6125 6132 6092 6007 5955 6024 6381 6794 7066 7228 7322 7398 7461 7506 7517 7519 7523 7536 7564 7570 7592 429 24 3201 3466 3827 4640 5136 5136 5093 5000 4968 4890 4827 4996 5490 6005 6208 6202 6186 6136 6046 5995 6063 6418 6844 7125 7287 7381 7456 7513 7559 7568 7570 7572 7587 7610 7618 7638 430 25 3611 3985 4489 5579 6313 6379 6367 6248 6158 6043 5940 5975 6177 6371 6402 6339 6299 6238 6145 6096 6157 6501 6919 7196 7358 7452 7524 7581 7625 7633 7636 7637 7651 7678 7679 7700 431 26 3991 4435 5089 6465 7456 7603 7639 7490 7332 7177 7026 6890 6770 6646 6532 6422 6364 6296 6199 6151 6211 6544 6957 7235 7398 7495 7566 7625 7665 7673 7676 7676 7691 7716 7719 7737 432 27 3856 4325 4995 6367 7347 7554 7667 7560 7367 7139 6911 6698 6497 6276 6051 5846 5709 5537 5317 5170 5242 5819 6596 7113 7387 7525 7622 7711 7796 7830 7820 7794 7758 7738 7745 7828 433 1 0483 0633 0730 0757 0682 0621 0586 0614 0721 0765 0829 1310 2578 3968 4352 3976 3392 2739 2106 1659 1413 1290 1198 1134 1118 1121 1138 1203 1311 1381 1364 1306 1207 1124 1152 1314 434 2 0575 0767 0939 1054 1024 0985 0973 1013 1131 1175 1235 1709 2904 4150 4440 4035 3440 2785 2150 1701 1453 1330 1234 1170 1155 1159 1176 1241 1348 1418 1400 1342 1243 1163 1191 1356 435 3 0685 0933 1172 1384 1418 1407 1425 1490 1613 1658 1712 2167 3267 4345 4524 4078 3465 2801 2157 1704 1454 1328 1232 1168 1153 1158 1176 1241 1349 1419 1400 1343 1243 1162 1193 1353 436 4 0827 1155 1522 1902 2044 2100 2180 2282 2413 2452 2489 2888 3810 4625 4651 4149 3515 2837 2188 1732 1475 1347 1251 1187 1172 1177 1195 1261 1368 1438 1419 1361 1260 1179 1209 1372 437 5 0976 1394 1902 2500 2776 2921 3104 3258 3391 3424 3434 3739 4409 4896 4738 4171 3510 2817 2157 1698 1442 1313 1218 1154 1140 1144 1162 1226 1332 1401 1382 1326 1226 1147 1177 1339 438 6 1143 1624 2283 3106 3560 3820 4122 4340 4461 4480 4460 4632 5004 5172 4859 4241 3564 2862 2197 1734 1476 1344 1246 1183 1170 1175 1195 1259 1364 1430 1409 1355 1256 1178 1209 1371 439 7 1257 1819 2612 3642 4270 4642 5077 5364 5478 5480 5421 5447 5520 5387 4931 4269 3572 2861 2191 1724 1464 1332 1234 1172 1159 1164 1182 1248 1351 1417 1398 1341 1243 1166 1196 1357 440 8 1341 1979 2894 4119 4913 5409 5980 6341 6426 6411 6314 6174 5953 5572 5016 4326 3615 2893 2216 1740 1476 1341 1242 1179 1166 1172 1190 1256 1363 1430 1411 1354 1251 1171 1199 1359 441 9 1311 2015 3002 4340 5209 5784 6464 6887 6956 6882 6709 6493 6188 5703 5041 4270 3512 2745 2026 1538 1297 1219 1163 1114 1103 1110 1129 1202 1320 1396 1374 1309 1194 1104 1135 1307 442 10 0935 0944 0902 0844 0730 0633 0578 0588 0692 0733 0798 1305 2729 4541 5434 5483 5260 4926 4544 4250 4078 4013 3950 3912 3924 3948 3986 4065 4172 4233 4219 4168 4086 4011 4035 4177 443 11 1143 1214 1249 1297 1233 1149 1097 1113 1218 1257 1316 1814 3150 4769 5511 5489 5227 4870 4471 4166 3985 3910 3842 3801 3812 3836 3874 3954 4064 4123 4108 4055 3968 3892 3918 4063 444 12 1379 1515 1638 1828 1836 1772 1737 1753 1860 1893 1943 2419 3643 5047 5629 5537 5241 4859 4443 4130 3940 3856 3783 3740 3747 3767 3802 3880 3988 4049 4032 3981 3890 3814 3835 3980 445 13 1701 1903 2164 2530 2663 2643 2639 2661 2757 2780 2810 3226 4265 5388 5797 5642 5324 4934 4514 4201 4008 3918 3843 3801 3809 3832 3865 3942 4050 4107 4091 4038 3950 3877 3897 4042 446 14 1999 2333 2729 3339 3641 3679 3720 3750 3831 3837 3847 4180 4992 5796 6010 5786 5446 5045 4625 4311 4115 4018 3940 3900 3907 3928 3964 4041 4144 4203 4186 4135 4046 3971 3992 4137 447 15 2311 2726 3255 4094 4568 4681 4779 4828 4883 4870 4852 5078 5626 6113 6153 5870 5506 5093 4664 4347 4144 4039 3959 3916 3927 3947 3983 4061 4168 4225 4207 4156 4065 3990 4008 4152 448 16 2656 3181 3871 5000 5726 5942 6124 6189 6207 6171 6119 6193 6405 6517 6365 6017 5630 5205 4769 4451 4242 4131 4047 4004 4012 4033 4066 4141 4246 4302 4284 4232 4142 4066 4092 4234 449 17 2914 3532 4366 5752 6689 7009 7291 7374 7349 7291 7201 7098 6964 6754 6457 6064 5659 5226 4787 4463 4250 4133 4049 4005 4015 4038 4071 4151 4256 4312 4294 4243 4152 4078 4096 4242 450 18 2868 3542 4462 5969 7022 7429 7816 7952 7895 7770 7597 7413 7188 6868 6443 5949 5467 4949 4417 4032 3854 3903 3989 4026 4062 4094 4136 4227 4356 4426 4400 4332 4211 4106 4128 4307 451 19 1296 1189 1047 0938 0788 0676 0598 0603 0706 0745 0810 1337 2866 4959 6240 6659 6806 6850 6830 6818 6833 6911 6957 7016 7093 7158 7222 7283 7329 7342 7345 7347 7361 7384 7395 7415 452 20 1652 1584 1508 1511 1424 1301 1214 1206 1304 1338 1396 1919 3378 5297 6435 6792 6913 6943 6918 6903 6910 6976 7017 7076 7158 7227 7295 7354 7400 7412 7415 7416 7433 7458 7463 7486 453 21 1997 2027 2036 2190 2192 2074 1986 1958 2050 2073 2121 2619 3964 5673 6656 6952 7047 7064 7034 7020 7020 7073 7109 7165 7243 7308 7374 7430 7475 7484 7488 7488 7504 7528 7533 7554 454 22 2502 2611 2745 3116 3269 3175 3082 3033 3099 3108 3138 3578 4734 6128 6894 7104 7163 7166 7129 7114 7107 7144 7173 7229 7306 7370 7435 7493 7535 7545 7545 7544 7559 7584 7588 7612 455 23 2980 3199 3479 4120 4471 4413 4328 4257 4290 4275 4281 4639 5555 6608 7154 7280 7308 7293 7250 7238 7220 7241 7264 7318 7394 7458 7519 7576 7614 7622 7624 7621 7635 7660 7666 7686 456 24 3450 3781 4215 5138 5718 5713 5652 5550 5539 5499 5475 5715 6345 7037 7374 7423 7422 7393 7347 7334 7309 7320 7336 7386 7459 7517 7576 7630 7669 7676 7676 7675 7686 7710 7712 7735 457 25 3936 4370 4955 6183 6992 7057 7027 6900 6838 6772 6720 6821 7124 7430 7550 7525 7492 7448 7395 7380 7348 7342 7356 7408 7484 7544 7606 7660 7700 7705 7706 7706 7719 7741 7748 7764 458 26 4351 4875 5623 7189 8298 8452 8466 8304 8175 8075 7986 7906 7839 7775 7719 7635 7580 7527 7469 7456 7417 7404 7413 7463 7538 7600 7661 7712 7752 7758 7758 7758 7771 7793 7797 7813 459 27 4289 4860 5675 7329 8502 8732 8843 8728 8562 8395 8221 8059 7903 7726 7530 7319 7154 6961 6732 6579 6568 6849 7203 7437 7585 7678 7754 7838 7918 7947 7937 7905 7872 7849 7856 7933 460 1 0484 0654 0777 0800 0710 0647 0604 0636 0755 0805 0875 1422 2890 4528 4964 4486 3763 2979 2227 1703 1418 1278 1171 1097 1078 1082 1099 1172 1292 1372 1350 1284 1168 1077 1109 1289 461 2 0594 0809 0985 1098 1055 1005 0982 1027 1161 1213 1282 1836 3251 4741 5072 4557 3823 3031 2276 1749 1461 1319 1211 1137 1120 1122 1141 1214 1335 1415 1391 1325 1212 1121 1150 1329 462 3 0670 0947 1217 1432 1454 1441 1456 1525 1670 1720 1782 2310 3618 4924 5134 4572 3822 3022 2263 1734 1445 1302 1194 1120 1103 1108 1126 1200 1322 1399 1378 1310 1198 1105 1137 1316 463 4 0775 1119 1494 1855 1961 1995 2065 2165 2317 2365 2413 2909 4086 5180 5257 4649 3881 3070 2303 1768 1474 1328 1219 1144 1126 1131 1149 1224 1344 1423 1400 1335 1220 1128 1159 1338 464 5 0917 1333 1844 2390 2620 2730 2890 3043 3203 3249 3279 3707 4670 5446 5334 4661 3866 3045 2274 1741 1450 1303 1195 1123 1106 1111 1131 1202 1321 1397 1374 1310 1198 1108 1141 1318 465 6 1072 1570 2235 3018 3424 3647 3930 4156 4317 4351 4345 4652 5320 5748 5453 4719 3901 3065 2286 1749 1453 1305 1196 1125 1109 1114 1132 1204 1323 1398 1376 1311 1197 1107 1142 1315 466 7 1211 1804 2618 3654 4243 4605 5035 5346 5499 5516 5475 5629 5969 6043 5573 4786 3943 3095 2304 1759 1459 1309 1198 1127 1110 1117 1135 1208 1326 1403 1380 1314 1203 1112 1145 1323 467 8 1313 1971 2912 4154 4912 5392 5962 6344 6488 6491 6412 6422 6473 6261 5665 4836 3978 3120 2325 1776 1474 1321 1210 1140 1123 1129 1147 1220 1339 1416 1395 1329 1212 1121 1154 1332 468 9 1406 2129 3185 4624 5555 6179 6912 7390 7512 7499 7373 7193 6907 6414 5708 4850 3980 3119 2319 1770 1468 1315 1205 1135 1120 1126 1146 1217 1335 1410 1388 1323 1211 1119 1149 1332 469 10 0911 0946 0932 0873 0751 0651 0586 0604 0720 0766 0837 1405 3028 5105 6087 6045 5680 5189 4655 4247 4012 3912 3821 3761 3762 3784 3819 3911 4043 4119 4095 4026 3907 3804 3827 4010 470 11 1100 1195 1253 1300 1224 1128 1070 1090 1216 1262 1329 1903 3466 5370 6201 6090 5688 5175 4626 4212 3968 3861 3765 3703 3704 3724 3759 3850 3984 4059 4035 3964 3844 3738 3762 3948 471 12 1308 1491 1633 1821 1815 1750 1713 1738 1866 1906 1963 2515 3963 5648 6320 6146 5718 5191 4634 4215 3967 3851 3754 3690 3688 3708 3743 3833 3965 4039 4013 3943 3825 3722 3744 3929 472 13 1577 1819 2077 2427 2523 2494 2485 2520 2644 2675 2717 3229 4534 5979 6489 6253 5805 5267 4706 4286 4034 3918 3817 3755 3756 3775 3812 3903 4035 4108 4085 4012 3894 3789 3813 3997 473 14 1898 2244 2639 3199 3451 3470 3509 3559 3672 3695 3717 4165 5269 6397 6708 6406 5936 5394 4833 4418 4164 4039 3938 3876 3879 3899 3933 4027 4155 4227 4202 4130 4014 3908 3935 4112 474 15 2196 2629 3171 3981 4420 4517 4626 4693 4790 4794 4790 5136 5983 6781 6904 6533 6039 5482 4913 4494 4232 4100 3996 3934 3934 3954 3988 4076 4206 4278 4252 4184 4064 3962 3981 4162 475 16 2498 3037 3738 4825 5475 5677 5869 5970 6038 6022 5988 6206 6740 7165 7081 6641 6118 5549 4972 4547 4280 4141 4033 3971 3972 3992 4028 4120 4248 4320 4295 4223 4105 4002 4023 4203 476 17 2803 3441 4301 5682 6588 6899 7195 7322 7359 7322 7250 7308 7495 7541 7268 6771 6227 5651 5071 4645 4375 4230 4119 4057 4059 4077 4112 4203 4331 4401 4374 4305 4185 4083 4102 4280 477 18 3041 3767 4766 6438 7586 8034 8446 8612 8601 8540 8424 8289 8106 7810 7385 6841 6283 5698 5113 4684 4411 4262 4151 4089 4091 4110 4144 4235 4363 4432 4406 4336 4216 4114 4136 4318 478 19 1349 1237 1079 0958 0791 0664 0579 0589 0703 0748 0820 1411 3169 5632 7131 7562 7633 7564 7405 7276 7218 7262 7274 7305 7373 7439 7507 7591 7673 7705 7696 7668 7632 7608 7619 7704 479 20 1661 1605 1522 1506 1391 1261 1169 1160 1279 1321 1387 1986 3691 5981 7323 7681 7722 7637 7473 7343 7279 7309 7315 7345 7415 7482 7550 7632 7715 7747 7739 7712 7674 7654 7664 7745 480 21 1978 2023 2034 2154 2135 2000 1913 1893 2003 2035 2091 2669 4266 6346 7533 7832 7853 7763 7605 7480 7416 7437 7442 7472 7543 7612 7682 7764 7844 7874 7865 7834 7803 7782 7789 7869 481 22 2396 2505 2634 2960 3057 2954 2860 2830 2924 2942 2984 3514 4941 6718 7680 7883 7863 7747 7572 7440 7363 7367 7362 7392 7461 7524 7594 7675 7757 7791 7788 7769 7744 7726 7736 7818 482 23 2863 3081 3360 3953 4236 4167 4085 4035 4104 4104 4125 4597 5824 7270 8003 8117 8060 7930 7751 7620 7535 7522 7513 7542 7608 7667 7734 7812 7891 7919 7906 7880 7844 7820 7828 7905 483 24 3324 3654 4082 4983 5509 5496 5446 5371 5403 5378 5371 5735 6684 7750 8248 8276 8189 8043 7858 7730 7636 7610 7592 7613 7675 7731 7794 7868 7943 7967 7956 7926 7893 7871 7878 7953 484 25 3780 4228 4822 6001 6746 6799 6789 6703 6695 6647 6611 6851 7486 8152 8407 8340 8206 8030 7827 7688 7577 7535 7511 7532 7599 7657 7722 7801 7880 7907 7894 7864 7827 7803 7811 7891 485 26 4197 4753 5512 7015 8020 8154 8194 8095 8033 7962 7896 7988 8286 8557 8596 8455 8291 8104 7895 7757 7640 7588 7561 7585 7653 7717 7783 7862 7940 7968 7956 7926 7890 7867 7874 7953 486 27 4564 5207 6138 8003 9341 9593 9696 9576 9445 9336 9227 9122 9023 8903 8761 8565 8380 8185 7974 7834 7713 7651 7618 7640 7704 7762 7827 7903 7979 8005 7993 7964 7930 7909 7912 7994 487 1 0295 0300 0281 0284 0275 0273 0273 0272 0275 0265 0267 0310 0390 0441 0433 0412 0402 0390 0372 0367 0415 0615 0894 1061 1133 1165 1186 1202 1219 1232 1243 1260 1275 1292 1307 1328 488 2 0443 0425 0432 0465 0484 0486 0491 0483 0471 0443 0420 0422 0443 0446 0423 0401 0393 0382 0366 0368 0420 0614 0889 1056 1129 1162 1181 1199 1215 1227 1240 1253 1270 1288 1303 1321 489 3 0525 0559 0580 0653 0701 0720 0731 0719 0682 0632 0581 0536 0496 0456 0420 0399 0392 0381 0367 0373 0428 0624 0905 1079 1154 1187 1208 1226 1243 1255 1267 1280 1298 1314 1330 1343 490 4 0652 0703 0754 0874 0952 0990 1023 1010 0945 0852 0761 0678 0605 0533 0467 0430 0414 0392 0366 0368 0434 0697 1094 1342 1448 1493 1520 1549 1583 1605 1610 1612 1607 1603 1617 1665 491 5 0683 0748 0844 1010 1120 1186 1251 1245 1154 1025 0890 0772 0664 0556 0458 0400 0371 0334 0295 0293 0361 0644 1084 1356 1471 1519 1548 1587 1638 1670 1669 1657 1627 1601 1619 1693 492 6 0703 0822 0977 1203 1360 1458 1567 1570 1451 1272 1090 0927 0780 0630 0493 0410 0366 0313 0258 0249 0319 0622 1102 1398 1522 1573 1604 1654 1725 1771 1764 1735 1681 1634 1654 1757 493 7 0740 0889 1104 1403 1608 1749 1906 1924 1776 1549 1314 1105 0914 0721 0544 0433 0372 0300 0230 0216 0286 0597 1098 1407 1538 1591 1624 1684 1772 1829 1819 1778 1702 1638 1659 1789 494 8 0757 0977 1256 1649 1907 2106 2317 2354 2172 1885 1588 1322 1082 0835 0610 0468 0390 0298 0211 0194 0263 0584 1109 1432 1567 1624 1659 1731 1843 1914 1898 1843 1742 1655 1677 1840 495 9 0760 1023 1356 1807 2114 2352 2608 2662 2453 2124 1781 1475 1198 0915 0655 0493 0400 0294 0199 0178 0244 0550 1044 1339 1460 1512 1546 1624 1751 1831 1813 1747 1628 1528 1554 1733 496 10 0532 0468 0410 0386 0354 0330 0317 0318 0326 0308 0297 0369 0508 0569 0513 0456 0434 0402 0352 0329 0440 1125 2360 3264 3690 3867 3952 4006 4045 4065 4079 4092 4109 4133 4146 4173 497 11 0629 0568 0520 0515 0498 0481 0469 0462 0458 0418 0389 0435 0539 0570 0505 0449 0428 0396 0349 0329 0442 1122 2349 3248 3671 3848 3934 3989 4029 4049 4063 4076 4094 4115 4130 4155 498 12 0761 0710 0674 0708 0713 0709 0710 0696 0665 0594 0529 0535 0585 0576 0496 0437 0418 0388 0342 0328 0445 1125 2358 3272 3705 3884 3974 4028 4066 4087 4101 4113 4130 4150 4166 4194 499 13 0940 0885 0876 0946 0995 1010 1028 1000 0933 0817 0706 0653 0636 0577 0484 0426 0409 0379 0338 0331 0451 1120 2345 3259 3693 3876 3967 4024 4064 4086 4099 4113 4132 4156 4172 4196 500 14 1088 1041 1055 1187 1286 1325 1360 1321 1209 1050 0893 0778 0690 0585 0478 0420 0404 0376 0335 0332 0456 1129 2367 3294 3737 3924 4015 4071 4112 4131 4147 4160 4179 4201 4215 4239 501 15 1191 1185 1211 1394 1530 1593 1652 1602 1452 1254 1057 0888 0741 0601 0484 0425 0410 0382 0342 0345 0472 1147 2384 3316 3764 3954 4046 4104 4145 4166 4182 4195 4214 4238 4250 4274 502 16 1322 1330 1401 1632 1818 1911 1995 1946 1756 1499 1247 1030 0842 0661 0508 0430 0407 0368 0315 0311 0451 1214 2629 3691 4204 4422 4530 4612 4685 4724 4731 4723 4706 4696 4710 4776 503 17 1393 1471 1574 1873 2108 2242 2370 2321 2086 1768 1452 1181 0948 0722 0529 0430 0396 0343 0277 0270 0412 1240 2817 4018 4601 4850 4974 5080 5189 5246 5245 5216 5157 5108 5127 5241 504 18 1393 1495 1660 2038 2314 2490 2662 2623 2361 1996 1634 1325 1054 0790 0565 0442 0394 0324 0245 0233 0368 1175 2722 3896 4462 4701 4821 4939 5075 5150 5137 5085 4986 4898 4919 5077 505 19 0809 0691 0579 0529 0469 0426 0398 0392 0412 0381 0359 0455 0645 0695 0576 0479 0447 0396 0315 0273 0447 1725 4323 6497 7627 8118 8346 8474 8558 8588 8595 8591 8605 8623 8636 8678 506 20 0904 0791 0687 0659 0612 0571 0549 0537 0542 0489 0444 0518 0678 0703 0574 0476 0445 0393 0311 0272 0451 1735 4332 6498 7628 8123 8355 8486 8572 8604 8610 8608 8620 8642 8655 8690 507 21 1010 0897 0818 0812 0791 0763 0743 0726 0709 0629 0556 0599 0723 0719 0580 0481 0450 0399 0318 0280 0463 1754 4361 6536 7666 8153 8382 8509 8591 8618 8626 8623 8636 8657 8665 8701 508 22 1166 1050 0975 1004 1017 1000 0997 0965 0921 0801 0689 0689 0761 0719 0568 0469 0441 0390 0310 0278 0463 1747 4345 6523 7660 8158 8388 8517 8600 8630 8638 8636 8648 8669 8678 8714 509 23 1301 1213 1168 1254 1303 1311 1324 1282 1191 1022 0860 0800 0801 0709 0545 0447 0419 0371 0297 0273 0457 1727 4319 6501 7644 8144 8374 8506 8591 8620 8628 8629 8642 8663 8673 8711 510 24 1480 1400 1371 1514 1621 1652 1687 1633 1492 1268 1050 0928 0859 0723 0546 0448 0422 0375 0301 0281 0470 1739 4336 6526 7671 8169 8400 8526 8609 8637 8645 8650 8657 8680 8685 8720 511 25 1661 1582 1581 1790 1947 2012 2082 2012 1816 1528 1252 1057 0910 0725 0534 0434 0410 0363 0291 0278 0471 1740 4331 6514 7659 8158 8391 8521 8603 8632 8643 8645 8660 8681 8690 8726 512 26 1779 1715 1741 2002 2212 2309 2396 2313 2072 1737 1412 1157 0950 0729 0527 0428 0404 0356 0286 0277 0472 1746 4338 6517 7660 8157 8392 8523 8607 8636 8647 8646 8658 8684 8691 8724 513 27 1859 1831 1879 2188 2449 2573 2690 2599 2306 1922 1550 1236 0969 0718 0510 0413 0390 0346 0280 0276 0471 1732 4310 6485 7629 8131 8366 8501 8584 8616 8627 8631 8644 8668 8677 8711 514 1 0405 0410 0392 0396 0392 0379 0370 0370 0380 0381 0393 0467 0629 0780 0832 0830 0825 0814 0793 0784 0815 0939 1086 1172 1211 1231 1248 1266 1281 1293 1305 1319 1335 1354 1368 1387 515 2 0527 0538 0548 0588 0607 0602 0595 0591 0592 0577 0571 0607 0689 0753 0760 0747 0738 0726 0706 0699 0737 0877 1050 1151 1196 1219 1237 1254 1270 1282 1295 1308 1323 1341 1357 1376 516 3 0700 0727 0793 0898 0967 0988 0994 0980 0957 0921 0886 0854 0825 0793 0764 0743 0733 0720 0702 0699 0738 0875 1046 1146 1192 1216 1232 1249 1264 1277 1289 1304 1319 1337 1352 1371 517 4 0851 0935 1046 1237 1353 1394 1426 1411 1358 1282 1203 1130 1063 0992 0922 0874 0845 0809 0763 0746 0797 1001 1260 1404 1465 1493 1514 1540 1573 1594 1600 1599 1587 1582 1599 1647 518 5 0834 0954 1106 1339 1488 1555 1627 1623 1547 1432 1310 1199 1094 0983 0874 0797 0749 0689 0621 0590 0646 0883 1192 1361 1431 1461 1481 1519 1569 1602 1602 1586 1554 1530 1546 1622 519 6 0877 1046 1264 1576 1771 1882 2000 2010 1906 1743 1568 1410 1261 1101 0945 0834 0761 0674 0581 0540 0597 0866 1238 1446 1530 1567 1593 1642 1710 1755 1749 1720 1663 1616 1637 1743 520 7 0857 1064 1341 1715 1955 2113 2280 2310 2177 1969 1743 1540 1349 1144 0943 0801 0707 0599 0486 0437 0493 0780 1195 1432 1529 1570 1599 1657 1744 1797 1787 1745 1671 1605 1630 1756 521 8 0900 1155 1499 1968 2280 2499 2734 2791 2621 2348 2052 1785 1534 1267 1007 0824 0704 0564 0428 0372 0432 0742 1203 1466 1574 1621 1653 1724 1834 1905 1889 1833 1731 1645 1669 1830 522 9 0864 1160 1567 2104 2456 2719 3008 3085 2889 2568 2222 1910 1618 1305 1005 0794 0658 0503 0354 0294 0352 0660 1116 1371 1475 1521 1554 1633 1758 1837 1818 1752 1633 1533 1562 1739 523 10 0602 0534 0472 0440 0402 0370 0354 0350 0370 0358 0358 0469 0725 0936 0957 0920 0904 0868 0804 0763 0886 1564 2656 3419 3773 3922 3999 4052 4089 4108 4121 4134 4153 4176 4191 4213 524 11 0744 0680 0643 0632 0616 0588 0575 0569 0572 0541 0521 0608 0822 0987 0987 0944 0927 0890 0825 0789 0914 1593 2696 3469 3828 3980 4057 4110 4147 4167 4180 4191 4209 4231 4243 4270 525 12 0890 0867 0844 0888 0897 0880 0873 0857 0840 0781 0730 0775 0920 1012 0979 0929 0911 0874 0812 0780 0907 1575 2663 3431 3791 3944 4023 4074 4114 4131 4146 4157 4176 4200 4211 4236 526 13 1127 1111 1124 1248 1308 1316 1319 1289 1236 1138 1043 1026 1078 1087 1020 0962 0941 0905 0844 0818 0948 1609 2694 3466 3828 3983 4062 4113 4150 4170 4182 4194 4214 4234 4248 4271 527 14 1317 1343 1399 1605 1731 1764 1790 1746 1648 1500 1357 1263 1212 1134 1032 0966 0945 0908 0849 0828 0961 1624 2716 3495 3865 4021 4103 4156 4194 4213 4225 4238 4255 4279 4291 4314 528 15 1487 1517 1619 1888 2079 2143 2193 2138 1996 1809 1622 1460 1316 1173 1047 0976 0955 0917 0859 0842 0975 1636 2723 3500 3869 4027 4107 4160 4200 4217 4233 4243 4262 4286 4298 4320 529 16 1585 1670 1797 2138 2377 2470 2557 2501 2317 2072 1827 1612 1423 1235 1069 0975 0941 0885 0808 0780 0927 1677 2936 3836 4262 4445 4538 4617 4688 4725 4731 4721 4701 4687 4705 4777 530 17 1672 1786 1966 2378 2674 2815 2950 2901 2671 2357 2044 1770 1527 1284 1067 0941 0887 0808 0704 0664 0817 1658 3109 4163 4667 4882 4994 5094 5200 5258 5254 5223 5163 5114 5132 5251 531 18 1611 1778 2018 2489 2835 3024 3206 3175 2918 2558 2195 1877 1594 1309 1050 0895 0820 0718 0593 0542 0688 1525 2999 4073 4585 4806 4915 5030 5162 5236 5222 5168 5067 4985 5002 5162 532 19 0852 0731 0611 0545 0479 0427 0397 0393 0419 0397 0385 0519 0827 1025 0970 0883 0854 0793 0686 0617 0824 2164 4656 6659 7689 8142 8360 8487 8570 8600 8607 8606 8620 8643 8653 8693 533 20 0972 0870 0766 0727 0675 0629 0596 0587 0601 0555 0521 0639 0924 1097 1031 0940 0910 0849 0738 0671 0884 2235 4733 6731 7752 8198 8408 8531 8610 8637 8643 8640 8651 8675 8686 8722 534 21 1125 1025 0933 0939 0913 0871 0847 0828 0820 0750 0684 0771 1011 1142 1057 0962 0932 0870 0759 0692 0909 2263 4756 6747 7765 8207 8418 8536 8616 8643 8650 8645 8656 8679 8687 8721 535 22 1272 1174 1112 1163 1165 1139 1122 1094 1063 0958 0860 0908 1091 1168 1060 0962 0930 0868 0759 0698 0916 2264 4757 6751 7772 8217 8428 8551 8628 8654 8662 8660 8670 8693 8703 8735 536 23 1458 1403 1365 1477 1533 1525 1526 1484 1411 1259 1109 1094 1187 1186 1047 0943 0911 0849 0744 0689 0908 2244 4733 6739 7770 8219 8432 8555 8633 8658 8667 8667 8677 8699 8706 8740 537 24 1706 1663 1666 1875 1993 2025 2048 1991 1864 1647 1434 1340 1333 1253 1085 0974 0942 0879 0773 0723 0948 2288 4774 6775 7799 8243 8453 8573 8649 8673 8682 8682 8691 8716 8721 8753 538 25 1912 1886 1923 2204 2400 2463 2515 2442 2256 1980 1709 1532 1423 1266 1071 0957 0925 0863 0761 0719 0945 2270 4747 6751 7786 8237 8452 8579 8657 8684 8693 8695 8706 8730 8740 8776 539 26 2051 2063 2137 2484 2742 2835 2919 2829 2593 2265 1944 1700 1508 1293 1079 0961 0928 0866 0766 0727 0957 2281 4753 6756 7790 8241 8456 8581 8661 8687 8699 8700 8713 8738 8745 8778 540 27 2219 2239 2351 2780 3114 3245 3359 3258 2963 2579 2203 1883 1603 1332 1100 0981 0948 0885 0788 0757 0989 2314 4780 6768 7792 8235 8446 8568 8645 8670 8681 8684 8695 8719 8730 8760 541 1 0455 0465 0459 0466 0457 0439 0430 0429 0445 0450 0472 0574 0802 1039 1149 1172 1175 1171 1162 1157 1157 1164 1171 1179 1190 1203 1217 1233 1247 1261 1272 1286 1301 1320 1337 1350 542 2 0625 0670 0698 0761 0783 0773 0765 0759 0770 0771 0783 0852 1000 1139 1199 1206 1205 1197 1188 1185 1182 1187 1191 1200 1211 1222 1236 1251 1265 1277 1289 1303 1319 1337 1351 1368 543 3 0904 0976 1077 1250 1354 1364 1363 1350 1339 1331 1322 1315 1309 1302 1294 1281 1270 1260 1250 1247 1242 1242 1244 1251 1263 1272 1286 1301 1315 1324 1337 1349 1364 1380 1396 1409 544 4 0996 1152 1312 1577 1725 1769 1803 1793 1761 1711 1660 1610 1560 1503 1439 1378 1329 1270 1201 1159 1168 1263 1365 1414 1438 1452 1468 1494 1525 1546 1548 1546 1532 1527 1543 1592 545 5 1032 1204 1423 1750 1943 2025 2106 2109 2053 1963 1864 1770 1677 1569 1453 1349 1268 1171 1062 0996 1016 1174 1358 1445 1481 1501 1517 1554 1604 1635 1634 1617 1583 1555 1575 1647 546 6 1072 1294 1578 1991 2243 2370 2499 2519 2433 2295 2139 1996 1854 1692 1522 1379 1269 1140 1000 0919 0947 1161 1427 1561 1616 1642 1664 1710 1778 1820 1813 1783 1729 1681 1702 1804 547 7 1066 1321 1666 2147 2452 2625 2813 2859 2744 2549 2335 2137 1943 1724 1495 1310 1173 1013 0845 0752 0787 1045 1385 1564 1638 1671 1696 1753 1840 1895 1884 1841 1766 1702 1725 1852 548 8 1054 1363 1780 2340 2707 2945 3211 3284 3137 2883 2601 2339 2085 1800 1506 1273 1103 0909 0711 0604 0641 0934 1334 1549 1639 1681 1711 1783 1893 1961 1945 1888 1788 1700 1725 1889 549 9 0995 1350 1828 2453 2856 3145 3469 3567 3394 3092 2757 2447 2150 1817 1479 1218 1028 0816 0606 0501 0538 0829 1240 1463 1556 1597 1629 1708 1834 1913 1893 1828 1710 1610 1637 1821 550 10 0694 0619 0550 0515 0462 0424 0398 0399 0430 0425 0438 0601 1009 1425 1568 1568 1564 1531 1458 1406 1529 2138 3021 3606 3877 3993 4059 4104 4139 4156 4169 4180 4196 4222 4239 4259 551 11 0850 0811 0762 0767 0739 0700 0680 0671 0689 0669 0662 0798 1141 1468 1560 1545 1536 1500 1428 1380 1502 2107 2992 3583 3860 3978 4045 4093 4127 4144 4157 4167 4186 4206 4222 4246 552 12 1067 1064 1054 1131 1150 1129 1107 1089 1085 1038 1002 1094 1352 1579 1620 1588 1574 1537 1465 1423 1545 2142 3020 3610 3885 4004 4069 4115 4148 4165 4179 4189 4206 4229 4240 4264 553 13 1308 1337 1387 1552 1628 1622 1613 1583 1548 1469 1399 1431 1581 1696 1683 1635 1616 1576 1505 1466 1589 2182 3059 3653 3932 4051 4119 4164 4198 4212 4226 4235 4253 4272 4283 4303 554 14 1584 1652 1760 2032 2198 2220 2235 2191 2110 1988 1869 1811 1812 1786 1708 1645 1620 1578 1509 1477 1603 2188 3063 3657 3937 4061 4129 4177 4212 4228 4241 4252 4268 4290 4303 4324 555 15 1814 1921 2085 2478 2729 2793 2832 2769 2641 2473 2309 2161 2029 1895 1773 1698 1670 1627 1557 1527 1653 2241 3125 3731 4016 4140 4208 4257 4292 4308 4318 4329 4346 4369 4378 4401 556 16 1929 2032 2249 2696 3007 3106 3185 3127 2957 2731 2503 2300 2117 1929 1757 1647 1598 1525 1422 1371 1510 2208 3276 4004 4348 4499 4583 4656 4724 4760 4765 4753 4734 4721 4733 4802 557 17 1950 2136 2419 2956 3339 3489 3630 3579 3367 3072 2773 2507 2266 2016 1782 1628 1549 1439 1296 1221 1365 2155 3411 4283 4695 4875 4972 5067 5171 5225 5219 5185 5126 5076 5094 5209 558 18 1853 2084 2416 3033 3461 3665 3868 3844 3603 3261 2909 2596 2309 2010 1725 1533 1421 1277 1105 1015 1146 1932 3225 4132 4563 4747 4844 4956 5085 5156 5140 5084 4986 4900 4917 5076 559 19 0901 0787 0665 0589 0512 0449 0416 0409 0446 0430 0427 0608 1059 1457 1514 1457 1436 1374 1249 1163 1386 2722 5052 6872 7798 8204 8401 8520 8597 8623 8628 8627 8636 8658 8670 8708 560 20 1079 0963 0855 0820 0753 0694 0659 0646 0673 0638 0614 0782 1209 1572 1609 1546 1524 1460 1333 1247 1473 2812 5130 6930 7839 8237 8430 8545 8621 8642 8648 8644 8656 8680 8688 8722 561 21 1270 1166 1087 1101 1065 1014 0981 0962 0969 0908 0856 0996 1381 1694 1705 1635 1610 1544 1416 1330 1562 2896 5188 6960 7860 8254 8449 8566 8642 8665 8669 8670 8679 8701 8712 8744 562 22 1442 1370 1313 1389 1393 1353 1326 1295 1278 1186 1103 1205 1521 1761 1737 1657 1630 1563 1435 1354 1587 2915 5204 6979 7881 8277 8470 8586 8661 8688 8692 8690 8699 8721 8731 8761 563 23 1677 1624 1611 1766 1829 1806 1793 1749 1695 1561 1430 1471 1690 1829 1756 1663 1633 1565 1439 1362 1595 2914 5204 6989 7897 8295 8489 8604 8678 8703 8708 8707 8716 8739 8752 8781 564 24 1938 1944 1993 2257 2413 2423 2436 2372 2262 2069 1878 1834 1929 1956 1833 1727 1694 1623 1498 1427 1662 2977 5254 7028 7931 8325 8517 8631 8705 8729 8737 8734 8747 8769 8777 8809 565 25 2187 2215 2320 2699 2950 3003 3045 2961 2791 2534 2280 2141 2100 2008 1834 1717 1680 1609 1484 1420 1657 2965 5239 7018 7924 8321 8513 8628 8703 8725 8731 8732 8742 8768 8774 8808 566 26 2418 2479 2633 3116 3463 3557 3629 3531 3301 2987 2678 2451 2289 2099 1887 1760 1722 1649 1527 1468 1707 3008 5278 7056 7962 8356 8550 8662 8737 8760 8768 8769 8779 8802 8810 8842 567 27 2600 2673 2864 3450 3869 4007 4110 3998 3711 3343 2983 2669 2392 2119 1879 1745 1705 1631 1512 1457 1697 2993 5254 7026 7932 8332 8527 8640 8716 8739 8748 8748 8762 8786 8795 8826 568 1 0535 0538 0538 0536 0514 0491 0475 0479 0511 0524 0553 0718 1119 1562 1761 1777 1740 1679 1603 1545 1510 1500 1491 1487 1495 1506 1522 1546 1578 1598 1604 1604 1599 1598 1614 1660 569 2 0693 0754 0795 0873 0884 0866 0860 0862 0892 0899 0919 1059 1372 1689 1813 1798 1744 1670 1584 1520 1479 1464 1450 1445 1450 1461 1476 1501 1533 1552 1557 1555 1548 1547 1560 1609 570 3 0904 1027 1149 1330 1415 1422 1433 1433 1450 1449 1454 1533 1700 1847 1881 1833 1763 1677 1583 1513 1468 1446 1429 1422 1428 1437 1451 1476 1507 1527 1531 1529 1519 1512 1530 1580 571 4 1180 1352 1572 1909 2102 2151 2192 2192 2183 2167 2148 2129 2105 2067 2015 1938 1856 1763 1664 1591 1543 1515 1497 1490 1494 1504 1517 1543 1574 1594 1596 1594 1583 1576 1592 1639 572 5 1216 1449 1744 2166 2410 2505 2592 2614 2584 2527 2459 2393 2318 2221 2102 1972 1846 1704 1550 1444 1411 1464 1521 1540 1553 1565 1582 1615 1664 1693 1690 1673 1640 1614 1632 1706 573 6 1243 1521 1889 2402 2698 2849 2996 3038 2980 2872 2749 2626 2497 2336 2149 1964 1801 1614 1415 1285 1266 1394 1541 1604 1632 1650 1669 1716 1784 1825 1819 1788 1732 1684 1706 1810 574 7 1203 1536 1961 2555 2919 3117 3337 3404 3314 3150 2958 2774 2583 2355 2099 1867 1672 1451 1220 1079 1077 1273 1511 1623 1672 1697 1718 1776 1861 1915 1904 1860 1785 1721 1744 1876 575 8 1209 1584 2094 2781 3218 3491 3793 3896 3778 3549 3289 3040 2784 2482 2150 1859 1623 1357 1087 0926 0928 1167 1477 1634 1699 1733 1762 1831 1939 2007 1990 1932 1832 1747 1773 1931 576 9 1092 1503 2041 2774 3240 3562 3925 4059 3910 3628 3307 3001 2697 2341 1962 1641 1389 1111 0835 0678 0690 0949 1303 1486 1564 1601 1630 1708 1834 1911 1891 1824 1708 1607 1634 1816 577 10 0810 0733 0656 0607 0542 0488 0456 0459 0499 0508 0533 0761 1355 2039 2354 2416 2430 2407 2343 2294 2389 2836 3409 3771 3943 4026 4080 4123 4156 4171 4185 4194 4212 4234 4250 4269 578 11 0962 0954 0925 0941 0906 0856 0826 0817 0847 0842 0849 1046 1553 2105 2341 2374 2379 2353 2287 2239 2336 2796 3398 3783 3966 4050 4101 4144 4174 4191 4203 4213 4233 4255 4266 4288 579 12 1240 1265 1285 1378 1397 1358 1330 1311 1322 1294 1278 1428 1820 2219 2365 2366 2362 2328 2258 2213 2311 2777 3398 3799 3991 4079 4134 4175 4208 4223 4235 4242 4261 4283 4294 4315 580 13 1562 1627 1708 1922 2023 1998 1977 1944 1928 1870 1823 1908 2165 2406 2467 2443 2429 2391 2321 2280 2378 2833 3444 3840 4030 4117 4172 4214 4245 4260 4270 4281 4298 4320 4331 4349 581 14 1880 2004 2168 2524 2722 2742 2736 2685 2628 2536 2448 2441 2524 2583 2555 2503 2478 2436 2366 2328 2425 2872 3479 3878 4068 4157 4212 4254 4286 4300 4311 4319 4339 4360 4372 4393 582 15 2177 2357 2610 3116 3450 3504 3531 3463 3353 3221 3087 2968 2861 2749 2644 2569 2537 2492 2421 2387 2483 2926 3535 3934 4128 4219 4275 4317 4348 4360 4373 4382 4401 4421 4436 4457 583 16 2225 2438 2749 3338 3722 3833 3910 3850 3699 3500 3300 3118 2951 2772 2600 2476 2409 2316 2188 2113 2227 2810 3629 4160 4411 4525 4596 4663 4729 4762 4764 4752 4729 4714 4731 4802 584 17 2285 2547 2926 3627 4107 4275 4422 4381 4188 3925 3650 3402 3169 2920 2673 2490 2377 2229 2043 1930 2046 2731 3739 4409 4726 4868 4952 5042 5142 5193 5186 5152 5088 5038 5056 5170 585 18 2068 2379 2819 3572 4087 4322 4540 4535 4316 3998 3663 3359 3073 2761 2450 2215 2059 1867 1640 1503 1610 2319 3406 4137 4482 4634 4720 4827 4959 5028 5010 4951 4849 4759 4776 4941 586 19 0984 0840 0719 0633 0537 0467 0424 0420 0467 0462 0469 0709 1344 2008 2219 2208 2201 2140 2000 1894 2132 3433 5523 7091 7884 8240 8419 8533 8609 8633 8638 8635 8647 8674 8681 8716 587 20 1155 1049 0945 0902 0832 0761 0717 0707 0741 0717 0703 0923 1503 2074 2228 2198 2186 2121 1980 1878 2118 3422 5534 7121 7921 8277 8457 8567 8642 8663 8669 8668 8680 8704 8712 8744 588 21 1374 1286 1215 1239 1206 1139 1098 1077 1095 1044 1003 1194 1717 2215 2330 2287 2271 2204 2064 1963 2201 3498 5598 7174 7966 8318 8495 8603 8675 8695 8699 8698 8710 8732 8742 8769 589 22 1637 1590 1563 1663 1684 1631 1594 1560 1555 1475 1402 1557 2015 2436 2511 2457 2436 2366 2225 2128 2367 3642 5686 7222 7996 8343 8519 8627 8699 8721 8725 8721 8735 8758 8766 8797 590 23 1879 1883 1902 2103 2178 2147 2119 2075 2034 1914 1800 1896 2243 2534 2539 2462 2434 2362 2220 2127 2367 3634 5680 7220 8001 8352 8531 8641 8714 8736 8741 8737 8752 8775 8784 8819 591 24 2185 2225 2315 2642 2818 2813 2810 2742 2656 2489 2323 2337 2553 2709 2649 2554 2521 2445 2304 2217 2457 3713 5742 7266 8036 8376 8549 8653 8723 8745 8750 8752 8766 8790 8800 8830 592 25 2494 2593 2757 3242 3547 3594 3620 3533 3380 3144 2912 2814 2851 2837 2700 2584 2543 2464 2324 2242 2481 3729 5758 7294 8073 8419 8593 8699 8772 8792 8798 8797 8809 8830 8840 8870 593 26 2786 2909 3144 3769 4199 4288 4347 4241 4027 3733 3443 3243 3121 2968 2769 2635 2591 2509 2369 2294 2534 3776 5794 7323 8098 8440 8615 8722 8791 8811 8819 8820 8830 8855 8864 8892 594 27 2964 3139 3437 4176 4701 4835 4931 4810 4532 4186 3845 3542 3274 3006 2765 2621 2572 2491 2354 2283 2523 3752 5765 7299 8081 8429 8606 8713 8784 8804 8812 8810 8822 8848 8855 8883 595 1 0527 0555 0555 0553 0515 0477 0461 0472 0516 0537 0574 0807 1390 2044 2316 2293 2178 2019 1844 1708 1628 1594 1565 1546 1549 1558 1575 1611 1661 1694 1692 1677 1646 1624 1645 1719 596 2 0661 0729 0796 0865 0866 0841 0832 0846 0896 0911 0942 1153 1650 2161 2341 2278 2141 1969 1781 1640 1555 1516 1483 1463 1463 1472 1488 1525 1574 1605 1602 1586 1555 1531 1551 1627 597 3 0876 1009 1161 1342 1415 1410 1429 1444 1489 1497 1517 1680 2045 2382 2465 2368 2219 2040 1847 1703 1615 1571 1537 1516 1517 1525 1541 1576 1625 1655 1653 1636 1604 1579 1598 1671 598 4 1135 1325 1586 1926 2099 2148 2203 2230 2257 2254 2249 2328 2500 2626 2600 2466 2302 2112 1914 1768 1676 1628 1591 1571 1571 1580 1596 1630 1680 1711 1707 1690 1656 1631 1651 1726 599 5 1329 1617 1978 2475 2757 2871 2975 3017 3018 3001 2970 2936 2887 2806 2687 2523 2344 2147 1944 1793 1699 1648 1610 1588 1590 1599 1614 1650 1698 1727 1726 1709 1677 1649 1667 1745 600 6 1422 1761 2217 2847 3218 3389 3561 3627 3603 3540 3454 3363 3253 3100 2901 2668 2437 2183 1920 1735 1655 1674 1699 1700 1706 1716 1734 1780 1847 1888 1881 1848 1793 1747 1767 1871 601 7 1387 1779 2303 3025 3473 3706 3958 4061 4012 3890 3737 3578 3404 3173 2890 2595 2319 2017 1709 1502 1440 1539 1659 1705 1728 1746 1767 1823 1908 1960 1948 1904 1827 1764 1788 1914 602 8 1371 1814 2424 3242 3764 4070 4412 4557 4473 4284 4051 3817 3565 3247 2875 2511 2189 1840 1487 1259 1214 1386 1598 1693 1737 1761 1788 1858 1967 2035 2018 1960 1859 1774 1801 1959 603 9 1258 1714 2358 3213 3762 4126 4535 4705 4586 4337 4034 3740 3429 3051 2623 2231 1901 1541 1184 0965 0938 1159 1450 1594 1658 1689 1719 1797 1921 1999 1978 1911 1794 1693 1721 1901 604 10 0891 0812 0741 0687 0615 0552 0511 0515 0567 0583 0621 0905 1663 2591 3077 3205 3245 3237 3189 3155 3213 3470 3753 3924 4017 4071 4114 4152 4182 4197 4209 4217 4237 4260 4274 4291 605 11 1122 1108 1072 1093 1059 0995 0953 0944 0992 0996 1024 1286 1963 2755 3149 3244 3268 3253 3203 3169 3225 3489 3787 3969 4065 4119 4164 4202 4232 4246 4256 4266 4282 4305 4318 4332 606 12 1440 1490 1532 1663 1689 1637 1597 1572 1605 1595 1602 1818 2366 2970 3250 3300 3310 3287 3233 3199 3254 3516 3822 4011 4111 4166 4211 4249 4277 4290 4302 4311 4328 4350 4360 4379 607 13 1799 1905 2035 2321 2449 2420 2385 2349 2350 2319 2297 2439 2815 3203 3358 3367 3361 3330 3272 3239 3293 3557 3874 4073 4179 4235 4278 4317 4344 4356 4366 4375 4391 4413 4424 4443 608 14 2183 2355 2597 3060 3321 3326 3312 3254 3217 3153 3098 3139 3300 3447 3475 3441 3418 3379 3319 3286 3340 3604 3927 4132 4242 4301 4345 4382 4411 4423 4433 4441 4459 4478 4492 4510 609 15 2510 2762 3090 3733 4135 4192 4206 4129 4040 3946 3852 3768 3688 3608 3531 3463 3428 3384 3322 3291 3342 3597 3915 4119 4229 4287 4333 4370 4399 4411 4421 4430 4445 4468 4475 4496 610 16 2541 2849 3267 4036 4548 4663 4739 4677 4550 4391 4227 4075 3935 3778 3618 3482 3390 3274 3126 3031 3091 3499 4042 4383 4553 4634 4692 4754 4817 4848 4847 4835 4810 4793 4804 4879 611 17 2591 2952 3449 4327 4907 5091 5250 5221 5058 4832 4594 4371 4158 3918 3664 3449 3294 3105 2874 2723 2790 3332 4080 4554 4786 4894 4966 5052 5151 5200 5192 5154 5093 5037 5059 5175 612 18 2375 2745 3262 4184 4808 5063 5302 5307 5107 4815 4504 4213 3933 3618 3287 3014 2816 2578 2299 2119 2198 2837 3764 4366 4651 4779 4857 4960 5087 5153 5135 5079 4975 4890 4907 5064 613 19 1063 0923 0784 0690 0579 0500 0448 0448 0507 0510 0529 0832 1673 2648 3064 3121 3138 3084 2938 2821 3060 4281 6093 7397 8046 8335 8491 8591 8656 8676 8679 8676 8685 8707 8716 8750 614 20 1260 1161 1061 1010 0923 0843 0790 0780 0831 0818 0820 1107 1878 2722 3044 3068 3074 3011 2865 2752 2990 4209 6039 7364 8029 8330 8490 8595 8665 8687 8689 8685 8698 8723 8734 8765 615 21 1518 1432 1371 1410 1365 1292 1235 1215 1248 1210 1187 1442 2141 2878 3139 3141 3139 3074 2927 2817 3054 4264 6085 7403 8068 8369 8531 8634 8706 8725 8728 8728 8740 8765 8771 8800 616 22 1775 1751 1735 1854 1879 1811 1763 1727 1740 1675 1620 1832 2438 3051 3239 3216 3206 3137 2990 2883 3118 4320 6132 7449 8111 8409 8568 8670 8740 8760 8765 8758 8771 8795 8803 8838 617 23 2135 2166 2232 2492 2601 2556 2515 2464 2438 2332 2233 2384 2867 3325 3426 3374 3354 3280 3129 3027 3261 4441 6214 7502 8151 8445 8604 8705 8773 8791 8795 8792 8805 8830 8836 8863 618 24 2473 2547 2699 3114 3346 3337 3314 3241 3169 3017 2868 2931 3253 3533 3546 3467 3436 3359 3209 3112 3344 4508 6271 7555 8196 8488 8642 8739 8806 8824 8827 8823 8837 8859 8867 8894 619 25 2800 2928 3162 3754 4123 4152 4163 4071 3936 3730 3524 3481 3619 3714 3632 3527 3487 3404 3256 3165 3396 4551 6307 7587 8226 8510 8659 8757 8818 8837 8841 8838 8851 8877 8882 8907 620 26 3121 3338 3644 4388 4881 4957 5004 4892 4699 4433 4173 4014 3953 3856 3685 3550 3500 3413 3263 3175 3407 4553 6303 7583 8235 8530 8691 8790 8857 8875 8883 8879 8893 8916 8926 8951 621 27 3362 3628 4031 4949 5584 5726 5813 5677 5416 5095 4776 4491 4235 3976 3737 3585 3528 3439 3289 3207 3436 4574 6312 7583 8232 8526 8683 8787 8853 8870 8877 8877 8891 8917 8925 8947 622 1 0529 0583 0607 0607 0551 0506 0481 0495 0559 0583 0630 0934 1730 2640 3000 2918 2700 2422 2124 1901 1772 1712 1662 1628 1624 1632 1649 1697 1767 1810 1802 1771 1718 1672 1695 1801 623 2 0681 0766 0832 0898 0881 0852 0842 0861 0929 0953 0994 1283 1993 2753 3015 2897 2662 2377 2075 1851 1719 1658 1606 1571 1568 1577 1594 1640 1709 1751 1743 1712 1660 1617 1639 1742 624 3 0877 1033 1212 1401 1452 1447 1462 1491 1558 1578 1606 1858 2447 3025 3174 3015 2765 2470 2161 1933 1796 1730 1676 1641 1639 1647 1665 1713 1782 1826 1816 1786 1731 1687 1713 1817 625 4 1116 1337 1610 1959 2111 2155 2207 2256 2313 2325 2335 2520 2935 3295 3326 3126 2858 2554 2241 2009 1869 1798 1743 1706 1704 1712 1730 1777 1845 1887 1879 1847 1791 1745 1767 1873 626 5 1330 1646 2061 2601 2887 3004 3127 3200 3240 3234 3217 3289 3450 3532 3421 3172 2885 2570 2251 2015 1872 1796 1738 1704 1700 1709 1727 1773 1842 1883 1875 1841 1787 1741 1764 1864 627 6 1501 1916 2429 3147 3559 3753 3949 4044 4057 4034 3987 3931 3847 3707 3498 3221 2923 2604 2280 2046 1900 1823 1765 1729 1729 1737 1754 1802 1869 1908 1900 1869 1812 1768 1789 1894 628 7 1568 2011 2635 3484 3993 4264 4553 4692 4685 4616 4505 4383 4227 3998 3689 3326 2964 2575 2185 1912 1784 1775 1777 1763 1765 1776 1797 1852 1938 1990 1976 1935 1857 1794 1819 1950 629 8 1572 2077 2806 3781 4403 4754 5147 5336 5298 5160 4966 4764 4527 4200 3786 3341 2922 2471 2024 1722 1611 1690 1794 1828 1849 1868 1893 1964 2073 2138 2119 2061 1960 1875 1904 2065 630 9 1432 1971 2723 3755 4408 4823 5297 5532 5465 5267 5005 4734 4428 4025 3534 3039 2589 2114 1645 1339 1247 1378 1552 1627 1664 1687 1714 1793 1920 1997 1974 1906 1785 1687 1714 1897 631 10 0937 0861 0787 0730 0645 0576 0530 0535 0594 0618 0665 0987 1875 3017 3673 3873 3939 3950 3935 3926 3931 3973 3998 4029 4069 4104 4141 4178 4208 4221 4233 4242 4262 4284 4298 4317 632 11 1216 1191 1170 1196 1157 1086 1038 1030 1086 1104 1143 1453 2267 3272 3828 3988 4037 4041 4022 4012 4014 4047 4068 4098 4137 4172 4210 4244 4274 4286 4297 4306 4325 4346 4357 4377 633 12 1583 1641 1703 1867 1906 1841 1786 1766 1810 1817 1846 2114 2790 3582 3999 4107 4135 4130 4107 4098 4093 4114 4130 4159 4199 4232 4266 4302 4331 4344 4352 4362 4377 4399 4408 4428 634 13 2010 2132 2302 2632 2772 2736 2688 2647 2670 2664 2671 2868 3350 3876 4134 4183 4188 4171 4143 4134 4122 4134 4145 4173 4214 4248 4284 4318 4347 4358 4368 4374 4391 4413 4424 4445 635 14 2427 2655 2950 3498 3809 3807 3775 3711 3699 3669 3653 3749 3998 4250 4357 4352 4337 4311 4278 4269 4252 4252 4259 4285 4324 4358 4394 4426 4455 4466 4474 4482 4498 4520 4527 4544 636 15 2835 3151 3565 4337 4824 4876 4874 4788 4725 4675 4627 4587 4551 4518 4486 4439 4405 4372 4337 4328 4305 4299 4301 4328 4366 4400 4435 4468 4495 4504 4513 4521 4538 4559 4566 4581 637 16 2881 3264 3773 4692 5280 5402 5479 5420 5323 5212 5096 4987 4879 4755 4617 4473 4355 4215 4051 3939 3933 4134 4381 4531 4623 4679 4726 4786 4848 4879 4879 4863 4839 4824 4834 4909 638 17 2889 3322 3915 4966 5654 5855 6018 5993 5856 5670 5469 5277 5087 4864 4616 4379 4190 3965 3703 3524 3538 3930 4455 4782 4948 5033 5095 5178 5273 5321 5311 5275 5211 5161 5178 5294 639 18 2745 3202 3856 4952 5672 5948 6201 6217 6051 5805 5535 5277 5016 4709 4368 4053 3801 3506 3173 2946 2968 3463 4149 4582 4796 4900 4972 5075 5201 5268 5251 5193 5094 5008 5028 5190 640 19 1141 1009 0858 0745 0615 0522 0463 0464 0538 0554 0588 0968 2062 3449 4156 4321 4375 4340 4206 4094 4303 5315 6696 7653 8142 8374 8512 8608 8675 8694 8695 8690 8702 8728 8734 8764 641 20 1391 1304 1193 1146 1046 0947 0881 0872 0941 0944 0965 1344 2398 3675 4297 4428 4472 4430 4294 4187 4394 5393 6765 7713 8192 8419 8551 8644 8706 8723 8725 8722 8733 8757 8763 8795 642 21 1671 1615 1558 1601 1550 1451 1386 1363 1420 1403 1402 1751 2708 3826 4339 4431 4458 4409 4271 4167 4370 5370 6751 7717 8208 8443 8580 8674 8740 8755 8757 8754 8766 8792 8797 8825 643 22 1997 1999 2008 2167 2187 2105 2040 2004 2038 1994 1965 2264 3092 4012 4397 4441 4451 4393 4253 4150 4354 5353 6754 7735 8235 8473 8613 8708 8772 8789 8792 8789 8801 8823 8831 8861 644 23 2378 2439 2549 2874 3012 2949 2895 2837 2834 2753 2682 2911 3581 4288 4545 4546 4539 4474 4333 4234 4435 5419 6814 7795 8294 8530 8665 8758 8819 8835 8837 8831 8844 8868 8875 8903 645 24 2798 2945 3155 3673 3950 3925 3886 3809 3762 3639 3527 3668 4154 4643 4780 4740 4718 4647 4506 4412 4605 5559 6913 7869 8355 8586 8718 8809 8870 8884 8887 8885 8895 8922 8923 8952 646 25 3170 3373 3677 4387 4808 4828 4813 4711 4614 4444 4283 4317 4593 4845 4856 4775 4738 4659 4515 4424 4616 5562 6914 7872 8361 8592 8728 8817 8878 8892 8895 8894 8904 8929 8936 8960 647 26 3534 3852 4274 5236 5875 5956 5976 5852 5682 5457 5238 5136 5159 5154 5040 4917 4867 4781 4636 4551 4738 5662 6993 7941 8425 8652 8784 8874 8934 8947 8949 8948 8961 8986 8990 9020 648 27 3842 4204 4740 5923 6737 6891 6953 6802 6562 6283 6007 5761 5539 5312 5100 4952 4890 4801 4658 4577 4764 5679 7005 7953 8441 8669 8800 8888 8950 8966 8969 8964 8976 8999 9003 9035 649 1 0544 0612 0657 0651 0580 0527 0496 0515 0594 0627 0681 1062 2073 3243 3677 3518 3174 2762 2336 2023 1846 1763 1692 1646 1638 1647 1665 1723 1811 1865 1853 1809 1734 1671 1695 1828 650 2 0671 0795 0895 0962 0929 0890 0875 0900 0985 1016 1067 1439 2379 3405 3741 3544 3188 2769 2339 2024 1844 1757 1687 1639 1631 1640 1658 1715 1803 1858 1843 1800 1727 1666 1689 1821 651 3 0856 1035 1221 1398 1428 1412 1420 1461 1550 1579 1620 1966 2796 3637 3858 3622 3254 2829 2400 2084 1901 1813 1741 1694 1688 1697 1718 1774 1863 1918 1904 1860 1784 1724 1748 1882 652 4 1068 1310 1604 1939 2061 2094 2146 2205 2297 2320 2347 2640 3315 3936 4024 3740 3350 2913 2476 2155 1968 1875 1802 1753 1747 1754 1775 1833 1920 1973 1959 1915 1840 1776 1805 1937 653 5 1282 1624 2061 2584 2832 2938 3063 3157 3234 3247 3249 3442 3873 4199 4128 3787 3375 2926 2480 2157 1967 1869 1795 1747 1740 1749 1771 1827 1916 1968 1955 1911 1832 1771 1794 1927 654 6 1491 1918 2479 3211 3620 3814 4026 4159 4218 4215 4186 4252 4408 4444 4230 3845 3418 2964 2513 2190 1998 1897 1822 1774 1769 1778 1798 1856 1942 1995 1981 1938 1860 1798 1825 1953 655 7 1668 2157 2847 3792 4363 4662 4980 5155 5185 5162 5096 5010 4877 4657 4333 3913 3471 3009 2555 2229 2035 1932 1856 1808 1802 1811 1831 1889 1974 2026 2011 1967 1890 1828 1852 1984 656 8 1711 2313 3145 4271 4982 5386 5836 6083 6100 6022 5881 5716 5495 5158 4697 4156 3616 3053 2501 2115 1925 1888 1869 1839 1839 1851 1874 1944 2055 2123 2103 2043 1941 1855 1885 2046 657 9 1590 2206 3075 4266 5015 5488 6021 6306 6289 6143 5920 5677 5378 4953 4410 3818 3258 2675 2105 1721 1566 1616 1698 1721 1740 1757 1782 1863 1989 2066 2042 1973 1854 1753 1782 1967 658 10 0994 0943 0850 0775 0669 0585 0531 0536 0615 0646 0702 1105 2244 3738 4580 4790 4797 4722 4598 4497 4447 4461 4461 4475 4516 4556 4602 4662 4723 4756 4758 4745 4728 4717 4734 4799 659 11 1247 1259 1235 1257 1196 1111 1059 1055 1132 1156 1205 1597 2660 4000 4727 4887 4871 4785 4653 4549 4491 4497 4491 4500 4535 4572 4614 4671 4731 4761 4762 4749 4729 4716 4732 4800 660 12 1585 1661 1725 1877 1891 1818 1763 1752 1819 1837 1875 2241 3196 4345 4938 5045 5009 4910 4773 4668 4606 4602 4591 4600 4633 4668 4709 4766 4825 4853 4853 4840 4820 4805 4822 4884 661 13 1984 2133 2329 2649 2775 2726 2682 2659 2714 2719 2741 3054 3835 4709 5118 5150 5079 4961 4812 4703 4629 4610 4594 4600 4635 4669 4712 4767 4829 4858 4856 4843 4818 4803 4817 4884 662 14 2365 2605 2913 3447 3715 3703 3686 3657 3683 3671 3670 3890 4426 4983 5206 5167 5066 4930 4771 4655 4572 4540 4518 4524 4558 4595 4636 4693 4754 4783 4782 4767 4743 4727 4740 4813 663 15 2759 3102 3569 4362 4829 4877 4894 4849 4838 4804 4775 4873 5134 5372 5422 5327 5205 5059 4896 4782 4697 4656 4630 4632 4666 4698 4739 4793 4852 4880 4880 4864 4839 4825 4836 4906 664 16 3140 3596 4190 5240 5917 6045 6115 6062 6000 5941 5879 5816 5755 5673 5571 5427 5286 5130 4965 4848 4756 4706 4679 4682 4717 4750 4791 4847 4908 4935 4934 4918 4895 4880 4893 4965 665 17 3235 3760 4478 5719 6537 6765 6939 6924 6830 6701 6555 6411 6257 6059 5820 5553 5311 5038 4736 4519 4452 4621 4835 4963 5048 5105 5160 5239 5333 5377 5368 5331 5265 5214 5234 5355 666 18 3006 3548 4305 5588 6438 6744 7012 7043 6906 6702 6468 6239 6001 5704 5358 5007 4703 4360 3979 3713 3675 4030 4512 4807 4958 5038 5098 5196 5318 5380 5362 5304 5203 5119 5139 5298 667 19 1238 1102 0936 0810 0666 0562 0496 0496 0585 0609 0658 1112 2445 4227 5227 5510 5607 5598 5488 5394 5564 6344 7310 7951 8287 8458 8570 8654 8715 8730 8729 8726 8737 8758 8766 8794 668 20 1501 1420 1308 1260 1148 1034 0955 0945 1033 1048 1086 1542 2828 4476 5367 5602 5680 5661 5548 5457 5620 6380 7334 7974 8312 8487 8602 8685 8748 8762 8761 8757 8768 8793 8800 8827 669 21 1830 1796 1747 1817 1764 1654 1571 1551 1622 1622 1642 2069 3261 4737 5506 5695 5756 5728 5613 5522 5682 6433 7384 8024 8362 8532 8649 8732 8791 8805 8804 8802 8812 8836 8843 8873 670 22 2179 2220 2251 2455 2487 2383 2305 2267 2320 2298 2293 2678 3731 4978 5584 5713 5749 5708 5586 5497 5656 6415 7389 8048 8395 8572 8689 8773 8832 8847 8846 8843 8854 8876 8885 8908 671 23 2637 2748 2894 3282 3452 3373 3302 3241 3260 3206 3165 3476 4336 5291 5711 5769 5778 5725 5598 5512 5667 6414 7403 8083 8441 8621 8737 8820 8880 8894 8895 8892 8905 8929 8936 8966 672 24 3029 3224 3489 4128 4463 4427 4374 4286 4258 4161 4078 4284 4914 5581 5833 5832 5822 5758 5628 5547 5698 6446 7447 8136 8496 8674 8786 8870 8925 8936 8937 8930 8942 8970 8971 8997 673 25 3482 3768 4155 5014 5527 5543 5514 5401 5323 5185 5056 5145 5529 5913 6012 5956 5924 5851 5720 5640 5787 6513 7491 8169 8524 8702 8817 8898 8953 8963 8964 8961 8973 8998 9002 9028 674 26 3873 4235 4763 5877 6601 6678 6685 6550 6408 6225 6047 6004 6119 6207 6153 6049 5997 5915 5780 5703 5845 6557 7527 8200 8556 8737 8850 8936 8992 9003 9005 9004 9014 9041 9048 9069 675 27 4237 4685 5334 6724 7683 7837 7895 7734 7513 7278 7044 6834 6644 6449 6266 6123 6058 5971 5836 5762 5901 6598 7556 8228 8586 8766 8879 8963 9020 9031 9032 9030 9041 9069 9072 9098 676 1 0562 0672 0730 0726 0635 0574 0533 0553 0657 0695 0759 1231 2513 4008 4532 4265 3763 3180 2595 2173 1936 1822 1730 1668 1655 1663 1684 1756 1868 1938 1920 1860 1760 1675 1705 1869 677 2 0704 0843 0972 1039 0989 0938 0915 0946 1055 1097 1159 1629 2848 4200 4619 4312 3796 3209 2624 2201 1962 1846 1754 1690 1679 1688 1710 1780 1892 1962 1944 1884 1784 1699 1728 1894 678 3 0870 1073 1281 1466 1474 1449 1455 1503 1620 1660 1713 2168 3297 4478 4789 4449 3926 3335 2750 2326 2084 1966 1874 1810 1799 1807 1830 1901 2015 2084 2064 2005 1905 1821 1847 2016 679 4 1034 1330 1646 1990 2087 2110 2156 2231 2351 2387 2427 2836 3811 4754 4914 4520 3974 3372 2780 2351 2106 1983 1887 1823 1812 1821 1845 1917 2030 2098 2078 2018 1918 1833 1863 2031 680 5 1248 1626 2082 2635 2876 2978 3105 3217 3337 3364 3381 3707 4456 5089 5067 4605 4031 3413 2810 2378 2130 2005 1907 1844 1832 1840 1863 1935 2044 2112 2092 2033 1932 1848 1875 2038 681 6 1465 1931 2557 3338 3754 3950 4192 4357 4464 4478 4460 4656 5094 5367 5158 4634 4038 3410 2802 2368 2116 1985 1889 1825 1815 1823 1848 1918 2029 2095 2075 2018 1916 1832 1861 2024 682 7 1646 2210 2978 3995 4579 4894 5248 5473 5564 5561 5511 5563 5697 5650 5286 4712 4094 3457 2840 2402 2147 2015 1916 1854 1844 1852 1875 1947 2055 2123 2104 2046 1943 1858 1886 2052 683 8 1819 2428 3330 4567 5345 5783 6275 6564 6623 6601 6509 6381 6186 5852 5368 4758 4125 3476 2854 2410 2153 2018 1917 1854 1844 1852 1875 1947 2056 2123 2105 2045 1941 1855 1884 2050 684 9 1746 2433 3427 4770 5617 6138 6748 7105 7150 7074 6901 6695 6410 5969 5365 4660 3968 3259 2579 2109 1876 1819 1786 1747 1744 1757 1781 1861 1985 2064 2040 1970 1851 1748 1780 1966 685 10 1036 1008 0915 0831 0697 0600 0540 0548 0643 0683 0745 1241 2674 4600 5667 5868 5784 5583 5323 5114 5002 4989 4964 4959 4996 5040 5091 5171 5269 5317 5311 5275 5217 5172 5187 5304 686 11 1313 1323 1306 1304 1216 1118 1058 1059 1158 1193 1252 1748 3121 4886 5820 5962 5853 5640 5371 5160 5042 5020 4988 4982 5018 5062 5111 5190 5285 5333 5323 5289 5233 5184 5199 5315 687 12 1581 1685 1740 1872 1844 1760 1696 1696 1793 1822 1873 2352 3631 5201 5986 6064 5924 5693 5413 5196 5070 5036 5002 4991 5023 5063 5111 5189 5281 5329 5318 5280 5221 5172 5190 5303 688 13 1948 2134 2320 2628 2717 2656 2617 2613 2700 2720 2756 3188 4291 5558 6126 6110 5926 5666 5366 5137 4997 4946 4902 4887 4921 4961 5010 5086 5181 5231 5220 5183 5119 5067 5086 5206 689 14 2342 2638 2972 3518 3747 3733 3721 3719 3791 3795 3809 4164 5036 5957 6302 6199 5974 5690 5376 5140 4990 4924 4870 4856 4890 4928 4978 5054 5151 5200 5188 5151 5086 5033 5051 5171 690 15 2776 3150 3632 4439 4875 4920 4958 4952 4989 4975 4961 5204 5804 6393 6556 6396 6157 5871 5562 5333 5181 5110 5058 5044 5074 5112 5158 5233 5327 5374 5361 5323 5263 5213 5230 5346 691 16 3132 3625 4293 5411 6103 6241 6339 6330 6324 6281 6234 6331 6606 6820 6782 6554 6287 5990 5674 5444 5286 5205 5148 5130 5158 5195 5239 5315 5404 5448 5434 5397 5336 5287 5302 5419 692 17 3492 4086 4907 6301 7228 7470 7650 7654 7597 7528 7444 7353 7249 7095 6883 6601 6312 6003 5679 5447 5279 5189 5129 5114 5147 5186 5234 5308 5401 5444 5433 5397 5334 5284 5301 5417 693 18 3363 4010 4914 6420 7416 7753 8040 8101 8018 7884 7716 7539 7338 7063 6711 6305 5924 5507 5062 4742 4609 4726 4886 4977 5046 5097 5149 5243 5364 5427 5406 5346 5247 5161 5185 5340 694 19 1307 1171 1009 0868 0708 0591 0518 0521 0619 0654 0714 1234 2793 4971 6286 6700 6843 6866 6788 6716 6834 7331 7849 8182 8381 8502 8598 8678 8734 8747 8746 8741 8753 8775 8783 8812 695 20 1633 1535 1415 1365 1238 1111 1025 1017 1117 1145 1199 1724 3232 5247 6422 6774 6896 6906 6826 6760 6873 7354 7867 8200 8403 8528 8626 8708 8765 8778 8779 8775 8786 8812 8817 8844 696 21 1989 1957 1919 1993 1933 1802 1712 1686 1781 1799 1841 2354 3790 5652 6707 7009 7107 7106 7022 6956 7055 7495 7964 8273 8467 8590 8689 8767 8825 8836 8836 8833 8842 8867 8873 8899 697 22 2384 2437 2499 2728 2766 2650 2551 2510 2588 2589 2611 3087 4380 5983 6849 7075 7143 7125 7034 6970 7065 7508 7996 8321 8523 8646 8744 8822 8876 8886 8885 8882 8891 8917 8922 8944 698 23 2903 3046 3232 3690 3885 3791 3696 3634 3683 3659 3652 4062 5159 6438 7084 7223 7257 7224 7126 7063 7149 7575 8055 8378 8580 8701 8796 8873 8926 8937 8933 8929 8940 8970 8970 8999 699 24 3401 3641 3971 4691 5063 5011 4936 4848 4852 4798 4760 5066 5906 6846 7282 7347 7353 7304 7202 7142 7220 7628 8104 8423 8626 8748 8845 8921 8976 8987 8984 8982 8993 9017 9023 9051 700 25 3831 4182 4674 5709 6329 6342 6294 6172 6121 6024 5944 6116 6652 7222 7445 7433 7409 7350 7243 7183 7258 7663 8149 8484 8687 8808 8901 8976 9028 9036 9036 9031 9042 9065 9071 9092 701 26 4280 4744 5395 6703 7553 7632 7617 7472 7362 7233 7111 7141 7366 7575 7602 7523 7472 7400 7287 7226 7298 7694 8179 8516 8722 8842 8938 9015 9067 9074 9074 9070 9083 9107 9110 9133 702 27 4719 5266 6062 7700 8834 9000 9039 8864 8676 8500 8329 8171 8031 7888 7752 7621 7553 7472 7359 7301 7366 7747 8223 8555 8759 8880 8975 9051 9101 9109 9107 9103 9116 9142 9147 9163 703 21 0562 0684 0748 0745 0646 0571 0529 0552 0662 0706 0776 1303 2777 4542 5150 4793 4159 3439 2730 2223 1942 1807 1698 1621 1606 1614 1637 1717 1845 1928 1904 1835 1715 1615 1643 1835 704 22 0687 0872 1002 1072 0998 0938 0904 0939 1064 1110 1178 1717 3151 4777 5279 4887 4244 3523 2814 2306 2022 1883 1772 1697 1681 1689 1713 1795 1925 2007 1983 1912 1793 1690 1724 1916 705 23 0850 1072 1290 1467 1457 1421 1418 1471 1606 1654 1714 2243 3592 5041 5418 4978 4318 3586 2871 2358 2070 1926 1815 1739 1724 1733 1758 1842 1974 2056 2031 1959 1840 1739 1769 1966 706 24 0977 1288 1604 1918 1987 1985 2027 2103 2242 2288 2337 2836 4064 5302 5540 5051 4372 3633 2913 2398 2107 1961 1848 1771 1756 1766 1791 1873 2004 2086 2062 1991 1867 1768 1800 1991 707 25 1160 1531 1984 2479 2661 2728 2837 2952 3099 3138 3169 3610 4650 5597 5647 5088 4380 3625 2899 2381 2089 1942 1830 1755 1739 1747 1771 1852 1980 2060 2037 1966 1845 1744 1777 1965 708 26 1367 1841 2473 3210 3569 3739 3951 4125 4267 4295 4297 4630 5389 5977 5829 5201 4466 3697 2960 2439 2141 1990 1873 1797 1782 1790 1815 1896 2024 2102 2076 2006 1885 1787 1816 2004 709 27 1573 2153 2942 3947 4503 4800 5152 5395 5528 5541 5507 5690 6108 6310 5962 5269 4512 3730 2984 2458 2154 1998 1880 1805 1790 1799 1823 1907 2036 2113 2090 2021 1898 1796 1830 2021 710 28 1717 2391 3328 4565 5302 5721 6210 6530 6650 6648 6578 6609 6704 6564 6051 5302 4518 3723 2967 2433 2127 1967 1849 1773 1759 1768 1794 1874 2004 2084 2060 1989 1865 1762 1797 1987 711 29 1852 2592 3657 5124 6069 6627 7280 7680 7773 7751 7635 7469 7209 6768 6132 5350 4556 3754 2995 2460 2152 1992 1873 1799 1785 1793 1818 1900 2028 2106 2082 2010 1890 1788 1819 2011 712 210 1001 0980 0912 0821 0680 0575 0513 0522 0629 0671 0738 1285 2916 5148 6357 6497 6283 5930 5508 5179 4998 4949 4891 4859 4883 4922 4971 5065 5191 5258 5237 5177 5078 4995 5014 5177 713 211 1255 1299 1280 1274 1173 1067 0999 1010 1123 1164 1229 1789 3382 5466 6539 6625 6393 6034 5616 5290 5109 5055 4994 4961 4985 5022 5071 5163 5284 5348 5326 5268 5173 5090 5108 5265 714 212 1506 1621 1695 1818 1777 1685 1628 1634 1751 1789 1846 2392 3889 5755 6653 6656 6382 5994 5558 5222 5029 4960 4894 4859 4882 4917 4966 5058 5182 5248 5229 5167 5068 4986 5002 5163 715 213 1785 1990 2181 2464 2515 2450 2416 2427 2544 2573 2618 3134 4491 6086 6776 6684 6359 5938 5476 5126 4919 4834 4759 4721 4742 4776 4822 4915 5038 5105 5084 5023 4923 4835 4854 5018 716 214 2155 2446 2782 3269 3451 3425 3420 3440 3546 3567 3597 4064 5241 6519 6992 6820 6465 6033 5566 5215 5003 4908 4829 4790 4811 4846 4893 4986 5110 5176 5153 5096 4991 4903 4926 5089 717 215 2548 2949 3442 4188 4554 4596 4639 4663 4748 4749 4753 5121 6035 6966 7235 6998 6627 6192 5731 5386 5169 5066 4986 4950 4972 5007 5056 5148 5270 5331 5312 5252 5153 5068 5092 5254 718 216 2909 3414 4070 5119 5724 5853 5966 6001 6049 6030 6001 6243 6851 7412 7473 7168 6773 6330 5868 5527 5305 5195 5112 5074 5096 5127 5174 5263 5382 5442 5420 5363 5263 5179 5201 5354 719 217 3304 3919 4755 6099 6931 7167 7371 7430 7444 7405 7342 7423 7667 7800 7633 7245 6818 6353 5880 5529 5298 5176 5088 5050 5077 5115 5166 5258 5378 5439 5419 5360 5260 5173 5195 5353 720 218 3601 4294 5301 6986 8118 8485 8793 8870 8827 8755 8646 8526 8370 8132 7798 7364 6921 6451 5977 5630 5396 5267 5178 5139 5161 5196 5242 5333 5452 5512 5490 5428 5330 5247 5265 5424 721 219 1344 1222 1041 0900 0726 0607 0527 0530 0638 0678 0748 1314 3045 5576 7214 7774 7974 8038 8013 7985 8019 8152 8228 8317 8430 8525 8615 8692 8749 8763 8763 8757 8769 8792 8798 8827 722 220 1689 1608 1489 1433 1299 1165 1069 1061 1172 1210 1276 1857 3552 5924 7408 7901 8070 8118 8087 8064 8090 8201 8270 8358 8471 8566 8655 8733 8788 8799 8799 8795 8806 8832 8841 8867 723 221 2084 2063 2038 2114 2052 1916 1811 1788 1894 1924 1983 2554 4164 6333 7651 8069 8210 8244 8208 8185 8202 8300 8361 8443 8551 8642 8727 8801 8856 8867 8866 8860 8872 8898 8901 8928 724 222 2506 2571 2653 2895 2933 2802 2697 2653 2746 2767 2813 3353 4831 6738 7856 8189 8293 8310 8270 8246 8252 8329 8384 8467 8578 8671 8761 8835 8889 8900 8899 8896 8908 8933 8940 8964 725 223 3040 3229 3446 3957 4175 4069 3959 3894 3963 3966 3991 4476 5750 7302 8157 8388 8452 8451 8404 8384 8378 8432 8476 8553 8659 8747 8830 8901 8950 8958 8957 8951 8963 8987 8990 9012 726 224 3601 3887 4271 5067 5486 5422 5332 5236 5264 5243 5243 5627 6628 7793 8404 8539 8563 8542 8488 8467 8449 8482 8517 8598 8705 8796 8881 8952 9004 9011 9009 9003 9019 9044 9048 9070 727 225 4112 4499 5059 6184 6864 6862 6793 6672 6651 6603 6572 6829 7520 8284 8649 8696 8684 8646 8587 8568 8539 8555 8584 8662 8770 8859 8942 9015 9063 9070 9068 9063 9075 9103 9105 9124 728 226 4567 5116 5865 7364 8328 8405 8373 8213 8133 8054 7990 8095 8429 8768 8900 8866 8827 8777 8715 8698 8663 8663 8682 8753 8851 8931 9009 9077 9123 9127 9128 9122 9133 9161 9162 9183 729 227 5034 5686 6605 8444 9711 9887 9900 9721 9570 9456 9355 9264 9186 9109 9039 8935 8870 8805 8738 8719 8675 8660 8677 8752 8857 8944 9028 9098 9148 9154 9153 9147 9163 9189 9195 9215 730 21 5025 5667 6616 8436 9680 9865 9878 9697 9553 9441 9341 9251 9177 9101 9033 8933 8868 8803 8735 8720 8674 8659 8677 8749 8852 8940 9022 9094 9141 9146 9145 9140 9156 9184 9190 9211 731 22 4580 5272 6239 8021 9233 9467 9567 9459 9347 9250 9150 9052 8954 8834 8686 8482 8290 8083 7860 7706 7576 7507 7473 7496 7569 7639 7718 7803 7887 7912 7900 7878 7850 7835 7849 7937 732 23 4141 4840 5833 7539 8672 8964 9166 9153 9080 8998 8898 8790 8666 8487 8248 7928 7608 7266 6908 6648 6459 6353 6288 6279 6330 6391 6458 6551 6657 6701 6682 6643 6576 6528 6548 6685 733 24 3629 4331 5344 7010 8105 8460 8762 8840 8801 8731 8626 8508 8353 8117 7788 7354 6912 6443 5967 5615 5376 5246 5152 5112 5135 5173 5225 5320 5440 5497 5476 5420 5327 5250 5277 5439 734 25 2986 3731 4770 6367 7401 7833 8264 8455 8461 8407 8299 8163 7971 7661 7221 6658 6079 5473 4870 4430 4148 3995 3882 3820 3826 3848 3887 3983 4113 4183 4158 4091 3974 3876 3904 4091 735 26 2421 3184 4243 5788 6773 7267 7806 8097 8144 8106 7994 7845 7622 7250 6716 6043 5353 4644 3957 3460 3158 2999 2879 2805 2798 2812 2843 2932 3065 3141 3114 3044 2920 2817 2851 3042 736 27 1859 2605 3672 5153 6091 6657 7307 7706 7796 7773 7656 7489 7229 6788 6154 5373 4577 3774 3009 2470 2160 1998 1879 1802 1788 1796 1824 1906 2035 2113 2090 2020 1896 1796 1831 2023 737 28 1377 2088 3157 4569 5451 6067 6820 7314 7445 7436 7312 7130 6835 6334 5617 4748 3875 3010 2212 1666 1370 1220 1112 1044 1029 1035 1054 1127 1244 1318 1297 1234 1122 1034 1067 1241 738 29 0820 1512 2578 3909 4723 5390 6244 6844 7019 7026 6899 6701 6370 5804 4998 4042 3094 2180 1368 0837 0569 0443 0358 0307 0296 0303 0317 0372 0467 0533 0516 0466 0378 0316 0351 0492 739 210 5030 5682 6611 8443 9717 9897 9913 9732 9580 9469 9367 9276 9196 9120 9052 8951 8885 8823 8754 8737 8693 8678 8694 8768 8872 8958 9041 9109 9156 9163 9160 9159 9170 9198 9201 9224 740 211 4317 4912 5752 7331 8387 8598 8712 8611 8456 8296 8127 7965 7808 7625 7424 7206 7033 6833 6596 6434 6416 6698 7056 7299 7460 7562 7647 7737 7824 7859 7852 7823 7788 7764 7775 7863 741 212 3475 3993 4732 6026 6893 7137 7329 7288 7125 6911 6681 6462 6242 5983 5697 5419 5198 4938 4635 4426 4438 4899 5525 5930 6143 6253 6332 6430 6539 6593 6578 6532 6461 6403 6420 6546 742 213 2766 3229 3878 4973 5683 5948 6191 6207 6038 5792 5519 5261 5001 4696 4360 4051 3804 3519 3191 2970 2993 3495 4198 4645 4866 4973 5045 5147 5274 5338 5319 5262 5164 5078 5097 5257 743 214 1984 2387 2927 3769 4309 4578 4861 4911 4734 4451 4140 3849 3562 3233 2881 2584 2357 2092 1800 1614 1658 2156 2872 3317 3526 3623 3686 3787 3924 4003 3983 3917 3798 3694 3718 3898 744 215 1411 1765 2255 2943 3374 3647 3940 4012 3830 3533 3206 2904 2611 2284 1948 1679 1480 1252 1010 0872 0919 1330 1937 2307 2473 2549 2598 2694 2831 2915 2893 2824 2699 2592 2618 2804 745 216 0996 1319 1756 2335 2699 2960 3256 3338 3153 2847 2518 2217 1931 1620 1310 1079 0917 0733 0549 0459 0503 0811 1271 1534 1646 1697 1732 1818 1950 2033 2012 1945 1823 1718 1751 1939 746 217 0642 0945 1334 1805 2112 2355 2634 2711 2521 2210 1883 1590 1321 1040 0777 0599 0488 0364 0249 0213 0260 0468 0766 0919 0979 1006 1028 1097 1213 1290 1274 1212 1101 1011 1036 1214 747 218 0439 0722 1093 1522 1794 2033 2305 2380 2194 1889 1566 1282 1025 0766 0533 0388 0306 0219 0147 0138 0182 0295 0396 0400 0391 0388 0393 0441 0531 0595 0582 0529 0442 0375 0399 0545 748 219 5030 5669 6586 8424 9689 9867 9884 9705 9557 9447 9344 9251 9172 9095 9026 8927 8860 8796 8726 8707 8662 8647 8664 8739 8845 8934 9015 9088 9136 9144 9141 9138 9154 9178 9183 9206 749 220 4721 5264 6079 7705 8826 8999 9035 8860 8678 8504 8333 8178 8039 7895 7759 7627 7557 7474 7361 7303 7364 7738 8207 8541 8746 8871 8968 9045 9097 9105 9103 9098 9114 9135 9146 9169 750 221 4237 4696 5375 6767 7698 7861 7915 7753 7536 7301 7070 6858 6669 6473 6290 6147 6078 5992 5856 5780 5918 6607 7562 8233 8593 8777 8893 8979 9035 9047 9048 9044 9056 9083 9084 9112 751 222 3855 4208 4752 5909 6693 6840 6908 6759 6522 6244 5969 5723 5498 5270 5055 4906 4844 4754 4609 4528 4712 5623 6958 7923 8426 8665 8806 8900 8962 8977 8981 8978 8993 9018 9026 9054 752 223 3318 3549 3942 4823 5422 5561 5647 5516 5253 4930 4608 4324 4069 3810 3572 3422 3367 3278 3133 3054 3280 4409 6182 7514 8201 8517 8684 8790 8858 8878 8885 8885 8898 8925 8930 8954 753 224 2852 3012 3282 3968 4433 4564 4655 4541 4267 3921 3580 3281 3016 2753 2517 2378 2332 2254 2126 2062 2292 3499 5549 7158 7999 8379 8572 8689 8765 8789 8796 8797 8810 8836 8845 8875 754 225 2453 2513 2695 3198 3567 3690 3793 3688 3407 3045 2690 2385 2122 1863 1641 1521 1486 1422 1320 1283 1504 2728 4995 6857 7846 8290 8507 8634 8715 8741 8754 8757 8771 8796 8807 8844 755 226 2035 2023 2110 2468 2742 2861 2974 2879 2598 2229 1873 1573 1317 1074 0873 0773 0747 0698 0622 0607 0804 2002 4432 6525 7652 8157 8395 8531 8619 8648 8662 8666 8679 8704 8714 8747 756 227 1737 1658 1678 1936 2145 2255 2367 2284 2005 1643 1298 1014 0778 0561 0392 0316 0300 0268 0227 0240 0400 1504 3994 6239 7478 8037 8302 8451 8545 8580 8594 8599 8613 8637 8650 8688 757 21 4263 4712 5336 6606 7398 7473 7455 7316 7223 7100 6987 7036 7285 7527 7575 7505 7459 7389 7280 7220 7289 7673 8148 8486 8695 8821 8917 8996 9048 9055 9053 9049 9064 9093 9100 9123 758 22 4403 4951 5725 7208 8201 8339 8349 8202 8082 7991 7907 7833 7771 7708 7652 7567 7511 7458 7398 7382 7343 7330 7338 7395 7477 7548 7614 7675 7716 7726 7728 7733 7750 7779 7784 7810 759 23 3947 4531 5340 6797 7763 7954 8039 7958 7866 7784 7704 7622 7540 7436 7310 7130 6959 6774 6571 6433 6318 6256 6221 6234 6289 6343 6402 6478 6550 6579 6572 6554 6529 6513 6531 6616 760 24 3478 4083 4921 6313 7215 7458 7633 7636 7576 7511 7429 7340 7236 7085 6880 6600 6317 6008 5686 5449 5280 5186 5125 5107 5138 5175 5227 5306 5397 5442 5429 5396 5336 5289 5311 5433 761 25 2891 3510 4378 5718 6578 6892 7177 7281 7264 7212 7128 7024 6887 6673 6364 5960 5541 5095 4642 4309 4091 3972 3886 3842 3854 3879 3918 4000 4107 4162 4148 4097 4010 3939 3964 4113 762 26 2368 3014 3897 5175 5985 6355 6735 6924 6945 6909 6822 6712 6550 6282 5892 5389 4864 4311 3763 3361 3110 2977 2876 2818 2815 2832 2862 2943 3057 3125 3105 3046 2945 2860 2886 3058 763 27 1794 2443 3346 4578 5339 5770 6260 6550 6614 6592 6499 6374 6177 5845 5358 4747 4115 3463 2836 2387 2125 1989 1887 1823 1814 1823 1848 1922 2035 2102 2081 2024 1921 1837 1871 2035 764 28 1326 1944 2868 4051 4779 5266 5841 6217 6312 6301 6206 6066 5842 5456 4896 4201 3487 2767 2091 1623 1366 1235 1140 1081 1068 1074 1093 1158 1262 1328 1312 1253 1157 1078 1109 1265 765 29 0821 1443 2376 3512 4197 4736 5405 5868 5999 6001 5903 5751 5498 5057 4418 3638 2847 2065 1356 0882 0638 0520 0439 0390 0380 0385 0399 0453 0543 0604 0590 0541 0460 0398 0431 0571 766 210 4539 5089 5804 7227 8136 8207 8168 8021 7956 7883 7825 7949 8315 8691 8841 8812 8771 8720 8652 8633 8597 8599 8622 8699 8807 8898 8985 9057 9106 9113 9113 9109 9125 9152 9155 9180 767 211 4405 4966 5727 7203 8184 8313 8326 8175 8058 7966 7882 7807 7745 7681 7625 7539 7483 7425 7367 7350 7312 7302 7314 7371 7458 7529 7599 7659 7702 7710 7716 7715 7730 7759 7764 7787 768 212 3710 4193 4906 6186 7031 7208 7299 7213 7084 6943 6798 6662 6526 6371 6198 6017 5870 5701 5497 5357 5347 5598 5907 6107 6232 6308 6374 6448 6525 6559 6554 6532 6502 6483 6494 6577 769 213 2912 3341 3934 4955 5610 5808 5963 5935 5796 5607 5403 5211 5019 4796 4550 4320 4136 3918 3662 3488 3508 3913 4461 4803 4977 5067 5133 5217 5315 5362 5354 5319 5255 5206 5222 5344 770 214 2162 2544 3077 3891 4408 4627 4843 4866 4727 4511 4272 4045 3818 3552 3264 3004 2799 2557 2285 2105 2130 2538 3096 3431 3592 3671 3727 3813 3929 3991 3977 3929 3839 3762 3786 3937 771 215 1515 1866 2312 2958 3370 3594 3826 3876 3722 3477 3209 2959 2715 2439 2151 1912 1732 1521 1290 1154 1194 1573 2115 2435 2579 2645 2694 2777 2897 2970 2953 2897 2796 2708 2732 2899 772 216 1026 1311 1705 2233 2565 2790 3035 3098 2942 2683 2401 2143 1896 1624 1350 1142 0992 0821 0646 0556 0601 0900 1329 1572 1675 1722 1756 1831 1946 2018 2001 1944 1840 1753 1779 1944 773 217 0648 0905 1245 1664 1928 2141 2380 2440 2280 2012 1731 1476 1240 0994 0760 0599 0495 0381 0273 0238 0284 0488 0776 0924 0982 1008 1029 1091 1194 1263 1249 1193 1096 1019 1045 1201 774 218 0403 0663 0992 1361 1600 1805 2040 2103 1942 1680 1402 1156 0934 0707 0501 0371 0296 0214 0148 0141 0183 0296 0414 0437 0436 0437 0444 0488 0574 0632 0620 0574 0491 0431 0455 0586 775 219 4176 4733 5491 6888 7765 7873 7904 7813 7771 7707 7648 7764 8108 8431 8496 8360 8193 7998 7780 7631 7512 7461 7434 7462 7534 7602 7674 7757 7839 7872 7863 7832 7796 7775 7785 7872 776 220 4426 4983 5754 7235 8217 8346 8355 8204 8084 7994 7909 7832 7771 7705 7649 7562 7508 7451 7392 7375 7339 7327 7339 7398 7482 7553 7623 7683 7726 7736 7738 7739 7757 7781 7791 7817 777 221 4097 4566 5245 6572 7464 7595 7622 7477 7320 7170 7023 6891 6771 6648 6533 6421 6364 6295 6197 6149 6207 6542 6961 7249 7420 7519 7594 7656 7701 7710 7712 7716 7733 7756 7766 7785 778 222 3659 4019 4546 5608 6316 6438 6480 6352 6170 5963 5760 5574 5405 5233 5069 4946 4890 4813 4695 4634 4762 5401 6287 6902 7223 7383 7484 7557 7607 7621 7627 7632 7647 7675 7685 7709 779 223 3230 3495 3913 4788 5380 5502 5556 5437 5230 4983 4735 4515 4317 4115 3927 3800 3751 3674 3552 3484 3656 4493 5733 6623 7071 7279 7397 7477 7531 7545 7552 7559 7574 7599 7609 7635 780 224 2735 2905 3199 3844 4275 4389 4460 4356 4131 3848 3568 3320 3100 2877 2676 2552 2511 2439 2324 2266 2464 3453 5045 6235 6837 7107 7250 7339 7400 7422 7431 7438 7454 7481 7494 7524 781 225 2248 2340 2518 2986 3307 3413 3500 3408 3171 2865 2565 2303 2076 1851 1655 1546 1511 1453 1357 1318 1516 2566 4422 5885 6635 6970 7135 7236 7303 7328 7340 7348 7365 7392 7405 7437 782 226 1843 1872 1957 2284 2526 2636 2722 2643 2397 2082 1776 1515 1293 1082 0904 0815 0790 0745 0678 0665 0844 1879 3908 5590 6465 6852 7036 7142 7216 7246 7261 7268 7286 7312 7325 7359 783 227 1531 1497 1518 1738 1926 2025 2121 2051 1808 1492 1190 0940 0730 0538 0386 0318 0304 0274 0237 0250 0400 1371 3495 5338 6316 6747 6951 7070 7146 7177 7194 7203 7224 7247 7261 7299 784 21 3419 3669 4036 4806 5243 5250 5218 5119 5055 4930 4814 4925 5343 5766 5890 5843 5813 5741 5609 5527 5671 6389 7373 8076 8461 8658 8782 8872 8932 8946 8948 8944 8959 8988 8992 9026 785 22 3645 3995 4487 5462 6061 6107 6085 5979 5906 5803 5711 5764 6003 6230 6280 6224 6185 6124 6029 5977 6042 6393 6826 7127 7305 7411 7490 7554 7600 7610 7613 7616 7634 7664 7674 7697 786 23 3570 3997 4574 5644 6320 6407 6409 6302 6217 6150 6087 6033 5983 5935 5894 5829 5784 5738 5689 5676 5645 5633 5639 5681 5744 5798 5850 5899 5935 5944 5952 5959 5979 6004 6013 6040 787 24 3176 3627 4247 5325 5991 6127 6193 6140 6077 6015 5954 5894 5831 5751 5648 5505 5363 5207 5037 4920 4826 4777 4745 4747 4781 4817 4860 4916 4977 5005 5005 4989 4968 4958 4974 5045 788 25 2691 3177 3821 4845 5481 5666 5817 5835 5804 5758 5695 5627 5543 5418 5243 5006 4760 4491 4211 4005 3863 3784 3731 3709 3728 3752 3787 3848 3927 3967 3959 3928 3879 3838 3857 3962 789 26 2155 2672 3349 4338 4940 5180 5417 5516 5513 5478 5416 5338 5231 5058 4807 4474 4120 3743 3359 3075 2893 2795 2722 2680 2685 2699 2726 2790 2878 2931 2918 2877 2804 2745 2769 2902 790 27 1658 2188 2894 3852 4429 4733 5054 5228 5259 5237 5171 5085 4952 4728 4402 3976 3527 3055 2591 2254 2053 1947 1867 1819 1812 1822 1845 1905 1993 2048 2035 1990 1910 1848 1875 2008 791 28 1203 1701 2415 3332 3872 4222 4625 4877 4940 4930 4862 4765 4610 4339 3940 3434 2904 2358 1837 1473 1268 1164 1088 1040 1032 1037 1053 1105 1190 1244 1231 1186 1109 1047 1075 1205 792 29 0781 1278 2015 2893 3417 3811 4290 4615 4708 4708 4637 4529 4350 4032 3567 2986 2384 1778 1220 0843 0646 0551 0484 0442 0434 0438 0450 0494 0569 0619 0607 0568 0500 0450 0480 0595 793 210 4042 4427 4961 6028 6634 6621 6553 6438 6427 6385 6364 6636 7364 8180 8581 8639 8631 8594 8529 8508 8484 8505 8541 8622 8734 8826 8915 8989 9041 9051 9050 9046 9058 9087 9093 9123 794 211 3939 4366 4949 6066 6747 6783 6744 6622 6579 6520 6478 6602 6948 7302 7449 7429 7397 7354 7298 7282 7252 7256 7274 7336 7421 7492 7561 7625 7669 7678 7682 7682 7699 7727 7735 7758 795 212 3595 4003 4578 5652 6333 6415 6419 6307 6222 6154 6093 6038 5990 5944 5901 5836 5792 5749 5704 5690 5661 5649 5657 5699 5758 5811 5859 5904 5940 5951 5955 5964 5980 6005 6016 6033 796 213 2895 3289 3820 4752 5348 5473 5543 5483 5384 5268 5148 5036 4926 4799 4661 4516 4400 4264 4101 3990 3987 4197 4462 4625 4720 4776 4823 4882 4944 4974 4974 4958 4933 4917 4933 5004 797 214 2196 2521 2961 3665 4104 4247 4372 4361 4255 4105 3943 3789 3637 3459 3264 3085 2942 2772 2575 2442 2463 2772 3180 3425 3548 3610 3658 3725 3806 3851 3847 3817 3766 3723 3743 3849 798 215 1540 1827 2210 2768 3107 3274 3434 3456 3339 3157 2960 2774 2590 2383 2161 1974 1831 1660 1470 1352 1387 1708 2136 2381 2491 2544 2582 2650 2740 2796 2786 2745 2673 2614 2638 2768 799 216 1035 1289 1613 2048 2315 2480 2659 2698 2575 2376 2160 1959 1766 1553 1337 1168 1047 0906 0755 0676 0720 0992 1362 1565 1650 1688 1718 1780 1872 1932 1922 1878 1797 1729 1757 1890 800 217 0635 0844 1132 1470 1679 1844 2028 2072 1949 1741 1519 1319 1131 0932 0741 0605 0514 0413 0316 0281 0325 0513 0774 0910 0961 0984 1004 1056 1140 1198 1186 1142 1065 1003 1026 1159 801 218 0376 0597 0845 1139 1318 1475 1658 1708 1581 1372 1151 0956 0778 0597 0433 0328 0266 0199 0145 0142 0185 0295 0424 0464 0471 0474 0479 0517 0587 0637 0626 0586 0519 0466 0488 0602 802 219 3315 3777 4389 5441 6045 6116 6159 6135 6160 6132 6106 6361 7019 7690 7887 7714 7452 7140 6797 6548 6382 6309 6256 6246 6288 6334 6389 6474 6574 6623 6606 6559 6486 6431 6442 6570 803 220 3560 4024 4652 5758 6428 6512 6536 6470 6442 6397 6354 6471 6794 7095 7160 7041 6890 6712 6512 6373 6266 6219 6193 6207 6262 6312 6370 6441 6516 6549 6544 6522 6490 6470 6482 6566 804 221 3595 4028 4627 5746 6469 6555 6563 6441 6350 6276 6213 6157 6107 6060 6018 5954 5912 5870 5825 5812 5785 5777 5783 5820 5877 5923 5969 6014 6047 6056 6061 6068 6081 6107 6113 6132 805 222 3293 3648 4130 5062 5667 5746 5767 5660 5545 5425 5305 5198 5100 4998 4901 4814 4768 4712 4631 4593 4647 4946 5320 5571 5714 5795 5856 5906 5943 5956 5962 5968 5985 6010 6017 6041 806 223 2853 3115 3496 4248 4730 4817 4845 4748 4603 4436 4266 4115 3976 3834 3702 3605 3563 3502 3411 3362 3475 4015 4775 5300 5565 5693 5770 5830 5870 5884 5894 5901 5919 5943 5956 5980 807 224 2414 2584 2856 3435 3810 3893 3940 3854 3688 3480 3273 3089 2923 2755 2601 2502 2466 2407 2313 2268 2418 3140 4235 5017 5400 5572 5668 5731 5776 5793 5804 5811 5830 5854 5865 5888 808 225 1983 2088 2242 2641 2911 2991 3053 2979 2797 2565 2335 2135 1957 1781 1625 1535 1506 1456 1377 1347 1509 2315 3673 4696 5206 5430 5547 5619 5670 5692 5705 5715 5732 5759 5769 5801 809 226 1602 1626 1710 1977 2175 2258 2325 2259 2072 1827 1589 1385 1209 1040 0899 0825 0806 0768 0712 0704 0852 1658 3189 4409 5029 5299 5432 5512 5565 5589 5605 5618 5635 5663 5679 5709 810 227 1325 1281 1311 1488 1636 1717 1792 1733 1541 1291 1049 0846 0676 0520 0394 0337 0324 0298 0267 0279 0411 1196 2844 4215 4920 5226 5372 5459 5516 5544 5561 5574 5594 5619 5635 5662 811 21 2669 2820 3005 3458 3673 3646 3607 3538 3499 3385 3287 3438 3941 4455 4613 4583 4564 4493 4353 4260 4448 5381 6743 7744 8273 8528 8673 8772 8836 8852 8855 8852 8866 8890 8896 8927 812 22 2797 2982 3239 3781 4070 4068 4040 3962 3918 3812 3717 3824 4200 4578 4685 4648 4625 4564 4450 4379 4516 5180 6095 6737 7077 7243 7349 7425 7479 7494 7499 7504 7523 7549 7562 7590 813 23 2877 3131 3471 4137 4520 4535 4520 4443 4391 4312 4241 4291 4494 4684 4725 4681 4653 4603 4524 4481 4541 4857 5247 5510 5659 5743 5807 5861 5899 5911 5918 5927 5946 5972 5984 6010 814 24 2903 3219 3661 4451 4939 4996 4995 4911 4849 4798 4752 4711 4675 4642 4611 4562 4529 4494 4459 4448 4427 4420 4422 4451 4491 4526 4564 4601 4629 4640 4647 4658 4675 4700 4709 4729 815 25 2474 2829 3299 4045 4502 4598 4657 4630 4594 4551 4508 4464 4416 4350 4266 4143 4020 3884 3734 3630 3550 3506 3478 3475 3498 3524 3556 3603 3655 3682 3684 3675 3657 3644 3661 3728 816 26 1997 2400 2901 3642 4083 4229 4359 4393 4382 4350 4304 4253 4186 4082 3935 3731 3516 3279 3034 2852 2731 2665 2618 2594 2602 2618 2643 2692 2756 2794 2789 2766 2722 2688 2712 2801 817 27 1562 1957 2494 3222 3643 3845 4047 4147 4162 4139 4093 4034 3948 3803 3589 3304 2997 2666 2332 2087 1936 1855 1795 1758 1756 1765 1785 1834 1906 1950 1941 1909 1851 1806 1829 1936 818 28 1093 1513 2073 2765 3165 3413 3689 3854 3893 3885 3838 3769 3665 3479 3201 2837 2450 2042 1645 1362 1200 1116 1055 1015 1010 1015 1029 1076 1145 1191 1179 1145 1084 1035 1063 1174 819 29 0703 1108 1685 2358 2742 3028 3371 3597 3662 3663 3613 3538 3411 3187 2849 2420 1966 1502 1067 0772 0615 0538 0485 0452 0446 0449 0459 0495 0557 0598 0589 0557 0502 0463 0489 0585 820 210 3498 3778 4133 4856 5212 5138 5046 4959 4999 4983 4992 5392 6437 7672 8327 8479 8511 8490 8433 8408 8396 8446 8489 8573 8687 8781 8870 8944 8996 9006 9006 9001 9018 9045 9051 9077 821 211 3428 3734 4142 4930 5359 5329 5262 5175 5180 5152 5143 5409 6095 6858 7236 7300 7299 7269 7216 7198 7180 7205 7231 7295 7384 7458 7528 7592 7636 7647 7653 7655 7669 7697 7706 7730 822 212 3172 3482 3896 4683 5140 5145 5108 5024 4996 4956 4929 5042 5345 5655 5786 5779 5755 5721 5677 5663 5642 5645 5658 5700 5760 5814 5863 5911 5946 5956 5962 5970 5984 6009 6019 6039 823 213 2919 3249 3686 4476 4967 5019 5015 4935 4872 4818 4772 4731 4697 4662 4630 4582 4548 4514 4479 4468 4444 4437 4442 4472 4512 4548 4586 4622 4650 4661 4671 4678 4697 4720 4733 4748 824 214 2243 2533 2908 3552 3937 4028 4082 4049 3973 3883 3788 3698 3609 3505 3392 3277 3185 3075 2941 2853 2856 3034 3255 3384 3455 3498 3534 3582 3636 3663 3666 3658 3637 3624 3643 3707 825 215 1589 1857 2186 2684 2984 3095 3195 3194 3111 2988 2854 2730 2604 2460 2306 2166 2055 1924 1770 1674 1696 1934 2240 2414 2494 2534 2567 2619 2685 2725 2723 2699 2657 2619 2642 2731 826 216 1071 1267 1557 1938 2174 2293 2420 2438 2344 2196 2034 1884 1740 1577 1409 1272 1172 1052 0921 0848 0883 1115 1420 1583 1650 1682 1709 1759 1834 1881 1874 1843 1784 1732 1758 1863 827 217 0643 0819 1046 1341 1515 1644 1784 1816 1718 1556 1381 1223 1074 0914 0757 0642 0563 0472 0384 0349 0390 0565 0799 0916 0959 0979 0996 1040 1110 1157 1149 1115 1053 1002 1024 1136 828 218 0351 0520 0733 0968 1112 1241 1385 1421 1323 1157 0982 0824 0681 0534 0398 0309 0255 0197 0149 0147 0187 0294 0416 0458 0466 0468 0473 0504 0562 0603 0594 0564 0511 0465 0488 0582 829 219 2526 2913 3382 4100 4450 4479 4520 4544 4628 4629 4636 5009 5940 6903 7196 6967 6601 6169 5707 5362 5151 5057 4979 4943 4964 4998 5045 5137 5256 5319 5297 5238 5137 5053 5078 5235 830 220 2741 3130 3625 4400 4809 4853 4886 4879 4921 4907 4898 5148 5768 6386 6561 6404 6159 5867 5547 5311 5157 5088 5036 5023 5056 5097 5147 5225 5322 5369 5360 5320 5256 5204 5221 5346 831 221 2802 3179 3643 4433 4884 4932 4946 4905 4895 4862 4835 4943 5227 5490 5549 5454 5328 5178 5010 4890 4803 4764 4738 4743 4780 4818 4860 4918 4982 5010 5009 4994 4968 4952 4965 5039 832 222 2934 3272 3708 4513 5004 5059 5053 4973 4908 4857 4808 4766 4731 4695 4664 4613 4578 4544 4508 4498 4475 4467 4472 4501 4545 4581 4621 4659 4686 4697 4706 4716 4733 4756 4767 4785 833 223 2598 2850 3203 3857 4261 4322 4335 4259 4166 4067 3968 3878 3797 3710 3630 3562 3526 3481 3417 3386 3441 3712 4060 4286 4409 4475 4524 4565 4596 4608 4620 4630 4646 4671 4683 4703 834 224 2222 2415 2674 3194 3518 3578 3607 3536 3422 3282 3144 3020 2907 2791 2685 2609 2578 2532 2461 2427 2527 2988 3644 4091 4310 4412 4473 4519 4553 4569 4579 4590 4608 4629 4646 4665 835 225 1791 1904 2054 2423 2657 2719 2761 2700 2565 2393 2222 2071 1937 1802 1680 1606 1580 1537 1473 1448 1576 2177 3124 3799 4126 4270 4346 4400 4438 4457 4470 4483 4502 4526 4540 4565 836 226 1407 1454 1534 1776 1940 2002 2054 2001 1856 1665 1481 1319 1180 1044 0929 0865 0848 0816 0766 0760 0886 1526 2667 3530 3954 4137 4229 4289 4332 4353 4370 4381 4400 4425 4440 4469 837 227 1122 1108 1135 1288 1404 1466 1525 1475 1325 1127 0935 0774 0637 0510 0408 0359 0349 0327 0299 0313 0429 1061 2328 3340 3845 4062 4170 4234 4280 4305 4322 4337 4360 4385 4398 4427 838 21 2012 2026 2061 2276 2340 2294 2260 2213 2196 2097 2010 2157 2620 3065 3166 3120 3100 3028 2886 2789 3009 4143 5943 7320 8043 8377 8554 8664 8735 8757 8763 8759 8772 8798 8806 8842 839 22 2143 2213 2324 2605 2724 2690 2660 2610 2584 2494 2414 2551 2979 3400 3515 3481 3463 3401 3279 3198 3370 4230 5498 6418 6895 7118 7247 7334 7393 7415 7423 7429 7448 7475 7488 7517 840 23 2162 2270 2418 2767 2935 2918 2896 2845 2814 2735 2663 2758 3065 3361 3435 3403 3384 3332 3241 3185 3303 3869 4651 5190 5468 5603 5686 5750 5794 5811 5821 5829 5851 5877 5893 5918 841 24 2223 2396 2626 3067 3314 3320 3303 3246 3213 3147 3092 3136 3303 3454 3485 3449 3426 3387 3325 3291 3351 3635 3992 4224 4349 4417 4469 4509 4542 4557 4568 4578 4596 4621 4635 4654 842 25 2227 2462 2773 3329 3649 3686 3684 3625 3584 3549 3516 3488 3465 3441 3420 3385 3361 3335 3308 3302 3287 3282 3286 3306 3333 3360 3389 3417 3439 3450 3463 3474 3492 3514 3527 3543 843 26 1841 2105 2454 2979 3287 3361 3410 3397 3375 3350 3320 3290 3256 3206 3138 3039 2937 2823 2698 2607 2542 2510 2487 2480 2495 2512 2536 2573 2617 2643 2646 2642 2627 2620 2642 2700 844 27 1405 1691 2073 2598 2892 3015 3126 3172 3173 3157 3126 3090 3038 2952 2826 2652 2463 2254 2036 1876 1774 1720 1680 1658 1660 1670 1688 1728 1782 1814 1812 1794 1757 1731 1752 1835 845 28 1000 1313 1707 2219 2502 2655 2828 2928 2952 2942 2912 2869 2801 2683 2504 2265 2003 1723 1445 1246 1129 1068 1025 0997 0994 0999 1012 1048 1102 1135 1130 1106 1062 1029 1054 1136 846 29 0631 0949 1389 1885 2160 2356 2583 2728 2771 2771 2738 2689 2605 2456 2226 1928 1605 1268 0947 0725 0605 0546 0503 0478 0473 0477 0484 0514 0564 0596 0589 0565 0523 0493 0515 0596 847 210 2987 3139 3333 3774 3940 3825 3717 3661 3733 3740 3773 4266 5565 7168 8064 8307 8373 8370 8316 8283 8289 8369 8425 8510 8624 8720 8807 8883 8938 8947 8947 8943 8958 8985 8991 9021 848 211 2941 3138 3383 3898 4122 4045 3960 3895 3943 3938 3955 4332 5295 6421 7013 7154 7183 7168 7118 7095 7089 7138 7176 7241 7331 7405 7477 7542 7587 7599 7603 7604 7624 7652 7660 7684 849 212 2672 2904 3181 3695 3957 3918 3858 3797 3814 3798 3798 4033 4625 5280 5604 5665 5668 5647 5607 5590 5579 5604 5625 5669 5730 5782 5834 5881 5919 5929 5936 5945 5962 5988 5999 6024 850 213 2507 2744 3045 3605 3909 3905 3874 3811 3797 3769 3756 3859 4130 4401 4520 4519 4503 4479 4444 4433 4419 4425 4435 4464 4506 4541 4580 4615 4646 4660 4669 4677 4695 4717 4729 4754 851 214 2237 2480 2785 3319 3633 3668 3663 3607 3566 3534 3503 3475 3452 3428 3405 3371 3344 3318 3292 3285 3269 3266 3268 3288 3319 3346 3375 3404 3428 3441 3452 3464 3482 3505 3520 3541 852 215 1626 1825 2089 2509 2753 2816 2863 2842 2787 2713 2637 2564 2493 2409 2320 2233 2165 2080 1980 1916 1929 2083 2271 2377 2433 2463 2492 2529 2574 2602 2608 2601 2585 2578 2594 2653 853 216 1063 1253 1475 1802 1994 2079 2160 2163 2100 1999 1891 1787 1687 1571 1449 1345 1265 1169 1061 0997 1025 1206 1430 1544 1594 1618 1640 1680 1735 1771 1770 1752 1714 1685 1702 1789 854 217 0629 0787 0971 1199 1343 1431 1528 1549 1476 1356 1226 1107 0993 0869 0748 0656 0593 0520 0445 0415 0455 0617 0813 0905 0938 0953 0967 1002 1057 1093 1090 1064 1019 0983 1006 1093 855 218 0351 0470 0631 0811 0922 1016 1122 1147 1073 0947 0816 0698 0587 0474 0369 0298 0253 0206 0166 0166 0207 0309 0429 0476 0487 0489 0493 0518 0563 0597 0591 0567 0524 0491 0510 0587 856 219 1817 2130 2507 2969 3130 3134 3165 3213 3333 3359 3389 3848 4978 6157 6494 6190 5711 5158 4583 4156 3905 3791 3696 3636 3641 3665 3704 3797 3931 4006 3983 3911 3793 3693 3718 3903 857 220 1964 2285 2659 3183 3396 3421 3456 3492 3579 3593 3609 3960 4810 5659 5892 5661 5306 4887 4446 4113 3915 3824 3749 3707 3719 3744 3783 3863 3975 4037 4021 3969 3877 3801 3828 3981 858 221 2057 2348 2709 3235 3487 3510 3538 3545 3593 3589 3591 3814 4348 4866 5008 4870 4658 4404 4128 3922 3791 3735 3688 3669 3690 3717 3754 3816 3897 3941 3935 3903 3851 3808 3828 3934 859 222 2178 2465 2804 3343 3630 3658 3672 3654 3656 3638 3623 3725 3972 4196 4244 4164 4056 3923 3775 3669 3593 3560 3537 3537 3562 3588 3622 3670 3725 3753 3756 3746 3724 3711 3729 3797 860 223 2277 2530 2858 3443 3786 3828 3821 3760 3713 3675 3641 3612 3587 3562 3539 3503 3479 3453 3426 3419 3403 3399 3403 3422 3452 3477 3506 3534 3559 3569 3582 3592 3608 3633 3646 3664 861 224 1930 2106 2345 2779 3039 3074 3088 3035 2965 2884 2803 2729 2663 2593 2528 2473 2448 2415 2364 2344 2399 2647 2970 3176 3280 3334 3374 3406 3433 3446 3459 3473 3492 3515 3530 3549 862 225 1570 1677 1834 2163 2361 2403 2432 2380 2289 2173 2056 1952 1857 1760 1673 1615 1593 1558 1505 1485 1580 1995 2596 2997 3187 3272 3320 3360 3389 3405 3419 3433 3453 3473 3486 3510 863 226 1219 1244 1313 1513 1635 1679 1716 1675 1573 1435 1299 1181 1077 0973 0884 0834 0818 0791 0753 0749 0854 1335 2131 2700 2972 3088 3152 3197 3230 3249 3265 3282 3301 3325 3343 3366 864 227 0927 0921 0944 1068 1156 1207 1248 1213 1100 0950 0805 0683 0579 0479 0401 0363 0353 0336 0315 0329 0427 0913 1844 2554 2897 3043 3115 3164 3200 3221 3240 3256 3277 3298 3320 3346 865 21 1471 1419 1373 1428 1429 1376 1343 1317 1311 1238 1172 1310 1715 2085 2148 2094 2074 2010 1883 1799 2009 3197 5265 6938 7831 8243 8445 8567 8646 8671 8678 8676 8691 8716 8722 8752 866 22 1539 1525 1512 1616 1640 1598 1573 1538 1528 1450 1385 1512 1894 2249 2320 2276 2258 2199 2084 2008 2197 3197 4831 6080 6723 7017 7167 7264 7328 7349 7360 7366 7385 7410 7421 7451 867 23 1533 1542 1565 1704 1750 1720 1695 1664 1651 1583 1521 1628 1948 2242 2303 2265 2247 2197 2102 2039 2190 2947 4093 4914 5324 5510 5612 5682 5730 5748 5760 5770 5790 5816 5826 5854 868 24 1571 1639 1715 1908 1993 1972 1954 1922 1905 1845 1795 1879 2134 2369 2424 2395 2380 2339 2267 2222 2328 2818 3504 3969 4196 4306 4372 4422 4459 4475 4489 4503 4522 4548 4562 4584 869 25 1587 1690 1827 2083 2218 2211 2199 2166 2144 2097 2057 2101 2244 2369 2393 2366 2351 2322 2272 2247 2305 2563 2892 3099 3205 3259 3298 3333 3359 3374 3386 3401 3421 3444 3458 3478 870 26 1650 1811 2022 2372 2570 2584 2584 2547 2524 2502 2483 2467 2451 2437 2423 2398 2380 2361 2343 2338 2328 2327 2330 2344 2365 2386 2409 2432 2452 2464 2478 2491 2510 2531 2546 2566 871 27 1302 1494 1747 2107 2314 2371 2412 2414 2407 2390 2372 2350 2324 2282 2226 2141 2051 1948 1839 1759 1704 1674 1654 1646 1654 1666 1683 1713 1749 1773 1777 1775 1761 1755 1771 1827 872 28 0912 1138 1418 1773 1963 2060 2153 2199 2210 2201 2182 2157 2118 2049 1946 1801 1641 1464 1283 1150 1069 1025 0994 0975 0975 0981 0993 1022 1064 1091 1091 1075 1046 1025 1044 1113 873 29 0615 0839 1152 1507 1702 1826 1972 2059 2087 2083 2063 2032 1979 1884 1736 1535 1315 1080 0851 0689 0599 0553 0520 0500 0497 0500 0508 0534 0572 0598 0595 0576 0543 0522 0541 0611 874 210 2455 2516 2577 2799 2814 2689 2583 2545 2637 2658 2706 3246 4724 6651 7787 8127 8234 8250 8199 8159 8182 8303 8373 8457 8565 8657 8744 8821 8871 8882 8881 8878 8889 8917 8918 8944 875 211 2438 2528 2637 2921 2996 2893 2799 2758 2829 2840 2876 3325 4509 5976 6798 7027 7093 7092 7045 7016 7026 7107 7156 7221 7308 7382 7452 7515 7562 7572 7577 7580 7597 7622 7628 7654 876 212 2235 2378 2501 2800 2897 2823 2751 2713 2762 2766 2793 3126 3962 4929 5438 5563 5590 5580 5541 5523 5521 5567 5596 5643 5705 5759 5813 5860 5899 5909 5919 5928 5944 5972 5980 5999 877 213 2080 2224 2393 2722 2869 2822 2769 2730 2754 2748 2759 2975 3500 4074 4358 4415 4420 4404 4371 4360 4353 4377 4395 4424 4466 4505 4543 4581 4611 4623 4634 4645 4664 4686 4697 4717 878 214 1876 2038 2224 2570 2742 2727 2696 2656 2661 2645 2641 2743 2983 3224 3327 3333 3323 3304 3278 3269 3260 3267 3274 3296 3327 3355 3385 3415 3440 3453 3466 3479 3496 3520 3534 3555 879 215 1691 1860 2067 2432 2635 2655 2652 2614 2586 2563 2543 2525 2510 2493 2478 2454 2436 2417 2396 2392 2382 2380 2384 2398 2417 2438 2460 2484 2503 2516 2529 2541 2560 2582 2594 2610 880 216 1114 1255 1425 1700 1848 1891 1929 1920 1882 1824 1762 1703 1646 1580 1508 1443 1392 1329 1255 1212 1229 1353 1499 1577 1613 1635 1655 1685 1723 1746 1751 1749 1734 1727 1744 1799 881 217 0676 0793 0947 1141 1260 1318 1381 1388 1338 1256 1167 1086 1007 0919 0829 0759 0709 0648 0583 0554 0586 0718 0866 0932 0956 0968 0980 1009 1051 1080 1078 1065 1033 1013 1027 1098 882 218 0344 0454 0581 0720 0805 0874 0950 0964 0912 0819 0720 0632 0549 0460 0378 0319 0281 0240 0204 0202 0239 0340 0451 0493 0503 0505 0508 0529 0566 0592 0590 0571 0539 0516 0531 0598 883 219 1245 1513 1802 2097 2154 2134 2147 2203 2335 2372 2421 2925 4186 5521 5885 5510 4934 4283 3630 3152 2883 2760 2656 2585 2576 2589 2620 2707 2839 2918 2895 2824 2700 2593 2623 2809 884 220 1365 1629 1918 2244 2345 2337 2359 2408 2520 2548 2585 3004 4029 5086 5377 5091 4642 4125 3592 3195 2967 2862 2773 2715 2711 2726 2756 2836 2954 3025 3007 2946 2843 2754 2782 2947 885 221 1398 1657 1915 2254 2371 2377 2401 2434 2515 2534 2560 2872 3610 4337 4530 4332 4023 3661 3277 2991 2821 2745 2680 2640 2641 2657 2683 2750 2841 2895 2883 2841 2766 2703 2728 2854 886 222 1511 1734 1974 2323 2469 2485 2503 2516 2565 2570 2581 2786 3262 3715 3835 3712 3522 3293 3045 2860 2745 2695 2652 2631 2639 2657 2683 2734 2803 2843 2839 2814 2767 2732 2751 2848 887 223 1600 1806 2035 2395 2578 2597 2603 2595 2605 2597 2593 2690 2916 3119 3166 3100 3007 2894 2769 2675 2613 2586 2565 2561 2575 2595 2618 2657 2703 2730 2732 2726 2711 2699 2716 2775 888 224 1735 1906 2142 2541 2765 2788 2785 2741 2713 2686 2663 2643 2627 2610 2595 2569 2550 2533 2512 2508 2498 2497 2499 2514 2533 2552 2573 2596 2615 2629 2640 2651 2671 2694 2704 2723 889 225 1399 1493 1644 1914 2076 2099 2110 2074 2023 1955 1891 1832 1779 1723 1670 1630 1613 1587 1551 1538 1592 1812 2104 2285 2373 2417 2450 2477 2498 2513 2527 2541 2559 2581 2596 2613 890 226 1049 1104 1181 1346 1457 1488 1508 1478 1411 1319 1229 1149 1077 1005 0940 0903 0889 0867 0836 0833 0913 1241 1741 2077 2232 2302 2342 2374 2399 2415 2431 2446 2466 2488 2501 2523 891 227 0792 0791 0805 0908 0975 1015 1041 1014 0937 0830 0726 0637 0560 0487 0428 0397 0390 0376 0360 0374 0457 0816 1458 1923 2139 2233 2282 2319 2346 2364 2381 2398 2419 2442 2460 2481 892 21 1121 1027 0941 0925 0881 0839 0811 0795 0797 0742 0695 0812 1123 1367 1365 1300 1276 1220 1117 1052 1240 2415 4673 6597 7646 8125 8355 8490 8575 8605 8612 8612 8626 8648 8655 8694 893 22 1110 1022 0953 0957 0926 0887 0862 0844 0847 0792 0748 0859 1159 1402 1409 1352 1331 1278 1181 1120 1296 2334 4216 5737 6530 6885 7059 7163 7232 7257 7270 7275 7291 7317 7330 7366 894 23 1051 1007 0960 0988 0968 0938 0918 0901 0900 0846 0805 0903 1170 1393 1410 1363 1345 1300 1216 1164 1314 2138 3541 4615 5156 5398 5522 5601 5653 5676 5690 5700 5719 5744 5760 5787 895 24 1047 1032 1018 1070 1077 1051 1034 1017 1011 0963 0925 1008 1248 1454 1484 1450 1436 1398 1328 1286 1409 2029 3005 3706 4046 4199 4281 4336 4377 4396 4410 4425 4445 4470 4485 4511 896 25 1022 1038 1055 1132 1154 1138 1122 1107 1103 1064 1033 1105 1298 1461 1483 1455 1442 1409 1354 1322 1418 1848 2455 2857 3047 3137 3189 3230 3262 3279 3296 3311 3331 3358 3374 3399 897 26 1064 1102 1162 1284 1347 1343 1331 1315 1303 1273 1246 1288 1407 1510 1527 1508 1495 1474 1439 1422 1474 1697 1987 2168 2256 2301 2333 2360 2384 2399 2413 2429 2447 2474 2488 2508 898 27 1087 1189 1311 1514 1626 1636 1635 1613 1602 1592 1582 1575 1567 1559 1552 1535 1524 1512 1501 1499 1494 1495 1499 1510 1525 1539 1555 1573 1591 1605 1619 1633 1653 1673 1689 1706 899 28 0767 0883 1040 1250 1363 1404 1446 1459 1461 1455 1445 1435 1417 1388 1342 1273 1198 1113 1021 0954 0911 0890 0874 0867 0870 0877 0887 0908 0936 0955 0960 0955 0947 0939 0958 1005 900 29 0521 0672 0853 1059 1172 1240 1309 1349 1362 1360 1350 1334 1309 1262 1186 1080 0960 0828 0695 0599 0544 0514 0495 0483 0483 0486 0493 0511 0540 0559 0560 0550 0529 0520 0537 0589 901 210 2033 2017 1973 2038 1969 1835 1732 1714 1817 1849 1907 2473 4072 6239 7564 7982 8122 8152 8101 8057 8097 8257 8341 8427 8527 8616 8698 8773 8827 8834 8835 8834 8845 8868 8871 8901 902 211 1942 1953 1940 2037 1995 1877 1786 1766 1854 1879 1931 2425 3772 5518 6535 6842 6938 6952 6907 6872 6898 7015 7079 7149 7234 7309 7378 7443 7490 7502 7507 7509 7525 7553 7560 7586 903 212 1794 1816 1831 1936 1926 1828 1760 1739 1807 1827 1869 2257 3274 4526 5222 5416 5472 5474 5436 5411 5421 5497 5539 5590 5653 5710 5765 5815 5853 5866 5876 5885 5904 5927 5940 5961 904 213 1642 1704 1760 1907 1940 1866 1812 1790 1839 1847 1876 2163 2882 3720 4160 4273 4300 4293 4261 4244 4247 4291 4317 4352 4397 4436 4477 4516 4548 4561 4575 4585 4604 4629 4642 4661 905 214 1486 1557 1636 1804 1857 1814 1774 1753 1784 1786 1804 1994 2443 2928 3164 3214 3222 3209 3184 3174 3171 3192 3207 3230 3262 3292 3322 3353 3379 3394 3409 3421 3442 3464 3477 3501 906 215 1339 1405 1507 1703 1786 1770 1748 1725 1736 1730 1734 1829 2044 2257 2354 2362 2357 2345 2326 2320 2316 2324 2332 2346 2367 2388 2410 2434 2455 2468 2482 2494 2515 2536 2553 2568 907 216 1114 1214 1334 1534 1648 1657 1656 1636 1625 1612 1603 1594 1587 1577 1569 1554 1542 1531 1517 1516 1511 1512 1516 1527 1541 1557 1573 1593 1609 1622 1636 1653 1670 1689 1708 1725 908 217 0625 0717 0816 0958 1032 1070 1100 1102 1075 1035 0989 0949 0906 0859 0806 0761 0726 0683 0635 0613 0634 0719 0808 0847 0864 0875 0885 0905 0934 0955 0960 0957 0944 0939 0958 1006 909 218 0351 0416 0504 0607 0657 0697 0745 0750 0716 0660 0600 0544 0490 0433 0377 0338 0311 0279 0252 0251 0287 0374 0461 0491 0497 0498 0501 0516 0542 0562 0561 0551 0533 0519 0535 0587 910 219 0805 1050 1278 1465 1461 1429 1432 1484 1619 1664 1721 2243 3572 4981 5318 4859 4193 3461 2747 2240 1964 1836 1731 1657 1641 1648 1670 1749 1875 1954 1933 1863 1743 1646 1675 1859 911 220 0844 1075 1284 1470 1476 1446 1448 1499 1617 1656 1708 2165 3301 4476 4764 4404 3868 3269 2672 2243 2006 1896 1805 1743 1731 1740 1761 1834 1945 2015 1996 1937 1835 1746 1778 1942 912 221 0900 1097 1286 1477 1504 1488 1495 1537 1630 1660 1700 2060 2929 3807 4030 3777 3390 2946 2495 2164 1978 1894 1823 1774 1768 1777 1798 1858 1949 2007 1994 1948 1867 1799 1826 1959 913 222 0945 1116 1298 1496 1544 1532 1546 1577 1649 1669 1698 1970 2606 3230 3390 3216 2944 2626 2292 2044 1899 1833 1778 1740 1739 1749 1768 1822 1898 1945 1937 1905 1841 1791 1810 1926 914 223 1004 1140 1310 1514 1582 1584 1594 1615 1662 1672 1690 1875 2292 2678 2772 2660 2490 2286 2066 1900 1801 1758 1719 1698 1699 1710 1728 1769 1826 1862 1860 1840 1801 1770 1791 1877 915 224 1073 1208 1367 1585 1681 1690 1698 1700 1719 1714 1719 1811 2015 2197 2240 2185 2102 2002 1891 1807 1755 1732 1715 1707 1715 1727 1744 1773 1811 1835 1839 1835 1821 1814 1827 1884 916 225 1126 1241 1377 1600 1721 1734 1731 1711 1699 1684 1673 1664 1657 1647 1639 1623 1611 1600 1586 1584 1579 1580 1584 1595 1610 1626 1644 1663 1681 1694 1706 1723 1743 1764 1777 1795 917 226 0848 0888 0962 1094 1176 1192 1203 1182 1150 1102 1056 1014 0975 0935 0899 0872 0863 0848 0828 0828 0876 1054 1293 1440 1510 1543 1567 1589 1608 1622 1637 1654 1672 1692 1707 1727 918 227 0627 0624 0649 0724 0773 0792 0811 0795 0750 0686 0624 0571 0522 0475 0434 0413 0405 0396 0384 0397 0462 0697 1062 1304 1412 1461 1491 1515 1536 1552 1568 1585 1604 1624 1640 1664 919 21 0858 0747 0650 0607 0553 0514 0494 0482 0492 0451 0420 0509 0719 0831 0762 0686 0659 0612 0533 0491 0650 1771 4157 6289 7471 8010 8263 8407 8498 8530 8538 8538 8550 8571 8583 8627 920 22 0804 0725 0631 0608 0558 0525 0502 0496 0502 0463 0435 0522 0726 0845 0793 0725 0701 0658 0585 0545 0693 1689 3714 5439 6357 6768 6963 7077 7152 7182 7196 7201 7219 7242 7256 7291 921 23 0742 0667 0593 0578 0540 0512 0496 0488 0493 0458 0432 0512 0699 0818 0785 0731 0711 0673 0611 0578 0706 1510 3065 4326 4973 5260 5400 5485 5543 5570 5584 5597 5615 5643 5659 5693 922 24 0708 0657 0593 0584 0559 0534 0520 0512 0515 0483 0461 0536 0716 0843 0828 0783 0766 0735 0677 0648 0763 1419 2600 3501 3944 4137 4234 4296 4340 4363 4377 4391 4412 4437 4453 4482 923 25 0636 0609 0571 0577 0561 0540 0533 0527 0526 0496 0480 0544 0698 0811 0806 0771 0756 0729 0683 0660 0756 1248 2067 2652 2929 3050 3114 3159 3194 3214 3232 3248 3269 3293 3314 3335 924 26 0614 0606 0587 0611 0610 0595 0593 0583 0583 0558 0543 0598 0727 0827 0833 0809 0796 0776 0743 0728 0798 1128 1623 1955 2109 2178 2218 2250 2277 2294 2310 2325 2345 2368 2387 2412 925 27 0600 0602 0611 0652 0669 0665 0659 0657 0653 0635 0624 0661 0752 0821 0829 0815 0805 0791 0769 0763 0808 0983 1216 1360 1427 1462 1484 1506 1526 1542 1556 1572 1592 1613 1631 1648 926 28 0507 0554 0589 0657 0690 0703 0701 0697 0700 0697 0698 0698 0698 0697 0694 0687 0682 0677 0673 0673 0672 0675 0681 0690 0700 0712 0725 0740 0756 0768 0783 0799 0816 0837 0853 0871 927 29 0368 0413 0481 0556 0596 0615 0636 0644 0650 0650 0649 0647 0643 0631 0610 0578 0540 0495 0448 0414 0393 0383 0376 0374 0377 0383 0389 0402 0420 0433 0439 0440 0437 0440 0453 0487 928 210 1685 1595 1478 1416 1282 1145 1056 1050 1157 1196 1263 1840 3520 5871 7340 7820 7984 8026 7974 7919 7975 8173 8273 8362 8464 8558 8641 8717 8773 8783 8782 8777 8792 8816 8821 8852 929 211 1616 1531 1444 1406 1303 1184 1104 1095 1190 1223 1284 1795 3234 5174 6342 6711 6831 6856 6810 6769 6808 6957 7035 7107 7190 7263 7333 7395 7445 7458 7463 7466 7480 7506 7514 7541 930 212 1441 1394 1336 1340 1266 1171 1104 1096 1170 1195 1248 1659 2783 4234 5071 5320 5401 5414 5377 5346 5372 5471 5523 5572 5632 5685 5736 5786 5824 5837 5846 5852 5870 5894 5905 5927 931 213 1268 1254 1227 1239 1193 1117 1063 1057 1119 1137 1180 1508 2362 3410 3988 4150 4198 4200 4169 4147 4160 4226 4263 4300 4347 4388 4430 4470 4502 4516 4529 4540 4561 4586 4599 4621 932 214 1113 1120 1110 1153 1130 1077 1037 1029 1074 1086 1119 1363 1966 2664 3028 3124 3149 3145 3122 3108 3114 3153 3176 3201 3235 3266 3297 3329 3355 3369 3383 3397 3416 3439 3455 3479 933 215 0984 0999 1029 1096 1100 1065 1035 1030 1057 1061 1087 1251 1634 2050 2252 2298 2306 2300 2281 2275 2276 2296 2309 2328 2350 2373 2397 2423 2445 2460 2474 2488 2509 2530 2542 2564 934 216 0809 0835 0864 0943 0968 0954 0939 0931 0946 0946 0959 1045 1226 1404 1482 1492 1489 1482 1469 1465 1464 1473 1483 1494 1510 1526 1544 1563 1582 1595 1611 1627 1647 1668 1682 1705 935 217 0540 0571 0617 0678 0717 0726 0725 0722 0724 0722 0722 0721 0722 0720 0715 0710 0705 0700 0694 0695 0695 0699 0704 0713 0724 0736 0749 0764 0780 0793 0808 0824 0843 0862 0877 0900 936 218 0292 0330 0364 0408 0435 0452 0469 0472 0462 0443 0423 0402 0383 0360 0335 0315 0299 0283 0265 0266 0290 0340 0383 0395 0398 0400 0403 0415 0431 0445 0451 0451 0448 0447 0463 0496 937 219 0527 0756 0947 1056 1001 0959 0942 0989 1122 1170 1236 1774 3143 4557 4819 4274 3533 2746 2004 1497 1231 1106 1009 0943 0926 0929 0946 1011 1123 1198 1179 1116 1011 0928 0958 1123 938 220 0534 0744 0921 1035 0998 0960 0951 0995 1113 1158 1217 1689 2870 4068 4302 3858 3239 2570 1930 1485 1250 1140 1053 0994 0979 0983 0999 1060 1163 1230 1214 1158 1064 0987 1019 1172 939 221 0543 0701 0862 0967 0949 0921 0920 0957 1054 1089 1140 1521 2459 3396 3590 3260 2788 2267 1759 1399 1204 1115 1043 0993 0981 0986 0999 1052 1138 1196 1184 1139 1059 0998 1023 1154 940 222 0525 0680 0811 0908 0901 0881 0887 0917 0997 1023 1063 1365 2080 2782 2932 2699 2357 1969 1582 1303 1150 1078 1020 0981 0972 0977 0988 1034 1107 1154 1145 1111 1047 0997 1022 1133 941 223 0529 0661 0774 0875 0871 0862 0870 0895 0954 0973 1004 1234 1757 2254 2365 2209 1976 1705 1427 1225 1112 1059 1017 0987 0981 0987 0999 1035 1092 1130 1125 1100 1054 1017 1038 1128 942 224 0564 0660 0770 0866 0885 0879 0887 0906 0946 0959 0982 1137 1480 1792 1862 1767 1622 1449 1266 1129 1050 1013 0983 0964 0963 0969 0981 1011 1056 1086 1085 1070 1039 1017 1037 1106 943 225 0591 0647 0727 0829 0859 0864 0871 0881 0902 0906 0918 1001 1170 1314 1343 1293 1223 1137 1044 0973 0930 0911 0896 0888 0891 0898 0910 0931 0962 0984 0987 0985 0972 0965 0984 1031 944 226 0548 0577 0624 0694 0735 0744 0744 0741 0741 0741 0740 0740 0739 0737 0734 0727 0721 0716 0711 0712 0711 0715 0720 0730 0740 0754 0767 0783 0798 0812 0828 0843 0863 0881 0897 0920 945 227 0391 0399 0421 0459 0484 0496 0504 0500 0487 0466 0445 0426 0408 0390 0372 0363 0359 0353 0349 0360 0397 0495 0616 0683 0714 0731 0746 0762 0778 0792 0806 0825 0842 0862 0882 0897 946 21 0727 0603 0494 0454 0405 0369 0351 0345 0356 0325 0305 0377 0509 0525 0421 0346 0319 0283 0232 0215 0336 1360 3789 6065 7349 7937 8208 8359 8454 8489 8501 8496 8511 8532 8542 8589 947 22 0664 0568 0472 0429 0389 0359 0341 0336 0346 0318 0300 0367 0490 0508 0415 0345 0320 0286 0239 0224 0338 1252 3336 5202 6215 6670 6882 7002 7081 7115 7128 7135 7153 7178 7192 7231 948 23 0581 0503 0426 0384 0352 0329 0315 0313 0320 0295 0281 0343 0459 0487 0414 0353 0331 0301 0260 0246 0349 1106 2748 4148 4876 5197 5348 5434 5496 5524 5541 5551 5570 5593 5611 5647 949 24 0537 0462 0397 0370 0341 0324 0313 0309 0315 0292 0281 0338 0444 0478 0421 0370 0351 0326 0289 0278 0368 0983 2256 3292 3810 4035 4142 4208 4255 4279 4295 4307 4328 4354 4369 4400 950 25 0430 0390 0336 0320 0296 0283 0277 0277 0280 0260 0255 0306 0400 0437 0398 0357 0340 0319 0290 0283 0360 0836 1761 2476 2821 2969 3044 3093 3129 3151 3168 3186 3206 3229 3250 3278 951 26 0382 0353 0318 0307 0289 0276 0276 0275 0277 0261 0257 0305 0395 0442 0419 0388 0375 0358 0333 0329 0395 0749 1380 1837 2048 2139 2187 2221 2248 2267 2283 2300 2321 2346 2363 2383 952 27 0342 0320 0301 0296 0295 0286 0284 0286 0288 0275 0273 0315 0391 0435 0424 0401 0390 0377 0360 0359 0412 0640 0994 1225 1328 1374 1402 1426 1447 1463 1480 1495 1516 1538 1557 1573 953 28 0271 0266 0268 0273 0280 0277 0280 0280 0281 0275 0277 0302 0344 0367 0360 0348 0340 0334 0326 0330 0361 0457 0572 0635 0664 0681 0695 0710 0727 0742 0757 0773 0792 0811 0829 0848 954 29 0224 0236 0244 0261 0269 0276 0278 0280 0285 0287 0289 0293 0295 0296 0295 0293 0291 0288 0288 0288 0291 0294 0300 0306 0316 0325 0336 0348 0360 0374 0387 0402 0418 0434 0449 0468 955 210 1368 1221 1045 0895 0729 0602 0524 0529 0636 0678 0748 1319 3048 5548 7147 7680 7865 7916 7861 7799 7870 8099 8216 8310 8420 8513 8602 8676 8734 8746 8745 8742 8754 8778 8789 8815 956 211 1283 1175 1020 0893 0746 0630 0560 0561 0661 0699 0765 1278 2774 4848 6113 6518 6651 6681 6631 6585 6631 6800 6889 6967 7061 7146 7222 7293 7344 7358 7365 7371 7388 7415 7424 7447 957 212 1102 1032 0914 0823 0702 0609 0554 0556 0637 0667 0726 1147 2338 3923 4858 5148 5245 5264 5227 5193 5227 5343 5404 5456 5516 5567 5619 5671 5709 5723 5732 5740 5762 5786 5795 5815 958 213 0992 0910 0815 0748 0660 0587 0542 0543 0608 0632 0680 1020 1943 3119 3783 3979 4040 4047 4020 3994 4013 4093 4137 4176 4224 4267 4309 4350 4384 4400 4412 4425 4444 4471 4483 4508 959 214 0846 0791 0739 0699 0637 0582 0545 0548 0598 0616 0658 0923 1609 2443 2891 3017 3055 3058 3034 3020 3030 3082 3111 3137 3168 3199 3231 3263 3290 3306 3319 3335 3354 3377 3391 3413 960 215 0704 0697 0659 0651 0612 0573 0548 0547 0582 0595 0628 0819 1287 1826 2101 2172 2190 2187 2170 2160 2167 2198 2217 2235 2258 2280 2304 2329 2351 2365 2380 2395 2416 2437 2456 2478 961 216 0566 0568 0560 0572 0558 0535 0522 0523 0546 0553 0576 0699 0972 1257 1390 1419 1424 1419 1406 1401 1404 1420 1430 1443 1459 1476 1493 1513 1532 1545 1560 1577 1596 1618 1632 1654 962 217 0354 0366 0373 0387 0396 0390 0392 0389 0400 0403 0417 0466 0556 0632 0658 0658 0654 0650 0644 0642 0645 0650 0656 0666 0677 0688 0702 0718 0734 0747 0762 0778 0799 0817 0837 0857 963 218 0219 0250 0245 0260 0266 0274 0278 0280 0286 0288 0290 0294 0296 0296 0296 0293 0292 0290 0288 0290 0291 0295 0301 0308 0318 0328 0338 0352 0364 0378 0393 0406 0423 0440 0457 0474 964 219 0336 0541 0714 0775 0706 0651 0622 0656 0780 0830 0899 1431 2799 4169 4321 3676 2861 2029 1283 0799 0559 0446 0367 0317 0303 0306 0315 0362 0451 0513 0498 0451 0369 0310 0337 0473 965 220 0357 0521 0675 0737 0677 0627 0603 0640 0750 0795 0858 1333 2528 3706 3852 3318 2626 1906 1247 0811 0591 0487 0413 0364 0352 0353 0364 0409 0493 0551 0538 0494 0417 0361 0389 0518 966 221 0313 0478 0605 0664 0611 0577 0560 0589 0684 0721 0775 1167 2129 3066 3201 2802 2267 1698 1165 0807 0622 0535 0470 0427 0416 0418 0426 0467 0539 0591 0581 0540 0475 0425 0448 0563 967 222 0324 0456 0559 0616 0578 0553 0544 0571 0647 0678 0724 1042 1804 2531 2640 2341 1934 1489 1066 0777 0626 0554 0500 0464 0454 0455 0464 0498 0560 0602 0594 0560 0506 0464 0485 0587 968 223 0293 0409 0486 0537 0511 0491 0484 0506 0566 0588 0628 0874 1445 1983 2072 1866 1576 1254 0939 0719 0604 0548 0506 0478 0470 0471 0478 0507 0557 0591 0585 0561 0518 0483 0504 0587 969 224 0278 0386 0464 0502 0487 0480 0479 0499 0544 0560 0590 0770 1175 1540 1603 1467 1271 1048 0827 0668 0583 0542 0510 0488 0483 0485 0490 0514 0555 0581 0578 0562 0529 0504 0523 0589 970 225 0290 0369 0418 0457 0456 0457 0458 0473 0502 0513 0536 0654 0900 1113 1151 1076 0967 0839 0708 0611 0557 0532 0511 0498 0496 0498 0505 0523 0552 0574 0575 0565 0546 0530 0550 0603 971 226 0275 0305 0340 0364 0375 0378 0382 0391 0403 0409 0421 0470 0557 0618 0624 0596 0559 0514 0465 0428 0407 0397 0391 0388 0390 0395 0402 0415 0433 0449 0453 0455 0454 0453 0469 0502 972 227 0233 0243 0253 0270 0280 0287 0289 0294 0299 0300 0304 0307 0309 0310 0310 0307 0305 0302 0301 0302 0305 0308 0315 0322 0331 0342 0353 0367 0380 0394 0408 0424 0441 0456 0477 0492 973 21 0211 0227 0236 0248 0259 0260 0263 0267 0273 0274 0277 0280 0282 0283 0282 0280 0279 0276 0274 0276 0277 0282 0286 0292 0302 0311 0321 0332 0344 0356 0370 0384 0400 0414 0429 0445 974 22 0491 0526 0556 0618 0655 0660 0663 0658 0660 0660 0659 0659 0659 0656 0654 0648 0644 0639 0634 0634 0634 0637 0642 0649 0660 0672 0684 0699 0712 0727 0739 0755 0773 0790 0807 0823 975 23 1071 1164 1285 1481 1597 1606 1604 1584 1571 1559 1549 1541 1534 1525 1516 1501 1489 1478 1465 1463 1458 1458 1461 1470 1484 1496 1511 1529 1544 1556 1571 1583 1600 1619 1635 1649 976 24 1657 1809 2019 2380 2600 2622 2619 2585 2560 2537 2518 2502 2489 2474 2461 2436 2419 2401 2382 2378 2370 2368 2370 2384 2404 2422 2444 2468 2487 2500 2514 2527 2547 2566 2583 2603 977 25 2271 2519 2829 3392 3728 3760 3758 3699 3657 3621 3588 3561 3538 3513 3491 3454 3430 3405 3376 3370 3354 3349 3352 3372 3401 3427 3456 3486 3509 3521 3533 3548 3567 3588 3600 3616 978 26 2900 3246 3686 4522 5061 5128 5129 5044 4978 4925 4876 4834 4799 4765 4734 4684 4650 4618 4580 4571 4550 4542 4547 4575 4615 4650 4686 4723 4750 4761 4769 4778 4796 4819 4831 4847 979 27 3668 4100 4701 5833 6573 6665 6659 6541 6448 6373 6307 6249 6199 6151 6111 6046 6003 5959 5912 5901 5871 5860 5866 5904 5958 6005 6053 6097 6127 6137 6143 6148 6165 6189 6195 6215 980 28 4484 5036 5812 7318 8316 8454 8458 8304 8186 8092 8006 7932 7867 7802 7746 7659 7601 7546 7484 7469 7432 7418 7430 7490 7573 7646 7715 7774 7816 7825 7830 7832 7850 7877 7878 7903 981 29 5084 5745 6658 8464 9690 9861 9876 9694 9553 9442 9343 9251 9174 9096 9028 8926 8856 8791 8722 8702 8657 8643 8657 8734 8842 8935 9021 9095 9146 9154 9158 9157 9172 9203 9206 9229 982 210 0224 0239 0241 0253 0266 0271 0275 0279 0284 0285 0288 0292 0294 0295 0293 0291 0289 0287 0286 0286 0289 0291 0298 0304 0313 0324 0334 0346 0359 0371 0385 0399 0415 0431 0445 0464 983 211 0312 0314 0331 0355 0376 0378 0382 0384 0388 0391 0395 0396 0398 0398 0398 0394 0391 0388 0386 0387 0389 0393 0398 0406 0416 0427 0439 0452 0465 0479 0493 0509 0526 0544 0559 0577 984 212 0522 0566 0603 0679 0716 0722 0724 0719 0721 0717 0716 0717 0715 0713 0710 0704 0698 0692 0687 0687 0687 0689 0694 0702 0713 0724 0737 0751 0766 0779 0794 0807 0827 0843 0860 0875 985 213 0855 0922 1018 1157 1239 1246 1247 1235 1224 1217 1212 1206 1201 1196 1190 1178 1169 1160 1151 1149 1146 1147 1152 1160 1172 1184 1198 1214 1229 1242 1255 1270 1287 1306 1323 1339 986 214 1140 1246 1374 1587 1709 1719 1716 1694 1682 1667 1657 1648 1639 1631 1622 1606 1594 1581 1568 1566 1559 1560 1563 1573 1588 1603 1619 1637 1654 1666 1680 1693 1710 1733 1747 1765 987 215 1510 1649 1832 2150 2326 2346 2343 2310 2286 2267 2250 2235 2222 2209 2196 2174 2158 2141 2124 2120 2113 2111 2114 2126 2144 2160 2180 2200 2218 2230 2245 2259 2275 2297 2309 2326 988 216 1812 1982 2224 2639 2878 2899 2900 2853 2823 2795 2772 2752 2734 2716 2700 2673 2654 2634 2612 2607 2595 2593 2596 2610 2631 2652 2675 2698 2718 2729 2742 2754 2773 2793 2805 2827 989 217 2110 2324 2608 3112 3404 3435 3431 3375 3337 3304 3274 3249 3227 3206 3186 3152 3129 3106 3079 3074 3058 3055 3059 3076 3102 3124 3152 3177 3198 3207 3221 3232 3250 3270 3283 3303 990 218 2433 2719 3070 3709 4100 4140 4137 4065 4017 3974 3937 3903 3876 3848 3824 3784 3756 3728 3698 3691 3673 3667 3670 3690 3721 3748 3779 3808 3832 3843 3853 3865 3881 3903 3914 3932 991 219 2861 3196 3617 4406 4897 4953 4947 4863 4798 4748 4699 4659 4624 4590 4559 4512 4479 4446 4410 4401 4379 4373 4376 4402 4440 4472 4508 4541 4567 4576 4587 4596 4614 4638 4646 4665 992 220 3231 3607 4108 5040 5624 5692 5689 5587 5515 5452 5398 5351 5308 5267 5232 5176 5136 5099 5058 5046 5020 5012 5016 5048 5097 5138 5181 5220 5248 5257 5263 5274 5289 5313 5321 5342 993 221 3606 4033 4610 5704 6399 6479 6481 6367 6278 6208 6143 6089 6040 5993 5952 5890 5845 5804 5758 5746 5716 5707 5712 5749 5805 5853 5902 5945 5979 5987 5993 5999 6017 6040 6046 6065 994 222 3987 4462 5119 6387 7214 7311 7312 7180 7076 6994 6920 6855 6800 6747 6701 6629 6582 6535 6483 6471 6438 6425 6435 6478 6543 6600 6656 6706 6740 6746 6752 6756 6774 6797 6803 6822 995 223 4451 4995 5761 7265 8281 8410 8417 8260 8140 8043 7957 7880 7817 7754 7699 7618 7562 7509 7450 7435 7398 7386 7396 7453 7530 7596 7662 7720 7759 7767 7767 7770 7786 7811 7814 7836 996 224 4692 5301 6130 7796 8928 9080 9087 8914 8778 8674 8577 8494 8423 8355 8295 8204 8145 8088 8028 8012 7972 7960 7973 8033 8119 8194 8266 8326 8368 8373 8376 8374 8390 8417 8419 8440 997 225 5047 5690 6617 8459 9733 9918 9928 9742 9592 9478 9374 9281 9201 9124 9055 8954 8889 8828 8757 8741 8697 8684 8700 8773 8874 8959 9041 9109 9156 9160 9160 9155 9170 9197 9196 9219 998 226 0219 0234 0245 0258 0273 0275 0281 0283 0289 0291 0293 0298 0298 0300 0299 0297 0296 0293 0292 0292 0295 0299 0305 0312 0321 0331 0342 0356 0368 0382 0396 0411 0428 0445 0459 0479 999 227 5034 5696 6606 8461 9765 9944 9961 9773 9624 9507 9402 9308 9226 9148 9076 8974 8902 8838 8767 8750 8703 8689 8704 8779 8885 8975 9058 9129 9179 9184 9184 9179 9192 9220 9220 9240 1000 21 0213 0219 0227 0240 0255 0258 0260 0263 0266 0268 0270 0272 0275 0276 0275 0272 0271 0268 0268 0268 0270 0273 0277 0285 0293 0301 0311 0322 0333 0345 0358 0370 0386 0402 0415 0429 1001 22 0482 0513 0555 0609 0643 0652 0653 0649 0651 0647 0648 0647 0646 0646 0642 0637 0631 0626 0621 0622 0621 0623 0628 0636 0645 0656 0668 0680 0694 0707 0721 0736 0752 0772 0785 0801 1002 23 1063 1154 1278 1474 1584 1597 1595 1574 1562 1550 1541 1532 1524 1517 1508 1493 1481 1470 1458 1455 1450 1450 1453 1463 1475 1489 1505 1522 1538 1551 1564 1577 1594 1614 1625 1645 1003 24 1661 1849 2045 2417 2629 2647 2646 2608 2583 2558 2537 2521 2505 2489 2475 2450 2430 2412 2393 2388 2376 2373 2375 2389 2410 2430 2451 2474 2494 2505 2517 2531 2549 2569 2585 2602 1004 25 2166 2381 2663 3231 3619 3673 3683 3631 3594 3562 3533 3509 3486 3465 3444 3409 3386 3362 3334 3329 3314 3311 3314 3334 3362 3388 3415 3445 3467 3481 3493 3504 3525 3549 3560 3581 1005 26 2891 3217 3639 4461 5008 5080 5078 4997 4938 4885 4838 4798 4763 4728 4698 4650 4616 4582 4545 4536 4514 4508 4511 4539 4580 4616 4653 4689 4718 4728 4736 4748 4767 4787 4797 4814 1006 27 3649 4091 4687 5820 6544 6634 6631 6514 6422 6346 6278 6222 6172 6124 6082 6019 5976 5932 5885 5873 5844 5834 5839 5877 5933 5981 6029 6073 6105 6113 6119 6122 6140 6164 6171 6191 1007 28 4469 4999 5777 7288 8318 8460 8467 8310 8191 8094 8007 7932 7867 7804 7750 7667 7610 7556 7498 7483 7446 7433 7444 7498 7576 7645 7708 7767 7807 7815 7817 7819 7836 7863 7868 7886 1008 29 5050 5681 6602 8453 9736 9918 9929 9744 9596 9480 9374 9283 9204 9129 9062 8963 8899 8838 8770 8752 8711 8699 8711 8782 8879 8963 9042 9109 9158 9161 9157 9156 9170 9194 9195 9214 1009 210 0232 0222 0233 0248 0258 0263 0267 0271 0274 0277 0280 0282 0285 0285 0285 0283 0280 0279 0278 0278 0280 0283 0289 0295 0303 0313 0323 0335 0346 0359 0371 0385 0401 0417 0432 0446 1010 211 0287 0315 0327 0351 0367 0373 0376 0378 0382 0384 0384 0388 0388 0390 0389 0385 0382 0379 0376 0378 0379 0383 0387 0395 0405 0414 0426 0439 0451 0465 0478 0495 0510 0529 0544 0559 1011 212 0510 0555 0597 0663 0702 0709 0711 0706 0706 0705 0703 0703 0702 0700 0697 0690 0684 0680 0674 0674 0673 0676 0681 0689 0698 0709 0722 0736 0750 0763 0778 0791 0809 0826 0842 0857 1012 213 0839 0904 0994 1136 1210 1216 1216 1206 1196 1189 1183 1179 1174 1167 1160 1150 1141 1132 1123 1121 1118 1118 1122 1131 1142 1155 1169 1185 1199 1212 1225 1239 1257 1274 1288 1306 1013 214 1139 1229 1356 1577 1700 1711 1708 1685 1674 1658 1649 1640 1631 1623 1613 1598 1586 1574 1561 1557 1553 1553 1557 1566 1579 1594 1610 1628 1646 1658 1671 1685 1701 1722 1739 1755 1014 215 1473 1620 1803 2108 2278 2295 2287 2256 2235 2215 2198 2184 2170 2157 2145 2122 2106 2090 2073 2069 2060 2060 2063 2075 2092 2109 2128 2148 2166 2178 2192 2205 2224 2243 2257 2272 1015 216 1773 1966 2189 2596 2828 2852 2847 2803 2774 2745 2722 2702 2684 2666 2650 2621 2601 2582 2559 2553 2541 2539 2541 2555 2576 2595 2617 2640 2661 2671 2683 2695 2712 2734 2743 2764 1016 217 2095 2302 2583 3087 3383 3411 3407 3356 3314 3281 3251 3225 3203 3181 3161 3129 3107 3082 3057 3050 3037 3033 3034 3051 3075 3098 3122 3149 3169 3179 3191 3200 3219 3240 3251 3271 1017 218 2486 2731 3074 3704 4090 4129 4123 4057 4009 3965 3929 3897 3868 3841 3817 3777 3750 3721 3690 3683 3666 3660 3663 3683 3713 3742 3772 3802 3826 3837 3847 3857 3876 3898 3907 3925 1018 219 2863 3181 3601 4386 4874 4932 4927 4848 4784 4732 4685 4645 4612 4577 4548 4500 4467 4434 4399 4390 4368 4361 4365 4390 4426 4461 4496 4528 4555 4564 4574 4584 4602 4624 4633 4649 1019 220 3230 3589 4068 4968 5536 5602 5597 5505 5433 5375 5319 5274 5232 5193 5158 5101 5063 5024 4982 4972 4946 4937 4940 4973 5020 5064 5105 5145 5173 5184 5192 5202 5220 5243 5251 5271 1020 221 3573 4007 4592 5707 6422 6507 6509 6392 6303 6230 6165 6107 6059 6012 5970 5906 5863 5821 5774 5762 5732 5723 5728 5766 5820 5868 5916 5961 5992 5999 6005 6011 6030 6052 6060 6076 1021 222 3945 4443 5100 6377 7208 7314 7312 7183 7081 6997 6924 6858 6804 6750 6704 6631 6581 6534 6484 6469 6435 6425 6433 6479 6544 6599 6655 6705 6743 6751 6755 6760 6776 6801 6809 6825 1022 223 4409 4961 5728 7257 8283 8420 8427 8267 8144 8049 7962 7886 7820 7758 7703 7621 7566 7515 7456 7441 7406 7396 7405 7460 7535 7601 7664 7720 7761 7769 7771 7772 7789 7814 7816 7834 1023 224 4709 5305 6150 7799 8916 9065 9073 8902 8771 8667 8572 8490 8420 8353 8293 8202 8142 8086 8024 8008 7967 7956 7968 8031 8117 8192 8264 8327 8369 8374 8375 8377 8392 8420 8424 8439 1024 225 5054 5713 6622 8455 9739 9923 9937 9752 9605 9491 9387 9295 9214 9137 9068 8968 8901 8838 8771 8753 8707 8695 8711 8785 8887 8974 9056 9128 9174 9178 9177 9176 9187 9213 9212 9233 1025 226 0687 0574 0473 0433 0392 0357 0341 0334 0342 0311 0293 0359 0478 0487 0389 0318 0293 0261 0218 0207 0322 1332 3783 6079 7364 7943 8210 8359 8453 8488 8500 8499 8509 8528 8540 8587 1026 227 0761 1436 2488 3803 4628 5304 6178 6796 6980 6985 6851 6645 6303 5722 4902 3934 2985 2076 1277 0765 0513 0397 0318 0273 0265 0270 0282 0332 0419 0479 0464 0416 0336 0282 0314 0445 1027 21 0190 0221 0225 0235 0243 0252 0251 0255 0257 0260 0261 0265 0266 0267 0266 0265 0262 0260 0259 0260 0261 0264 0269 0275 0283 0291 0300 0310 0322 0333 0346 0358 0372 0387 0402 0417 1028 22 0477 0502 0537 0596 0626 0632 0634 0630 0633 0630 0630 0630 0629 0628 0625 0619 0614 0610 0605 0604 0604 0607 0611 0618 0627 0638 0650 0662 0676 0688 0700 0715 0731 0746 0761 0783 1029 23 1060 1158 1267 1469 1581 1585 1583 1561 1550 1538 1527 1520 1512 1503 1495 1480 1469 1457 1445 1443 1437 1437 1441 1449 1461 1473 1487 1505 1519 1530 1543 1557 1572 1590 1608 1616 1030 24 1634 1805 2007 2379 2604 2625 2622 2583 2559 2533 2515 2498 2483 2466 2451 2426 2409 2390 2371 2367 2355 2354 2356 2368 2386 2403 2422 2444 2461 2472 2484 2497 2514 2533 2543 2563 1031 25 2226 2463 2769 3329 3668 3699 3692 3636 3594 3559 3528 3502 3479 3456 3434 3399 3375 3351 3324 3317 3302 3299 3301 3318 3343 3368 3394 3421 3441 3452 3462 3475 3492 3513 3524 3541 1032 26 2926 3246 3687 4508 5020 5069 5064 4977 4916 4860 4813 4774 4737 4704 4673 4623 4589 4555 4518 4508 4487 4479 4481 4507 4545 4577 4613 4645 4672 4679 4689 4698 4715 4733 4744 4758 1033 27 3647 4071 4650 5763 6469 6550 6542 6420 6332 6262 6199 6145 6100 6053 6012 5949 5907 5865 5818 5805 5777 5769 5773 5808 5859 5904 5947 5989 6019 6026 6031 6037 6054 6080 6084 6104 1034 28 4455 5003 5758 7250 8236 8359 8360 8207 8089 7999 7918 7843 7779 7717 7661 7577 7520 7464 7406 7391 7351 7340 7350 7405 7484 7553 7619 7677 7717 7725 7728 7730 7747 7772 7777 7798 1035 29 5071 5700 6623 8449 9685 9841 9846 9660 9513 9403 9304 9218 9141 9067 9002 8907 8843 8784 8716 8699 8658 8649 8662 8728 8820 8900 8972 9039 9085 9088 9087 9086 9100 9121 9125 9151 1036 210 0201 0221 0232 0249 0257 0259 0265 0266 0272 0274 0277 0279 0281 0281 0282 0279 0278 0275 0274 0275 0277 0281 0286 0292 0301 0309 0319 0330 0341 0354 0366 0380 0395 0409 0424 0440 1037 211 0289 0301 0320 0345 0362 0363 0371 0369 0375 0376 0379 0381 0382 0383 0382 0378 0376 0373 0370 0371 0373 0376 0381 0388 0397 0407 0417 0430 0443 0455 0467 0483 0499 0516 0530 0544 1038 212 0507 0536 0574 0634 0671 0677 0679 0675 0675 0673 0673 0672 0672 0670 0668 0661 0656 0651 0645 0645 0644 0647 0652 0659 0669 0679 0691 0704 0717 0730 0744 0758 0775 0791 0806 0823 1039 213 0817 0875 0963 1094 1167 1174 1173 1163 1155 1146 1143 1137 1132 1126 1120 1110 1100 1092 1083 1081 1078 1079 1083 1090 1101 1112 1125 1140 1154 1168 1180 1193 1210 1226 1242 1257 1040 214 1086 1191 1309 1517 1631 1636 1633 1611 1599 1589 1578 1570 1561 1554 1545 1529 1518 1507 1494 1491 1486 1486 1490 1499 1511 1525 1540 1557 1572 1584 1598 1612 1628 1646 1657 1678 1041 215 1486 1624 1792 2102 2272 2287 2279 2247 2225 2205 2190 2174 2162 2148 2136 2114 2099 2083 2065 2061 2052 2051 2054 2065 2081 2097 2115 2135 2151 2163 2175 2187 2204 2226 2238 2254 1042 216 1780 1964 2196 2597 2828 2848 2843 2799 2768 2742 2717 2699 2680 2662 2646 2619 2600 2580 2558 2553 2541 2538 2541 2553 2571 2589 2610 2632 2651 2662 2673 2685 2703 2723 2734 2753 1043 217 2052 2266 2544 3033 3327 3353 3345 3291 3255 3223 3193 3171 3149 3127 3108 3075 3052 3029 3003 2997 2983 2979 2982 2996 3021 3042 3068 3092 3113 3122 3135 3145 3166 3184 3193 3214 1044 218 2439 2708 3062 3703 4088 4123 4117 4045 3996 3953 3915 3883 3855 3827 3803 3764 3737 3709 3679 3671 3654 3650 3652 3672 3700 3725 3752 3782 3804 3814 3823 3837 3854 3874 3884 3906 1045 219 2825 3150 3552 4329 4798 4842 4837 4754 4694 4642 4598 4559 4525 4492 4461 4414 4381 4347 4312 4303 4282 4275 4279 4303 4339 4372 4406 4439 4463 4473 4482 4491 4506 4529 4535 4559 1046 220 3212 3581 4080 5019 5599 5662 5656 5557 5482 5420 5367 5318 5278 5236 5201 5145 5108 5070 5028 5016 4992 4983 4988 5016 5060 5095 5135 5173 5200 5211 5215 5225 5241 5263 5268 5289 1047 221 3578 4002 4581 5700 6421 6504 6497 6378 6290 6217 6154 6097 6049 6002 5959 5896 5851 5810 5763 5750 5720 5710 5715 5751 5802 5847 5894 5937 5970 5977 5981 5989 6004 6028 6033 6052 1048 222 3947 4437 5086 6357 7181 7274 7273 7140 7043 6961 6892 6829 6775 6723 6676 6604 6554 6508 6456 6444 6413 6403 6409 6453 6516 6571 6626 6675 6711 6716 6722 6726 6742 6768 6771 6791 1049 223 4412 4953 5713 7222 8230 8355 8359 8203 8083 7991 7908 7834 7770 7708 7652 7570 7514 7460 7401 7386 7351 7339 7349 7404 7481 7545 7611 7667 7708 7714 7718 7720 7735 7761 7765 7784 1050 224 4702 5297 6131 7782 8886 9027 9033 8864 8733 8634 8545 8465 8391 8325 8264 8173 8112 8056 7993 7978 7938 7925 7940 8001 8088 8163 8233 8297 8343 8353 8351 8354 8367 8393 8395 8417 1051 225 5002 5662 6582 8450 9727 9901 9908 9713 9563 9451 9348 9258 9178 9103 9034 8934 8872 8810 8742 8726 8686 8675 8690 8759 8855 8935 9013 9082 9128 9129 9130 9125 9137 9161 9165 9179 1052 226 1307 1151 0974 0828 0672 0554 0485 0487 0585 0624 0691 1231 2918 5411 7027 7573 7769 7825 7767 7702 7788 8050 8178 8268 8365 8450 8530 8603 8656 8665 8667 8662 8674 8696 8701 8729 1053 227 0384 0643 0970 1366 1615 1842 2101 2170 1991 1697 1393 1129 0894 0659 0455 0330 0259 0185 0130 0128 0169 0266 0351 0352 0339 0333 0335 0373 0452 0508 0493 0450 0372 0315 0339 0461 1054 21 0210 0225 0221 0234 0244 0250 0245 0251 0255 0256 0259 0261 0262 0263 0262 0260 0258 0256 0255 0256 0257 0260 0264 0270 0277 0285 0294 0304 0315 0325 0337 0350 0363 0376 0395 0407 1055 22 0428 0487 0517 0577 0612 0616 0616 0615 0617 0615 0613 0614 0613 0612 0609 0603 0599 0595 0590 0589 0589 0592 0596 0604 0612 0620 0633 0645 0657 0670 0682 0696 0712 0730 0745 0759 1056 23 1040 1118 1227 1417 1520 1529 1525 1503 1492 1480 1470 1462 1455 1446 1438 1424 1413 1402 1390 1388 1383 1382 1385 1393 1404 1416 1431 1446 1460 1471 1483 1495 1512 1529 1543 1562 1057 24 1628 1807 2012 2380 2584 2601 2597 2553 2529 2504 2484 2467 2451 2434 2419 2395 2377 2358 2339 2334 2324 2322 2323 2334 2351 2367 2387 2407 2425 2435 2446 2458 2474 2491 2505 2523 1058 25 2236 2488 2788 3343 3680 3704 3700 3641 3597 3559 3526 3499 3475 3451 3429 3394 3370 3344 3316 3311 3294 3290 3292 3310 3335 3358 3382 3409 3430 3438 3450 3460 3476 3498 3508 3525 1059 26 2920 3253 3685 4506 5005 5055 5044 4956 4893 4838 4789 4748 4712 4677 4648 4599 4567 4533 4496 4486 4465 4458 4460 4484 4519 4551 4585 4617 4642 4651 4659 4669 4684 4707 4713 4732 1060 27 3617 4047 4628 5749 6472 6553 6551 6433 6343 6270 6206 6150 6102 6055 6014 5950 5906 5864 5818 5806 5776 5765 5771 5807 5857 5903 5948 5992 6023 6028 6034 6040 6057 6078 6085 6100 1061 28 4437 4985 5750 7264 8283 8412 8410 8255 8133 8037 7952 7877 7814 7755 7701 7621 7567 7515 7459 7445 7409 7399 7408 7457 7529 7589 7650 7706 7745 7749 7751 7752 7767 7795 7799 7818 1062 29 5049 5693 6606 8444 9702 9868 9875 9686 9538 9424 9325 9235 9158 9083 9021 8925 8862 8802 8734 8719 8679 8667 8680 8746 8838 8918 8992 9056 9101 9102 9104 9101 9112 9138 9143 9161 1063 210 0205 0222 0226 0239 0245 0253 0255 0257 0261 0263 0265 0268 0269 0270 0269 0267 0265 0263 0261 0262 0264 0267 0271 0277 0285 0293 0301 0312 0323 0335 0346 0360 0375 0389 0404 0418 1064 211 0290 0288 0308 0330 0345 0347 0354 0352 0357 0358 0360 0363 0364 0364 0364 0359 0358 0355 0352 0353 0354 0357 0362 0369 0377 0387 0397 0409 0421 0433 0445 0461 0476 0492 0505 0523 1065 212 0478 0519 0563 0625 0661 0666 0668 0662 0663 0661 0660 0659 0657 0655 0652 0645 0641 0636 0630 0630 0629 0631 0636 0642 0652 0661 0673 0686 0698 0710 0722 0737 0754 0769 0784 0800 1066 213 0807 0861 0934 1068 1134 1143 1140 1127 1120 1112 1105 1101 1096 1090 1084 1073 1063 1056 1047 1044 1042 1042 1045 1052 1062 1073 1085 1099 1112 1124 1135 1148 1164 1180 1195 1208 1067 214 1072 1175 1300 1505 1618 1628 1621 1601 1587 1574 1564 1555 1545 1536 1528 1513 1501 1490 1479 1475 1470 1469 1472 1480 1493 1505 1519 1535 1550 1560 1573 1587 1602 1621 1633 1651 1068 215 1437 1562 1728 2022 2183 2195 2190 2157 2138 2119 2101 2089 2076 2063 2051 2030 2016 2000 1983 1980 1971 1971 1973 1982 1998 2012 2028 2049 2064 2075 2087 2099 2114 2134 2148 2164 1069 216 1749 1914 2138 2534 2758 2779 2774 2730 2700 2674 2651 2633 2615 2598 2582 2556 2536 2517 2496 2491 2479 2476 2478 2491 2508 2526 2546 2567 2584 2596 2606 2618 2634 2652 2666 2680 1070 217 2048 2248 2519 3009 3299 3322 3315 3262 3226 3191 3163 3137 3117 3095 3075 3044 3021 2998 2973 2967 2951 2949 2951 2967 2989 3010 3033 3056 3076 3086 3098 3107 3124 3143 3154 3177 1071 218 2406 2676 3008 3638 4018 4053 4048 3981 3931 3891 3852 3821 3792 3766 3740 3700 3674 3646 3615 3608 3590 3585 3586 3606 3634 3660 3688 3717 3739 3751 3760 3769 3787 3808 3817 3832 1072 219 2802 3122 3540 4323 4806 4857 4849 4768 4705 4653 4607 4567 4533 4499 4468 4422 4391 4358 4321 4312 4292 4286 4287 4309 4344 4376 4407 4440 4466 4476 4483 4492 4508 4529 4540 4561 1073 220 3202 3569 4063 5022 5620 5689 5682 5581 5503 5440 5383 5335 5295 5254 5219 5163 5125 5087 5046 5036 5011 5002 5006 5035 5078 5116 5152 5191 5219 5226 5235 5240 5256 5278 5285 5304 1074 221 3589 4001 4568 5677 6392 6475 6472 6354 6266 6195 6132 6077 6028 5981 5941 5877 5834 5792 5746 5732 5706 5697 5701 5736 5787 5832 5876 5919 5952 5958 5962 5969 5985 6008 6013 6031 1075 222 3928 4393 5051 6345 7203 7310 7308 7170 7067 6983 6910 6847 6791 6739 6692 6622 6574 6528 6476 6465 6433 6423 6429 6469 6527 6580 6633 6680 6713 6720 6724 6730 6743 6766 6766 6786 1076 223 4417 4953 5714 7207 8211 8339 8341 8189 8066 7976 7890 7815 7752 7690 7633 7549 7494 7440 7380 7364 7328 7317 7326 7381 7459 7527 7595 7651 7694 7700 7703 7704 7723 7747 7751 7775 1077 224 4667 5257 6095 7768 8901 9046 9049 8875 8743 8642 8549 8470 8400 8333 8273 8186 8129 8075 8013 7999 7964 7955 7970 8026 8110 8178 8247 8305 8347 8351 8353 8356 8370 8396 8398 8417 1078 225 5007 5651 6571 8429 9718 9893 9902 9712 9564 9451 9348 9257 9179 9104 9038 8938 8873 8814 8746 8730 8689 8677 8694 8762 8857 8940 9017 9084 9131 9135 9132 9130 9145 9167 9169 9191 1079 226 0301 0490 0645 0706 0640 0593 0569 0603 0718 0760 0823 1323 2658 4041 4212 3572 2761 1939 1207 0741 0515 0410 0337 0291 0279 0280 0288 0331 0411 0469 0455 0412 0335 0283 0307 0430 1080 227 1529 1464 1460 1676 1864 1972 2073 1992 1729 1388 1069 0813 0605 0423 0287 0230 0218 0197 0173 0196 0324 1286 3710 6036 7360 7959 8232 8381 8474 8510 8524 8531 8541 8559 8572 8613 ] def %END RX0F } if %ypaper=2 %***************************************************************************** %END spectral reflection data, cmyn6*, 1080 colours, offset A,B,L,G, printer P %END 'QI84'OUTLIN1Y2_PK8320.PS %END_OUTLIN1Y_PK8320********************************************************** /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 /A4querF {598 0 translate 90 rotate} 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 /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 %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 %%EndProlog %*********************************************************** %%BeginPageSetup /#copies 1 def %A4querF 0.5 0.5 scale /pgsave save def %%EndPageSetup /SS$ [(G) (E) (S) (F) (I) (J) (M)] def /SC$ [(N) (F) (S) (D) (T) (E) (C)] def /SX$ [(0) (1) (2) (3) (4) (5) (6) (7) (8) (9) (A) (B) (C) (D) (E) (F)] def /SY$ [(0) (1) (2) (3) (4) (5) (6) (7) (8) (9) (A) (B) (C) (D) (E) (F)] def % 0 1 2 3 4 5 % 6 7 8 /EX$ [(1.TXT /.PS) (B.BMP /.PS) (G.GIF /.PS) (H.HTM /.PS) (I.HTM /.PS) (J.JPE /.PS) (P.PDF /.PS) (T.TIF /.PS)] def /EY$ [(1.DAT) (B.DAT) (G.DAT) (H.DAT) (I.DAT) (J.DAT) (P.DAT) (T.DAT)] def %******************************************************************* /lanind1f 04 def /lanind2f 04 def /laninddf 01 def /colorm1f 00 def /colorm2f 00 def /colormdf 01 def /deintp1f 00 def /deintp2f 00 def /deintpdf 01 def /xcolor1f 03 def /xcolor2f 03 def /xcolordf 01 def /xchart1f 00 def /xchart2f 00 def /xchartdf 01 def %0-1,2-5,6-16,17-32 /xchart3f 01 def /xchart4f 10 def /xchart5f 01 def /pchart1f 03 def /pchart2f 03 def /pchartdf 01 def %=3 for sRGB, Lr=0 /colsep1f 00 def /colsep2f 00 def /colsepdf 01 def /pmetam1f 00 def /pmetam2f 00 def /pmetamdf 01 def %/lanindf lanind1f def % /lanindf lanind1f def %lanind1f laninddf lanind2f {/lanindf exch def %/colormf colorm1f def % colorm1f colormdf colorm2f {/colormf exch 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 %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 /xchart3PXX xchart3 15 add 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 %************************************************************* xchart xchart3 lt {%xchart=xchart3 for CM %BEG special for ColorInterpolation /xchartj pchart def %sRGB, Lr=0%, pchart=3 /hei -1 def /heM -1 def /ausz 8 def /xchartt (F) def %necessary PROC_LAB_IOF %PROC_RX0F_IOF PROC_COLSEP_IOF colorm 1 eq {PROC_COLINT_IOF} if %PROC_COLINT_IOF %PROC_SPEC_IOF %Colordata_sRGB_F %new %setcolortrans_F %new proc_LAB729a_to_LAB*LabCh64M proc_LAB*LabCh64M_to_tab362_dy %END special for ColorInterpolation %********************************************************* } ifelse %xchart>=xchart3 for CM xchart xchart3PXX le {72 90 translate} {72 56 translate} ifelse 0.01 MM dup scale %0 0 moveto 24600 0 rlineto 0 17220 rlineto % -24600 0 rlineto closepath stroke 200 -180 moveto 180 /Times-ISOL1 FS lanindf cvishow (-) show colormf cvishow deintpf cvishow xcolorf cvishow xchartf cvishow pchartf cvishow colsepf cvishow (-F) show pmetamf cvishow grestore gsave /GSS$ SS$ lanind get def /GSC$ SC$ colorm get def /GSX$ SX$ xcolor xcolor 16 idiv 16 mul sub get def /GSY$ SY$ xchart xchart 16 idiv 16 mul sub get def /GEX$ EX$ 0 get def /GEY$ EY$ 0 get def %01 %02 %03 %04 %05 %06 %07 %08 %09 %10 %11 %12 %13 %14 xchart xchart3PXX le {%xchart<=xchart3PXX %gsave BeginEPSF 28 MM 197 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto 1 1 scale -77 -91 translate %%BeginDocument: Bild 10 %line 329 %%EndDocument EndEPSF grestore gsave BeginEPSF 28 MM 152 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto 1 1 scale -77 -91 translate %%BeginDocument: Bild 11 %line 339 %%EndDocument EndEPSF grestore gsave BeginEPSF 86 MM 152 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 12 %line 349 %%EndDocument EndEPSF grestore gsave BeginEPSF 28 MM 108 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 13 %line 359 %%EndDocument EndEPSF grestore gsave BeginEPSF 86 MM 108 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 14 %line 369 %%EndDocument EndEPSF grestore gsave BeginEPSF 28 MM 064 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 15 %line 379 %%EndDocument EndEPSF grestore gsave BeginEPSF 86 MM 064 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 16 %line 389 %%EndDocument EndEPSF grestore gsave BeginEPSF /xc1 16 def /yc1 12 def /xt 1 def xchart 1 eq {/xt 1 def} if 28 MM 3 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 QI840-7N.EPS %%BoundingBox: 70 82 786 582 %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/QI84/) /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:2012030112000) /ModDate (D:2012030112000) /DOCINFO pdfmark07 [ /View [ /FitB ] /DOCVIEW pdfmark07 %END PDFDE011 %line 20 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def /A4quer {598 0 translate 90 rotate} 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 /Courier findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /Courier-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 /TK0 {250 /Times-ISOL1 FS} bind def /TM0 {300 /Times-ISOL1 FS} bind def /TG0 {350 /Times-ISOL1 FS} bind def /TIK0 {250 /TimesI-ISOL1 FS} bind def /TIM0 {300 /TimesI-ISOL1 FS} bind def /TIG0 {350 /TimesI-ISOL1 FS} bind def /TBK0 {250 /TimesB-ISOL1 FS} bind def /TBM0 {300 /TimesB-ISOL1 FS} bind def /TBG0 {350 /TimesB-ISOL1 FS} bind def /TBIK0 {250 /TimesBI-ISOL1 FS} bind def /TBIM0 {300 /TimesBI-ISOL1 FS} bind def /TBIG0 {350 /TimesBI-ISOL1 FS} bind def /CKK0 {200 /Courier-ISOL1 FS} bind def /CK0 {250 /Courier-ISOL1 FS} bind def /CM0 {300 /Courier-ISOL1 FS} bind def /CG0 {350 /Courier-ISOL1 FS} bind def /CBKK0 {200 /CourierB-ISOL1 FS} bind def /CBK0 {250 /CourierB-ISOL1 FS} bind def /CBM0 {300 /CourierB-ISOL1 FS} bind def /CBG0 {350 /CourierB-ISOL1 FS} bind def /TV1 {160 /Times-ISOL1 FS} bind def /TS1 {200 /Times-ISOL1 FS} bind def /TK1 {250 /Times-ISOL1 FS} bind def /TM1 {300 /Times-ISOL1 FS} bind def /TG1 {350 /Times-ISOL1 FS} bind def /TIV1 {160 /TimesI-ISOL1 FS} bind def /TIS1 {200 /TimesI-ISOL1 FS} bind def /TIK1 {250 /TimesI-ISOL1 FS} bind def /TIM1 {300 /TimesI-ISOL1 FS} bind def /TIG1 {350 /TimesI-ISOL1 FS} bind def /TBV1 {160 /TimesB-ISOL1 FS} bind def /TBS1 {200 /TimesB-ISOL1 FS} bind def /TBK1 {250 /TimesB-ISOL1 FS} bind def /TBM1 {300 /TimesB-ISOL1 FS} bind def /TBG1 {350 /TimesB-ISOL1 FS} bind def /TBIV1 {080 /TimesBI-ISOL1 FS} bind def /TBIS1 {100 /TimesBI-ISOL1 FS} bind def /TBIK1 {250 /TimesBI-ISOL1 FS} bind def /TBIM1 {300 /TimesBI-ISOL1 FS} bind def /TBIG1 {350 /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 /CBKKK {160 /CourierB-ISOL1 FS} bind def /TV {080 /Times-ISOL1 FS} bind def /TS {100 /Times-ISOL1 FS} bind def /TK {125 /Times-ISOL1 FS} bind def /TM {140 /Times-ISOL1 FS} bind def /TG {175 /Times-ISOL1 FS} bind def /TIV {080 /TimesI-ISOL1 FS} bind def /TIS {100 /TimesI-ISOL1 FS} bind def /TIK {125 /TimesI-ISOL1 FS} bind def /TIM {140 /TimesI-ISOL1 FS} bind def /TIG {175 /TimesI-ISOL1 FS} bind def /TBV {080 /TimesB-ISOL1 FS} bind def /TBS {100 /TimesB-ISOL1 FS} bind def /TBK {125 /TimesB-ISOL1 FS} bind def /TBM {140 /TimesB-ISOL1 FS} bind def /TBG {175 /TimesB-ISOL1 FS} bind def /TBIV {080 /TimesBI-ISOL1 FS} bind def /TBIS {100 /TimesBI-ISOL1 FS} bind def /TBIK {125 /TimesBI-ISOL1 FS} bind def /TBIM {140 /TimesBI-ISOL1 FS} bind def /TBIG {175 /TimesBI-ISOL1 FS} bind def /rec %x, y width heigth {/heigth exch def /width exch def moveto width 0 rlineto 0 heigth rlineto width neg 0 rlineto closepath } bind def /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 %************************************************************ /RGB54CR_L 162 array def %54x3=162 /RGB54CR_L [%54 colours of colour rendering (CR) test chart 1.000 0.000 0.000 %01 R00Yd %RGB54CR 1.000 0.250 0.000 %02 R25Yd 1.000 0.500 0.000 %03 R50Yd 1.000 0.750 0.000 %04 R75Yd 1.000 1.000 0.000 %05 Y00Gd 0.750 1.000 0.000 %06 Y25Gd 0.500 1.000 0.000 %07 Y50Gd 0.250 1.000 0.000 %08 Y75Gd 0.000 1.000 0.000 %09 G00Bd = 10 0.000 1.000 0.000 %10 G00Bd 0.000 1.000 0.500 %11 G25Bd 0.000 1.000 1.000 %12 G50Bd 0.000 0.500 1.000 %13 G75Bd 0.000 0.000 1.000 %14 B00Rd 0.500 0.000 1.000 %15 B25Rd 1.000 0.000 1.000 %16 B50Rd 1.000 0.000 0.500 %17 B75Rd 1.000 0.000 0.000 %18 R00Yd = 01 1.000 0.500 0.500 %19 R00Yd %lcolors 1.000 0.750 0.500 %20 R50Yd 1.000 1.000 0.500 %21 Y00Gd 0.750 1.000 0.500 %22 Y50Gd 0.500 1.000 0.500 %23 G00Bd 0.500 1.000 1.000 %24 G50Bd 0.500 0.500 1.000 %25 B00Rd 1.000 0.500 1.000 %26 B50Rd 1.000 0.500 0.500 %27 R00Yd = 19 0.750 0.250 0.250 %28 R00Yd %zcolors 0.750 0.500 0.250 %29 R50Yd 0.750 0.750 0.250 %30 Y00Gd 0.500 0.750 0.250 %31 Y50Gd 0.250 0.750 0.250 %32 G00Bd 0.250 0.750 0.750 %33 G50Bd 0.250 0.250 0.750 %34 B00Rd 0.750 0.250 0.750 %35 B50Rd 0.750 0.250 0.250 %36 R00Yd = 28 0.500 0.000 0.000 %37 R00Yd %dcolors 0.500 0.250 0.000 %38 R50Yd 0.500 0.500 0.000 %38 Y00Gd 0.250 0.500 0.000 %40 Y50Gd 0.000 0.500 0.000 %41 G00Bd 0.000 0.500 0.500 %42 G50Bd 0.000 0.000 0.500 %43 B00Rd 0.500 0.000 0.500 %44 B50Rd 0.500 0.000 0.000 %45 R00Yd = 37 0.000 0.000 0.000 %46 N00Wd %ncolors 0.125 0.125 0.125 %47 N13Wd 0.250 0.250 0.250 %48 N25Md 0.375 0.375 0.375 %49 N38Wd 0.500 0.500 0.500 %50 N50Wd 0.625 0.625 0.625 %51 N63Wd 0.750 0.750 0.750 %52 N75Wd 0.875 0.875 0.875 %53 N88Wd 1.000 1.000 1.000 %54 W00Nd = W ] def %54 colours of colour rendering test chart /RGB54CRt_L 54 array def /RGB54CRt_L [%high chromatic series: %relative hue h*, brillance i*, and chroma c*, range 0 ... 100 (R00Y_100_100) (R25Y_100_100) (R50Y_100_100) (R75Y_100_100) (Y00G_100_100) (Y25G_100_100) (Y50G_100_100) (Y75G_100_100) (G00B_100_100) (G00B_100_100) (G25B_100_100) (G50B_100_100) (G75B_100_100) (B00R_100_100) (B25R_100_100) (B50R_100_100) (B75R_100_100) (R00Y_100_100) %whitetish series (R00Y_100_050) (R50Y_100_050) (Y00G_100_050) (Y50G_100_050) (G00B_100_050) (G50B_100_050) (B00R_100_050) (B50R_100_050) (R00Y_100_050) %grayish series (R00Y_075_050) (R50Y_075_050) (Y00G_075_050) (Y50G_075_050) (G00B_075_050) (G50B_075_050) (B00R_075_050) (B50R_075_050) (R00Y_075_050) %blackish series (R00Y_050_050) (R50Y_050_050) (Y00G_050_050) (Y50G_050_050) (G00B_050_050) (G50B_050_050) (B00R_050_050) (B50R_050_050) (R00Y_050_050) %gray series (NW_000) (NW_013) (NW_025) (NW_038) (NW_050) (NW_063) (NW_075) (NW_088) (NW_100) ] def /RGB54CM_L 162 array def %54x3=162 /RGB54CM_L [%54 colours of colour rendering metamers (CM) test chart 0.750 0.250 0.250 %01 R00Yd %RGB54CM, zcolors 0.750 0.500 0.250 %02 R50Yd 0.750 0.750 0.250 %03 Y00Gd 0.500 0.750 0.250 %04 Y50Gd 0.250 0.750 0.250 %05 G00Bd 0.250 0.750 0.750 %06 G50Bd 0.250 0.250 0.750 %07 B00Rd 0.750 0.250 0.750 %08 B50Rd 0.750 0.250 0.250 %09 R00Yd = 28 0.750 0.250 0.250 %10 R00Yd %RGB54CM, zcolors 0.750 0.500 0.250 %11 R50Yd 0.750 0.750 0.250 %12 Y00Gd 0.500 0.750 0.250 %13 Y50Gd 0.250 0.750 0.250 %14 G00Bd 0.250 0.750 0.750 %15 G50Bd 0.250 0.250 0.750 %16 B00Rd 0.750 0.250 0.750 %17 B50Rd 0.750 0.250 0.250 %18 R00Yd = 28 0.750 0.250 0.250 %19 R00Yd %RGB54CM, zcolors 0.750 0.500 0.250 %20 R50Yd 0.750 0.750 0.250 %21 Y00Gd 0.500 0.750 0.250 %22 Y50Gd 0.250 0.750 0.250 %23 G00Bd 0.250 0.750 0.750 %24 G50Bd 0.250 0.250 0.750 %25 B00Rd 0.750 0.250 0.750 %26 B50Rd 0.750 0.250 0.250 %27 R00Yd = 28 0.000 0.000 0.000 %28 N00Wd %ncolors 0.125 0.125 0.125 %29 N13Wd 0.250 0.250 0.250 %30 N25Md 0.375 0.375 0.375 %31 N38Wd 0.500 0.500 0.500 %32 N50Wd 0.625 0.625 0.625 %33 N63Wd 0.750 0.750 0.750 %34 N75Wd 0.875 0.875 0.875 %35 N88Wd 1.000 1.000 1.000 %36 W00Nd = W 0.000 0.000 0.000 %37 N00Wd %ncolors 0.125 0.125 0.125 %38 N13Wd 0.250 0.250 0.250 %39 N25Md 0.375 0.375 0.375 %40 N38Wd 0.500 0.500 0.500 %41 N50Wd 0.625 0.625 0.625 %42 N63Wd 0.750 0.750 0.750 %43 N75Wd 0.875 0.875 0.875 %44 N88Wd 1.000 1.000 1.000 %45 W00Nd = W 0.000 0.000 0.000 %46 N00Wd %ncolors 0.125 0.125 0.125 %47 N13Wd 0.250 0.250 0.250 %48 N25Md 0.375 0.375 0.375 %49 N38Wd 0.500 0.500 0.500 %50 N50Wd 0.625 0.625 0.625 %51 N63Wd 0.750 0.750 0.750 %52 N75Wd 0.875 0.875 0.875 %53 N88Wd 1.000 1.000 1.000 %54 W00Nd = W ] def %54 colours of colour rendering test chart /RGB54CMt_L 54 array def /RGB54CMt_L [%3 times chromatic grayish series, 3 times gray series %relative hue h*, brillance i*, and chroma c*, range 0 ... 100 %grayish series (R00Y_075_050) (R50Y_075_050) (Y00G_075_050) (Y50G_075_050) (G00B_075_050) (G50B_075_050) (B00R_075_050) (B50R_075_050) (R00Y_075_050) %grayish series (R00Y_075_050) (R50Y_075_050) (Y00G_075_050) (Y50G_075_050) (G00B_075_050) (G50B_075_050) (B00R_075_050) (B50R_075_050) (R00Y_075_050) %grayish series (R00Y_075_050) (R50Y_075_050) (Y00G_075_050) (Y50G_075_050) (G00B_075_050) (G50B_075_050) (B00R_075_050) (B50R_075_050) (R00Y_075_050) %gray series (NW_000) (NW_013) (NW_025) (NW_038) (NW_050) (NW_063) (NW_075) (NW_088) (NW_100) %gray series (NW_000) (NW_013) (NW_025) (NW_038) (NW_050) (NW_063) (NW_075) (NW_088) (NW_100) %gray series (NW_000) (NW_013) (NW_025) (NW_038) (NW_050) (NW_063) (NW_075) (NW_088) (NW_100) ] def %****************************************************** /F49col00 147 array def %48+1x3 /F49col00 [%Hue circle no. 0 to 47+1; hue circle de 1.000 0.000 0.000 %00 r00ye r00yd %standard e or d interpretation 1.000 0.125 0.000 %01 r12ye r12yd 1.000 0.250 0.000 %02 r25ye r25yd 1.000 0.375 0.000 %03 r37ye r37yd 1.000 0.500 0.000 %04 r50ye r50yd 1.000 0.625 0.000 %05 r62ye r62yd 1.000 0.750 0.000 %06 r75ye r75yd 1.000 0.875 0.000 %07 r87ye r87yd 1.000 1.000 0.000 %08 y00ge y00gd 0.875 1.000 0.000 %09 y12ge y12gd 0.750 1.000 0.000 %10 y25ge y25gd 0.625 1.000 0.000 %11 y37ge y37gd 0.500 1.000 0.000 %12 y50ge y50gd 0.375 1.000 0.000 %13 y62ge y62gd 0.250 1.000 0.000 %14 y75ge y75gd 0.125 1.000 0.000 %15 y87ge y87gd 0.000 1.000 0.000 %16 g00be g00cd 0.000 1.000 0.125 %17 g06be g12cd 0.000 1.000 0.250 %18 g12be g25cd 0.000 1.000 0.375 %19 g18be g37cd 0.000 1.000 0.500 %20 g25be g50cd 0.000 1.000 0.625 %21 g31be g62cd 0.000 1.000 0.750 %22 g37be g75cd 0.000 1.000 0.875 %23 g43be g87cd 0.000 1.000 1.000 %24 g50be c00bd 0.000 0.875 1.000 %25 g56be c12bd 0.000 0.750 1.000 %26 g62be c25bd 0.000 0.625 1.000 %27 g68be c37bd 0.000 0.500 1.000 %28 g75be c50bd 0.000 0.375 1.000 %29 g81be c62bd 0.000 0.250 1.000 %30 g87be c75bd 0.000 0.125 1.000 %31 g93be c87bd 0.000 0.000 1.000 %32 b00re b00md 0.125 0.000 1.000 %33 b06re b12md 0.250 0.000 1.000 %34 b12re b25md 0.375 0.000 1.000 %35 b18re b37md 0.500 0.000 1.000 %36 b24re b50md 0.625 0.000 1.000 %37 b31re b67md 0.750 0.000 1.000 %38 b37re b75md 0.875 0.000 1.000 %39 b43re b87md 1.000 0.000 1.000 %40 b50re m00rd 1.000 0.000 0.875 %41 b56re m12rd 1.000 0.000 0.750 %42 b62re m25rd 1.000 0.000 0.625 %43 b68re m37rd 1.000 0.000 0.500 %44 b75re m50rd 1.000 0.000 0.375 %45 b81re m62rd 1.000 0.000 0.250 %46 b87re m75rd 1.000 0.000 0.125 %47 b93re m87rd 1.000 0.000 0.000 %48 r00ye r00yd no. 0 ] def /cvishow {cvi 6 string cvs show} def /cvsshow1 {10 mul cvi 0.1 mul 7 string cvs show ( ) show} def /cvsshow2 {100 mul cvi 0.01 mul 7 string cvs show ( ) show} def /cvsshow3 {1000 mul cvi 0.001 mul 7 string cvs show ( ) show} def /tfn {0.00 0.00 0.00 setrgbcolor} bind def /tfd {0.25 0.25 0.25 setrgbcolor} bind def /tfz {0.50 0.50 0.50 setrgbcolor} bind def /tfh {0.75 0.75 0.75 setrgbcolor} bind def /tfw {1.00 1.00 1.00 setrgbcolor} 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 /rem %x0, y0 width heigth {/heigth exch def /width exch def /y0 exch def /x0 exch def x0 width 0.5 mul add y0 heigth 0.5 mul add moveto width 0 rlineto 0 heigth rlineto width neg 0 rlineto closepath } bind def /outrecfi { %x y width heigth c m y k rec fill} bind def /outrecst { %x y width heigth c m y k rec stroke} bind def %******************************************************************* /proc_rgb_dyF_LAB*'dyF {%BEG proc_rgb_dyF_LAB*'dyF /R01000 r_dyF 1000 mul def /G01000 g_dyF 1000 mul def /B01000 b_dyF 1000 mul def R01000 0.04045 le %equations of IEC 61966-2-1:2003 {/RsRGB R01000 12.92 div def} {/RsRGB R01000 0.001 mul 0.055 add 1.055 div 2.4 exp def} ifelse G01000 0.04045 le {/GsRGB G01000 12.92 div def} {/GsRGB G01000 0.001 mul 0.055 add 1.055 div 2.4 exp def} ifelse B01000 0.04045 le {/BsRGB B01000 12.92 div def} {/BsRGB B01000 0.001 mul 0.055 add 1.055 div 2.4 exp def} ifelse /X*'dyF 0.4124 RsRGB mul 0.3576 GsRGB mul add 0.1805 BsRGB mul add 88.59 mul def /Y*'dyF 0.2126 RsRGB mul 0.7152 GsRGB mul add 0.0722 BsRGB mul add 88.59 mul def /Z*'dyF 0.0193 RsRGB mul 0.1192 GsRGB mul add 0.9505 BsRGB mul add 88.59 mul def % achromatic (D65) colours /XLWD65100 95.04 def /YLWD65100 100.00 def /ZLWD65100 108.88 def /XQ X*'dyF XLWD65100 div def /YQ Y*'dyF YLWD65100 div def /ZQ Z*'dyF ZLWD65100 div def XQ 0 lt {/XQ 0.00000001 def} if YQ 0 lt {/YQ 0.00000001 def} if ZQ 0 lt {/ZQ 0.00000001 def} if /L*'dyF YQ 0.008856 lt {903.3 YQ mul} {YQ 0.33333333 exp 116 mul 16 sub} ifelse def /a*'dyF XQ 0.008856 lt {7.787 XQ mul 16 116 div add} {XQ 0.33333333 exp} ifelse YQ 0.008856 lt {7.787 YQ mul 16 116 div add} {YQ 0.33333333 exp} ifelse sub 500 mul def /b*'dyF YQ 0.008856 lt {7.787 YQ mul 16 116 div add} {YQ 0.33333333 exp} ifelse ZQ 0.008856 lt {7.787 ZQ mul 16 116 div add} {ZQ 0.33333333 exp} ifelse sub 200 mul def /C*'dyF a*'dyF dup mul b*'dyF dup mul add 0.0001 add sqrt def /h*'dyF b*'dyF a*'dyF 0.0001 add atan def } bind def %END proc_rgb_dyF_LAB*'dyF %******************************************************** /proc_rgb'*dyF_LAB'*dyF {%BEG proc_rgb'*dyF_LAB'*dyF /R01000 r'*dyF 1000 mul def /G01000 g'*dyF 1000 mul def /B01000 b'*dyF 1000 mul def R01000 0.04045 le %equations of IEC 61966-2-1:2003 {/RsRGB R01000 12.92 div def} {/RsRGB R01000 0.001 mul 0.055 add 1.055 div 2.4 exp def} ifelse G01000 0.04045 le {/GsRGB G01000 12.92 div def} {/GsRGB G01000 0.001 mul 0.055 add 1.055 div 2.4 exp def} ifelse B01000 0.04045 le {/BsRGB B01000 12.92 div def} {/BsRGB B01000 0.001 mul 0.055 add 1.055 div 2.4 exp def} ifelse /X'*dyF 0.4124 RsRGB mul 0.3576 GsRGB mul add 0.1805 BsRGB mul add 88.59 mul def /Y'*dyF 0.2126 RsRGB mul 0.7152 GsRGB mul add 0.0722 BsRGB mul add 88.59 mul def /Z'*dyF 0.0193 RsRGB mul 0.1192 GsRGB mul add 0.9505 BsRGB mul add 88.59 mul def % achromatic (D65) colours /XLWD65100 95.04 def /YLWD65100 100.00 def /ZLWD65100 108.88 def /XQ X'*dyF XLWD65100 div def /YQ Y'*dyF YLWD65100 div def /ZQ Z'*dyF ZLWD65100 div def XQ 0 lt {/XQ 0.00000001 def} if YQ 0 lt {/YQ 0.00000001 def} if ZQ 0 lt {/ZQ 0.00000001 def} if /L'*dyF YQ 0.008856 lt {903.3 YQ mul} {YQ 0.33333333 exp 116 mul 16 sub} ifelse def /a'*dyF XQ 0.008856 lt {7.787 XQ mul 16 116 div add} {XQ 0.33333333 exp} ifelse YQ 0.008856 lt {7.787 YQ mul 16 116 div add} {YQ 0.33333333 exp} ifelse sub 500 mul def /b'*dyF YQ 0.008856 lt {7.787 YQ mul 16 116 div add} {YQ 0.33333333 exp} ifelse ZQ 0.008856 lt {7.787 ZQ mul 16 116 div add} {ZQ 0.33333333 exp} ifelse sub 200 mul def /C'*dyF a'*dyF dup mul b'*dyF dup mul add 0.0001 add sqrt def /h'*dyF b'*dyF a'*dyF 0.0001 add atan def } bind def %END proc_rgb'*dyF_LAB'*dyF %************************************************************* /proc_LAB*ioL {%BEG Procedure proc_LAB*ioL %requires ISRL*ioL=0,1,3 /RJGBLAB* 12 array def /RJGBLAB*[ 39.92 58.74 27.99 % R CIE No.09 elementary colours in LAB, D65 81.26 -2.89 71.56 % J CIE No.10 52.23 -42.42 13.60 % G CIE No.11 30.57 1.41 -46.47 % B CIE No.12 ] def /LAB* 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) (TLS00) (FRS06) (TSL18) (NLS00) (NLS18) (SRS18) (TLS70) (TLS00) (TLS06) (TLS11) (TLS18) (TLS27) (TLS38) (TLS52) (TLS70) (OLS00) (OLS06) (OLS11) (OLS18) (OLS27) (OLS38) (OLS52) (OLS70)] def %FRS09_92.DAT: measured data are not dapated here; 55 lines, 141:195 ISRL*ioL 0 eq { %ISRL*ioL=0 /LAB*00 [%D=Device OYLCVMO+NW %for Offset Reflective System (ORS18) 47.94 65.31 52.07 %O 0 90.37 -11.16 96.17 %Y 1 50.90 -62.97 36.71 %L 2 58.62 -30.63 -42.75 %C 3 %see TABle 1 of ISO/IEC 15775:1999-12 25.72 31.45 -44.36 %V 4 48.13 75.20 -6.80 %M 5 18.01 0.50 -0.47 %N 7 95.41 -0.99 4.76 %W 8 %ZE45N_CM_OF_080602_1080.TXT, 1080 colours, 20080602, Matching OFF $ (FRS09_92) %100 x LAB* %#1000 x (r g b c m y 0) %nr. pos $ %0035.06 0060.53 0039.66 %#1000 0000 0000 0000 1000 1000 0000 %0648 S19 %O1 0 $ %0083.77 -004.50 0103.15 %#1000 1000 0000 0000 0000 1000 0000 %0720 a19 %Y1 1 $ %0044.13 -062.11 0043.56 %#0000 1000 0000 1000 0000 1000 0000 %0072 I01 %L1 2 $ %0052.66 -028.56 -036.99 %#0000 1000 1000 1000 0000 0000 0000 %0080 I09 %C1 3 $ %0014.15 0050.78 -062.60 %#0000 0000 1000 1000 1000 0000 0000 %0008 A09 %V1 4 $ %0037.37 0079.18 -037.93 %#1000 0000 1000 0000 1000 0000 0000 %0656 S27 %M1 5 $ %0008.58 0000.46 -003.35 %#0000 0000 0000 1000 1000 1000 0000 %0000 A01 %N1 6 $ %0092.02 0000.69 -006.48 %#1000 1000 1000 0000 0000 0000 0000 %0728 a27 %W1 7 $ %$ %0035.87 0060.76 0039.80 %#1000 0000 0000 0000 1000 1000 0000 %0801 j01 %O2 0 $ %0083.76 -004.64 0102.56 %#1000 1000 0000 0000 0000 1000 0000 %0882 j10 %Y2 1 $ %0043.65 -062.07 0043.08 %#0000 1000 0000 1000 0000 1000 0000 %0963 j19 %L2 2 $ %0052.82 -028.73 -036.80 %#0000 1000 1000 1000 0000 0000 0000 %0737 b09 %C2 3 $ %0013.33 0052.23 -063.40 %#0000 0000 1000 1000 1000 0000 0000 %0818 b18 %V2 4 $ %0037.56 0079.25 -037.75 %#1000 0000 1000 0000 1000 0000 0000 %0899 b27 %M2 5 $ %0008.16 0000.62 -003.84 %#0000 0000 0000 1000 1000 1000 0000 %0809 j09 %N2 6 $ %0092.07 0000.62 -006.26 %#1000 1000 1000 0000 0000 0000 0000 %0729 b01 %W2 7 $ %$ %ZE45N_CM_OF_080602_1080.TXT, 1080 colours, 20080602, Matching OFF $ (FRS09_92a) %100 x LAB*a %#1000 x (r g b c m y 0) %nr. pos $ %0035.06 0059.99 0044.01 %#1000 0000 0000 0000 1000 1000 0000 %0648 S19 %O1 0 $ %0083.77 -005.16 0109.32 %#1000 1000 0000 0000 0000 1000 0000 %0720 a19 %Y1 1 $ %0044.13 -062.67 0048.25 %#0000 1000 0000 1000 0000 1000 0000 %0072 I01 %L1 2 $ %0052.66 -029.15 -031.98 %#0000 1000 1000 1000 0000 0000 0000 %0080 I09 %C1 3 $ %0014.15 0050.30 -059.03 %#0000 0000 1000 1000 1000 0000 0000 %0008 A09 %V1 4 $ %0037.37 0078.64 -033.49 %#1000 0000 1000 0000 1000 0000 0000 %0656 S27 %M1 5 $ %0008.58 0000.00 0000.00 %#0000 0000 0000 1000 1000 1000 0000 %0000 A01 %N1 6 $ %0092.02 0000.00 0000.00 %#1000 1000 1000 0000 0000 0000 0000 %0728 a27 %W1 7 $ %$ %0035.87 0060.13 0044.44 %#1000 0000 0000 0000 1000 1000 0000 %0801 j01 %O2 0 $ %0083.76 -005.27 0108.59 %#1000 1000 0000 0000 0000 1000 0000 %0882 j10 %Y2 1 $ %0043.65 -062.69 0047.95 %#0000 1000 0000 1000 0000 1000 0000 %0963 j19 %L2 2 $ %0052.82 -029.35 -031.67 %#0000 1000 1000 1000 0000 0000 0000 %0737 b09 %C2 3 $ %0013.33 0051.60 -059.41 %#0000 0000 1000 1000 1000 0000 0000 %0818 b18 %V2 4 $ %0037.56 0078.62 -033.06 %#1000 0000 1000 0000 1000 0000 0000 %0899 b27 %M2 5 $ %0008.16 0000.00 0000.00 %#0000 0000 0000 1000 1000 1000 0000 %0809 j09 %N2 6 $ %0092.07 0000.00 0000.00 %#1000 1000 1000 0000 0000 0000 0000 %0729 b01 %W2 7 $ %$ ] 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*ioL=0 ISRL*ioL 1 eq { %ISRL*ioL=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*ioL=1 ISRL*ioL 2 eq { %ISRL*ioL=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*ioL=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*ioL 0 eq { %ORS18/TLS00/OLS00 LAB* i30 LAB*00 i30 get put LAB* i31 LAB*00 i31 get put LAB* i32 LAB*00 i32 get put } if ISIO*ioL 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*ioL 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*ioL 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*ioL 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*ioL 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*ioL 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*ioL 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 L*Wio def /L*Nioref L*Nio 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 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 LAB*a i30 LAB* i30 get put LAB*a i31 LAB* i31 get A*Nior sub a*sr sub put LAB*a i32 LAB* i32 get B*Nior sub b*sr sub 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) /COLhNam16 16 array def /COLhNam16 [(R00Y) (R25Y) (R50Y) (R75Y) (Y00G) (Y25G) (Y50G) (Y75G) (G00B) (G25B) (G50B) (G75B) (B00R) (B25R) (B50R) (B75R) ] def } bind def %END Procedure proc_LAB*ioL %*********************************************************** %%EndProlog gsave /lanind 1 def /lantex [(G) (E) (S) (F) (I) (J) (M)] def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind eq {show} {pop} ifelse} bind def /showes {2 lanind eq {show} {pop} ifelse} bind def /showfr {3 lanind eq {show} {pop} ifelse} bind def /showit {4 lanind eq {show} {pop} ifelse} bind def /showjp {5 lanind eq {show} {pop} ifelse} bind def /showm {6 lanind eq {show} {pop} ifelse} bind def /showea {1 lanind ge {show} {pop} ifelse} bind def /nshow {iyt /Times-ISOL1 FS show} def /nishow {-30 -50 rmoveto iyt 50 sub /Times-ISOL1 FS show 30 50 rmoveto} def /nishow0 {-00 -50 rmoveto iyt 20 sub /Times-ISOL1 FS show 00 50 rmoveto} def /nishowx {-00 -50 rmoveto iyt 50 sub /Times-ISOL1 FS show 00 50 rmoveto} def /kshow {iyt /TimesI-ISOL1 FS show} def /bshow {iyt /TimesB-ISOL1 FS show} def /jshow {iyt /TimesBI-ISOL1 FS show} def /ishow {-30 -50 rmoveto iyt 50 sub /TimesB-ISOL1 FS show 30 50 rmoveto} def /ishow0 {-00 -50 rmoveto iyt 50 sub /TimesB-ISOL1 FS show 00 50 rmoveto} def /eshow { 00 070 rmoveto iyt 50 sub /TimesB-ISOL1 FS show 00 -070 rmoveto} def /neshow { 00 070 rmoveto iyt 50 sub /Times-ISOL1 FS show 00 -070 rmoveto} def /F25col00 75 array def %24+1x3 0 1 24 {/i exch def %i=0,24 /j i 2 mul def /i30 i 3 mul def /i31 i30 1 add def /i32 i30 2 add def /j30 j 3 mul def /j31 j30 1 add def /j32 j30 2 add def F25col00 i30 F49col00 j30 get put F25col00 i30 1 add F49col00 j31 get put F25col00 i30 2 add F49col00 j32 get put } for %i=0,24 /F17col00 51 array def %16+1x3 0 1 7 {/i exch def %i=0,7 /i30 i 3 mul def /i31 i30 1 add def /i32 i30 2 add def F17col00 i30 F25col00 i30 get put F17col00 i31 F25col00 i31 get put F17col00 i32 F25col00 i32 get put } for %i=0,7 8 2 24 {/i exch def %i=8,24 /j 8 i 8 sub 2 idiv add def /i30 i 3 mul def /i31 i30 1 add def /i32 i30 2 add def /j30 j 3 mul def /j31 j30 1 add def /j32 j30 2 add def F17col00 j30 F25col00 i30 get put F17col00 j31 F25col00 i31 get put F17col00 j32 F25col00 i32 get put } for %i=8,24 /RGB54CC17_L 17 array def /RGB54CC17_L [%high chromatic series: %relative hue h*, brillance i*, and chroma c*, range 0 ... 100 (R00Y_100_100) 1.00 0.00 0.00 %00 (R25Y_100_100) 1.00 0.25 0.00 %01 (R50Y_100_100) 1.00 0.50 0.00 %02 (R75Y_100_100) 1.00 0.75 0.00 %03 (Y00G_100_100) 1.00 1.00 0.00 %04 (Y25G_100_100) 0.75 1.00 0.00 %05 (Y50G_100_100) 0.50 1.00 0.00 %06 (Y75G_100_100) 0.25 1.00 0.00 %07 (G00B_100_100) 0.00 1.00 0.00 %08 (G25B_100_100) 0.00 1.00 0.50 %09 (G50B_100_100) 0.00 1.00 1.00 %10 (G75B_100_100) 0.00 0.50 1.00 %11 (B00R_100_100) 0.00 0.00 1.00 %12 (B25R_100_100) 0.50 0.00 1.00 %13 (B50R_100_100) 1.00 0.00 1.00 %14 (B75R_100_100) 1.00 0.00 0.50 %15 (R00Y_100_100) 1.00 0.00 0.00 %16 repeat for circle ] def /LAB*ee 12 array def %2x3=12 Lab* for D65 /LAB*ee [39.92 58.74 27.99 %0 00_04 R CIE No.09 elementary in LAB 81.26 -2.89 71.56 %1 05_09 J CIE No.10 52.23 -42.42 13.60 %2 10_14 G CIE No.11 30.57 1.41 -46.47 %3 20_24 B CIE No.12 ] def /rgb_12 12 array def %RYGCBMd, NWd,e, RYGBe /rgb_12 [1.0 0.0 0.0 1.0 1.0 0.0 0.0 1.0 0.0 %RYGd 0.0 1.0 1.0 0.0 0.0 1.0 1.0 0.0 1.0 %CBMd 0.0 0.0 0.0 1.0 1.0 1.0 %NWd,e 1.0 0.0 0.0 1.0 1.0 0.0 0.0 1.0 0.0 0.0 0.0 1.0 %RYGBe ] def %************************************************************ /proc_CIELAB_D {%BEG proc_CIELAB_D 25 setlinewidth 1.0 setgray 0 0 moveto 2800 0 rlineto 0 2800 rlineto -2800 0 rlineto closepath fill 0.0 setgray 0 0 moveto 2800 0 rlineto 0 2800 rlineto -2800 0 rlineto closepath stroke 1200 1300 translate -1000 0 moveto 1000 0 lineto stroke 0 -1000 moveto 0 1000 lineto stroke 1100 0 moveto (a*) kshow (a) ishow 0 1100 moveto (b*) kshow (a) ishow /rx 774 def %standard hexagon gamut 0.0 setgray rx 030 cos mul rx 030 sin mul moveto 0 rx lineto rx 150 cos mul rx 150 sin mul lineto rx 210 cos mul rx 210 sin mul lineto 0 rx neg lineto rx 330 cos mul rx 330 sin mul lineto closepath stroke /r*x 1 def /g*x 0 def /b*x 0 def r*x g*x b*x setrgbcolor rx 030 cos mul rx 030 sin mul 100 0 360 arc fill /r*x 1 def /g*x 1 def /b*x 0 def r*x g*x b*x setrgbcolor 0 rx 100 0 360 arc fill /r*x 0 def /g*x 1 def /b*x 0 def r*x g*x b*x setrgbcolor rx 150 cos mul rx 150 sin mul 100 0 360 arc fill /r*x 0 def /g*x 1 def /b*x 1 def r*x g*x b*x setrgbcolor rx 210 cos mul rx 210 sin mul 100 0 360 arc fill /r*x 0 def /g*x 0 def /b*x 1 def r*x g*x b*x setrgbcolor 0 rx neg 100 0 360 arc fill /r*x 1 def /g*x 0 def /b*x 1 def r*x g*x b*x setrgbcolor rx 330 cos mul rx 330 sin mul 100 0 360 arc fill %plot hexagon in device (d) space 45 setlinewidth 0 setgray 0 1 5 {/i exch def %i=0,5 /A*Ma LAB*a i 3 mul 1 add get def /B*Ma LAB*a i 3 mul 2 add get def i 0 eq {A*Ma 10 mul B*Ma 10 mul moveto} {A*Ma 10 mul B*Ma 10 mul lineto} ifelse i 5 eq {closepath stroke} if } for %i=0,5 xchart 1 ge {%xchart>=1, always only for device space %plot hexagon in actual device (d) space 45 setlinewidth /deintpd deintp def %attention change of deintp to device d! /deintp 0 def %draws allways device space gamut! 0 1 5 {/i exch def %i=0,5 /r*x r*dd08M i get def /g*x g*dd08M i get def /b*x b*dd08M i get def r*x g*x b*x setrgbcolor %default for calculation of LAB* /LAB*axF LAB*adyF def /LAB*bxF LAB*bdyF def /A*Ma LAB*axF def /B*Ma LAB*bxF def 1 0 0 setrgbcolor i 0 eq {A*Ma 10 mul B*Ma 10 mul moveto} {A*Ma 10 mul B*Ma 10 mul lineto} ifelse i 5 eq {closepath stroke} if } for %i=0,5 /deintp deintpd def %change back to deintp! } if %xchart>=1 %plot line of actual hue 50 setlinewidth xcharts 0 eq {/r*x 1 def /g*x 0 def /b*x 0 def} if xcharts 1 eq {/r*x 1 def /g*x 1 def /b*x 0 def} if xcharts 2 eq {/r*x 0 def /g*x 1 def /b*x 0 def} if xcharts 3 eq {/r*x 0 def /g*x 1 def /b*x 1 def} if xcharts 4 eq {/r*x 0 def /g*x 0 def /b*x 1 def} if xcharts 5 eq {/r*x 1 def /g*x 0 def /b*x 1 def} if xcharts 5 le {%xcharts<=5 r*x g*x b*x setrgbcolor 0 0 moveto /A*Ma LAB*a xcharts 3 mul 1 add get def /B*Ma LAB*a xcharts 3 mul 2 add get def A*Ma 10 mul B*Ma 10 mul lineto stroke } if %xcharts<=5 xcharts 6 ge {%xcharts>=6 xchart 0 eq {%xchart=0,>0 xcharts 9 eq {/i1 0 def /i2 5 def i1 1 i2 {/i exch def %i=i1,i2 /L*Ma0 LAB*a i 3 mul 0 add get def %produces ORS18 /A*Ma0 LAB*a i 3 mul 1 add get def /B*Ma0 LAB*a i 3 mul 2 add get def rgb_12 i 3 mul 0 add get rgb_12 i 3 mul 1 add get rgb_12 i 3 mul 2 add get setrgbcolor 0 0 moveto A*Ma0 10 mul B*Ma0 10 mul lineto stroke A*Ma0 10 mul B*Ma0 10 mul moveto -100 -100 rlineto 200 200 rlineto stroke A*Ma0 10 mul B*Ma0 10 mul moveto -100 100 rlineto 200 -200 rlineto stroke } for %i=i1,i2 } if %one or 6 lines xcharts 10 ge xcharts 25 le and {%xcharts>=10,<=25 %16 measured data, see PE54L0NP.pdf, page 11/24 %PE540-7N, Page 11/24 HIC*Fd rgb*Fd LabCh*Fd /LAB*a48 432 array def %48x9=432 /LAB*a48 [%HIC rgb LabCh nr (R00Y_100_100d) 1.000 0.000 0.000 48.4 66.1 40.2 77.4 31.3 %00 (R13Y_100_100d) 1.000 0.116 0.000 52.5 57.3 45.5 73.2 38.4 %01 (R25Y_100_100d) 1.000 0.233 0.000 56.8 48.0 50.5 69.8 46.4 %02 (R38Y_100_100d) 1.000 0.366 0.000 62.5 36.5 57.1 67.8 57.3 %03 (R50Y_100_100d) 1.000 0.500 0.000 68.6 25.0 63.9 68.7 68.6 %04 (R63Y_100_100d) 1.000 0.633 0.000 74.9 14.1 71.1 72.5 78.7 %05 (R75Y_100_100d) 1.000 0.766 0.000 80.6 4.8 77.2 77.4 86.4 %06 (R88Y_100_100d) 1.000 0.883 0.000 85.4 -2.5 82.3 82.3 91.7 %07 (Y00G_100_100d) 1.000 1.000 0.000 90.2 -9.6 88.2 88.7 96.2 %08 (Y13G_100_100d) 0.883 1.000 0.000 86.7 -14.2 83.5 84.7 99.6 %09 (Y25G_100_100d) 0.766 1.000 0.000 83.2 -18.4 79.9 82.0 102.9 %10 (Y38G_100_100d) 0.633 1.000 0.000 77.9 -25.1 69.5 74.0 109.8 %11 (Y50G_100_100d) 0.500 1.000 0.000 73.3 -31.7 62.7 70.3 116.8 %12 (Y63G_100_100d) 0.366 1.000 0.000 68.2 -39.5 55.9 68.5 125.2 %13 (Y75G_100_100d) 0.233 1.000 0.000 62.0 -49.7 43.2 65.9 138.9 %14 (Y88G_100_100d) 0.116 1.000 0.000 59.1 -57.1 38.5 68.9 145.9 %15 (G00C_100_100d) 0.000 1.000 0.000 55.8 -65.2 33.8 73.5 152.5 %16 (G13C_100_100d) 0.000 1.000 0.116 56.6 -62.9 24.0 67.3 159.0 %17 (G25C_100_100d) 0.000 1.000 0.233 57.4 -59.7 13.9 61.3 166.8 %18 (G38C_100_100d) 0.000 1.000 0.366 58.5 -54.9 1.5 55.0 178.4 %19 (G50C_100_100d) 0.000 1.000 0.500 59.3 -50.3 -9.0 51.1 190.2 %20 (G63C_100_100d) 0.000 1.000 0.633 60.1 -45.6 -18.7 49.3 202.3 %21 (G75C_100_100d) 0.000 1.000 0.766 61.1 -40.3 -27.8 49.0 214.6 %22 (G88C_100_100d) 0.000 1.000 0.883 62.0 -35.8 -34.7 49.9 224.0 %23 (C00B_100_100d) 0.000 1.000 1.000 63.0 -30.5 -42.0 51.9 234.0 %24 (C13B_100_100d) 0.000 0.883 1.000 59.4 -25.3 -42.7 49.7 239.2 %25 (C25B_100_100d) 0.000 0.766 1.000 55.8 -20.3 -43.2 47.7 244.7 %26 (C38B_100_100d) 0.000 0.633 1.000 50.8 -13.3 -43.9 45.9 253.0 %27 (C50B_100_100d) 0.000 0.500 1.000 45.7 -5.7 -44.6 45.0 262.6 %28 (C63B_100_100d) 0.000 0.366 1.000 40.4 2.6 -45.2 45.2 273.3 %29 (C75B_100_100d) 0.000 0.233 1.000 36.0 10.1 -46.1 47.2 282.3 %30 (C88B_100_100d) 0.000 0.116 1.000 32.1 17.3 -46.7 49.8 290.3 %31 (B00M_100_100d) 0.000 0.000 1.000 27.5 25.9 -47.3 54.0 298.7 %32 (B13M_100_100d) 0.116 0.000 1.000 29.5 33.4 -43.1 54.6 307.7 %33 (B25M_100_100d) 0.233 0.000 1.000 31.0 39.9 -38.5 55.5 315.9 %34 (B38M_100_100d) 0.366 0.000 1.000 35.1 44.5 -34.7 56.5 322.0 %35 (B50M_100_100d) 0.500 0.000 1.000 38.3 52.6 -28.5 59.9 331.5 %36 (B63M_100_100d) 0.633 0.000 1.000 41.2 59.3 -22.0 63.3 339.6 %37 (B75M_100_100d) 0.766 0.000 1.000 45.2 63.8 -18.2 66.4 344.0 %38 (B88M_100_100d) 0.883 0.000 1.000 47.5 68.6 -13.8 69.9 348.5 %39 (M00R_100_100d) 1.000 0.000 1.000 49.5 73.5 -9.0 74.1 352.9 %40 (M13R_100_100d) 1.000 0.000 0.883 49.4 72.4 -4.0 72.5 356.7 %41 (M25R_100_100d) 1.000 0.000 0.766 49.3 71.4 0.4 71.4 0.3 %42 (M38R_100_100d) 1.000 0.000 0.633 49.3 69.8 6.6 70.1 5.4 %43 (M50R_100_100d) 1.000 0.000 0.500 48.9 69.3 12.9 70.5 10.5 %44 (M63R_100_100d) 1.000 0.000 0.366 48.9 68.1 19.6 70.9 16.1 %45 (M75R_100_100d) 1.000 0.000 0.233 48.8 67.1 27.9 72.7 22.6 %46 (M88R_100_100d) 1.000 0.000 0.116 48.6 66.5 34.1 74.8 27.1 %47 ] def /indFa16 16 array def /indFa16 [%0 1 2 3 4 5 6 7 %0=R and xchart4=1, 4=Y and xchart4=5 00 02 04 06 08 10 12 14 %8 9 10 11 12 13 14 15 %8=G and xchart4=9, 12=B and xchart4=13 16 20 24 28 32 36 40 44] def /ix xchart4 1 sub def %i=0,15 /indx indFa16 ix get def /i90 indx 9 mul 4 add def /i91 i90 1 add def /i92 i90 2 add def /A*Ma0 LAB*a48 i91 get def /B*Ma0 LAB*a48 i92 get def /i90r indx 9 mul 1 add def /i91r i90r 1 add def /i92r i90r 2 add def /r_*Ma LAB*a48 i90r get def /g_*Ma LAB*a48 i91r get def /b_*Ma LAB*a48 i92r get def r_*Ma g_*Ma b_*Ma setrgbcolor 0 0 moveto A*Ma0 10 mul B*Ma0 10 mul lineto stroke A*Ma0 10 mul B*Ma0 10 mul moveto -100 -100 rlineto 200 200 rlineto stroke A*Ma0 10 mul B*Ma0 10 mul moveto -100 100 rlineto 200 -200 rlineto stroke } if %xcharts>=10,<=25 }%xchart=0 {%xchart>0 xcharts 9 eq {/i1 0 def /i2 15 def} %one or 16 lines {/i1 xcharts 10 sub def /i2 i1 def} ifelse i1 1 i2 {/i exch def %i=i1,i2 /r*x r*dd18M i get def /g*x g*dd18M i get def /b*x b*dd18M i get def r*x g*x b*x setrgbcolor %default to create data %setrgbcolor calculates data for output in "FF_LM_de_setrgbcolor_F" %colorm=0 calculates: rgb_dyF, rgb*dyF, LAB*dyF, ,cmyk*dyF and more %colorm=1 calculates: rgb_dyF, rgb*dyF, LAB*dyF', rgb'*dyF, cmyk*dyF and more /LAB*LxF LAB*LdyF def /LAB*axF LAB*adyF def /LAB*bxF LAB*bdyF def /A*Ma0 LAB*axF def /B*Ma0 LAB*bxF def r*x g*x b*x setrgbcolor 0 0 moveto A*Ma0 10 mul B*Ma0 10 mul lineto stroke A*Ma0 10 mul B*Ma0 10 mul moveto -100 -100 rlineto 200 200 rlineto stroke A*Ma0 10 mul B*Ma0 10 mul moveto -100 100 rlineto 200 -200 rlineto stroke } for %i=i1,i2 } ifelse %xchart=0,>0 } if %xcharts>=6 -1200 -1300 translate } bind def %END proc_CIELAB_D %************************************************************ /proc_CIELAB_T16 {%BEG proc_CIELAB_T16 /yhoe 6300 def ibild 0 eq {/xmi0 0 def /ymi0 -50 def} {/xmi0 700 def /ymi0 -1400 def} ifelse 15 setlinewidth 1.0 setgray 0 ymi0 moveto 5300 xmi0 add 0 rlineto 0 4800 ymi0 sub rlineto -5300 xmi0 sub 0 rlineto closepath fill 0.0 setgray 0 ymi0 moveto 5300 xmi0 add 0 rlineto 0 4800 ymi0 sub rlineto -5300 xmi0 sub 0 rlineto closepath stroke /nshow {300 /Times-ISOL1 FS show} bind def /kshow {300 /TimesI-ISOL1 FS show} bind def /bshow {300 /TimesB-ISOL1 FS show} bind def /jshow {300 /TimesBI-ISOL1 FS show} bind def /sshow {300 /Symbol FS show} bind def /ishow {220 /Times-ISOL1 FS -00 -50 rmoveto show 00 50 rmoveto} bind def /eshow {220 /Times-ISOL1 FS 0 100 rmoveto show 0 -100 rmoveto} bind def /yd 340 def %y-Zeilenabstand %Spalten /S1 20 def /S2 450 def /S3 1550 def /S4 2650 def /S5 3750 def /S6 4800 def /yu1 4650 def /yu2 3800 def 0 4100 moveto ibild 0 eq {5300}{6000} ifelse 0 rlineto stroke %Titeltext S1t 4550 moveto xchart 0 eq {ibild 1 eq {(ORS20a) bshow}{TSYSIOa bshow} ifelse} {Devicea bshow} ifelse (;) bshow xcharti 12 lt ibild 0 ne or {TBM0 ( adapted (a) CIELAB data) showen ( adaptierte CIELAB\255Daten) showde ( datos adaptados CIELAB (a)) showes ( donn\351es CIELAB (a) adapt\351es) showfr ( dati atti CIELAB (a)) showit ( adapted (a) CIELAB data) showjp } if ibild 0 eq {%BEG ibild=0 S11 4250 moveto TM0 (Name) showde (name) showen (name) showes (nom) showfr (name) showit (name) showjp () kshow S21 200 sub 4250 moveto (L*=L*) kshow xcharti 12 lt ibild 0 ne or {(a) ishow} if S31 4250 moveto (a*) kshow xcharti 12 lt ibild 0 ne or {(a) ishow} if S41 4250 moveto (b*) kshow xcharti 12 lt ibild 0 ne or {(a) ishow} if S51 100 sub 4250 moveto (C*) kshow (ab) ishow xcharti 12 lt ibild 0 ne or {(,a) ishow} if S61 100 sub 4250 moveto (h*) kshow (ab) ishow xcharti 12 lt ibild 0 ne or {(,a) ishow} if 0 1 11 {/i exch def %i=0,11 /ya yu2 yd i mul sub def S11 ya moveto ColNames i get nshow Fxx ishow (,) ishow i 8 ge {(CIE) ishow} {(M) ishow xcharti 12 lt {(a) ishow} if} ifelse ( ) nshow xcharti 12 lt {%xcharti<=12,>12 i 7 le {%i<=7 xchart 0 eq {%xchart=0,1 /L*Fax LAB*a i 3 mul get def /A*Fax LAB*a i 3 mul 1 add get def /B*Fax LAB*a i 3 mul 2 add get def /C*Fax A*Fax dup mul B*Fax dup mul add sqrt def /H*Fax B*Fax A*Fax 0.0001 add atan def }%xchart=0 {%xchart=1 /r*x r*dd08M i get def /g*x g*dd08M i get def /b*x b*dd08M i get def r*x g*x b*x setrgbcolor %default to create data %setrgbcolor calculates data for output in "FF_LM_de_setrgbcolor_F" %colorm=0 calculates: rgb_dyF, rgb*dyF, LAB*dyF, ,cmyk*dyF and more %colorm=1 calculates: rgb_dyF, rgb*dyF, LAB*dyF', rgb'*dyF, cmyk*dyF and more /LAB*LxF LAB*LdyF def /LAB*axF LAB*adyF def /LAB*bxF LAB*bdyF def /L*Fax LAB*LxF def /A*Fax LAB*axF def /B*Fax LAB*bxF def } ifelse %xchart=0,1 } if %i<=7 i 8 ge {%i>=8 TYGB /L*Fax LAB*ee i 8 sub 3 mul get def /A*Fax LAB*ee i 8 sub 3 mul 1 add get def /B*Fax LAB*ee i 8 sub 3 mul 2 add get def } if %i>=8 /C*Fax A*Fax dup mul B*Fax dup mul add sqrt def /H*Fax B*Fax A*Fax 0.0001 add atan def 0 setgray S21 ya moveto L*Fax cvsshow1 S31 ya moveto A*Fax cvsshow1 S41 ya moveto B*Fax cvsshow1 S51 ya moveto C*Fax cvsshow1 S61 ya moveto H*Fax cvishow }%xcharti<=12 {%xcharti>12 xchart 0 eq {%xchart=0,1 /L*Fax LAB*a i 3 mul get def /A*Fax LAB*a i 3 mul 1 add get def /B*Fax LAB*a i 3 mul 2 add get def /C*Fax A*Fax dup mul B*Fax dup mul add sqrt def /H*Fax B*Fax A*Fax 0.0001 add atan def }%xchart=0 {%xchart=1 /L*Fax LAB*Ldd08M i get def /A*Fax LAB*add08M i get def /B*Fax LAB*bdd08M i get def } ifelse %xchart=0,1 /C*Fax A*Fax dup mul B*Fax dup mul add sqrt def /H*Fax B*Fax A*Fax 0.0001 add atan def 0 setgray S21 ya moveto L*Fax cvsshow1 S31 ya moveto A*Fax cvsshow1 S41 ya moveto B*Fax cvsshow1 S51 ya moveto C*Fax cvsshow1 S61 ya moveto H*Fax cvishow /L*Fx LAB* i 3 mul get def /A*Fx LAB* i 3 mul 1 add get def /B*Fx LAB* i 3 mul 2 add get def /C*Fx A*Fx dup mul B*Fx dup mul add sqrt def /H*Fx B*Fx A*Fx 0.0001 add atan def S2 350 add ya moveto L*Fx cvsshow2 S3 100 add ya moveto A*Fx cvsshow2 S4 100 add ya moveto B*Fx cvsshow2 S5 ya moveto C*Fx cvsshow2 S6 ya moveto H*Fx cvishow } ifelse %xcharti=12,#12 } for %i=0,11 }%END ibild=0 {%BEG ibild=1 S1t 4250 moveto (H*) kshow Fxx ishow () nshow S2t 200 sub 4250 moveto (L*=L*) kshow xcharti 12 lt ibild 0 ne or {(a) ishow} if S3t 4250 moveto (a*) kshow xcharti 12 lt ibild 0 ne or {(a) ishow} if S4t 4250 moveto (b*) kshow xcharti 12 lt ibild 0 ne or {(a) ishow} if S5t 150 sub 4250 moveto (C*) kshow (ab) ishow xcharti 12 lt ibild 0 ne or {(,a) ishow} if S6t 150 sub 4250 moveto (h*) kshow (ab) ishow xcharti 12 lt ibild 0 ne or {(,a) ishow} if %16 measured data, see PE54L0NP.pdf, page 11/24 %PE540-7N, Page 11/24 HIC*Fd rgb*Fd LabCh*Fd /LAB*a48 432 array def %48x9=432 /LAB*a48 [%HIC rgb LabCh nr (R00Y_100_100d) 1.000 0.000 0.000 48.4 66.1 40.2 77.4 31.3 %00 (R13Y_100_100d) 1.000 0.116 0.000 52.5 57.3 45.5 73.2 38.4 %01 (R25Y_100_100d) 1.000 0.233 0.000 56.8 48.0 50.5 69.8 46.4 %02 (R38Y_100_100d) 1.000 0.366 0.000 62.5 36.5 57.1 67.8 57.3 %03 (R50Y_100_100d) 1.000 0.500 0.000 68.6 25.0 63.9 68.7 68.6 %04 (R63Y_100_100d) 1.000 0.633 0.000 74.9 14.1 71.1 72.5 78.7 %05 (R75Y_100_100d) 1.000 0.766 0.000 80.6 4.8 77.2 77.4 86.4 %06 (R88Y_100_100d) 1.000 0.883 0.000 85.4 -2.5 82.3 82.3 91.7 %07 (Y00G_100_100d) 1.000 1.000 0.000 90.2 -9.6 88.2 88.7 96.2 %08 (Y13G_100_100d) 0.883 1.000 0.000 86.7 -14.2 83.5 84.7 99.6 %09 (Y25G_100_100d) 0.766 1.000 0.000 83.2 -18.4 79.9 82.0 102.9 %10 (Y38G_100_100d) 0.633 1.000 0.000 77.9 -25.1 69.5 74.0 109.8 %11 (Y50G_100_100d) 0.500 1.000 0.000 73.3 -31.7 62.7 70.3 116.8 %12 (Y63G_100_100d) 0.366 1.000 0.000 68.2 -39.5 55.9 68.5 125.2 %13 (Y75G_100_100d) 0.233 1.000 0.000 62.0 -49.7 43.2 65.9 138.9 %14 (Y88G_100_100d) 0.116 1.000 0.000 59.1 -57.1 38.5 68.9 145.9 %15 (G00C_100_100d) 0.000 1.000 0.000 55.8 -65.2 33.8 73.5 152.5 %16 (G13C_100_100d) 0.000 1.000 0.116 56.6 -62.9 24.0 67.3 159.0 %17 (G25C_100_100d) 0.000 1.000 0.233 57.4 -59.7 13.9 61.3 166.8 %18 (G38C_100_100d) 0.000 1.000 0.366 58.5 -54.9 1.5 55.0 178.4 %19 (G50C_100_100d) 0.000 1.000 0.500 59.3 -50.3 -9.0 51.1 190.2 %20 (G63C_100_100d) 0.000 1.000 0.633 60.1 -45.6 -18.7 49.3 202.3 %21 (G75C_100_100d) 0.000 1.000 0.766 61.1 -40.3 -27.8 49.0 214.6 %22 (G88C_100_100d) 0.000 1.000 0.883 62.0 -35.8 -34.7 49.9 224.0 %23 (C00B_100_100d) 0.000 1.000 1.000 63.0 -30.5 -42.0 51.9 234.0 %24 (C13B_100_100d) 0.000 0.883 1.000 59.4 -25.3 -42.7 49.7 239.2 %25 (C25B_100_100d) 0.000 0.766 1.000 55.8 -20.3 -43.2 47.7 244.7 %26 (C38B_100_100d) 0.000 0.633 1.000 50.8 -13.3 -43.9 45.9 253.0 %27 (C50B_100_100d) 0.000 0.500 1.000 45.7 -5.7 -44.6 45.0 262.6 %28 (C63B_100_100d) 0.000 0.366 1.000 40.4 2.6 -45.2 45.2 273.3 %29 (C75B_100_100d) 0.000 0.233 1.000 36.0 10.1 -46.1 47.2 282.3 %30 (C88B_100_100d) 0.000 0.116 1.000 32.1 17.3 -46.7 49.8 290.3 %31 (B00M_100_100d) 0.000 0.000 1.000 27.5 25.9 -47.3 54.0 298.7 %32 (B13M_100_100d) 0.116 0.000 1.000 29.5 33.4 -43.1 54.6 307.7 %33 (B25M_100_100d) 0.233 0.000 1.000 31.0 39.9 -38.5 55.5 315.9 %34 (B38M_100_100d) 0.366 0.000 1.000 35.1 44.5 -34.7 56.5 322.0 %35 (B50M_100_100d) 0.500 0.000 1.000 38.3 52.6 -28.5 59.9 331.5 %36 (B63M_100_100d) 0.633 0.000 1.000 41.2 59.3 -22.0 63.3 339.6 %37 (B75M_100_100d) 0.766 0.000 1.000 45.2 63.8 -18.2 66.4 344.0 %38 (B88M_100_100d) 0.883 0.000 1.000 47.5 68.6 -13.8 69.9 348.5 %39 (M00R_100_100d) 1.000 0.000 1.000 49.5 73.5 -9.0 74.1 352.9 %40 (M13R_100_100d) 1.000 0.000 0.883 49.4 72.4 -4.0 72.5 356.7 %41 (M25R_100_100d) 1.000 0.000 0.766 49.3 71.4 0.4 71.4 0.3 %42 (M38R_100_100d) 1.000 0.000 0.633 49.3 69.8 6.6 70.1 5.4 %43 (M50R_100_100d) 1.000 0.000 0.500 48.9 69.3 12.9 70.5 10.5 %44 (M63R_100_100d) 1.000 0.000 0.366 48.9 68.1 19.6 70.9 16.1 %45 (M75R_100_100d) 1.000 0.000 0.233 48.8 67.1 27.9 72.7 22.6 %46 (M88R_100_100d) 1.000 0.000 0.116 48.6 66.5 34.1 74.8 27.1 %47 ] def /indFa16 16 array def /indFa16 [00 02 04 06 08 10 12 14 16 20 24 28 32 36 40 44] def 0 1 15 {/i exch def %i=0,15 /ya yu2 yd i mul sub def xchart 0 eq {%xchart=0,>0 /indx indFa16 i get def /i90 indx 9 mul 4 add def /i91 i90 1 add def /i92 i90 2 add def /L*Ma LAB*a48 i90 get def /A*Ma LAB*a48 i91 get def /B*Ma LAB*a48 i92 get def /C*Ma A*Ma dup mul B*Ma dup mul add 0.0001 add sqrt def /H*Ma B*Ma A*Ma 0.0001 add atan def }%xchart=0 {%xchart>0 /r*x r*dd18M i get def /g*x g*dd18M i get def /b*x b*dd18M i get def r*x g*x b*x setrgbcolor %default to create data %setrgbcolor calculates data for output in "FF_LM_de_setrgbcolor_F" %colorm=0 calculates: rgb_dyF, rgb*dyF, LAB*dyF, ,cmyk*dyF and more %colorm=1 calculates: rgb_dyF, rgb*dyF, LAB*dyF', rgb'*dyF, cmyk*dyF and more /r*xF r*dyF def /g*xF g*dyF def /b*xF b*dyF def /LAB*LxF LAB*LdyF def /LAB*axF LAB*adyF def /LAB*bxF LAB*bdyF def /LAB*CxF LAB*adyF dup mul LAB*bdyF dup mul add 0.0001 add sqrt def /LAB*hxF LAB*bdyF LAB*adyF 0.0001 add atan def /L*Ma LAB*LxF def /A*Ma LAB*axF def /B*Ma LAB*bxF def /C*Ma LAB*CxF def /H*Ma LAB*hxF def } ifelse %xchart=0,>0 0 setgray S1t ya moveto () nshow S1t ya moveto RGB54CC17_L i 4 mul get show Fxx ishow () nshow S2t 60 add ya moveto L*Ma cvsshow1 S3t ya moveto A*Ma cvsshow1 S4t ya moveto B*Ma cvsshow1 S5t ya moveto C*Ma cvsshow1 S6t ya moveto H*Ma cvishow } for %i=0,15 } ifelse %END ibild=1 } bind def %END proc_CIELAB_T16 %****************************************************************** /proc_CIELAB_G {%BEG CIELAB_G /u* 0 def /H*MGam 6 array def /C*MGam 6 array def 0 1 5 {/i exch def %i=0,5 /A*Ma LAB*a i 3 mul 1 add get def /B*Ma LAB*a i 3 mul 2 add get def /C*MGama A*Ma dup mul B*Ma dup mul add sqrt def H*MGam i B*Ma A*Ma 0.0001 add atan put C*MGam i C*MGama put /u* u* C*MGama L*Wio L*Nio sub mul add def } for %i=0,5 /u*r u* 77.4 77.4 mul 6 mul div 100 mul def 1 1 1 setrgbcolor /xmtext 2200 def /xms 0 def xmtext xms sub 11500 moveto TBG0 (%Gamut) showen (%Umfang) showde (%Gama) showes (%Gamme) showfr (%Gamma) showit (%Gamut) showjp xmtext xms sub 11100 moveto TBG0 (u*) show TBM0 -20 -50 rmoveto (rel) show 0 50 rmoveto TBG0 ( = ) show u*r cvishow 0 1 4 {/i exch def %i=0,4 /H*dif H*MGam i 1 add get H*MGam i get sub def i 0 eq {/H*MGamin H*dif def /H*MGamax H*dif def} if H*dif H*MGamin lt {/H*MGamin H*dif def} if H*dif H*MGamax gt {/H*MGamax H*dif def} if } for %i=0,4 /g*Hr H*MGamin H*MGamax div 100 mul def xmtext xms sub 10700 moveto TBG0 (%Regularity) showen (%Regularit\344t) showde (%Regularidad) showes (%R\351gularit\351) showfr (%Regularit\340) showit (%Regularity) showjp xmtext 10300 moveto TBG0 (g*) show TBM0 -20 -50 rmoveto (H,rel) show 0 50 rmoveto TBG0 ( = ) show g*Hr cvishow 0 1 4 {/i exch def %i=0,4 /C*akt C*MGam i get def i 0 eq {/C*MGamin C*akt def /C*MGamax C*akt def} if C*akt C*MGamin lt {/C*MGamin C*akt def} if C*akt C*MGamax gt {/C*MGamax C*akt def} if } for %i=0,4 /g*Cr C*MGamin C*MGamax div 100 mul def xmtext 09900 moveto TBG0 (g*) show TBM0 -20 -50 rmoveto (C,rel) show 0 50 rmoveto TBG0 ( = ) show g*Cr cvishow } bind def %CIELAB_G %****************************************************************** /ilf 8 array def /ilf [0.00 0.25 0.50 1.00 2.00 4.00 8.00 16.00] def /Lrefl 11 array def /Lrefl [(0%) (0%) (0%) (0%) (0,6%) (1,2%) (2,5%) (5%) (10%) (20%) (40%)] def /cvishowb {cvi 6 string cvs show ( ) show} def /cvsshow1b {10 mul cvi 0.1 mul 7 string cvs show ( ) show} def /cvsshow2b {100 mul cvi 0.01 mul 7 string cvs show ( ) show} def /cvsshow3b {1000 mul cvi 0.001 mul 7 string cvs show ( ) show} def /cvsshow1r {0.05 add 10 mul cvi 0.1 mul 7 string cvs show} def /cvsshow2r {0.005 add 100 mul cvi 0.01 mul 7 string cvs show} def /cvsshow3r {0.0005 add 1000 mul cvi 0.001 mul 7 string cvs show} def /cvsshow1br {0.05 add 10 mul cvi 0.1 mul 7 string cvs show ( ) show} def /cvsshow2br {0.005 add 100 mul cvi 0.01 mul 7 string cvs show ( ) show} def /cvsshow3br {0.0005 add 1000 mul cvi 0.001 mul 7 string cvs show ( ) show} def /cvi100 {100 mul cvi /xi exch def xi 0 lt {/vorz -1 def} {/vorz 1 def} ifelse /xia xi abs def vorz -1 eq {(\255) show} {(0) show} ifelse xia 0 ge xia 9 le {(0000) show} if xia 10 ge xia 99 le and {(000) show} if xia 100 ge xia 999 le and {(00) show} if xia 1000 ge xia 9999 le and {(0) show} if xia cvishow } bind def %************************************************ %******BEG RGB_48_16_6.PS default rgb data for 48/16/6 steps for device colours /r*dd64M 64 array def /r*dd64M [1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %R 1.000 0.875 0.750 0.625 0.500 0.375 0.250 0.125 %J 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %G 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %C 0.000 0.125 0.250 0.375 0.500 0.625 0.750 0.875 %B 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %M 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %R 1.000 0.875 0.750 0.625 0.500 0.375 0.250 0.125 %J ] def /g*dd64M 64 array def /g*dd64M [0.000 0.125 0.250 0.375 0.500 0.625 0.750 0.875 %R 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %J 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %G 1.000 0.875 0.750 0.625 0.500 0.375 0.250 0.125 %C 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %B 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %M 0.000 0.125 0.250 0.375 0.500 0.625 0.750 0.875 %R 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %J ] def /b*dd64M 64 array def /b*dd64M [0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %R 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %J 0.000 0.125 0.250 0.375 0.500 0.625 0.750 0.875 %G 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %C 1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000 %B 1.000 0.875 0.750 0.625 0.500 0.375 0.250 0.125 %M 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %R 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 %J ] def %calculate all data of 16+1=17 step elementary colour circle /ind64M 17 array def /ind64M %R00Y R25Y R50Y R75Y Y00G Y25G Y50G Y75G [0 2 4 6 8 10 12 14 %G00B G25B G50B G75G B00R B25R B50R B75R R00Y 16 20 24 28 32 36 40 44 0 ] def %actual 16 step device circle + N + W /r*dd18M 18 array def /g*dd18M 18 array def /b*dd18M 18 array def 0 1 15 {/i exch def %i=0,15 /indi ind64M i get def r*dd18M i r*dd64M indi get put %16 device colours g*dd18M i g*dd64M indi get put b*dd18M i b*dd64M indi get put } for %i=0,15 r*dd18M 16 0 put %N g*dd18M 16 0 put b*dd18M 16 0 put r*dd18M 17 1 put %W g*dd18M 17 1 put b*dd18M 17 1 put %actual 6 step device circle + N + W /r*dd08M 08 array def /g*dd08M 08 array def /b*dd08M 08 array def 0 1 5 {/i exch def %i=0,5 r*dd08M i r*dd64M i 8 mul get put %6 device colours g*dd08M i g*dd64M i 8 mul get put b*dd08M i b*dd64M i 8 mul get put } for %i=0,5 r*dd08M 6 0 put %N g*dd08M 6 0 put b*dd08M 6 0 put r*dd08M 7 1 put %W g*dd08M 7 1 put b*dd08M 7 1 put %******END RGB_48_16_6.PS default rgb data for 48/16/6 steps for device colours /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 /lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def /lanindd laninddg def} if /colormg where {pop /colorm1 colormg def /colorm2 colormg def /colormd colormdg def} if /deintpg where {pop /deintp1 deintpg def /deintp2 deintpg def /deintpd deintpdg def} if /xcolorg where {pop /xcolor1 xcolorg def /xcolor2 xcolorg def /xcolord xcolordg def} if /xchartg where {pop /xchart1 xchartg def /xchart2 xchartg def /xchartd xchartdg def} if /pchartg where {pop /pchart1 pchartg def /pchart2 pchartg def /pchartd pchartdg def} if /colsepg where {pop /colsep1 colsepg def /colsep2 colsepg def /colsepd colsepdg def} if /pmetamg where {pop /pmetam1 pmetamg def /pmetam2 pmetamg def /pmetamd pmetamdg def} if /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 6 def} ifelse /xchart4f where {pop /xchart4 xchart4f def} {/xchart4 10 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 %only for editorial change of the following LOOPs %/lanind lanind1 def % %/colorm colorm1 def % %/deintp deintp1 def % %/xcolor xcolor1 def % %/xchart xchart1 def % %/pchart pchart1 def % %/colsep colsep1 def % %/pmetam pmetam1 def % /lanind lanind1 def %lanind1 lanindd lanind2 {/lanind exch def %output showpage /colorm colorm1 def %colorm1 colormd colorm2 {/colorm exch def %output showpage /deintp deintp1 def %deintp1 deintpd deintp2 {/deintp exch def %output showpage /xcolor xcolor1 def %xcolor1 xcolord xcolor2 {/xcolor exch def %output showpage /xchart xchart1 def %xchart1 xchartd xchart2 {/xchart exch def %output showpage /pchart pchart1 def %pchart1 pchartd pchart2 {/pchart exch def %output showpage /colsep colsep1 def %colsep1 colsepd colsep2 {/colsep exch def %output showpage /pmetam pmetam1 def %pmetam1 pmetamd pmetam2 {/pmetam exch def %output showpage %pmetam 0 eq {/colsep 0 def} %cmyn5* % {/colsep 1 def} ifelse %cmy0* /Devicea (ORS20a) def xchart 0 eq {/ISRL*ioL 0 def /ISIO*ioL 0 def} if %Offset ORS18 xchart 1 ge {/ISRL*ioL 0 def /ISIO*ioL 0 def} if %Offset ORS18 ISRL*ioL 0 eq {%ISRL*ioL=0 ISIO*ioL 0 eq {/TSYSIOa (ORS18a) def /TSYSIO (ORS18) def /TSYSIOen (Offset Reflective System ) def /TSYSIOde (Offset\255Reflektiv\255System ) def /TSYSIOes (Offset Reflective System ) def /TSYSIOfr (Syst\350me Offset Reflective ) def /TSYSIOit (Offset Reflective System ) def /TSYSIOjp (Offset Reflective System ) def } if ISIO*ioL 1 eq {/TSYSIOa (TLS00a) def /TSYSIOen (Television Luminous System ) def /TSYSIOde (Fernseh\255Lichtfarben\255System ) def /TSYSIOes (Television Luminous System ) def /TSYSIOfr (Syst\350me T\351l\351vision Lumicie ) def /TSYSIOit (Television Luminous System ) def /TSYSIOjp (Television Luminous System ) def } if ISIO*ioL 2 eq {/TSYSIOa (FRS06a) def /TSYSIOen (Printer Reflective System ) def /TSYSIOde (Drucker\255Reflektiv\255System ) def /TSYSIOes (Printer Reflective System ) def /TSYSIOfr (Syst\350me Printer Reflective ) def /TSYSIOit (Printer Reflective System ) def /TSYSIOjp (Printer Reflective System ) def } if ISIO*ioL 3 eq {/TSYSIOa (TLS18a) def /TSYSIOen (Television Luminous System ) def /TSYSIOde (Fernseh\255Lichtfarben\255System ) def /TSYSIOes (Television Luminous System ) def /TSYSIOfr (Syst\350me T\351l\351vision Lumicie ) def /TSYSIOit (Television Luminous System ) def /TSYSIOjp (Television Luminous System ) def } if ISIO*ioL 4 eq {/TSYSIOa (NLS00a) def /TSYSIOen (Natural Luminous System ) def /TSYSIOde (Nat\374rliches\255Lichtfarben\255System ) def /TSYSIOes (Natural Luminous System ) def /TSYSIOfr (Syst\350me Natural Lumicie ) def /TSYSIOit (Natural Luminous System ) def /TSYSIOjp (Natural Luminous System ) def } if ISIO*ioL 5 eq {/TSYSIOa (NRS18a) def /TSYSIOen (Natural Reflective System ) def /TSYSIOde (Nat\374rliches\255Reflektiv\255System ) def /TSYSIOes (Natural Reflective System ) def /TSYSIOfr (Syst\350me Natural Reflective ) def /TSYSIOit (Natural Reflective System ) def /TSYSIOjp (Natural Reflective System ) def } if ISIO*ioL 6 eq {/TSYSIOa (SRS18a) def /TSYSIOen (Standard Reflective System ) def /TSYSIOde (Standard\255Reflektiv\255System ) def /TSYSIOes (Standard Reflective System ) def /TSYSIOfr (Syst\350me Standard Reflective) def /TSYSIOit (Standard Reflective System ) def /TSYSIOjp (Standard Reflective System ) def } if ISIO*ioL 7 eq {/TSYSIOa (TLS70a) def /TSYSIOen (Television Luminous System ) def /TSYSIOde (Fernseh\255Lichtfarben\255System ) def /TSYSIOes (Television Luminous System ) def /TSYSIOfr (Syst\350me T\351l\351vision Lumicie ) def /TSYSIOit (Television Luminous System ) def /TSYSIOjp (Television Luminous System ) def } if } if %ISRL*ioL=0 ISRL*ioL 1 eq {%ISRL*ioL=1 ISIO*ioL 0 eq {/TSYSIOa (TLS00a) def} if ISIO*ioL 1 eq {/TSYSIOa (TLS06a) def} if ISIO*ioL 2 eq {/TSYSIOa (TLS11a) def} if ISIO*ioL 3 eq {/TSYSIOa (TLS18a) def} if ISIO*ioL 4 eq {/TSYSIOa (TLS27a) def} if ISIO*ioL 5 eq {/TSYSIOa (TLS38a) def} if ISIO*ioL 6 eq {/TSYSIOa (TLS52a) def} if ISIO*ioL 7 eq {/TSYSIOa (TLS70a) def} if /TSYSIOen (Television Luminous System ) def /TSYSIOde (Fernseh\255Lichtfarben\255System ) def /TSYSIOes (Television Luminous System ) def /TSYSIOfr (Syst\350me T\351l\351vision Lumicie ) def /TSYSIOit (Television Luminous System ) def /TSYSIOjp (Television Luminous System ) def } if %ISRL*ioL=1 ISRL*ioL 2 eq {%ISRL*ioL=2 ISIO*ioL 0 eq {/TSYSIOa (OLS00a) def} if ISIO*ioL 1 eq {/TSYSIOa (OLS06a) def} if ISIO*ioL 2 eq {/TSYSIOa (OLS11a) def} if ISIO*ioL 3 eq {/TSYSIOa (OLS18a) def} if ISIO*ioL 4 eq {/TSYSIOa (OLS27a) def} if ISIO*ioL 5 eq {/TSYSIOa (OLS38a) def} if ISIO*ioL 6 eq {/TSYSIOa (OLS52a) def} if ISIO*ioL 7 eq {/TSYSIOa (OLS70a) def} if /TSYSIOen (Offset Reflective System ) def /TSYSIOde (Offset\255Reflektiv\255System ) def /TSYSIOes (Offset Reflective System ) def /TSYSIOfr (Syst\350me Offset Reflective ) def /TSYSIOit (Offset Reflective System ) def /TSYSIOjp (Offset Reflective System ) def } if %ISRL*ioL=2 proc_LAB*ioL xchart 0 eq {/ausz 8 def /xchartt (A) def} if %LOOP not possible xchart 1 eq {/ausz 8 def /xchartt (F) def} if %in case of image xchart 2 eq {/ausz 1 def /xchartt (C) def} if xchart 3 eq {/ausz 2 def /xchartt (M) def} if xchart 4 eq {/ausz 3 def /xchartt (Y) def} if xchart 5 eq {/ausz 7 def /xchartt (N) def} if xchart 6 ge {/ausz 8 def /xchartt (F) def} if 7 /Times-ISOL1 FS 130 83 moveto lanind cvishow (-) show colorm cvishow deintp cvishow xcolor cvishow xchart cvishow pchart cvishow colsep cvishow (-L) show pmetam cvishow 180 83 moveto (QI840-7) show xchart 0 eq {(N) show} {deintp colorm 2 mul add cvishow} ifelse 72 90 translate /xt 1 def xchart 1 eq {/xt 1 def} if xt 0 eq {0.0115 MM} {0.010 MM} ifelse dup scale /xchart3P4 xchart3 4 add def /xchart3P15 xchart3 15 add def pmetam 0 eq {%pmetam=0 40 setlinewidth xchart xchart3P4 le {0.5 setgray} {1 setgray} ifelse 0 0 moveto 25000 0 rlineto 0 17220 rlineto -25000 0 rlineto closepath fill 0 setgray 0 0 moveto 25000 0 rlineto 0 17220 rlineto -25000 0 rlineto closepath stroke } if %pmetam=0 colorm 0 eq deintp 0 eq and {/Txx (d) def /Fxx (d) def} if %colorm=0, deintp=0 colorm 0 eq deintp 1 eq and {/Txx (e) def /Fxx (e) def} if %colorm=0, deintp=1 colorm 1 eq deintp 0 eq and {/Txx (dd) def /Fxx (d) def} if %colorm=1, deintp=0 colorm 1 eq deintp 1 eq and {/Txx (de) def /Fxx (e) def} if %colorm=1, deintp=1 xchart 0 eq {/Txx (-) def /Fxx (-) def} if /xcharts 9 xchart4 add def %************************************************************** xchart xchart3P4 le {%BEG LOOP0: xchart<=xchart3P4 %two pages for xchart=0,1+4 separations /ColNames 17 array def /ColNames [(R) (Y) (G) (C) (B) (M) (N) (W) (R) (Y) (G) (B) ] def /AngsTabt 68 array def /AngsTabt [%31 angles = 360/22,5 + 1 = 16 + 1 000.0 1.00 0.00 0.00 %r00j 022.5 1.00 0.25 0.00 045.0 1.00 0.50 0.00 %r50j 067.5 1.00 0.75 0.00 090.0 1.00 1.00 0.00 %j00g 112.5 0.75 1.00 0.00 135.0 0.50 1.00 0.00 %j50g 157.5 0.25 1.00 0.00 180.0 0.00 1.00 0.00 %g00b 202.5 0.00 1.00 0.50 225.0 0.00 1.00 1.00 %g50b 247.5 0.00 0.50 1.00 270.0 0.00 0.00 1.00 %b00r 292.5 0.50 0.00 1.00 315.0 1.00 0.00 1.00 %b50r 337.5 1.00 0.00 0.50 360.0 1.00 0.00 0.00 %r00j ] def /xs 1000 def /ys xs def /d2 xs 2 div def /d8 xs 8 div def /xs5x xs 5.4 mul def /ys5x ys 5.4 mul def /x xs 0.15 mul def /y ys 12.0 mul def /xd 800 def /yd 800 def /xd5x xs5x 200 sub def /yd5x ys5x 200 sub def /j 0 def /i 0 def /xds 600 def /xmin 0000 def /xmax 10000 def /ymin 0000 def /ymax 10000 def %Spalten /S11 0020 def %code /S21 1300 def %L* /S31 2100 def %a* /S41 2900 def %b* /S51 3800 def %C* /S61 4650 def %h* /S1t 0020 def %code /S2t 2200 def %L* /S3t 3000 def %a* /S4t 3800 def %b* /S5t 4650 def %C* /S6t 5450 def %h* /xcharti pchart def %************************************************************************** 0 1 1 {/ibild exch def %ibild=0,1 xcharts 9 eq {%xcharts=9 %BEG CIELAB_09 xchart=09 ibild 0 eq { 1900 1700 translate} if ibild 1 eq {13800 1700 translate} if %BEG CIELAB_09 Top Text Hue Circles ibild 0 eq {%ibild=0 1 setgray TBG0 /xtext0 -1700 def /xtext1 -1200 def /cfakt 1.0 def xtext0 15000 moveto (Input and Output: ) showen (Ein\255 und Ausgabe: ) showde (Entrada i salida: ) showes (Entr\351e et sortie: ) showfr (Immetere y uscita: ) showit (Input and Output: ) showjp TSYSIOen showen TSYSIOde showde TSYSIOes showes TSYSIOfr showfr TSYSIOit showit TSYSIOjp showjp TSYSIOa show TBG0 xtext0 14500 moveto (Data for any device (d) or) showen (Daten f\374r jede Ger\344te\255 (d) oder) showde (Datos del dispositivo (d) o) showes (Donn\351es de couleurs p\351riph\351riques (d)) showfr (Dati del dispositivo (d) o) showit (Data for any device (d) or) showjp xtext0 14100 moveto (elementary (e) colour:) showen (Elementarfarbe (e):) showde (elemental (e) color:) showes (ou \351l\351mentaires (e):) showfr (colori elementari (e):) showit (elementary (e) colour:) showjp xtext1 13700 moveto TBIG0 (HIC*) show TBM0 -20 -50 rmoveto Fxx show 0 50 rmoveto TBG0 xtext0 13300 moveto TBG0 (hue text for the colours) showen (Bunttontext f\374r die Farben) showde (c\363digo de tono para les colores) showes (code de teinte pour les cou\255) showfr (codice di tonalit\340 per i colori) showit (hue text for the colours) showjp xtext0 12900 moveto (of this page: ) showen (dieser Seite: ) showde (esta p\341gina: ) showes (leurs de cette p\341ge: ) showfr (questa pagina: ) showit (of this page: ) showjp xtext1 12500 moveto TBIG0 (H*) show -20 -50 rmoveto TBM0 Fxx show 0 50 rmoveto TBG0 ( = ) show TBG0 COLhNam16 00 get show 0 -50 rmoveto TBM0 Fxx show 0 50 rmoveto(, ) show TBG0 COLhNam16 01 get show 0 -50 rmoveto TBM0 Fxx show 0 50 rmoveto(, ..., ) show TBG0 COLhNam16 15 get show 0 -50 rmoveto TBM0 Fxx show 0 50 rmoveto TBG0 %cfakt 1 ne {%cfakt#1 %xtext0 12100 moveto TBG0 %(contrast reduction factor: ) showen (Kontrastreduzierungsfaktor: ) showde %xtext1 11600 moveto %TBIG0 (c) show TBM0 0 -130 rmoveto (R) show 0 130 rmoveto %TBG0 ( = ) show %cfakt cvsshow2 %} if %cfakt#1 } if %ibild=0 %END CIELAB_09 Top Text Hue Circle %*********************************************************** %BEG CIELAB_09 Hue Circle -1200 -1500 translate %transfer for colour circle /xym 4 def 25 setlinewidth /xd2 xd 0.8 mul def ibild 0 eq {0.5 0.5 0.5 setrgbcolor} {1.0 1.0 1.0 setrgbcolor} ifelse 0 0 moveto 2800 xym mul 0 rlineto 0 2800 xym mul rlineto -2800 xym mul 0 rlineto closepath fill 0.0 setgray 0 0 moveto 2800 xym mul 0 rlineto 0 2800 xym mul rlineto -2800 xym mul 0 rlineto closepath stroke 1400 xym mul 1400 xym mul translate %cero at center -600 xym mul 0 moveto 600 xym mul 0 lineto stroke 0 -750 xym mul moveto 0 750 xym mul lineto stroke /rx 774 xym mul 1.56 mul def %standard hexagon gamut 0 0 0 setrgbcolor 0 0 rx 0 360 arc stroke /xs3 1400 def /xd3 xs3 2 div def CBKK 0 1 15 {/j exch def %j=0,15 /xpos rx AngsTabt j 4 mul get cos mul def /ypos rx AngsTabt j 4 mul get sin mul def /xa xpos xd3 sub def /ya ypos xd3 sub def /r_x AngsTabt j 4 mul 1 add get def /g_x AngsTabt j 4 mul 2 add get def /b_x AngsTabt j 4 mul 3 add get def /tLAB 1 def r_x g_x b_x setrgbcolor xa ya xs3 xs3 rec fill 1 r_x sub 1 g_x sub 1 b_x sub 0 setcmykcolor xa ya xs3 0.5 mul dup rem fill } for %j=0,15 TBG0 0 0 0 setrgbcolor 2100 1300 moveto (yellowish) showen (gelblich) showde (amarillento) showes (jaun\342tre) showfr (giallastro) showit (yellowish) showjp -3600 1300 moveto (yellowish) showen (gelblich) showde (amarillento) showes (jaun\342tre) showfr (giallastro) showit (yellowish) showjp 2300 -1450 moveto ( bluish) showen (bl\344ulich) showde (azulado) showes (blue\342tre) showfr (bluastro) showit ( bluish) showjp -3600 -1450 moveto ( bluish) showen (bl\344ulich) showde (azulado) showes (blue\342tre) showfr (bluastro) showit ( bluish) showjp -2000 3300 moveto (greenish) showen (gr\374nlich) showde ( verdoso) showes (verd\342tre) showfr (verdastro) showit (greenish) showjp -2000 -3500 moveto (greenish) showen (gr\374nlich) showde ( verdoso) showes (verd\342tre) showfr (verdastro) showit (greenish) showjp 900 3300 moveto ( redish) showen (r\366tlich) showde ( rojizo) showes (rouge\342tre) showfr (rossastro) showit ( redish) showjp 900 -3500 moveto ( redish) showen (r\366tlich) showde ( rojizo) showes (rouge\342tre) showfr (rossastro) showit ( redish) showjp -4000 -100 moveto (Green) showen (Gr\374n) showde (Green) showes (Vert) showfr (Verde) showit (Green) showjp TBIG0 ( G) show TBM0 0 -30 rmoveto Fxx show 0 30 rmoveto TBG0 2600 -100 moveto (Red) showen (Rot) showde (Rojo) showes (Rouge) showfr (Rosso) showit (Red) showjp TBIG0 ( R) show TBM0 0 -30 rmoveto Fxx show 0 30 rmoveto TBG0 -500 3700 moveto (Yellow) showen (Gelb) showde (Amarillo) showes (Jaune) showfr (Giallo) showit (Yellow) showjp TBIG0 ( Y) show TBM0 0 -30 rmoveto Fxx show 0 30 rmoveto TBG0 -400 -3900 moveto (Blue) showen (Blau) showde (Azul) showes (Bleu) showfr (Blu) showit (Blue) showjp TBIG0 ( B) show TBM0 0 -30 rmoveto Fxx show 0 30 rmoveto TBG0 -1400 xym mul -1400 xym mul translate 1200 1500 translate %END CIELAB_09 Hue Circle %**************************************************************************** %CIELAB_09-T16 /xdev 11000 def /xele -09250 def /xtop 600 def ibild 0 eq {5600 xdev add }{4700 xele add} ifelse 9600 xtop add translate proc_CIELAB_T16 ibild 0 eq {-5600 xdev sub}{-4700 xele sub} ifelse -9600 xtop sub translate %END CIELAB_09 Table %**************************************************************************** %BEG CIELAB_09 Diagram ibild 0 eq { %ibild=0 2600 xdev add 11600 xtop add translate proc_CIELAB_D -2600 xdev sub -11600 xtop sub translate } if %ibild=0 %END CIELAB_09 Diagram %**************************************************************************** %BEG CIELAB_09 Gamut ibild 1 eq { %ibild=1 proc_CIELAB_G } if %ibild=1 %END CIELAB_09 Diagram ibild 0 eq { 1900 neg 1700 neg translate} if ibild 1 eq {13800 neg 1700 neg translate} if } if %xcharts=9 %END CIELAB_09 xchart=09 %***************************************************************************** xcharts 10 ge xcharts 25 le and {%xcharts=10,25 %BEG CIELAB_10,25 xcharts=10,25 %BEG CIELAB_10 Top Text Hue Triangles ibild 0 eq { 1900 1700 translate} if ibild 1 eq {13800 1700 translate} if 1.0 setgray 25 setlinewidth -200 000 moveto 10500 0 rlineto stroke 000 -200 moveto 0 11800 rlineto stroke ibild 0 eq {2500 -200 moveto 0 400 rlineto stroke 5000 -200 moveto 0 400 rlineto stroke 7500 -200 moveto 0 400 rlineto stroke} {2000 -200 moveto 0 400 rlineto stroke 4000 -200 moveto 0 400 rlineto stroke 6000 -200 moveto 0 400 rlineto stroke 8000 -200 moveto 0 400 rlineto stroke }ifelse 10000 -200 moveto 0 400 rlineto stroke -200 5000 moveto 400 0 rlineto stroke -200 10000 moveto 400 0 rlineto stroke 000 000 moveto 10000 5000 rlineto -10000 5000 rlineto stroke 09700 -450 sub 000 150 add moveto 450 -150 rlineto -450 -150 rlineto closepath fill 000 150 sub 11000 -450 sub moveto 150 450 rlineto 150 -450 rlineto closepath fill TM0 %C*, C* ibild 0 eq { %ibild=0,1 /iy0 -600 def 0 200 sub iy0 moveto (000) show 2500 200 sub iy0 moveto (025) show 5000 200 sub iy0 moveto (050) show 7500 200 sub iy0 moveto (075) show 10000 200 sub iy0 moveto (100) show } { /iy0 -600 def 0 200 sub iy0 moveto (000) show 2000 200 sub iy0 moveto (020) show 4000 200 sub iy0 moveto (040) show 6000 200 sub iy0 moveto (060) show 8000 200 sub iy0 moveto (080) show 10000 200 sub iy0 moveto (100) show } ifelse %ibild=0,1 TM0 %T*, L* ibild 0 eq { %ibild=0,1 /ix0 -1750 def /iy0 200 def ix0 0 iy0 sub moveto (000) show ix0 2500 iy0 sub moveto (025) show ix0 5000 iy0 sub moveto (050) show ix0 7500 iy0 sub moveto (075) show ix0 10000 iy0 sub moveto (100) show } { /ix0 -0900 def /iy0 200 def ix0 0 iy0 sub moveto (000) show ix0 2500 iy0 sub moveto (025) show % ix0 5000 iy0 sub moveto (050) show ix0 7500 iy0 sub moveto (075) show ix0 10000 iy0 sub moveto (100) show } ifelse %ibild=0,1 TM0 i%* ibild 0 eq {%ibild=0,1 /iy0 1550 def 10000 400 sub 5000 iy0 sub moveto TIM0 (I*) show TM0 ( = 100) show 7500 400 sub 3750 iy0 sub moveto TIM0 (I*) show TM0 ( = 075) show 5000 400 sub 2500 iy0 sub moveto TIM0 (I*) show TM0 ( = 050) show 2500 400 sub 1250 iy0 sub moveto TIM0 (I*) show TM0 ( = 025) show 000 400 sub 00 iy0 sub moveto TIM0 (I*) show TM0 ( = 000) show }%ibild=0 {%ibild=1 /iy0 700 def 10000 500 sub 4700 iy0 sub moveto TIM0 (I*) show TM0 (=100) show 8000 200 sub 4000 iy0 sub moveto TIM0 (I*) show TM0 (=080) show 6000 200 sub 3000 iy0 sub moveto TIM0 (I*) show TM0 (=060) show 4000 200 sub 2000 iy0 sub moveto TIM0 (I*) show TM0 (=040) show 2000 200 sub 1000 iy0 sub moveto TIM0 (I*) show TM0 (=020) show 000 200 sub -300 iy0 sub moveto TIM0 (I*) show TM0 (=000) show } ifelse %ibild=0,1 ibild 0 eq {/iy0 2400 def} {/iy0 1400 def} ifelse 09000 0500 sub 4300 iy0 sub moveto 1000 500 rlineto stroke 10000 0500 sub 4800 iy0 sub moveto -450 -50 rlineto 150 -300 rlineto closepath fill 10000 2600 sub 3800 iy0 sub moveto TBG0 (brilliance) showen (Brillantheit) showde (brillo) showes (brillance) showfr (brillantezza) showit (brilliance) showjp TBIG0 ( I*) show 7200 -1100 moveto TBG0 (chroma) showen (Buntheit) showde (chroma) showes (chroma) showfr (croma) showit (chroma) showjp TBIG0 ( C*) show TBG0 /xtext0 -1700 def /xtext1 -1200 def ibild 0 eq { %ibild=0 TBG0 xtext0 14500 moveto (Data for any device (d) or) showen (Daten f\374r jede Ger\344te\255 (d) oder) showde (Datos del dispositivo (d) o) showes (Donn\351es de couleurs p\351riph\351riques (d)) showfr (Dati del dispositivo (d) o) showit (Data for any device (d) or) showjp xtext0 14100 moveto (elementary (e) colour:) showen (Elementarfarbe (e):) showde (elemental (e) color:) showes (ou \351l\351mentaires (e):) showfr (colori elementari (e):) showit (elementary (e) colour:) showjp xtext1 13700 moveto TBIG0 (HIC*) show TBM0 -20 -50 rmoveto Fxx show 0 50 rmoveto TBG0 xtext0 13300 moveto TBG0 (hue text for the colours) showen (Bunttontext f\374r die Farben) showde (c\363digo de tono para les colores) showes (code de teinte pour les cou\255) showfr (codice di tonalit\340 per i colori) showit (hue text for the colours) showjp xtext0 12900 moveto (of this page: ) showen (dieser Seite: ) showde (esta p\341gina: ) showes (leurs de cette p\341ge: ) showfr (questa pagina: ) showit (of this page: ) showjp xtext1 12500 moveto TBIG0 (H*) show -20 -50 rmoveto TBM0 Fxx show 0 50 rmoveto TBG0 ( = ) show TBG0 COLhNam16 xchart4 1 sub get show 0 -50 rmoveto TBM0 Fxx show 0 50 rmoveto %Equal data text for top right page in black 0 setgray 20000 14900 moveto TBIG0 (H*) show TBM0 -20 -50 rmoveto Fxx show 0 50 rmoveto TBG0 ( = ) show TBG0 COLhNam16 xchart4 1 sub get show 0 -50 rmoveto TBM0 Fxx show 0 50 rmoveto 1 setgray cfakt 1 ne {%cfakt#1 xtext0 12900 moveto TBG0 (factor of contrast reduction: ) showen (Faktor der Kontrast\255Reduzierung: ) showde (factor de reducci\363n del contraste: ) showes (facteur de contraste r\351duction: ) showfr (fattore di riduzione di contrasto: ) showit (factor of contrast reduction: ) showjp xtext1 12500 moveto TBIG0 (c) show TBM0 0 -130 rmoveto (R) show 0 130 rmoveto TBG0 ( = ) show cfakt cvsshow2 } if %cfakt#1 xtext1 12000 moveto TBG0 (triangle lightness) showen (Dreiecks\255Helligkeit) showde (tri\340ngulo claridad) showes (triangle de luminosit\351) showfr (triangulo chiarezza) showit (triangle lightness) showjp TBIG0 ( T*) show /ixt 12500 def /iyt 000 def TBG0 -1200 ixt add 12000 iyt add moveto TBG0 (triangle lightness) showen (Dreiecks\255Helligkeit) showde (tri\340ngulo claridad) showes (triangle de luminosit\351) showfr (triangulo chiarezza) showit (triangle lightness) showjp TBIG0 ( T*) show TBG0 -1200 ixt add 14500 iyt add moveto (Data for maximum colour (Ma): ) showen (Daten f\374r Maximalfarbe (Ma): ) showde (Los datos de color m\341ximo (Ma): ) showes (Les donn\351es de couleur maximale (Ma): ) showfr (Il dati per il massimo colore (Ma): ) showit (Data for maximum colour (Ma): ) showjp TBIG0 -1200 ixt add 14000 iyt add moveto (LabCh*) show TBM0 -20 -50 rmoveto Fxx show (,Ma) show 0 50 rmoveto TBG0 (: ) show /i xcharts 10 sub def i 8 le {/i1 i def}{/i1 i 1 add def} ifelse %dup at no. 10 /i30 i1 3 mul def /i31 i30 1 add def /i32 i30 2 add def xchart 0 eq {%xchart=0,>0 %16 measured data, see PE54L0NP.pdf, page 11/24 %PE540-7N, Page 11/24 HIC*Fd rgb*Fd LabCh*Fd /LAB*a48 432 array def %48x9=432 /LAB*a48 [%HIC rgb LabCh nr (R00Y_100_100d) 1.000 0.000 0.000 48.4 66.1 40.2 77.4 31.3 %00 (R13Y_100_100d) 1.000 0.116 0.000 52.5 57.3 45.5 73.2 38.4 %01 (R25Y_100_100d) 1.000 0.233 0.000 56.8 48.0 50.5 69.8 46.4 %02 (R38Y_100_100d) 1.000 0.366 0.000 62.5 36.5 57.1 67.8 57.3 %03 (R50Y_100_100d) 1.000 0.500 0.000 68.6 25.0 63.9 68.7 68.6 %04 (R63Y_100_100d) 1.000 0.633 0.000 74.9 14.1 71.1 72.5 78.7 %05 (R75Y_100_100d) 1.000 0.766 0.000 80.6 4.8 77.2 77.4 86.4 %06 (R88Y_100_100d) 1.000 0.883 0.000 85.4 -2.5 82.3 82.3 91.7 %07 (Y00G_100_100d) 1.000 1.000 0.000 90.2 -9.6 88.2 88.7 96.2 %08 (Y13G_100_100d) 0.883 1.000 0.000 86.7 -14.2 83.5 84.7 99.6 %09 (Y25G_100_100d) 0.766 1.000 0.000 83.2 -18.4 79.9 82.0 102.9 %10 (Y38G_100_100d) 0.633 1.000 0.000 77.9 -25.1 69.5 74.0 109.8 %11 (Y50G_100_100d) 0.500 1.000 0.000 73.3 -31.7 62.7 70.3 116.8 %12 (Y63G_100_100d) 0.366 1.000 0.000 68.2 -39.5 55.9 68.5 125.2 %13 (Y75G_100_100d) 0.233 1.000 0.000 62.0 -49.7 43.2 65.9 138.9 %14 (Y88G_100_100d) 0.116 1.000 0.000 59.1 -57.1 38.5 68.9 145.9 %15 (G00C_100_100d) 0.000 1.000 0.000 55.8 -65.2 33.8 73.5 152.5 %16 (G13C_100_100d) 0.000 1.000 0.116 56.6 -62.9 24.0 67.3 159.0 %17 (G25C_100_100d) 0.000 1.000 0.233 57.4 -59.7 13.9 61.3 166.8 %18 (G38C_100_100d) 0.000 1.000 0.366 58.5 -54.9 1.5 55.0 178.4 %19 (G50C_100_100d) 0.000 1.000 0.500 59.3 -50.3 -9.0 51.1 190.2 %20 (G63C_100_100d) 0.000 1.000 0.633 60.1 -45.6 -18.7 49.3 202.3 %21 (G75C_100_100d) 0.000 1.000 0.766 61.1 -40.3 -27.8 49.0 214.6 %22 (G88C_100_100d) 0.000 1.000 0.883 62.0 -35.8 -34.7 49.9 224.0 %23 (C00B_100_100d) 0.000 1.000 1.000 63.0 -30.5 -42.0 51.9 234.0 %24 (C13B_100_100d) 0.000 0.883 1.000 59.4 -25.3 -42.7 49.7 239.2 %25 (C25B_100_100d) 0.000 0.766 1.000 55.8 -20.3 -43.2 47.7 244.7 %26 (C38B_100_100d) 0.000 0.633 1.000 50.8 -13.3 -43.9 45.9 253.0 %27 (C50B_100_100d) 0.000 0.500 1.000 45.7 -5.7 -44.6 45.0 262.6 %28 (C63B_100_100d) 0.000 0.366 1.000 40.4 2.6 -45.2 45.2 273.3 %29 (C75B_100_100d) 0.000 0.233 1.000 36.0 10.1 -46.1 47.2 282.3 %30 (C88B_100_100d) 0.000 0.116 1.000 32.1 17.3 -46.7 49.8 290.3 %31 (B00M_100_100d) 0.000 0.000 1.000 27.5 25.9 -47.3 54.0 298.7 %32 (B13M_100_100d) 0.116 0.000 1.000 29.5 33.4 -43.1 54.6 307.7 %33 (B25M_100_100d) 0.233 0.000 1.000 31.0 39.9 -38.5 55.5 315.9 %34 (B38M_100_100d) 0.366 0.000 1.000 35.1 44.5 -34.7 56.5 322.0 %35 (B50M_100_100d) 0.500 0.000 1.000 38.3 52.6 -28.5 59.9 331.5 %36 (B63M_100_100d) 0.633 0.000 1.000 41.2 59.3 -22.0 63.3 339.6 %37 (B75M_100_100d) 0.766 0.000 1.000 45.2 63.8 -18.2 66.4 344.0 %38 (B88M_100_100d) 0.883 0.000 1.000 47.5 68.6 -13.8 69.9 348.5 %39 (M00R_100_100d) 1.000 0.000 1.000 49.5 73.5 -9.0 74.1 352.9 %40 (M13R_100_100d) 1.000 0.000 0.883 49.4 72.4 -4.0 72.5 356.7 %41 (M25R_100_100d) 1.000 0.000 0.766 49.3 71.4 0.4 71.4 0.3 %42 (M38R_100_100d) 1.000 0.000 0.633 49.3 69.8 6.6 70.1 5.4 %43 (M50R_100_100d) 1.000 0.000 0.500 48.9 69.3 12.9 70.5 10.5 %44 (M63R_100_100d) 1.000 0.000 0.366 48.9 68.1 19.6 70.9 16.1 %45 (M75R_100_100d) 1.000 0.000 0.233 48.8 67.1 27.9 72.7 22.6 %46 (M88R_100_100d) 1.000 0.000 0.116 48.6 66.5 34.1 74.8 27.1 %47 ] def /indFa16 16 array def /indFa16 [00 02 04 06 08 10 12 14 16 20 24 28 32 36 40 44] def /indx indFa16 i get def /i90 indx 9 mul 4 add def /i91 i90 1 add def /i92 i90 2 add def /L*Ma LAB*a48 i90 get def /A*Ma LAB*a48 i91 get def /B*Ma LAB*a48 i92 get def /C*Ma A*Ma dup mul B*Ma dup mul add 0.0001 add sqrt def /H*Ma B*Ma A*Ma 0.0001 add atan def /i90 indx 9 mul 1 add def /i91 i90 1 add def /i92 i90 2 add def /r*xF LAB*a48 i90 get def /g*xF LAB*a48 i91 get def /b*xF LAB*a48 i92 get def }%xchart=0 {%xchart>0 /r*x r*dd18M i get def /g*x g*dd18M i get def /b*x b*dd18M i get def r*x g*x b*x setrgbcolor %default to create data %setrgbcolor calculates data for output in "FF_LM_de_setrgbcolor_F" %colorm=0 calculates: rgb_dyF, rgb*dyF, LAB*dyF, ,cmyk*dyF and more %colorm=1 calculates: rgb_dyF, rgb*dyF, LAB*dyF', rgb'*dyF, cmyk*dyF and more /r_xF r_dyF def /g_xF g_dyF def /b_xF b_dyF def /i_xF i_dyF def /c_xF c_dyF def /t_xF t_dyF def /r*xF r*dyF def /g*xF g*dyF def /b*xF b*dyF def /LAB*LxF LAB*LdyF def /LAB*axF LAB*adyF def /LAB*bxF LAB*bdyF def /LAB*CxF LAB*adyF dup mul LAB*bdyF dup mul add 0.0001 add sqrt def /LAB*hxF LAB*bdyF LAB*adyF 0.0001 add atan def colorm 0 eq {%colorm=0 %proc_rgb_dyF_LAB*'dyF uses rgb_dyF by default %calculates output data according to IEC 61966-2-1 proc_rgb_dyF_LAB*'dyF /LAB*'LxF L*'dyF def /LAB*'axF a*'dyF def /LAB*'bxF b*'dyF def /LAB*'CxF C*'dyF def /LAB*'hxF h*'dyF def } if %colorm=0 colorm 1 eq {%colorm=1 /r'*xF r'*dyF def /g'*xF g'*dyF def /b'*xF b'*dyF def %calculates output data according to IEC 61966-2-1 proc_rgb'*dyF_LAB'*dyF /LAB'*LxF L'*dyF def /LAB'*axF a'*dyF def /LAB'*bxF b'*dyF def /LAB'*CxF C'*dyF def /LAB'*hxF h'*dyF def } if %colorm=1 %colorm 0 eq {%colorm=0 % /L*Ma LAB*'LxF def % /A*Ma LAB*'axF def % /B*Ma LAB*'bxF def % /C*Ma LAB*'CxF def % /H*Ma LAB*'hxF def % }%colorm=0 % {%colorm=1 % /L*Ma LAB'*LxF def % /A*Ma LAB'*axF def % /B*Ma LAB'*bxF def % /C*Ma LAB'*CxF def % /H*Ma LAB'*hxF def % } ifelse %colorm=0,1 /L*Ma LAB*LxF def /A*Ma LAB*axF def /B*Ma LAB*bxF def /C*Ma LAB*CxF def /H*Ma LAB*hxF def } ifelse %xchart=0,>0 1 setgray L*Ma cvishow ( ) show A*Ma cvishow ( ) show B*Ma cvishow ( ) show C*Ma cvishow ( ) show H*Ma cvishow ( ) show %calculation of i*xF, c*xF, and t*xF /maxd r*xF def g*xF maxd gt {/maxd g*xF def} if b*xF maxd gt {/maxd b*xF def} if /mind r*xF def g*xF mind lt {/mind g*xF def} if b*xF mind lt {/mind b*xF def} if /i*xF maxd def /c*xF maxd mind sub def /t*xF i*xF c*xF 0.5 mul sub def TBIG0 -1200 ixt add 13500 iyt add moveto (HIC*) show TBM0 -20 -50 rmoveto Fxx show (,Ma) show 0 50 rmoveto TBG0 (: ) show TBG0 COLhNam16 i get show (_) show /I*xF i*xF 100 mul cvi def I*xF 09 le {(00) show} if %filling cero I*xF 09 gt I*xF 99 le and {(0) show} if %range 0..100 I*xF 6 string cvs show (_) show /C*xF c*xF 100 mul cvi def C*xF 09 le {(00) show} if %filling cero C*xF 09 gt C*xF 99 le and {(0) show} if %range 0..100 C*xF 6 string cvs show TBM0 00 -50 rmoveto Fxx show 0 50 rmoveto TBIG0 -1200 ixt add 13000 iyt add moveto (rgbic*) show TBM0 -20 -50 rmoveto Fxx show (,Ma) show 0 50 rmoveto TBG0 (: ) show -1200 ixt add 12500 iyt add moveto r*xF cvsshow2 ( ) show g*xF cvsshow2 ( ) show b*xF cvsshow2 ( ) show i*xF cvsshow2 ( ) show c*xF cvsshow2 ( ) show } if %ibild=0 ibild 0 eq { %ibild=0 xtext0 15000 moveto (Input and Output: ) showen (Ein\255 und Ausgabe: ) showde (Entrada i salida: ) showes (Entr\351e et sortie: ) showfr (Immetere y uscita: ) showit (Input and Output: ) showjp TSYSIOen showen TSYSIOde showde TSYSIOes showes TSYSIOfr showfr TSYSIOit showit TSYSIOjp showjp TSYSIOa show /i xcharts 10 sub def TBG0 ( for relative CIELAB hue) showen ( f\374r relativen CIELAB\255Buntton) showde ( for relative CIELAB hue) showes ( pour la teinte CIELAB relative) showfr ( for relative CIELAB hue) showit ( for relative CIELAB hue) showjp TBIG0 ( h) show TBM0 0 -50 rmoveto (ab,a,rel) show 0 50 rmoveto TBG0 ( = ) show TBIG0 ( h) show TBM0 -20 -50 rmoveto (ab) show 0 50 rmoveto TBG0 (/360 = ) show H*Ma cvishow (/360 = ) show H*Ma 360 div cvsshow2 } if %ibild=0 %END CIELAB_10 Top Text Hue Triangles %*********************************************************************** %BEG CIELAB_10 Hue Triangle left 5 steps 0.0 setgray CBM0 ibild 0 eq { %ibild=0 /Tabfakt 0.82 def /anz 5 def /xs 10000 anz 3 add div def /ys xs def /x9 xs 1.8 mul def /xd xs 2 mul def /yd xs def 1 1 1 setrgbcolor %n* 1 1 3 {/j exch def /x1 xmin def /y1 ymax yd j 2 mul mul sub def /x2 xmin xd 4 j sub mul add def /y2 ymin yd 4 j sub mul add def x1 y1 moveto x2 y2 lineto stroke } for %c* 1 1 3 {/j exch def /x1 xmin xd j mul add def /y1 ymax yd j mul sub def /x2 xmin xd j mul add def /y2 ymin yd j mul add def x1 y1 moveto x2 y2 lineto stroke } for xcharts 6 ge {/i xcharts 10 sub def /r*xsi r*dd18M i get def /g*xsi g*dd18M i get def /b*xsi b*dd18M i get def } if /id 1 4 div def 0 1 04 {/j exch def %j=0,4 /im 4 j sub def 0 1 im {/i exch def %i=0,4 im 0 eq %im=0 {/r*x 0 def /g*x 0 def /b*x 0 def} %im=0 {/ia 1 id j mul sub def /argb ia def /brgb ia i id mul sub def xcharts 0 eq {/r*x argb def /g*x brgb def /b*x brgb def} if xcharts 1 eq {/r*x argb def /g*x argb def /b*x brgb def} if xcharts 2 eq {/r*x brgb def /g*x argb def /b*x brgb def} if xcharts 3 eq {/r*x brgb def /g*x argb def /b*x argb def} if xcharts 4 eq {/r*x brgb def /g*x brgb def /b*x argb def} if xcharts 5 eq {/r*x argb def /g*x brgb def /b*x argb def} if xcharts 6 ge {%xcharts>=6 /ib 1 im div def %im#0 /ic 1 ib i mul sub def /ie 1 ic sub def /r*x 1 ia mul ic mul r*xsi ia mul ie mul add def /g*x 1 ia mul ic mul g*xsi ia mul ie mul add def /b*x 1 ia mul ic mul b*xsi ia mul ie mul add def } if %xcharts>=6 } ifelse %im=0 r*x g*x b*x setrgbcolor %only to calculate olv'*3, cmyn'*4 /xa xmin xd i mul add 0.5 xd mul sub def /iad j 2 mul def /ya ymax yd i iad add mul sub 1.0 yd mul sub def r*x g*x b*x setrgbcolor xa ya xd xd rec fill xcharti 5 le {1 r*x sub 1 g*x sub 1 b*x sub 0 setcmykcolor xa ya xd 0.5 mul dup rem fill} if xcharti 0 eq {%xcharti=0 [100 300] 0 setdash r*x 0 eq g*x 0 eq and b*x 0 eq and {1 setgray} {0 setgray} ifelse xa ya xd 0.5 mul dup rem stroke [ ] 0 setdash } if %xcharti=0 } for %i=0,4 } for %j=0,4 /i 2 def %mean grey stroke of 5 steps /xa xmin 0.5 xd mul sub def /ya ymax yd i mul 2 mul sub 1.0 yd mul sub def 1 1 1 setrgbcolor xa ya xd xd rec stroke } if %ibild=0 %END CIELAB_10 Hue Triangle left 5 steps %******************************************************************* %BEG CIELAB_10 Hue Triangle right 16 steps ibild 1 eq { %ibild=1 CBK0 /Tabfakt 1 def /anz 16 def /xs 10000 anz 14 add div def /ys xs def /x9 xs 1.8 mul def /xd xs 2 mul def /yd xs def 1 1 1 setrgbcolor %n* 1 1 14 {/j exch def %j=1,14 /x1 xmin def /y1 ymax yd j 2 mul mul sub def /x2 xmin xd 15 j sub mul add def /y2 ymin yd 15 j sub mul add def x1 y1 moveto x2 y2 lineto stroke } for %j=1,14 %c* 1 1 14 {/j exch def %j=1,14 /x1 xmin xd j mul add def /y1 ymax yd j mul sub def /x2 xmin xd j mul add def /y2 ymin yd j mul add def x1 y1 moveto x2 y2 lineto stroke } for %j=1,14 xcharts 6 ge {/i xcharts 10 sub def /r*xsi r*dd18M i get def /g*xsi g*dd18M i get def /b*xsi b*dd18M i get def } if /id 1 15 div def 0 1 15 {/j exch def %j=0,14 /im 15 j sub def 0 1 im {/i exch def %i=0,15 im 0 eq %im=0 {/r*x 0 def /g*x 0 def /b*x 0 def} %im=0 {/ia 1 id j mul sub def /argb ia def /brgb ia i id mul sub def xcharts 0 eq {/r*x argb def /g*x brgb def /b*x brgb def} if xcharts 1 eq {/r*x argb def /g*x argb def /b*x brgb def} if xcharts 2 eq {/r*x brgb def /g*x argb def /b*x brgb def} if xcharts 3 eq {/r*x brgb def /g*x argb def /b*x argb def} if xcharts 4 eq {/r*x brgb def /g*x brgb def /b*x argb def} if xcharts 5 eq {/r*x argb def /g*x brgb def /b*x argb def} if xcharts 6 ge {%xcharts>=6 /ib 1 im div def %im#0 /ic 1 ib i mul sub def /ie 1 ic sub def /r*x 1 ia mul ic mul r*xsi ia mul ie mul add def /g*x 1 ia mul ic mul g*xsi ia mul ie mul add def /b*x 1 ia mul ic mul b*xsi ia mul ie mul add def } if %xcharts>=6 } ifelse %im=0 r*x g*x b*x setrgbcolor %only to calculate olv'*3, cmyn'*4 /xa xmin xd i mul add 0.5 xd mul sub def /iad j 2 mul def /ya ymax yd i iad add mul sub 1.0 yd mul sub def r*x g*x b*x setrgbcolor xa ya xd xd rec fill xcharti 5 le {1 r*x sub 1 g*x sub 1 b*x sub 0 setcmykcolor xa ya xd 0.5 mul dup rem fill} if xcharti 0 eq {%xcharti=0 [100 300] 0 setdash r*x 0 eq g*x 0 eq and b*x 0 eq and {1 setgray} {0 setgray} ifelse xa ya xd 0.5 mul dup rem stroke [ ] 0 setdash } if %xcharti=0 } for %i=0,15 } for %j=0,15 xcharti 5 le {%xchart=0,5 %mean grey stroke of steps 7 and 8 7 1 8 {/i exch def %i=7,8 /xa xmin xd 0.5 mul sub def /ya ymax yd i mul 2 mul sub xd 0.5 mul sub def 1 1 1 setrgbcolor xa ya xd xd rec stroke } for %i=7,8 } if %xchart=0,5 } if %ibild=1 %END CIELAB_10 Hue Triangle right %******************************************************************* %BEG CIELAB_10 Table ibild 0 eq {5600}{4500} ifelse 9600 translate proc_CIELAB_T16 ibild 0 eq {-5600}{-4500} ifelse -9600 translate %END CIELAB_10 Table %******************************************************************** %BEG CIELAB_10 Diagram ibild 0 eq { %ibild=0 2700 11600 translate proc_CIELAB_D -2700 -11600 translate } if %ibild=0 %END CIELAB_10 Diagram %***************************************************************** %BEG CIELAB_10 Gamut ibild 1 eq { %ibild=1 proc_CIELAB_G } if %ibild=1 %END CIELAB_10 Gamut %***************************************************************** ibild 1 eq {-13800 -1700 translate} if ibild 0 eq { -1900 -1700 translate} if } if %xcharts=10,25 %END CIELAB_10,25 xchart=10,25 %***************************************************************************** } for %ibild=0,1 %***************************************************************************** xcharts 26 eq {%BEG CIELAB_26 xcharts=26 % Data for 1080 colour test chart /nr1 27 array def /tx1 52 array def /nr1 [(01) (02) (03) (04) (05) (06) (07) (08) (09) (10) (11) (12) (13) (14) (15) (16) (17) (18) (19) (20) (21) (22) (23) (24) (25) (26) (27)] def /tx1 [(A) (B) (C) (D) (E) (F) (G) (H) (I) (J) (K) (L) (M) (N) (O) (P) (Q) (R) (S) (T) (U) (V) (W) (X) (Y) (Z) (a) (b) (c) (d) (e) (f) (g) (h) (i) (j) (k) (l) (m) (n) (o) (p) (q) (r) (s) (t) (u) (v) (w) (x) (y) (z)] def /fakt 1 def /iyt 32 fakt mul def %text size /iyd 35 fakt mul def %line difference 180 /Times-ISOL1 FS 0 0 0 setrgbcolor 9000 -180 moveto (Test chart G with 40x27=1080 colours) showea (Pr\374fvorlage G mit 40x27=1080 Farben) showde (; digital equidistant 9 or 16 step colour scales;) showea (; digital gleichabst\344ndige 9 oder 16stufige Farbreihen;) showde ( Farbdaten in Spalte (A-n):) showde ( Colour data in column (A-n):) showea 180 /TimesB-ISOL1 FS xchart 0 eq {( rgb + cmy0 (A_j + k26_n27)) show (, 000n (k), w (l), nnn0 (m), www (n)) show} if xchart 1 eq {( rgb (A_n)) show} if /xs 900 3 div 2 mul def /ys xs def /d2 xs 2 div def /d8 xs 8 div def (, 3D = ) show colorm cvishow %(, colsep = ) show colsep cvishow %colorm 1 eq {(, cmyn4*) show} if %/xchartg where {pop /faktg xchartg 1 ge {1.10} {1.00} ifelse def} % {/faktg 1.10 def} ifelse %0.01 MM faktg mul dup scale /xmin 650 3 div 2.2 mul def /ymax 15800 def xchart 0 eq {/xd 800 3 div 2 mul def /yd 800 3 div 2 mul def} {/xd 900 3 div 2 mul def /yd 900 3 div 2 mul def} ifelse /xsd xs xd sub 0.5 mul def /ysd xs xd sub 0.5 mul def /xd2 xd 0.50 mul def /xd4 xd 0.25 mul def 20 setlinewidth 500 3 div 2 mul /Times-ISOL1 FS 0 0 0 setrgbcolor 1 1 27 {/i exch def %i=1,27 /x xs 0.15 mul def /y 27.6 ys mul ys i mul sub def x y moveto nr1 i 1 sub get show } for %i=1,27 1 1 40 {/i exch def %i=1,36 /x xs i mul 000 add def /y 27.5 ys mul def x y moveto tx1 i 1 sub get show } for %i=1,36 /RGB*R0 1080 array def /RGB*G0 1080 array def /RGB*B0 1080 array def /IMODE 0 def %input rgb for output LAB* %row no.1 and 2: 9xrgb /imax 08 def /jmax 08 def /kmax 08 def /TKK2 {200 3 div 2 mul /Times-ISOL1 FS} bind def TKK2 0 1 kmax {/k exch def %beg k=0,08 /k0 k 3 idiv def /k1 k k0 3 mul sub def /xadd k1 xs 9 mul mul def /yadd k0 xs 9 mul mul def 0 1 jmax {/j exch def %beg j=0,jmax 0 1 imax {/i exch def %beg i=0,imax /n1079 i j 9 mul add k 81 mul add def /xa xmin j xs mul add xadd add xsd add def /ya ymax i ys mul sub yadd sub ysd add def /r k kmax div def /g j jmax div def /b i imax div def RGB*R0 n1079 r put RGB*G0 n1079 g put RGB*B0 n1079 b put r g b setrgbcolor xa ya xd dup rec fill 1 r sub 1 g sub 1 b sub 0 setcmykcolor xa xd4 add ya xd4 add xd2 dup rec fill } for %end i=0,jmax } for %end j=0,jmax } for %end k=0,kmax %3x rgbcmy /id 1 8 div def /rijn 81 array def %for intermediate storage /gijn 81 array def /bijn 81 array def /lmax 2 def /n1079 728 def 0 1 lmax {/l exch def %beg k=0,kmax /xadd 3 xs 9 mul mul def /yadd l ys 9 mul mul def %for intermediate storage of l=0,lmax 0 1 01 {/jchart exch def %jchart=0,1 /xchartj l jchart 3 mul add def 0 1 08 {/j exch def %j=0,7 /im 8 j sub def jchart 1 im {/i exch def %i=0,8 /ia 1 id j mul sub def /argb ia def /brgb ia i id mul sub def xchartj 0 eq {/r argb def /g brgb def /b brgb def} if xchartj 1 eq {/r argb def /g argb def /b brgb def} if xchartj 2 eq {/r brgb def /g argb def /b brgb def} if xchartj 3 eq {/r brgb def /g argb def /b argb def} if xchartj 4 eq {/r brgb def /g brgb def /b argb def} if xchartj 5 eq {/r argb def /g brgb def /b argb def} if jchart 0 eq {/in i j add def /jn j def} {/in j def /jn i j add def} ifelse rijn in 9 mul jn add r put gijn in 9 mul jn add g put bijn in 9 mul jn add b put } for %i=0,7 } for %j=0,8 } for %jchart=0,1 %for output of l=0,lmax 0 1 08 {/j exch def %j=0,8 0 1 08 {/i exch def %i=0,8 /n1079 n1079 1 add def /r rijn i j 9 mul add get def /g gijn i j 9 mul add get def /b bijn i j 9 mul add get def /xa xmin xs j mul add xadd add xsd add def /ya ymax xs i mul sub yadd sub ysd add def r g b setrgbcolor xa ya xd dup rec fill 1 r sub 1 g sub 1 b sub 0 setcmykcolor xa xd4 add ya xd4 add xd2 dup rec fill } for %i=0,7 } for %j=0,8 } for %end l=0,lmax %6wrgbcmy /n1079 971 def /lmax 03 def %4 rows with geys /kmax 1 def %9 or 16 steps 0 1 kmax {/k exch def % k 0 eq {/jmax 08 def} {/jmax 15 def} ifelse 0 1 lmax {/l exch def %beg l=0,lmax /xadd 36 l add xs mul def /yadd k 9 xs mul mul def /j1 l 36 add def /j1$ tx1 j1 get def 0 1 jmax {/j exch def %j=0,08 /n1079 n1079 1 add def /i1 j k 9 mul add 1 add def %9 steps, 16 steps /argb j jmax div def /xa xmin xadd add xsd add def /ya ymax xs j mul sub yadd sub ysd add def /r argb def /g argb def /b argb def r g b setrgbcolor xa ya xd dup rec fill 1 r sub 1 g sub 1 b sub 0 setcmykcolor xa xd4 add ya xd4 add xd2 dup rec fill } for %j=0,jmax } for %l=0,lmax } for %k=0,kmax %basic colours 1072 - 1080 /basrgb 24 array def /basrgb [0 0 0 1 1 1 1 0 0 0 1 1 1 1 0 0 0 1 0 1 0 1 0 1 ] def /n1079 1071 def 0 1 07 {/i exch def %i=0,7 /n1079 n1079 1 add def /i3 i 3 mul def /xadd 36 xs mul def /yadd 25 xs mul def i 0 eq {/l 0 def /j 0 def /j1$ (k) def /i1 26 def} if i 1 eq {/l 0 def /j 1 def /j1$ (k) def /i1 27 def} if i 2 eq {/l 1 def /j 0 def /j1$ (l) def /i1 26 def} if i 3 eq {/l 1 def /j 1 def /j1$ (l) def /i1 27 def} if i 4 eq {/l 2 def /j 0 def /j1$ (m) def /i1 26 def} if i 5 eq {/l 2 def /j 1 def /j1$ (m) def /i1 27 def} if i 6 eq {/l 3 def /j 0 def /j1$ (n) def /i1 26 def} if i 7 eq {/l 3 def /j 1 def /j1$ (n) def /i1 27 def} if /xa xmin xs l mul add xadd add xsd add def /ya ymax xs j mul sub yadd sub ysd add def /r basrgb i3 get def /g basrgb i3 1 add get def /b basrgb i3 2 add get def r g b setrgbcolor xa ya xd dup rec fill 1 r sub 1 g sub 1 b sub 0 setcmykcolor xa xd4 add ya xd4 add xd2 dup rec fill } for %i=0,7 %*************************************************************************** %} for %pmetam=0,1 } if %END CIELAB_26 xcharts=26 } if %END LOOP0: xchart<=xchart3P4 two pages+4 separations %***************************************************************************** %used for tables in the rest /xchart3P5 xchart3 5 add def /xchart3P6 xchart3 6 add def /xchart3P7 xchart3 7 add def xchart xchart3P5 ge {%BEG LOOPtables: xchart>=xchart3P5 /xcharti pchart def xcharti 0 eq {/Xprint 0 def /FileData (LAB*rc) def} if xcharti 1 eq {/Xprint 1 def /FileData (LAB*ra) def} if xcharti 2 eq {/Xprint 1 def /FileData (LAB*na) def} if xcharti 3 eq {/Xprint 1 def /FileData (LAB*la0) def} if xcharti 4 eq {/Xprint 1 def /FileData (LAB*la1) def} if xcharti 5 eq {/Xprint 1 def /FileData (LAB*la2) def} if xcharti 6 eq {/Xprint 1 def /FileData (LAB*la3) def} if xcharti 7 eq {/Xprint 1 def /FileData (LAB*la4) def} if xcharti 8 eq {/Xprint 1 def /FileData (LAB*la5) def} if xcharti 9 eq {/Xprint 1 def /FileData (LAB*la6) def} if xcharti 10 eq {/Xprint 1 def /FileData (LAB*la7) def} if TK1 0 setgray 5500 -200 moveto FileData show xcharti 3 ge {(, YN=) show Lrefl xcharti get show} if (, XYZnw=) show Xj 000 get cvsshow1r (, ) show Yj 000 get cvsshow1r (, ) show Zj 000 get cvsshow1r (, ) show Xj 728 get cvsshow1r (, ) show Yj 728 get cvsshow1r (, ) show Zj 728 get cvsshow1r (, LAB*nw=) show LAB*Lja 000 get cvsshow1r (, ) show LAB*aja 000 get cvsshow1r (, ) show LAB*bja 000 get cvsshow1r (, ) show LAB*Lja 728 get cvsshow1r (, ) show LAB*aja 728 get cvsshow1r (, ) show LAB*bja 728 get cvsshow1r TK1 18500 -200 moveto (Output: ) showen (Ausgabe: ) showde (salida: ) showes (sortie: ) showfr (uscita: ) showit (output: ) showjp FileDaten showen FileDatde showde FileDaten showes FileDaten showfr FileDaten showit FileDaten showjp (, Seite ) showde (, page ) showen (, p\341gina ) showes (, page ) showfr (, pagina ) showit (, page ) showjp xchart 1 add cvishow (/) show xchartm cvishow TBK1 /xi 000 def xi 100 add 16700 moveto (Data of Maximum color M in colorimetric system ) showen (Daten der Maximalfarbe M im Farbmetrik\255Sytem ) showde (Data of Maximum color M in colorimetric system ) showes (Couleur maximale dans le syst\350me colorimetrique : ) showfr (Data of Maximum color M in colorimetric system ) showit (Data of Maximum color M in colorimetric system ) showjp FileDaten showen FileDatde showde FileDaten showes FileDaten showfr FileDaten showit FileDaten showjp ( for input or output; ) showen ( f\374r Ein\255 oder Ausgabe; ) showde ( for input or output; ) showes ( pour l'entr\351e et sortie; ) showfr ( for input or output; ) showit ( for input or output; ) showjp (Six hue angles of the 60 degree standard colours) showen (Sechs Bunttonwinkel der 60\255Grad Standardfarben) showde (Six hue angles of the 60 degree standard colours) showes (Six angles de teinte \340 60 degr\350s couleurs standard ) showfr (Six hue angles of the 60 degree standard colours) showit (Six hue angles of the 60 degree standard colours) showjp TBIK1 ( RYGCBM) show TBS1 0 -50 rmoveto (s) show 0 50 rmoveto TBK1 (:) show TBIK1 ( h) show TBS1 0 -50 rmoveto (ab,ds) show 0 50 rmoveto TBK1 ( = ) show LAB*Hs 0 get cvsshow1r (, ) show LAB*Hs 1 get cvsshow1r (, ) show LAB*Hs 2 get cvsshow1r (, ) show LAB*Hs 3 get cvsshow1r (, ) show LAB*Hs 4 get cvsshow1r (, ) show LAB*Hs 5 get cvsshow1r (; ) show xi 100 add 16400 moveto (Six hue angles of the device colours) showen (Sechs Bunttonwinkel der Ger\344tefarben) showde (Six hue angles of the device colours) showes (Six angles de teinte des couleurs p\351riph\351riques) showfr (Six hue angles of the device colours) showit (Six hue angles of the device colours) showjp TBIK1 ( RYGCBM) show TBS1 0 -50 rmoveto (d) show 0 50 rmoveto TBK1 (:) show TBIK1 ( h) show TBS1 0 -50 rmoveto (ab,d) show 0 50 rmoveto TBK1 ( = ) show LAB*hdd64M 00 get cvsshow1r (, ) show LAB*hdd64M 08 get cvsshow1r (, ) show LAB*hdd64M 16 get cvsshow1r (, ) show LAB*hdd64M 24 get cvsshow1r (, ) show LAB*hdd64M 32 get cvsshow1r (, ) show LAB*hdd64M 40 get cvsshow1r (; ) show (Six hue angles of the elementary colours) showen (Sechs Bunttonwinkel der Elementarfarben) showde (Six hue angles of the elementary colours) showes (Six angles de teinte des couleurs \351l\351mentaires) showfr (Six hue angles of the elementary colours) showit (Six hue angles of the elementary colours) showjp TBIK1 ( RYGCBM) show TBS1 0 -50 rmoveto (e) show 0 50 rmoveto TBK1 (:) show TBIK1 ( h) show TBS1 0 -50 rmoveto (ab,e) show 0 50 rmoveto TBK1 ( = ) show LAB*He 0 get cvsshow1r (, ) show LAB*He 1 get cvsshow1r (, ) show LAB*He 2 get cvsshow1r (, ) show LAB*He 3 get cvsshow1r (, ) show LAB*He 4 get cvsshow1r (, ) show LAB*He 5 get cvsshow1r xchart xchart3P5 le {%BEG LOOP1: xchart<=xchart3P5 /ToutenN0 (Colorimetric data of Natural Colour System NCS) def /ToutdeN0 (Farbmetrische Daten des Nat\374rliches Farbsystems NCS) def /ToutenL0 (Colorimetric data of Natural Luminous System NLS) def /ToutdeL0 (Farbmetrische Daten des Nat\374rliches\255Lichtfarbensystem NLS) def 8 /Times-ISOL1 FS 72 82.5 moveto ( QI840-7N, ) show xchart 8 le {ToutdeN0 showde ToutenN0 showea} {ToutdeL0 showde ToutenL0 showea} ifelse /yhoe 8500 def /xhoe 12300 def % 0 1 2 3 4 5 /Dcol [(O=R) (J=Y) (L=G) (C=C) (V=B) (M=M) ] def /Dcolen [(orange\255red) (Yellow) (leaf\255green) (cyan\255blue) (violet\255blue) (magenta\255red)] def /Dcolde [(Orangerot) (Gelb) (Laubgr\374n) (Cyanblau) (Violettblau) (Magentarot)] def /xshifd [ 2800 -4000 -5400 -5100 2800 2900 ] def /yshifd [ 2500 3700 1800 -1000 -2600 -0850 ] def /Ecol [(R) (Y) (G) (C) (B) (M) ] def /Ecolen [(red) (yellow) (green) (blue\255green) (blue) (blue\255red)] def /Ecolde [(Rot) (Gelb) (Gr\374n) (Blaugr\374n) (Blau) (Blaurot)] def /xshife [ 2800 -3000 -5400 -5100 -3000 2900 ] def /yshife [ 2000 3700 1800 -1000 -2600 -0850 ] def /Scol [(R) (Y) (G) (C) (B) (M) ] def /Scolen [(red) (yellow) (green) (blue\255green) (blue) (blue\255red)] def /Scolde [(Rot) (Gelb) (Gr\374n) (Blaugr\374n) (Blau) (Blaurot)] def /xshifs [ 2800 -3000 -5400 -5100 -3000 2900 ] def /yshifs [ 2000 3700 1800 -1000 -2600 -0850 ] def 2500 8200 moveto 20000 0 rlineto stroke 12500 2000 moveto 0 13000 rlineto stroke 0 1 3 {/ibild exch def %ibild=0,3 ibild 0 eq {xhoe 0.5 mul 600 sub yhoe 1.47 mul 400 sub translate} if ibild 1 eq {xhoe 1.1 mul yhoe 0.0 mul translate} if ibild 2 eq {xhoe 1.1 mul neg yhoe 0.97 mul neg translate} if ibild 3 eq {xhoe 1.1 mul yhoe 0.0 mul translate} if ibild 2 le {%ibild<=2 0 setgray -4000 0 moveto 8000 0 rlineto stroke 0 -3500 moveto 0 7500 rlineto stroke 3800 70 moveto 200 -70 rlineto -200 -70 rlineto closepath fill -70 3800 moveto 70 200 rlineto 70 -200 rlineto closepath fill /fak0 28 def /fakt 25 def 0 1 48 {/i exch def %i=0,48 LAB*add64M i get fakt mul LAB*bdd64M i get fakt mul moveto LAB*add64M i 1 add get fakt mul LAB*bdd64M i 1 add get fakt mul lineto stroke newpath r*dd64M i get g*dd64M i get b*dd64M i get setrgbcolor LAB*add64M i get fakt mul LAB*bdd64M i get fakt mul 100 0 360 arc fill } for %i=0,48 0 setgray 0 8 48 {/i exch def %i=0,8,48 RJGCBMd 0 0 moveto LAB*add64M i get fak0 mul LAB*bdd64M i get fak0 mul rlineto stroke } for %i=0,8,48 } if %ibild<=2 ibild 0 eq {%ibild=0 %device (d) 0 setgray 0300 3900 moveto TBIK1 (device ) showea (Ger\344te\255) showde TBK1 (CIELAB) show TBIK1 ( \050 a*) show TBS1 0 -50 rmoveto (d) show 0 50 rmoveto TBIK1 (, b*) show TBS1 0 -50 rmoveto (d) show 0 50 rmoveto TBIK1 (\051) show TBK1 ( chroma diagram) showea (\255Diagramm) showde TBIK1 3500 0150 moveto (a*) show TBS1 0 -50 rmoveto (d) show 0 50 rmoveto -500 4000 moveto (b*) show TBS1 0 -50 rmoveto (d) show 0 50 rmoveto 0 8 40 {/kn exch def %kn=0,8,40 0 setgray /kn8 kn 8 idiv def xshifd kn8 get yshifd kn8 get moveto TBIK1 Dcol kn8 get show TBS1 0 -50 rmoveto (d) show 0 50 rmoveto TBK1 ( ) show Dcolen kn8 get showea Dcolde kn8 get showde TIK1 xshifd kn8 get yshifd kn8 get 350 sub moveto (LCH*) show TK1 -30 -50 rmoveto (d) show 0 50 rmoveto TK1 ( = ) show LAB*Ldd64M kn get cvsshow1 ( ) show LAB*Cdd64M kn get cvsshow1 ( ) show LAB*hdd64M kn get cvsshow1 TIK1 xshifd kn8 get yshifd kn8 get 700 sub moveto (LAB*) show TK1 -30 -50 rmoveto (d) show 0 50 rmoveto TK1 ( = ) show LAB*Ldd64M kn get cvsshow1 ( ) show LAB*add64M kn get cvsshow1 ( ) show LAB*bdd64M kn get cvsshow1 TIK1 xshifd kn8 get yshifd kn8 get 1050 sub moveto (rgb*) show TK1 -30 -50 rmoveto (d) show 0 50 rmoveto TK1 ( = ) show r*dd64M kn get cvsshow3 ( ) show g*dd64M kn get cvsshow3 ( ) show b*dd64M kn get cvsshow3 0 8 48 {/i exch def %i=0,8,48 RYGCBMd 0 1 8 {/l exch def %l=0,8 newpath /alpha l 0.125 mul def /beta 1 alpha sub def 1.0 beta mul r*dd362Mi i 7.5 mul cvi get alpha mul add 1.0 beta mul g*dd362Mi i 7.5 mul cvi get alpha mul add 1.0 beta mul b*dd362Mi i 7.5 mul cvi get alpha mul add setrgbcolor LAB*add362Mi i 7.5 mul cvi get fakt mul alpha mul LAB*bdd362Mi i 7.5 mul cvi get fakt mul alpha mul 100 0 360 arc fill } for %l=0,8 l 0 eq {%l=0 0 setgray LAB*add362Mi i 7.5 mul cvi get fakt mul alpha mul LAB*bdd362Mi i 7.5 mul cvi get fakt mul alpha mul 100 0 360 arc stroke } if %l=0 } for %i=0,8,48 } for %kn=0,8,40 } if %ibild=0 ibild 1 eq {%ibild=1 %elementary (e) 0 setgray 0300 3900 moveto TBIK1 (elementary ) showea (Elementar\255) showde TBK1 (CIELAB) show TBIK1 ( \050 a*) show TBS1 0 -50 rmoveto (e) show 0 50 rmoveto TBIK1 (, b*) show TBS1 0 -50 rmoveto (e) show 0 50 rmoveto TBIK1 (\051) show TBK1 ( chroma diagram) showea (\255Diagramm) showde TBIK1 3500 0150 moveto (a*) show TBS1 0 -50 rmoveto (e) show 0 50 rmoveto -500 4000 moveto (b*) show TBS1 0 -50 rmoveto (e) show 0 50 rmoveto 0 setgray 0 8 40 {/kn exch def %kn=0,8,40 /kn8 kn 8 idiv def xshife kn8 get yshife kn8 get moveto TBIK1 Ecol kn8 get show TBS1 0 -50 rmoveto (e) show 0 50 rmoveto TBK1 ( ) show Ecolen kn8 get showea Ecolde kn8 get showde /i362e hab*de64M kn get round cvi def i362e 360 ge {/i362e i362e 360 sub def} if TIK1 xshife kn8 get yshife kn8 get 350 sub moveto (LCH*) show TK1 -30 -50 rmoveto (e) show 0 50 rmoveto TK1 ( = ) show LAB*Lde362Mi kn 7.5 mul cvi get cvsshow1 ( ) show LAB*Cde362Mi kn 7.5 mul cvi get cvsshow1 ( ) show LAB*hde362Mi kn 7.5 mul cvi get cvsshow1 TIK1 xshife kn8 get yshife kn8 get 700 sub moveto (LAB*) show TK1 -30 -50 rmoveto (e) show 0 50 rmoveto TK1 ( = ) show LAB*Lde362Mi kn 7.5 mul cvi get cvsshow1 ( ) show LAB*ade362Mi kn 7.5 mul cvi get cvsshow1 ( ) show LAB*bde362Mi kn 7.5 mul cvi get cvsshow1 TIK1 xshife kn8 get yshife kn8 get 1050 sub moveto (rgb*) show TK1 -30 -50 rmoveto (de) show 0 50 rmoveto TK1 ( = ) show r*de362Mi kn 7.5 mul cvi get cvsshow3 ( ) show g*de362Mi kn 7.5 mul cvi get cvsshow3 ( ) show b*de362Mi kn 7.5 mul cvi get cvsshow3 } for %kn=0,8,40 0 8 48 {/i exch def %i=0,8,48 RYGCBMe r*de362Mi i 7.5 mul cvi get g*de362Mi i 7.5 mul cvi get b*de362Mi i 7.5 mul cvi get setrgbcolor 0 0 moveto LAB*ade362Mi i 7.5 mul cvi get fakt mul LAB*bde362Mi i 7.5 mul cvi get fakt mul rlineto stroke 0 1 8 {/l exch def %l=0,8 newpath /alpha l 0.125 mul def /beta 1 alpha sub def 1.0 beta mul r*de362Mi i 7.5 mul cvi get alpha mul add 1.0 beta mul g*de362Mi i 7.5 mul cvi get alpha mul add 1.0 beta mul b*de362Mi i 7.5 mul cvi get alpha mul add setrgbcolor LAB*ade362Mi i 7.5 mul cvi get fakt mul alpha mul LAB*bde362Mi i 7.5 mul cvi get fakt mul alpha mul 100 0 360 arc fill } for %l=0,8 } for %i=0,8,48 } if %ibild=1 ibild 2 eq {%ibild=2 %standard (s) 0 setgray 0300 3900 moveto TBIK1 (standard ) showea (Standard\255) showde TBK1 (CIELAB) show TBIK1 ( \050 a*) show TBS1 0 -50 rmoveto (s) show 0 50 rmoveto TBIK1 (, b*) show TBS1 0 -50 rmoveto (s) show 0 50 rmoveto TBIK1 (\051) show TBK1 ( chroma diagram) showea (\255Diagramm) showde TBIK1 3500 0150 moveto (a*) show TBS1 0 -50 rmoveto (s) show 0 50 rmoveto -500 4000 moveto (b*) show TBS1 0 -50 rmoveto (s) show 0 50 rmoveto 0 setgray 0 8 40 {/kn exch def %kn=0,8,40 /kn8 kn 8 idiv def xshifs kn8 get yshifs kn8 get moveto TBIK1 Scol kn8 get show TBS1 0 -50 rmoveto (s) show 0 50 rmoveto TBK1 ( ) show Scolen kn8 get showea Scolde kn8 get showde TIK1 xshifs kn8 get yshifs kn8 get 350 sub moveto (LCH*) show TK1 -30 -50 rmoveto (s) show 0 50 rmoveto TK1 ( = ) show LAB*Lds362Mi kn 7.5 mul cvi get cvsshow1 ( ) show LAB*Cds362Mi kn 7.5 mul cvi get cvsshow1 ( ) show LAB*hds362Mi kn 7.5 mul cvi get cvsshow1 TIK1 xshifs kn8 get yshifs kn8 get 700 sub moveto (LAB*) show TK1 -30 -50 rmoveto (s) show 0 50 rmoveto TK1 ( = ) show LAB*Lds362Mi kn 7.5 mul cvi get cvsshow1 ( ) show LAB*ads362Mi kn 7.5 mul cvi get cvsshow1 ( ) show LAB*bds362Mi kn 7.5 mul cvi get cvsshow1 TIK1 xshifs kn8 get yshifs kn8 get 1050 sub moveto (rgb*) show TK1 -30 -50 rmoveto (ds) show 0 50 rmoveto TK1 ( = ) show r*ds362Mi kn 7.5 mul cvi get cvsshow3 ( ) show g*ds362Mi kn 7.5 mul cvi get cvsshow3 ( ) show b*ds362Mi kn 7.5 mul cvi get cvsshow3 } for %kn=0,8,40 0 8 40 {/i exch def %i=0,8,48 RYGCBMs r*ds362Mi i 7.5 mul cvi get g*ds362Mi i 7.5 mul cvi get b*ds362Mi i 7.5 mul cvi get setrgbcolor 0 0 moveto LAB*ads362Mi i 7.5 mul cvi get fakt mul LAB*bds362Mi i 7.5 mul cvi get fakt mul rlineto stroke 0 1 8 {/l exch def %l=0,8 newpath /alpha l 0.125 mul def /beta 1 alpha sub def 1.0 beta mul r*ds362Mi i 7.5 mul cvi get alpha mul add 1.0 beta mul g*ds362Mi i 7.5 mul cvi get alpha mul add 1.0 beta mul b*ds362Mi i 7.5 mul cvi get alpha mul add setrgbcolor LAB*ads362Mi i 7.5 mul cvi get fakt mul alpha mul LAB*bds362Mi i 7.5 mul cvi get fakt mul alpha mul 100 0 360 arc fill } for %l=0,8 } for %i=0,8,48 } if %ibild=2 ibild 3 eq {%ibild=3 0 setgray -6500 3900 moveto TBK1 (Notes to the CIELAB chroma diagrams) showea (Anmerkung zu den CIELAB\255Buntheits\255Diagrammen) showde TBIK1 ( \050 a*) show TBS1 -30 -50 rmoveto (d) show 0 50 rmoveto TBIK1 (, b*) show TBS1 -30 -50 rmoveto (d) show 0 50 rmoveto TBIK1 ( \051, ) show TBIK1 ( \050 a*) show TBS1 -30 -50 rmoveto (s) show 0 50 rmoveto TBIK1 (, b*) show TBS1 -30 -50 rmoveto (s) show 0 50 rmoveto TBIK1 ( \051, ) show TBIK1 ( \050 a*) show TBS1 -30 -50 rmoveto (e) show 0 50 rmoveto TBIK1 (, b*) show TBS1 -30 -50 rmoveto (e) show 0 50 rmoveto TBIK1 ( \051) show -6500 3400 moveto TK1 (1. For the) showea (1. F\374r die) showde TIK1 ( rgb*) show TS -30 -50 rmoveto (d) show 0 50 rmoveto TK1 (\255input values the CIELAB data) showea (\255Eingabedaten wurden die CIELAB-Daten) showde TIK1 ( LCH*) show TS -30 -50 rmoveto (d) show 0 50 rmoveto TK1 ( and) showea ( und) showde TIK1 ( LAB*) show TS -30 -50 rmoveto (d) show 0 50 rmoveto TK1 ( have been calculated.) showea ( berechnet.) showde -6500 3000 moveto TK1 (2. For the calculation of the standard hue angle ) showea TIK1 (h) show TS -30 -50 rmoveto (ab,s) show 0 50 rmoveto TK1 ( use for any device values) showea TIK1 ( rgb*) show TS -30 -50 rmoveto (d) show 0 50 rmoveto TK1 ( the equation:) showea -6000 2650 moveto TBIK1 (h) show TBS1 -30 -50 rmoveto (ab,s) show 0 50 rmoveto TBK1 ( = ) show TBIK1 (atan) show TBK1 ( [ ) show TBIK1 (r*) show TBS1 -30 -50 rmoveto (d) show 0 50 rmoveto TBIK1 ( cos(30)) show TBK1 ( + ) show TBIK1 (g*) show TBS1 -30 -50 rmoveto (d) show 0 50 rmoveto TBIK1 ( cos(150)) show TBK1 ( ] / [ ) show TBIK1 (r*) show TBS1 -30 -50 rmoveto (d) show 0 50 rmoveto TBIK1 ( sin(30)) show TBK1 ( + ) show TBIK1 (g*) show TBS1 -30 -50 rmoveto (d) show 0 50 rmoveto TBIK1 ( sin(150)) show TBK1 ( + ) show TBIK1 (b*) show TBS1 -30 -50 rmoveto (d) show 0 50 rmoveto TBIK1 ( sin(270)) show TBK1 ( ] ) show 5000 2650 moveto TK1 ((1)) show -6500 2200 moveto TK1 (3. For the 48 or 360 equally spaced standard hue angles ) showea (3. F\374r die 48 oder 360 gleichabst\344ndig gestuften Standard\255Bunttonwinkel ) showde TIK1 (h) show TS -30 -50 rmoveto (ab,s) show 0 50 rmoveto TK1 ( of the colours of maximum chroma use) showea ( der Farben von maximaler Buntheit benutze) showde -6250 1900 moveto (the seven hue angles of the 60 degree colours) showea (die sieben Bunttonwinkel der 60\Grad\255Farben) showde TIK1 ( s: h) show TS 0 -50 rmoveto (ab,si) show 0 50 rmoveto TK1 ( = ) show LAB*Hs 0 get cvsshow1r (, ) show LAB*Hs 1 get cvsshow1r (, ) show LAB*Hs 2 get cvsshow1r (, ) show LAB*Hs 3 get cvsshow1r (, ) show LAB*Hs 4 get cvsshow1r (, ) show LAB*Hs 5 get cvsshow1r (, ) show LAB*Hs 6 get cvsshow1r ( (i=0,6) ) show -6250 1600 moveto (and the equations for a 48 and 360 step hue circle: ) showea (und die Gleichungen f\374r einen 48\255 und 360\255stufigen Bunttonkreis: ) showde -6000 1250 moveto TBIK1 (h) show TBS1 0 -50 rmoveto (48ab,sij) show 0 50 rmoveto TBK1 ( = ) show TBIK1 (h) show TBS1 0 -50 rmoveto (ab,si) show 0 50 rmoveto ( + ) show TBIK1 (j) show TBK1 ( [) show TBIK1 (h) show TBS1 0 -50 rmoveto (ab,si+1) show 0 50 rmoveto ( - ) show TBIK1 (h) show TBS1 0 -50 rmoveto (ab,si) show 0 50 rmoveto TBK1 ( ] /8 \050 ) show TBIK1 (i) show TBK1 ( = 0, 1, ..., 5; ) show TBIK1 (j) show TBK1 ( = 0, 1, ..., 7\051) show 5000 1250 moveto TK1 ((2)) show -6000 0850 moveto TBIK1 (h) show TBS1 0 -50 rmoveto (360ab,sij) show 0 50 rmoveto TBK1 ( = ) show TBIK1 (h) show TBS1 0 -50 rmoveto (ab,si) show 0 50 rmoveto ( + ) show TBIK1 (j) show TBK1 ( [) show TBIK1 (h) show TBS1 0 -50 rmoveto (ab,si+1) show 0 50 rmoveto ( - ) show TBIK1 (h) show TBS1 0 -50 rmoveto (ab,si) show 0 50 rmoveto TBK1 ( ] /60 \050 ) show TBIK1 (i) show TBK1 ( = 0, 1, ..., 5; ) show TBIK1 (j) show TBK1 ( = 0, 1, ..., 59\051) show 5000 0850 moveto TK1 ((3)) show -6500 0400 moveto TK1 (4. For the 48 or 360 elementary hue angles ) showea (4. F\374r die 48 oder 360 Elementar\255Bunttonwinkel ) showde TIK1 (h) show TS -30 -50 rmoveto (ab,e) show 0 50 rmoveto TK1 ( of the colours of maximum chroma use) showea ( der Farben von maximaler Buntheit benutze) showde -6250 0100 moveto (the seven hue angles of the elementary colours) showea (die sieben Bunttonwinkel der Elementarfarben) showde TIK1 ( e: h) show TS 0 -50 rmoveto (ab,ei) show 0 50 rmoveto TK1 ( = ) show LAB*He 0 get cvsshow1r (, ) show LAB*He 1 get cvsshow1r (, ) show LAB*He 2 get cvsshow1r (, ) show LAB*He 3 get cvsshow1r (, ) show LAB*He 4 get cvsshow1r (, ) show LAB*He 5 get cvsshow1r (, ) show LAB*He 6 get cvsshow1r ( (i=0,6) ) show -6250 -200 moveto (and the equations for a 48 and 360 step elementary hue circle: ) showea (und die Gleichungen f\374r einen 48\255 und 360\255stufigen Elementar\255Bunttonkreis: ) showde -6000 -550 moveto TBIK1 (h) show TBS1 0 -50 rmoveto (48ab,eij) show 0 50 rmoveto TBK1 ( = ) show TBIK1 (h) show TBS1 0 -50 rmoveto (ab,ei) show 0 50 rmoveto ( + ) show TBIK1 (j) show TBK1 ( [) show TBIK1 (h) show TBS1 0 -50 rmoveto (ab,ei+1) show 0 50 rmoveto ( - ) show TBIK1 (h) show TBS1 0 -50 rmoveto (ab,ei) show 0 50 rmoveto TBK1 ( ] /8 \050 ) show TBIK1 (i) show TBK1 ( = 0, 1, ..., 5; ) show TBIK1 (j) show TBK1 ( = 0, 1, ..., 7\051) show 5000 -550 moveto TK1 ((4)) show -6000 -0950 moveto TBIK1 (h) show TBS1 0 -50 rmoveto (360ab,eij) show 0 50 rmoveto TBK1 ( = ) show TBIK1 (h) show TBS1 0 -50 rmoveto (ab,ei) show 0 50 rmoveto ( + ) show TBIK1 (j) show TBK1 ( [) show TBIK1 (h) show TBS1 0 -50 rmoveto (ab,ei+1) show 0 50 rmoveto ( - ) show TBIK1 (h) show TBS1 0 -50 rmoveto (ab,ei) show 0 50 rmoveto TBK1 ( ] /60 \050 ) show TBIK1 (i) show TBK1 ( = 0, 1, ..., 5; ) show TBIK1 (j) show TBK1 ( = 0, 1, ..., 59\051) show 5000 -950 moveto TK1 ((5)) show -6500 -1400 moveto TK1 (5. For any elementary hue angle ) showea (5. F\374r jeden Elementar\255Bunttonwinkel ) showde TIK1 (h) show TS -30 -50 rmoveto (ab,e) show 0 50 rmoveto TK1 ( there is a well defined device hue angle ) showea ( gibt es einem genau definierten Ger\344te\255Bunttonwinkel ) showde TIK1 (h) show TS -30 -50 rmoveto (ab,d) show 0 50 rmoveto -6250 -1700 moveto TK1 (see the following tables, columns 1 to 5 or 1 to 4.) showea (siehe die folgenden Tabellen, Spalten 1 bis 5 oder 1 bis 4.) showde -6500 -2100 moveto TK1 (6. The values ) showea (6. Die Werte ) showde TIK1 (rgb*) show TS -30 -50 rmoveto (de) show 0 50 rmoveto TK1 ( produce the output of the device\255independent elementary hues) showea ( erzeugen die Ausgabe der ger\344teunabh\344ngigen Elemetar\255Buntt\366ne) showde } if %ibild=3 } for %ibild=0,3 }%LOOP1: xchart<=xchart3P5 {%LOOP1: xchart>xchart3P5 /x0x 0000 def /x1x 5700 def /x2x 13300 def /x01 2200 def %rgb /x02 2850 def /x03 3500 def /x04 4150 def %LabCh /x05 4800 def /x06 5450 def /x07 6100 def /x08 6800 def /x09 7700 def /x10 8400 def /x11 9100 def /xd0 0100 def /xs0 0800 def /xe0 1500 def /xd1 23050 def /xs1 23700 def /xe1 24350 def /xax 5400 def /xbx 10500 def /xcx 15600 def /ymax 16100 def TBIK1 xd0 ymax moveto (h) show TBK1 -00 -80 rmoveto (ab,d) show 00 80 rmoveto TBIK1 xs0 ymax moveto (h) show TBK1 -00 -80 rmoveto (ab,s) show 00 80 rmoveto TBIK1 xe0 ymax moveto (h) show TBK1 -00 -80 rmoveto (ab,e) show 00 80 rmoveto TBIK1 xchart xchart3P6 eq xchart xchart3P7 eq or {%BEG LOOP3: xchart=xchart3P6/3 x0x x01 add ymax moveto (rgb*) show TBK1 -00 -80 rmoveto (dd64M) show 00 80 rmoveto TBIK1 x0x x04 add ymax moveto (LAB*) show TBK1 -00 -80 rmoveto (ddx64M (x=LabCh)) show 00 80 rmoveto TBIK1 xchart xchart3P6 eq {%xchart=xchart3P6 xax x01 add ymax moveto (rgb*) show TBK1 -00 -80 rmoveto (ddx361M) show 00 80 rmoveto TBIK1 xax x04 add ymax moveto (LAB*) show TBK1 -00 -80 rmoveto (ddx361M (x=LabCh)) show 00 80 rmoveto TBIK1 xbx x01 add ymax moveto (rgb*) show TBK1 -00 -80 rmoveto (dsx361M) show 00 80 rmoveto TBIK1 xbx x04 add ymax moveto (LAB*) show TBK1 -00 -80 rmoveto (dsx361M (x=LabCh)) show 00 80 rmoveto TBIK1 } if %xchart=xchart3P6 xcx x01 add ymax moveto (rgb*) show TBK1 -00 -80 rmoveto (dex361M) show 00 80 rmoveto TBIK1 xcx x04 add ymax moveto (LAB*) show TBK1 -00 -80 rmoveto (dex361M) show 00 80 rmoveto }%LOOP3: xchart=xchart3P6/3 {%LOOP3: xchart>xchart3P7 x0x x01 add ymax moveto (rgb*) show TBK1 -00 -80 rmoveto (dd361M) show 00 80 rmoveto TBIK1 x0x x04 add ymax moveto (LAB*) show TBK1 -00 -80 rmoveto (ddx361Mi (x=LabCh)) show 00 80 rmoveto TBIK1 x1x x01 add ymax moveto (rgb*) show TBK1 -00 -80 rmoveto (ds361Mi) show 00 80 rmoveto TBIK1 x1x x04 add ymax moveto (LAB*) show TBK1 -00 -80 rmoveto (dsx361Mi (x=LabCh)) show 00 80 rmoveto TBIK1 x1x x09 add ymax moveto (rgb*) show TBK1 -00 -80 rmoveto (dd361Mi) show 00 80 rmoveto TBIK1 x2x x01 add ymax moveto (rgb*) show TBK1 -00 -80 rmoveto (de361Mi) show 00 80 rmoveto TBIK1 x2x x04 add ymax moveto (LAB*) show TBK1 -00 -80 rmoveto (dex361Mi (x=LabCh)) show 00 80 rmoveto TBIK1 x2x x09 add ymax moveto (rgb*) show TBK1 -00 -80 rmoveto (dd361Mi) show 00 80 rmoveto TBIK1 } ifelse %END LOOP3: xchart>xchart3P7 xd1 ymax moveto (rgb*) show TBK1 -100 -100 rmoveto (dd) show 100 100 rmoveto TBIK1 xs1 ymax moveto (rgb*) show TBK1 -100 -100 rmoveto (ds) show 100 100 rmoveto TBIK1 xe1 ymax moveto (rgb*) show TBK1 -100 -100 rmoveto (de) show 100 100 rmoveto TBIK1 /ymax 15700 def /ydel0 310 def /ydel1 345 def /ys 50 def /RJGCBMs 9 array def /RJGCBMs [( ) (R) (Y) (G) (C) (C) (B) (M) (R)] def /RJGCBM 7 array def /RJGCBM [(R) (Y) (G) (C) (B) (M) (R)] def xchart xchart3P6 eq xchart xchart3P7 eq or {%BEG LOOP4: xchart=xchart3P6/3 x0x x01 add 30 sub 0 moveto 0 16200 rlineto stroke xax x01 add 30 sub 0 moveto 0 16200 rlineto stroke xbx x01 add 30 sub 0 moveto 0 16200 rlineto stroke xcx x01 add 30 sub 0 moveto 0 16200 rlineto stroke TK1 0 1 48 {/i exch def %i=0,48 xchart xchart3P6 eq {%xchart=xchart3P6 /i8 i 8 idiv def} {/i8 0 def} ifelse /yi ymax i ydel0 mul sub i8 ydel0 0.4 mul mul sub def xd0 yi moveto hab*dd64M i get cvsshow1 %all floating point xs0 yi moveto hab*ds64M i get cvsshow1 xe0 yi moveto hab*de64M i get cvsshow1 x0x x01 add yi moveto r*dd64M i get cvsshow3 x0x x02 add yi moveto g*dd64M i get cvsshow3 x0x x03 add yi moveto b*dd64M i get cvsshow3 x0x x04 add yi moveto LAB*Ldd64M i get cvsshow1 x0x x05 add yi moveto LAB*add64M i get cvsshow1 x0x x06 add yi moveto LAB*bdd64M i get cvsshow1 x0x x07 add yi moveto LAB*Cdd64M i get cvsshow1 x0x x08 add yi moveto LAB*hdd64M i get cvsshow1 xchart xchart3P6 eq {%xchart=xchart3P6 xax x01 add yi moveto r*dd362Mi i 7.5 mul cvi get cvsshow3r xax x02 add yi moveto g*dd362Mi i 7.5 mul cvi get cvsshow3r xax x03 add yi moveto b*dd362Mi i 7.5 mul cvi get cvsshow3r xax x04 add yi moveto LAB*Ldd362Mi i 7.5 mul cvi get cvsshow1r xax x05 add yi moveto LAB*add362Mi i 7.5 mul cvi get cvsshow1r xax x06 add yi moveto LAB*bdd362Mi i 7.5 mul cvi get cvsshow1r xax x07 add yi moveto LAB*Cdd362Mi i 7.5 mul cvi get cvsshow1r xax x08 add yi moveto hab*dd362Fi i 7.5 mul cvi get cvishow xbx x01 add yi moveto r*ds362Mi i 7.5 mul cvi get cvsshow3r xbx x02 add yi moveto g*ds362Mi i 7.5 mul cvi get cvsshow3r xbx x03 add yi moveto b*ds362Mi i 7.5 mul cvi get cvsshow3r xbx x04 add yi moveto LAB*Lds362Mi i 7.5 mul cvi get cvsshow1r xbx x05 add yi moveto LAB*ads362Mi i 7.5 mul cvi get cvsshow1r xbx x06 add yi moveto LAB*bds362Mi i 7.5 mul cvi get cvsshow1r xbx x07 add yi moveto LAB*Cds362Mi i 7.5 mul cvi get cvsshow1r xbx x08 add yi moveto hab*ds362Mi i 7.5 mul cvi get cvishow } if %xchart=xchart3P6 xcx x01 add yi moveto r*de362Mi i 7.5 mul cvi get cvsshow3r xcx x02 add yi moveto g*de362Mi i 7.5 mul cvi get cvsshow3r xcx x03 add yi moveto b*de362Mi i 7.5 mul cvi get cvsshow3r xcx x04 add yi moveto LAB*Lde362Mi i 7.5 mul cvi get cvsshow1r xcx x05 add yi moveto LAB*ade362Mi i 7.5 mul cvi get cvsshow1r xcx x06 add yi moveto LAB*bde362Mi i 7.5 mul cvi get cvsshow1r xcx x07 add yi moveto LAB*Cde362Mi i 7.5 mul cvi get cvsshow1r xcx x08 add yi moveto hab*de382Fi i 7.5 mul cvi get cvishow xchart xchart3P7 eq {%xchart=xchart3P7 0 1 46 {/kk exch def %kk LAB*hdd64M i get hab*de382Fi kk 7.5 mul cvi get gt LAB*hdd64M i get hab*de382Fi kk 1 add 7.5 mul cvi get le and {/ykkd LAB*hdd64M i get hab*de382Fi kk 7.5 mul cvi get sub hab*de382Fi kk 1 add 7.5 mul cvi get hab*de382Fi kk 7.5 mul cvi get sub 0.0001 add div def /i8 0 def /yi ymax i ydel0 mul sub i8 ydel0 0.4 mul mul sub def /kk8 0 def /ykk ymax kk ykkd add ydel0 mul sub kk8 ydel0 0.4 mul mul sub def xax x01 add yi moveto LAB*hdd64M i get cvsshow1 xbx x08 add 100 sub ykk moveto LAB*hdd64M i get cvsshow1 xax x01 add yi moveto xcx x01 add ykk lineto stroke} if } for %kk } if %xchart=xchart3P7 r*dd362Mi i 7.5 mul cvi get g*dd362Mi i 7.5 mul cvi get b*dd362Mi i 7.5 mul cvi get setrgbcolor xd1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath fill r*ds362Mi i 7.5 mul cvi get g*ds362Mi i 7.5 mul cvi get b*ds362Mi i 7.5 mul cvi get setrgbcolor xs1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath fill i 16 le { r*de362Mi i 7.5 mul cvi get g*de362Mi i 7.5 mul cvi get b*de362Mi i 7.5 mul cvi get setrgbcolor xe1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath fill } if i 16 gt i i 2 idiv 2 mul eq and { r*de362Mi i 7.5 mul cvi get g*de362Mi i 7.5 mul cvi get b*de362Mi i 7.5 mul cvi get setrgbcolor xe1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath fill } if 0 setgray xd1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath stroke xs1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath stroke xe1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath stroke } for %i=0,48 xtesthuea 0 ge {600 /TimesB-ISOL1 FS 8000 2100 moveto 30 rotate 0 setgray (no continues hue change of device near ) showea (keine kontinuiertliche Buntton\344nderung nahe ) showde 600 /TimesBI-ISOL1 FS (h) show 500 /TimesB-ISOL1 FS 0 -100 rmoveto (ab,d) show 0 100 rmoveto 600 /TimesB-ISOL1 FS ( = ) show 0 1 xtesthuea {/in exch def %in=0,xtesthuea LAB*hdd64M xtesthuei in get get cvishow in xtesthuea ne {(, ) show} if } for %in=0,xtesthuea -30 rotate 8000 1100 moveto 30 rotate (or ) showea ( oder ) showde 600 /TimesBI-ISOL1 FS (rgb*) show 500 /TimesBI-ISOL1 FS 0 -100 rmoveto (d) show 0 100 rmoveto 600 /TimesB-ISOL1 FS ( = ) show 0 1 xtesthuea {/in exch def %in=0,xtesthuea r*dd64M xtesthuei in get get cvsshow3r (, ) show g*dd64M xtesthuei in get get cvsshow3r (, ) show b*dd64M xtesthuei in get get cvsshow3r in xtesthuea ne {(; ) show} if } for %in=0,xtesthuea -30 rotate 8000 0100 moveto 30 rotate 600 /TimesB-ISOL1 FS (appropriate correction done) showea (plausible Korrektur erfolgt) showde -30 rotate } if }%LOOP4: xchart=xchart3P6/3 {%LOOP4: xchart>xchart3P7 x0x x01 add 50 sub 0 moveto 0 16200 rlineto stroke x1x x01 add 50 sub 0 moveto 0 16200 rlineto stroke x2x x01 add 50 sub 0 moveto 0 16200 rlineto stroke TK1 00 1 45 {/i exch def %i=0,45 /ik45 xchart xchart3P7 1 add sub 45 mul i add def %range 0...359 /yi ymax i ydel1 mul sub def xd0 yi moveto hab*dd362Fi ik45 get cvishow %all integer xs0 yi moveto hab*ds362Mi ik45 get cvishow xe0 yi moveto hab*de382Fi ik45 get cvishow x0x x01 add yi moveto r*dd362Mi ik45 get cvsshow3 x0x x02 add yi moveto g*dd362Mi ik45 get cvsshow3 x0x x03 add yi moveto b*dd362Mi ik45 get cvsshow3 x0x x04 add yi moveto LAB*Ldd362Mi ik45 get cvsshow1 x0x x05 add yi moveto LAB*add362Mi ik45 get cvsshow1 x0x x06 add yi moveto LAB*bdd362Mi ik45 get cvsshow1 x0x x07 add yi moveto LAB*Cdd362Mi ik45 get cvsshow1 x0x x08 add yi moveto LAB*hdd362Mi ik45 get cvishow %integer x1x x01 add yi moveto r*ds362Mi ik45 get cvsshow3r x1x x02 add yi moveto g*ds362Mi ik45 get cvsshow3r x1x x03 add yi moveto b*ds362Mi ik45 get cvsshow3r x1x x04 add yi moveto LAB*Lds362Mi ik45 get cvsshow1r x1x x05 add yi moveto LAB*ads362Mi ik45 get cvsshow1r x1x x06 add yi moveto LAB*bds362Mi ik45 get cvsshow1r x1x x07 add yi moveto LAB*Cds362Mi ik45 get cvsshow1r x1x x08 add yi moveto LAB*hds362Mi ik45 get cvishow x1x x09 add yi moveto r*dd362Mi ik45 get cvsshow3r x1x x10 add yi moveto g*dd362Mi ik45 get cvsshow3r x1x x11 add yi moveto b*dd362Mi ik45 get cvsshow3r x2x x01 add yi moveto r*de362Mi ik45 get cvsshow3r x2x x02 add yi moveto g*de362Mi ik45 get cvsshow3r x2x x03 add yi moveto b*de362Mi ik45 get cvsshow3r x2x x04 add yi moveto LAB*Lde362Mi ik45 get cvsshow1r x2x x05 add yi moveto LAB*ade362Mi ik45 get cvsshow1r x2x x06 add yi moveto LAB*bde362Mi ik45 get cvsshow1r x2x x07 add yi moveto LAB*Cde362Mi ik45 get cvsshow1r x2x x08 add yi moveto LAB*hde362Mi ik45 get cvishow x2x x09 add yi moveto r*dd362Mi ik45 get cvsshow3r x2x x10 add yi moveto g*dd362Mi ik45 get cvsshow3r x2x x11 add yi moveto b*dd362Mi ik45 get cvsshow3r r*dd362Mi ik45 get g*dd362Mi ik45 get b*dd362Mi ik45 get setrgbcolor xd1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath fill r*ds362Mi ik45 get g*ds362Mi ik45 get b*ds362Mi ik45 get setrgbcolor xs1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath fill r*de362Mi ik45 get g*de362Mi ik45 get b*de362Mi ik45 get setrgbcolor xe1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath fill 0 setgray xd1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath stroke xs1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath stroke xe1 yi ys sub moveto 600 0 rlineto 0 ydel0 rlineto -600 0 rlineto closepath stroke xchart xchart3P7 1 add eq ik45 000 eq and xchart xchart3P7 2 add eq ik45 060 eq and or xchart xchart3P7 3 add eq ik45 120 eq and or xchart xchart3P7 4 add eq ik45 180 eq and or xchart xchart3P7 5 add eq ik45 180 eq and or xchart xchart3P7 6 add eq ik45 240 eq and or xchart xchart3P7 7 add eq ik45 300 eq and or xchart xchart3P7 8 add eq ik45 360 eq and or {/ik 1 def} {/ik 0 def} ifelse ik 1 eq {x1x x01 add yi ydel1 0.7 mul add moveto x2x x11 add 600 add yi ydel1 0.7 mul add lineto stroke x1x x01 add yi ydel1 0.3 mul sub moveto x2x x11 add 600 add yi ydel1 0.3 mul sub lineto stroke} if ik 1 eq {TBIK1 x1x x08 add 400 add yi moveto RJGCBMs xchart xchart3P7 sub get show TBS1 0 -80 rmoveto (s) show 0 80 rmoveto TK1 TBIK1 x2x x08 add 400 add yi moveto RJGCBMs xchart xchart3P7 sub get show TBS1 0 -80 rmoveto (e) show 0 80 rmoveto TK1} if 0 8 48 {/it exch def %it=0,8,48 LAB*hdd64M it get LAB*hdd362Mi ik45 get ge LAB*hdd64M it get LAB*hdd362Mi ik45 1 add get lt and {x0x x01 add yi ydel1 0.3 mul sub moveto x1x x01 add yi ydel1 0.3 mul sub lineto stroke TBIK1 x1x x01 add 400 sub yi moveto RJGCBM it 8 idiv get show TBS1 0 -80 rmoveto (d) show 0 80 rmoveto TK1} if } for %it=0,8,48 } for i%=0,45 } ifelse %END LOOP4: xchart>xchart3P7 } ifelse %END LOOP2: xchart=xchart3P5,>xchart3P5 } if %END LOOPtables: xchart>=xchart3P5 showpage grestore %} for %xcharti=00,10 %} for %colsep=0,1 %} for %pchart=0,0 %} for %xchart=0,18 %} for %xcolor=3,3 %} for %deintp=0,1 %} for %colorm=0,1 %} for %lanind=0,0 %%Trailer %%EndDocument EndEPSF grestore gsave BeginEPSF 86 MM 020 MM translate 12 /Times-ISOL1 FS -9 MM -7 MM moveto ( ) show 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 18 %line 409 %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 197 MM translate 10 /Times-ISOL1 FS 1 1 scale -77 -91 translate %%BeginDocument: Bild 12 %line 419 %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 152 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 21 %line 429 %%EndDocument EndEPSF grestore gsave BeginEPSF 219 MM 152 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 22 %line 439 %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 108 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 23 %line 449 %%EndDocument EndEPSF grestore gsave BeginEPSF 219 MM 108 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 24 %line 459 %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 064 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 25 %line 469 %%EndDocument EndEPSF grestore gsave BeginEPSF 219 MM 064 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 26 %line 479 %%EndDocument EndEPSF grestore gsave BeginEPSF 161 MM 020 MM translate 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 27 %line 489 %%EndDocument EndEPSF grestore gsave BeginEPSF 219 MM 020 MM translate 12 /Times-ISOL1 FS -9 MM -7 MM moveto ( ) show 10 /Times-ISOL1 FS 53 MM 1 MM moveto ( ) show 1 1 scale -77 -91 translate %%BeginDocument: Bild 28 %line 499 %%EndDocument EndEPSF grestore gsave BeginEPSF 219 MM 080 MM add 008 MM translate %80 MM Breite von TestStreifen 10 /Times-ISOL1 FS 53 MM 1 MM moveto () show 1 1 scale -77 21 MM sub -91 translate %%BeginDocument: Bild 29 Teststreifen Ueberlaenge %line 509 %%EndDocument EndEPSF grestore gsave } if %xchart<=xchart3PXX 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 /showm {6 lanind eq {show} {pop} ifelse} bind def /lanind1 01 def /lanind2 01 def /lanindd 01 def /colorm1 00 def /colorm2 00 def /colormd 01 def /deintp1 00 def /deintp2 00 def /deintpd 01 def /xcolor1 03 def /xcolor2 03 def /xcolord 01 def /xchart1 00 def /xchart2 00 def /xchartd 01 def /pchart1 00 def /pchart2 00 def /pchartd 01 def /colsep1 00 def /colsep2 00 def /colsepd 01 def /pmetam1 00 def /pmetam2 00 def /pmetamd 01 def /lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def /lanindd laninddf def} if /colormf where {pop /colorm1 colormf def /colorm2 colormf def /colormd colormdf def} if /deintpf where {pop /deintp1 deintpf def /deintp2 deintpf def /deintpd deintpdf def} if /xcolorf where {pop /xcolor1 xcolorf def /xcolor2 xcolorf def /xcolord xcolordf def} if /xchartf where {pop /xchart1 xchartf def /xchart2 xchartf def /xchartd xchartdf def /xchartm xchart2f xchart1f sub 1 add def} {/xchartm 1 def} ifelse /xchart3f where {pop /xchart3 xchart3f def} {/xchart3 1 def} ifelse /xchart4f where {pop /xchart4 xchart4f def} {/xchart4 0 def} ifelse /pchartf where {pop /pchart1 pchartf def /pchart2 pchartf def /pchartd pchartdf def} if /colsepf where {pop /colsep1 colsepf def /colsep2 colsepf def /colsepd colsepdf def} if /pmetamf where {pop /pmetam1 pmetamf def /pmetam2 pmetamf def /pmetamd pmetamdf def} if /lanind lanind1 def % /colorm colorm1 def % /deintp deintp1 def % /xcolor xcolor1 def % /xchart xchart1 def % /pchart pchart1 def % /colsep colsep1 def % /pmetam pmetam1 def % /GSS$ where {pop /LSS$ GSS$ def} {/LSS$ (1) def} ifelse /GSC$ where {pop /LSC$ GSC$ def} {/LSC$ (N) def} ifelse /GSX$ where {pop /LSX$ GSX$ def} {/LSX$ (0) def} ifelse /GSY$ where {pop /LSY$ GSY$ def} {/LSY$ (0) def} ifelse /GEX$ where {pop /LEX$ GEX$ def} {/LEX$ (P.PS./PDF) def} ifelse /GEY$ where {pop /LEY$ GEY$ def} {/LEY$ (P.DAT) def} ifelse /IMES 0 def /i*ptrsc 0 def gsave %xchart 0 eq {%beg if xchart=0 0 setgray 1.0 1.0 scale 0.0 MM 0.0 MM translate 0.15 MM setlinewidth /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 0 eq {/Txx (-) def /Fxx (-) def} if xchart 1 ge {%xchart>=1 /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>=1 /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/QI84/QI84) show colorm cvishow deintp cvishow colorm 0 eq {(N) show} {(F) show} ifelse (P.PDF & ) show (http://130.149.60.45/~farbmetrik/QI84/QI84) show colorm cvishow deintp cvishow colorm 0 eq {(N) show} {(F) show} ifelse (P.TXT & ) show (http://130.149.60.45/~farbmetrik/QI84/QI84.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 /COLhNam16 16 array def /COLhNam16 [(R00Y) (R25Y) (R50Y) (R75Y) (Y00G) (Y25G) (Y50G) (Y75G) (G00B) (G25B) (G50B) (G75B) (B00R) (B25R) (B50R) (B75R) ] def 0 setgray 12 /Times-ISOL1 FS 61 MM 13 MM moveto (TUB\255Pr\374fvorlage QI84; ) showde %0QI84X-Y 0000# (TUB\255test chart QI84; ) showen %1QI84X-Y 0000# (gr\341fico TUB\255QI84; ) showes %2QI84X-Y 0000# (graphique TUB\255QI84; ) showfr %3QI84X-Y 0000# (grafico TUB\255QI84; ) showit %4QI84X-Y 0000# (TUB\255test chart QI84; ) showjp %5QI84X-Y 0000# xchart4 0 eq { (16 Buntt\366ne) showde %0QI84X-Y 0100# (16 step hue circle) showen %1QI84X-Y 0100# (c\355rculo de tono, 16 pasos) showes %2QI84X-Y 0100# (cercle de teinte, 16 \351tapes) showfr %3QI84X-Y 0100# (cerchio delle tinte a 16 passi) showit %4QI84X-Y 0100# (16 step hue circle) showjp %5QI84X-Y 0100# } if xchart4 1 ge xchart4 16 le and { (Bunttoncode: ) showde %0QI84X-Y 0200# (hue code: ) showen %1QI84X-Y 0200# (c\363digo de tono: ) showes %2QI84X-Y 0200# (code de teinte: ) showfr %3QI84X-Y 0200# (codice di tinte: ) showit %4QI84X-Y 0200# (hue code: ) showjp %5QI84X-Y 0200# 12 /Times-ISOL1 FS (H*) show 10 /Times-ISOL1 FS 0 -2 rmoveto Fxx show 0 2 rmoveto 12 /Times-ISOL1 FS (=) show COLhNam16 xchart4 1 sub get show 10 /Times-ISOL1 FS 0 -2 rmoveto Fxx show 0 2 rmoveto } if xchart4 17 eq { (1080 Normfarben) showde %0QI84X-Y 0300# (1080 standard colours) showen %1QI84X-Y 0300# (1080 colores est\341ndar) showes %2QI84X-Y 0300# (1080 couleurs standard) showfr %3QI84X-Y 0300# (1080 colori standard) showit %4QI84X-Y 0300# (1080 standard colours) showjp %5QI84X-Y 0300# } if 61 MM 09 MM moveto xchart 5 le {%xchart<=5 12 /Times-ISOL1 FS (Pr\374fvorlage nach DIN 33872) showde %0QI84X-Y 0400# (Test chart according to DIN 33872) showen %1QI84X-Y 0400# (gr\341fico seg\372n a DIN 33872) showes %2QI84X-Y 0400# (graphique conforme \340 DIN 33872) showfr %3QI84X-Y 0400# (grafico conformemente a DIN 33872) showit %4QI84X-Y 0400# (Test chart according to DIN 33872) showjp %5QI84X-Y 0400# }%xchart<=5 {%xchart>5 xchart xchart3PXX le {%xchart<=xchart3PXX % 12 /TimesI-ISOL1 FS % ((a*,b*): ) show 12 /Times-ISOL1 FS (48\255stufige Farbkreise;) showde %0QI84X-Y 0500# (48 step hue circles;) showen %1QI84X-Y 0500# (c\355rculo de tono, 48 pasos;) showes %2QI84X-Y 0500# (cercle chromatique 48 paliers; tableaux) showfr %3QI84X-Y 0500# (cerchio delle tinte a 48 passi;) showit %4QI84X-Y 0500# (48 step hue cicle;) showjp %5QI84X-Y 0500# 12 /TimesI-ISOL1 FS ( rgb-LabCh*) show 12 /Times-ISOL1 FS (Tabellen) showde %0QI84X-Y 0600# (tables) showen %1QI84X-Y 0600# (mesas) showes %2QI84X-Y 0600# () showfr %3QI84X-Y 0600# (tavole) showit %4QI84X-Y 0600# (tables) showjp %5QI84X-Y 0600# }%xchart<=xchart3PXX {%xchart>xchart3PXX (Farben und Farbabst\344nde, ) showde %0QI84X-Y 0400# (colors and differences, ) showen %1QI84X-Y 0400# (colores y differencia en color, ) showes %2QI84X-Y 0400# (couleurs et diff\351rences, ) showfr %3QI84X-Y 0400# (colori e la differenza, ) showit %4QI84X-Y 0400# (colors and differences, ) showjp %5QI84X-Y 0400# 12 /Symbol FS (D) show 12 /TimesI-ISOL1 FS colorm 0 eq {%colorm=0 (E*') show }%colorm=0 {%colorm=1 (E'*) show } ifelse %colorm=1 } ifelse %xchart>xchart3PXX } ifelse %xchart>5 xchart 5 le {%xchart<=5 including separation 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<=5 12 /Times-ISOL1 FS 165 MM 13 MM moveto (Eingabe: ) showde %0QI84X-Y 0500# (input: ) showen %1QI84X-Y 0500# (entrada: ) showes %2QI84X-Y 0500# (entr\351e : ) showfr %3QI84X-Y 0500# (immettere: ) showit %4QI84X-Y 0500# (input: ) showjp %5QI84X-Y 0500# 12 /TimesI-ISOL1 FS (rgb/cmyk -> ) show xchart xchart3 lt {(rgb/cmyk) show} if xchart xchart3 ge {%xchart>=xchart3 (rgb) show 10 /Times-ISOL1 FS 0 -2 rmoveto Txx show 0 2 rmoveto 12 /Times-ISOL1 FS } if %xchart>=xchart3 12 /Times-ISOL1 FS 165 MM 9 MM moveto (Ausgabe: ) showde %0QI84X-Y 0600# (output: ) showen %1QI84X-Y 0600# (salida: ) showes %2QI84X-Y 0600# (sortie : ) showfr %3QI84X-Y 0600# (uscita: ) showit %4QI84X-Y 0600# (output: ) showjp %5QI84X-Y 0600# %colorm=0,1! 12 /Times-ISOL1 FS xchart 0 eq {%xchart=0,#0 12 /Times-ISOL1 FS (keine \334nderung) showde %0QI84X-Y 0700# (no change) showen %1QI84X-Y 0700# (ning\372n cambio) showes %2QI84X-Y 0700# (aucun changement) showfr %3QI84X-Y 0700# (nessun cambiamento) showit %4QI84X-Y 0700# (no change compared) showjp %5QI84X-Y 0700# }%xchart=0 {%xchart#0 12 /Times-ISOL1 FS colorm 0 eq {%colorm=0 (Transfer nach ) showde %0QI84X-Y 0800# (transfer to ) showen %1QI84X-Y 0800# (transfiera a ) showes %2QI84X-Y 0800# (transf\351rer \340 ) showfr %3QI84X-Y 0800# (trasferire a ) showit %4QI84X-Y 0800# (transfer to ) showjp %5QI84X-Y 0800# }%colorm=0 {%colorm=1 (3D\255Linearisierung ) showde %0QI84X-Y 0900# (3D\255linearization to ) showen %1QI84X-Y 0900# (3D\255linealizaci\363n a ) showes %2QI84X-Y 0900# (lin\351arisation 3D selon ) showfr %3QI84X-Y 0900# (3D\255linearizzazione a ) showit %4QI84X-Y 0900# (3D\255linearization to ) showjp %5QI84X-Y 0900# } ifelse %colorm=1 12 /TimesI-ISOL1 FS xchart5f 0 eq {(rgb) show} if xchart5f 1 eq {(cmyk) show} if xchart5f 2 eq {(cmy0) show} if xchart5f 3 eq {(cmyk) show} if colorm 1 eq {(*) show} if 10 /Times-ISOL1 FS 0 -2 rmoveto Txx show 0 2 rmoveto 12 /Times-ISOL1 FS } ifelse %xchart=0,#0 %0 setgray %end white and unvisible 12 /Times-ISOL1 FS 62 MM 198.5 MM moveto (http://130.149.60.45/~farbmetrik/QI84/QI84L) show (0) show LSC$ show LEX$ show %1 setgray %start white and unvisible (; ) show xchart 0 eq { (Start\255Ausgabe) showde %0QI84X-Y 1000# (start output) showen %1QI84X-Y 1000# (comience salida) showes %2QI84X-Y 1000# (sortie de production) showfr %3QI84X-Y 1000# (cominciare l'uscita) showit %4QI84X-Y 1000# (start output) showjp %5QI84X-Y 1000# } if LSC$ (C) eq { (Start\255Ausgabe) showde %0QI84X-Y 1100# (start output) showen %1QI84X-Y 1100# (comience salida) showes %2QI84X-Y 1100# (sortie de production) showfr %3QI84X-Y 1100# (cominciare l'uscita) showit %4QI84X-Y 1100# (start output) showjp %5QI84X-Y 1100# } if xchart 1 ge {%xchart>=1 colorm 0 eq {%colorm=0,1 (Transfer Ausgabe) showde %0QI84X-Y 1200# (transfer output) showen %1QI84X-Y 1200# (salida de transferencia) showes %2QI84X-Y 1200# (sortie de transfert) showfr %3QI84X-Y 1200# (uscita di trasferimento) showit %4QI84X-Y 1200# (transfer output) showjp %5QI84X-Y 1200# }%colorm=0 {%colorm=1 (3D\255Linearisierung) showde %0QI84X-Y 1300# (3D\255linearization) showen %1QI84X-Y 1300# (3D\255linealizaci\363n) showes %2QI84X-Y 1300# (lin\351arisation 3D) showfr %3QI84X-Y 1300# (3D\255linearizzzazione) showit %4QI84X-Y 1300# (3D\255linearization) showjp %5QI84X-Y 1300# } ifelse %colorm=0,1 } if %xchart>=1 62 MM 194 MM moveto LSC$ (N) eq LSC$ (C) eq or { (N: Keine 3D\255Linearisierung (OL) ) showde %0QI84X-Y 1400# (N: no 3D\255linearization (OL) ) showen %1QI84X-Y 1400# (N: ninguna 3D\255linealizaci\363n (OL) ) showes %2QI84X-Y 1400# (N: aucune linearisation 3D (OL) ) showfr %3QI84X-Y 1400# (N: nessun 3D\255linearizzazione (OL) ) showit %4QI84X-Y 1400# (N: no 3D\255linearization (OL) ) showjp %5QI84X-Y 1400# (in Datei (F) oder PS\255Startup (S)) showde %0QI84X-Y 1500# (in file (F) or PS\255startup (S)) showen %1QI84X-Y 1500# (en archivo (F) o PS\255startup (S)) showes %2QI84X-Y 1500# (dans fichier (F) ou PS\255startup (S)) showfr %3QI84X-Y 1500# (nel file (F) o PS\255startup (S)) showit %4QI84X-Y 1500# (in file (F) or PS\255startup (S)) showjp %5QI84X-Y 1500# } {LSC$ show (: ) show (3D\255Linearisierung) showde %0QI84X-Y 1600# (3D\255linearization) showen %1QI84X-Y 1600# (3D\255linealizaci\363n) showes %2QI84X-Y 1600# (lin\351arisation 3D) showfr %3QI84X-Y 1600# (3D\255linearizzzazione) showit %4QI84X-Y 1600# (3D\255linearization) showjp %5QI84X-Y 1600# ( QI84/QI84L) show LSS$ show LSX$ show (0) show LSC$ show LEY$ show } ifelse LSC$ (F) eq { ( in Datei (F)) showde %0QI84X-Y 1700# ( in file (F)) showen %1QI84X-Y 1700# ( en archivo (F)) showes %2QI84X-Y 1700# ( dans fichier (F)) showfr %3QI84X-Y 1700# ( nel file (F)) showit %4QI84X-Y 1700# ( in file (F)) showjp %5QI84X-Y 1700# } if LSC$ (S) eq { ( im Distiller Startup (S) Directory) showde %0QI84X-Y 1800# ( in Distiller Startup (S) Directory) showen %1QI84X-Y 1800# ( en el Distiller Startup (S) Directory) showes %2QI84X-Y 1800# ( dans le Distiller Startup (S) Directory) showfr %3QI84X-Y 1800# ( nel Distiller Startup (S) Directory) showit %4QI84X-Y 1800# ( in Distiller Startup (S) Directory) showjp %5QI84X-Y 1800# } if LSC$ (D) eq { ( in PS\255Device (D)) showde %0QI84X-Y 1900# ( in PS\255device (D)) showen %1QI84X-Y 1900# ( en el PS\255device (D)) showes %2QI84X-Y 1900# ( dans l'appareil PS (D)) showfr %3QI84X-Y 1900# ( nel PS\255dispositivo (D)) showit %4QI84X-Y 1900# ( in PS\255Device (D)) showjp %5QI84X-Y 1900# } if LSC$ (T) eq { ( im Distiller Startup (S) Directory) showde %0QI84X-Y 2000# ( in Distiller Startup (S) Directory) showen %1QI84X-Y 2000# ( en el Distiller Startup (S) Directory) showes %2QI84X-Y 2000# ( dans le Distiller Startup (S) Directory) showfr %3QI84X-Y 2000# ( nel Distiller Startup (S) Directory) showit %4QI84X-Y 2000# ( in Distiller Startup (S) Directory) showjp %5QI84X-Y 2000# } if LSC$ (E) eq { ( in PS\255Device (D)) showde %0QI84X-Y 2100# ( in PS\255device (D)) showen %1QI84X-Y 2100# ( en el PS\255device (D)) showes %2QI84X-Y 2100# ( dans appareil PS (D)) showfr %3QI84X-Y 2100# ( nel PS\255dispositivo (D)) showit %4QI84X-Y 2100# ( in PS\255Device (D)) showjp %5QI84X-Y 2100# } if %0 setgray %end white and unvisible (, Seite ) showde %0QI84X-Y 2200# (, page ) showen %1QI84X-Y 2200# (, p\341gina ) showes %2QI84X-Y 2200# (, p\341ge ) showfr %3QI84X-Y 2200# (, pagina ) showit %4QI84X-Y 2200# (, page ) showjp %5QI84X-Y 2200# xchart 1 add cvishow (/) show xchartm cvishow 16 MM 185 MM moveto -90 rotate (Siehe \344hnliche Dateien: ) showde %0QI84X-Y 2300# (see similar files: ) showen %1QI84X-Y 2300# (vea archivos semejantes: ) showes %2QI84X-Y 2300# (voir fichiers similaires: ) showfr %3QI84X-Y 2300# (vedere dei file simili: ) showit %4QI84X-Y 2300# (see similar files: ) showjp %5QI84X-Y 2300# (http://130.149.60.45/~farbmetrik/QI84/QI84.HTM) show %(0) show %LSC$ show LEX$ show 90 rotate 12 MM 185 MM moveto -90 rotate (Technische Information: ) showde %0QI84X-Y 2400# (technical information: ) showen %1QI84X-Y 2400# (informaci\363n t\351cnica: ) showes %2QI84X-Y 2400# (informations techniques: ) showfr %3QI84X-Y 2400# (informazioni tecniche: ) showit %4QI84X-Y 2400# (technical information: ) showjp %5QI84X-Y 2400# (http://www.ps.bam.de) show ( oder ) showde %0QI84X-Y 2500# ( or ) showen %1QI84X-Y 2500# ( o ) showes %2QI84X-Y 2500# ( ou ) showfr %3QI84X-Y 2500# ( o ) showit %4QI84X-Y 2500# ( or ) showjp %5QI84X-Y 2500# (http://130.149.60.45/~farbmetrik) show 90 rotate 281 MM 185 MM moveto -90 rotate (TUB\255Registrierung: 20130201\255QI84/QI84L) showde %0QI84X-Y 2600# (TUB registration: 20130201\255QI84/QI84L) showen %1QI84X-Y 2600# (TUB matr\355cula: 20130201\255QI84/QI84L) showes %2QI84X-Y 2600# (TUB enregistrement: 20130201\255QI84/QI84L) showfr %3QI84X-Y 2600# (TUB iscrizione: 20130201\255QI84/QI84L) showit %4QI84X-Y 2600# (TUB registration: 20130201\255QI84/QI84L) showjp %5QI84X-Y 2600# (0) show LSC$ show LEX$ show 90 rotate 281 MM 74 MM moveto -90 rotate (TUB\255Material: Code=rha4ta) showde %0QI84X-Y 2700# (TUB material: code=rha4ta) showen %1QI84X-Y 2700# (TUB material: code=rha4ta) showes %2QI84X-Y 2700# (TUB mat\351riel: code=rha4ta) showfr %3QI84X-Y 2700# (TUB materiale: code=rha4ta) showit %4QI84X-Y 2700# (TUB material: code=rha4ta) showjp %5QI84X-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 %0QI84X-Y 2800# ( application for measurement ) showen %1QI84X-Y 2800# ( aplicaci\363n para la medida ) showes %2QI84X-Y 2800# ( application pour la mesure ) showfr %3QI84X-Y 2800# ( la domanda per la misura ) showit %4QI84X-Y 2800# ( application for measurement ) showjp %5QI84X-Y 2800# xchart5f 0 eq {%xchart5f=0 (von Display-Ausgabe) showde %0QI84X-Y 2900# (of display output) showen %1QI84X-Y 2900# (de display output) showes %2QI84X-Y 2900# (de sortie sur \350cran) showfr %3QI84X-Y 2900# (di stampa di display) showit %4QI84X-Y 2900# (of display output) showjp %5QI84X-Y 2900# } if %xchart5f=0 xchart5f 1 eq xchart5f 2 eq or {%xchart5f=1,2 (von Offsetdruck\255Ausgabe) showde %0QI84X-Y 3000# (of offset print output) showen %1QI84X-Y 3000# (salida en la impressi\363n offset) showes %2QI84X-Y 3000# (des sorties sur offset) showfr %3QI84X-Y 3000# (uscita nella stampa di offset) showit %4QI84X-Y 3000# (of offset print output) showjp %5QI84X-Y 3000# } if %xchart5f=1,2 xchart5f 3 eq {%xchart5f=3 (von Laserdrucker\255Ausgabe) showde %0QI84X-Y 3100# (of laser printer output) showen %1QI84X-Y 3100# (salida de impresora l\341ser) showes %2QI84X-Y 3100# (des sorties sur imprimante laser) showfr %3QI84X-Y 3100# (di uscita della stampante laser) showit %4QI84X-Y 3100# (of laser printer output) showjp %5QI84X-Y 3100# } if %xchart5f=3 xchart 1 ge {%xchart>=1 xchart5f 0 eq {%xchart5f=0 (, keine Separation) showde %0QI84X-Y 3200# (, no separation) showen %1QI84X-Y 3200# (, ninguna separaci\363n) showes %2QI84X-Y 3200# (, aucune s\351paration) showfr %3QI84X-Y 3200# (, nessuna separazione) showit %4QI84X-Y 3200# (, no separation) showjp %5QI84X-Y 3200# } if %chart5f=0 xchart5f 1 ge {%xchart5f>=1 (, Separation) showde %0QI84X-Y 3300# (, separation) showen %1QI84X-Y 3300# (, separaci\363n) showes %2QI84X-Y 3300# (, s\351paration) showfr %3QI84X-Y 3300# (, separazione) showit %4QI84X-Y 3300# (, separation) showjp %5QI84X-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>=1 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 xchart 1 ge {%xchart>=1 /ypapert 5 array def /ypapert [(A) (B) (L) (G) (P)] def 0 0 0 0 setcmykcolor /i0 14 def /i1 i0 1 add def /i2 i0 2 add def /i3 i0 3 add def x i0 get MM 18 MM sub y i0 get MM 04 MM sub moveto 17 MM 0 rlineto 0 4.5 MM rlineto -17 MM 0 rlineto closepath fill x i0 get MM 17.5 MM sub y i0 get MM 3 MM sub moveto 0 1 1 0 setcmykcolor 4.5 MM /Times-ISOL1 FS (QI84) show 3.5 MM /Times-ISOL1 FS colorm cvishow deintp cvishow % ypapert colsep 0 eq {ypaper}{ybunta} ifelse get show } if %xchart>=1 grestore gsave %********************************************************** xchart xchart3PXX gt {%BEG xchart>xchart3PXX /n00 xchart3PXX 1 add def %special tables start at page 11 /n01 n00 1 add def %1080-rgb-tables start at page 13 /n02 n00 2 add def xchart n00 eq {/n1 0 def /n2 57 def} if xchart n01 eq {/n1 0 def /n2 53 def} if xchart n02 ge {/n1 xchart n02 sub 81 mul def /n2 n1 80 add def n2 1079 ge {/n2 1079 def} if } if 72 56 translate 0.01 MM dup scale 0 0 0 setrgbcolor 0 0 moveto 24600 0 rlineto 0 17220 rlineto -24600 0 rlineto closepath stroke 180 /Times-ISOL1 FS 0 0 0 setrgbcolor 7000 -180 moveto (QI840-7N, ) show lanind 0 eq {(Seite ) show} if lanind 1 eq {(Page ) show} if xchart 1 add cvishow (/) show xchartm cvishow (-F) show %pmetam cvishow %******************************************************** /prog_rgb_dyF_LAB*'dyF {%BEG prog_rgb_dyF_LAB*'dyF %LAB*'dyF allready known by proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL } bind def %END prog_rgb_dyF_LAB*'dyF %******************************************************** /prog_rgb'*dyF_LAB'*dyF {%BEG prog_rgb'*dyF_LAB'*dyF %rgb'*dyF allready known by proc_rgb_rgb*'dy_LAB*'dy_rgb'*dy_*ioL %calculation of LAB'*dyF not possible, only by sRGB-equations } bind def %END prog_rgb'*dyF_LAB'*dyF %************************************************************* /fakt 1.0 def /fakt2 0.74 def %0.2 /iyt 250 fakt2 mul def %text size /iyd 277 fakt2 mul def %line difference /ixs0 00 fakt2 mul def /ixs1 -10 fakt2 mul def /ixs2 10 fakt2 mul def /iys1 -25 fakt2 mul def /iys2 25 fakt2 mul def /iys3 35 fakt2 mul def /iys4 -35 fakt2 mul def /iytie iyt 50 fakt2 mul sub def /nshow {iyt /Times-ISOL1 FS show} def /kshow {iyt /TimesI-ISOL1 FS show} def /bshow {iyt /TimesB-ISOL1 FS show} def /jshow {iyt /TimesBI-ISOL1 FS show} def /sshow {iyt /Symbol FS show} def /nishow {ixs1 iys1 rmoveto iytie /Times-ISOL1 FS show ixs2 iys2 rmoveto} def /nishow0 { 00 iys1 rmoveto iytie /Times-ISOL1 FS show 00 iys2 rmoveto} def /neshow {ixs1 iys3 rmoveto iytie /Times-ISOL1 FS show ixs2 iys4 rmoveto} def /neshow0 { 00 iys3 rmoveto iytie /Times-ISOL1 FS show 00 iys4 rmoveto} def /ishow {ixs1 iys1 rmoveto iytie /TimesB-ISOL1 FS show ixs2 iys2 rmoveto} def /ishow0 { 00 iys1 rmoveto iytie /TimesB-ISOL1 FS show 00 iys2 rmoveto} def /eshow { 00 iys3 rmoveto iytie /TimesB-ISOL1 FS show 00 iys4 rmoveto} def 0 0 0 setrgbcolor /imaxym 17220 def /iymax 16700 def /imaxy0 17000 def colorm 0 eq deintp 0 eq and {/Txx (d) def /Fxx (d) def} if %colorm=0, deintp=0 colorm 0 eq deintp 1 eq and {/Txx (e) def /Fxx (e) def} if %colorm=0, deintp=1 colorm 1 eq deintp 0 eq and {/Txx (dd) def /Fxx (d) def} if %colorm=1, deintp=0 colorm 1 eq deintp 1 eq and {/Txx (de) def /Fxx (e) def} if %colorm=1, deintp=1 xchart 0 eq {/Txx (-) def /Fxx (-) def} if /RGB58M1_F 174 array def %58x3=174 /RGB58M1_F [%rgb data of 48+1 step colour circle + 9 step gray series = 58 1.000 0.000 0.000 %00 R00Y %R 1.000 0.125 0.000 %01 R13Y 1.000 0.250 0.000 %02 R25Y 1.000 0.375 0.000 %03 R38Y 1.000 0.500 0.000 %04 R50Y 1.000 0.625 0.000 %05 R63Y 1.000 0.750 0.000 %06 R75Y 1.000 0.875 0.000 %07 R88Y 1.000 1.000 0.000 %08 Y00G %Y 0.875 1.000 0.000 %09 Y13G 0.750 1.000 0.000 %10 Y25G 0.625 1.000 0.000 %11 Y38G 0.500 1.000 0.000 %12 Y50G 0.375 1.000 0.000 %13 Y63G 0.250 1.000 0.000 %14 Y75G 0.125 1.000 0.000 %15 Y88G 0.000 1.000 0.000 %16 G00C %G 0.000 1.000 0.125 %17 G13C 0.000 1.000 0.250 %18 G25C 0.000 1.000 0.375 %19 G38C 0.000 1.000 0.500 %20 G50C 0.000 1.000 0.625 %21 G63C 0.000 1.000 0.750 %22 G75C 0.000 1.000 0.875 %23 G88C 0.000 1.000 1.000 %24 C00B %C 0.000 0.875 1.000 %25 C13B 0.000 0.750 1.000 %26 C25B 0.000 0.625 1.000 %27 C38B 0.000 0.500 1.000 %28 C50B 0.000 0.375 1.000 %29 C63B 0.000 0.250 1.000 %30 C75B 0.000 0.125 1.000 %31 C88B 0.000 0.000 1.000 %32 B00M %B 0.125 0.000 1.000 %33 B13M 0.250 0.000 1.000 %34 B25M 0.375 0.000 1.000 %35 B38M 0.500 0.000 1.000 %36 B50M 0.625 0.000 1.000 %37 B63M 0.750 0.000 1.000 %38 B75M 0.875 0.000 1.000 %39 B88M 1.000 0.000 1.000 %40 M00R %M 1.000 0.000 0.875 %41 M13R 1.000 0.000 0.750 %42 M25R 1.000 0.000 0.625 %43 M38R 1.000 0.000 0.500 %44 M50R 1.000 0.000 0.375 %45 M63R 1.000 0.000 0.250 %46 M75R 1.000 0.000 0.125 %47 M88R 1.000 0.000 0.000 %48 R00Y %R 0.000 0.000 0.000 %49 N00Wd %ncolors 0.125 0.125 0.125 %50 N13Wd 0.250 0.250 0.250 %51 N25Md 0.375 0.375 0.375 %52 N38Wd 0.500 0.500 0.500 %53 N50Wd 0.625 0.625 0.625 %54 N63Wd 0.750 0.750 0.750 %55 N75Wd 0.875 0.875 0.875 %56 N88Wd 1.000 1.000 1.000 %57 W00Nd = W ] def /RGB58M1t_F 58 array def %48+1 step colour circle and 9 step grey steps = 58 /RGB58M1t_F [%high chromatic series: %relative hue h*, brillance i*, and chroma c* %range 0 ... 100 (R00Y_100_100) (R13Y_100_100) (R25Y_100_100) (R38Y_100_100) (R50Y_100_100) (R63Y_100_100) (R75Y_100_100) (R88Y_100_100) (Y00G_100_100) (Y13G_100_100) (Y25G_100_100) (Y38G_100_100) (Y50G_100_100) (Y63G_100_100) (Y75G_100_100) (Y88G_100_100) (G00C_100_100) (G13C_100_100) (G25C_100_100) (G38C_100_100) (G50C_100_100) (G63C_100_100) (G75C_100_100) (G88C_100_100) (C00B_100_100) (C13B_100_100) (C25B_100_100) (C38B_100_100) (C50B_100_100) (C63B_100_100) (C75B_100_100) (C88B_100_100) (B00M_100_100) (B13M_100_100) (B25M_100_100) (B38M_100_100) (B50M_100_100) (B63M_100_100) (B75M_100_100) (B88M_100_100) (M00R_100_100) (M13R_100_100) (M25R_100_100) (M38R_100_100) (M50R_100_100) (M63R_100_100) (M75R_100_100) (M88R_100_100) (R00Y_100_100) %gray series (NW_000) (NW_013) (NW_025) (NW_038) (NW_050) (NW_063) (NW_075) (NW_088) (NW_100) ] def /RGB54CR_F 162 array def %54x3=162 /RGB54CR_F [%54 colours of colour rendering (CR) test chart 1.000 0.000 0.000 %01 R00Yd %RGB54CR 1.000 0.250 0.000 %02 R25Yd 1.000 0.500 0.000 %03 R50Yd 1.000 0.750 0.000 %04 R75Yd 1.000 1.000 0.000 %05 Y00Gd 0.750 1.000 0.000 %06 Y25Gd 0.500 1.000 0.000 %07 Y50Gd 0.250 1.000 0.000 %08 Y75Gd 0.000 1.000 0.000 %09 G00Bd = 10 0.000 1.000 0.000 %10 G00Bd 0.000 1.000 0.500 %11 G25Bd 0.000 1.000 1.000 %12 G50Bd 0.000 0.500 1.000 %13 G75Bd 0.000 0.000 1.000 %14 B00Rd 0.500 0.000 1.000 %15 B25Rd 1.000 0.000 1.000 %16 B50Rd 1.000 0.000 0.500 %17 B75Rd 1.000 0.000 0.000 %18 R00Yd = 01 1.000 0.500 0.500 %19 R00Yd %lcolors 1.000 0.750 0.500 %20 R50Yd 1.000 1.000 0.500 %21 Y00Gd 0.750 1.000 0.500 %22 Y50Gd 0.500 1.000 0.500 %23 G00Bd 0.500 1.000 1.000 %24 G50Bd 0.500 0.500 1.000 %25 B00Rd 1.000 0.500 1.000 %26 B50Rd 1.000 0.500 0.500 %27 R00Yd = 19 0.750 0.250 0.250 %28 R00Yd %zcolors 0.750 0.500 0.250 %29 R50Yd 0.750 0.750 0.250 %30 Y00Gd 0.500 0.750 0.250 %31 Y50Gd 0.250 0.750 0.250 %32 G00Bd 0.250 0.750 0.750 %33 G50Bd 0.250 0.250 0.750 %34 B00Rd 0.750 0.250 0.750 %35 B50Rd 0.750 0.250 0.250 %36 R00Yd = 28 0.500 0.000 0.000 %37 R00Yd %dcolors 0.500 0.250 0.000 %38 R50Yd 0.500 0.500 0.000 %38 Y00Gd 0.250 0.500 0.000 %40 Y50Gd 0.000 0.500 0.000 %41 G00Bd 0.000 0.500 0.500 %42 G50Bd 0.000 0.000 0.500 %43 B00Rd 0.500 0.000 0.500 %44 B50Rd 0.500 0.000 0.000 %45 R00Yd = 37 0.000 0.000 0.000 %46 N00Wd %ncolors 0.125 0.125 0.125 %47 N13Wd 0.250 0.250 0.250 %48 N25Md 0.375 0.375 0.375 %49 N38Wd 0.500 0.500 0.500 %50 N50Wd 0.625 0.625 0.625 %51 N63Wd 0.750 0.750 0.750 %52 N75Wd 0.875 0.875 0.875 %53 N88Wd 1.000 1.000 1.000 %54 W00Nd = W ] def %54 colours of colour rendering test chart /RGB54CRt_F 54 array def /RGB54CRt_F [%high chromatic series: %relative hue h*, brillance i*, and chroma c*, range 0 ... 100 (R00Y_100_100) (R25Y_100_100) (R50Y_100_100) (R75Y_100_100) (Y00G_100_100) (Y25G_100_100) (Y50G_100_100) (Y75G_100_100) (G00B_100_100) (G00B_100_100) (G25B_100_100) (G50B_100_100) (G75B_100_100) (B00M_100_100) (B25R_100_100) (B50R_100_100) (B75R_100_100) (R00Y_100_100) %whitetish series (R00Y_100_050) (R50Y_100_050) (Y00G_100_050) (Y50G_100_050) (G00B_100_050) (G50B_100_050) (B00R_100_050) (B50R_100_050) (R00Y_100_050) %grayish series (R00Y_075_050) (R50Y_075_050) (Y00G_075_050) (Y50G_075_050) (G00B_075_050) (G50B_075_050) (B00R_075_050) (B50R_075_050) (R00Y_075_050) %blackish series (R00Y_050_050) (R50Y_050_050) (Y00G_050_050) (Y50G_050_050) (G00B_050_050) (G50B_050_050) (B00R_050_050) (B50R_050_050) (R00Y_050_050) %gray series (NW_000) (NW_013) (NW_025) (NW_038) (NW_050) (NW_063) (NW_075) (NW_088) (NW_100) ] def /jCRi 54 array def /jCRi %jCRi [ 648 %R00Y_100_100 1.00 0.00 0.00 01 %chromatic 16 step hue 666 %R25Y_100_100 1.00 0.25 0.00 02 684 %R50Y_100_100 1.00 0.50 0.00 03 702 %R75Y_100_100 1.00 0.75 0.00 04 720 %Y00G_100_100 1.00 1.00 0.00 05 558 %Y25G_100_100 0.75 1.00 0.00 06 396 %Y50G_100_100 0.50 1.00 0.00 07 234 %Y75G_100_100 0.25 1.00 0.00 08 072 %G00B_100_100 0.00 1.00 0.00 09=10 072 %G00B_100_100 0.00 1.00 0.00 10 %chromatic 16 step hue 076 %G25B_100_100 0.00 1.00 0.50 11 080 %G50B_100_100 0.00 1.00 1.00 12 044 %G75B_100_100 0.00 0.50 1.00 13 008 %B00R_100_100 0.00 0.00 1.00 14 332 %B25R_100_100 0.50 0.00 1.00 15 656 %B50R_100_100 1.00 0.00 1.00 16 652 %B75R_100_100 1.00 0.00 0.50 17 648 %R00Y_100_100 1.00 0.00 0.00 18=01 688 %R00Y_100_050 1.00 0.50 0.50 19 %whitish 8 step hue 706 %R50Y_100_050 1.00 0.75 0.50 20 724 %Y00G_100_050 1.00 1.00 0.50 21 562 %Y50G_100_050 0.75 1.00 0.50 22 400 %G00B_100_050 0.50 1.00 0.50 23 404 %G50B_100_050 0.50 1.00 1.00 24 368 %B00R_100_050 0.50 0.50 1.00 25 692 %B50R_100_050 1.00 0.50 1.00 26 688 %R00Y_100_050 1.00 0.50 0.50 27=19 506 %R00Y_075_050 0.75 0.25 0.25 28 %greyish 8 step hue 524 %R50Y_075_050 0.75 0.50 0.25 29 542 %Y00G_075_050 0.75 0.75 0.25 30 380 %Y50G_075_050 0.50 0.75 0.25 31 218 %G00B_075_050 0.25 0.75 0.25 32 222 %G50B_075_050 0.25 0.75 0.75 33 186 %B00R_075_050 0.25 0.25 0.75 34 510 %B50R_075_050 0.75 0.25 0.75 35 506 %R00Y_075_050 0.75 0.25 0.25 36=28 324 %R00Y_050_050 0.50 0.00 0.00 37 %blackish 8 step hue 342 %R50Y_050_050 0.50 0.25 0.00 38 360 %Y00G_050_050 0.50 0.50 0.00 39 198 %Y50G_050_050 0.25 0.50 0.00 40 036 %G00B_050_050 0.00 0.50 0.00 41 040 %G50B_050_050 0.00 0.50 0.50 42 004 %B00R_050_050 0.00 0.00 0.50 43 328 %B50R_050_050 0.50 0.00 0.50 44 324 %R00Y_050_050 0.50 0.00 0.00 45=37 000 %NW_000 0.000 0.000 0.000 46 %grey 9 steps 091 %NW_013 0.125 0.125 0.125 47 182 %NW_025 0.250 0.250 0.250 48 273 %NW_038 0.375 0.375 0.375 49 364 %NW_050 0.500 0.500 0.500 50 455 %NW_063 0.625 0.625 0.625 51 546 %NW_075 0.750 0.750 0.750 52 637 %NW_088 0.875 0.875 0.875 53 728 %NW_100 1.000 1.000 1.000 54 ] def %END jCRi /SUMDE*' 0 def /SUMDE'* 0 def n1 1 n2 {/n exch def %n=n1,n2 /n30 n 3 mul def /n31 n30 1 add def /n32 n30 2 add def xchart n00 eq {%48+1=49 step colour circle + 9 gray steps=58 steps /hcolort RGB58M1t_F n get def RGB58M1_F n30 get %real RGB58M1_F n31 get RGB58M1_F n32 get } if %48 step colour circle xchart n01 eq {%45 colour rendering (CR) + 9 grey steps = 54 steps /hcolort RGB54CRt_F n get def RGB54CR_F n30 get %real RGB54CR_F n31 get RGB54CR_F n32 get } if %54 colour rendering colours xchart n02 ge {%1080 standard colours /r_RGBF RGB0_F n30 get 1000 div def /g_RGBF RGB0_F n31 get 1000 div def /b_RGBF RGB0_F n32 get 1000 div def /hsiRGBF r_RGBF 030 sin mul g_RGBF 150 sin mul add b_RGBF 270 sin mul add %y_e r_RGBF 030 cos mul g_RGBF 150 cos mul add %x_e 0.0001 add atan 0.5 add cvi def %range 0..360 hsiRGBF 30 lt {/hsiRGBF hsiRGBF 30 add def} if %range 30..390 hsiRGBF 030 ge hsiRGBF 090 le and {/u_100 hsiRGBF 030 sub 060 div 100 mul def /u1_RGYB (R) def /u2_RGYB (Y) def} if hsiRGBF 090 ge hsiRGBF 150 le and {/u_100 hsiRGBF 090 sub 060 div 100 mul def /u1_RGYB (Y) def /u2_RGYB (G) def} if hsiRGBF 150 ge hsiRGBF 270 le and {/u_100 hsiRGBF 150 sub 120 div 100 mul def /u1_RGYB (G) def /u2_RGYB (B) def} if hsiRGBF 270 ge hsiRGBF 390 le and {/u_100 hsiRGBF 270 sub 120 div 100 mul def /u1_RGYB (B) def /u2_RGYB (R) def} if %calculation of i_RGBF, c_RGBF, and t_RGBF /maxd r_RGBF def g_RGBF maxd gt {/maxd g_RGBF def} if b_RGBF maxd gt {/maxd b_RGBF def} if /mind r_RGBF def g_RGBF mind lt {/mind g_RGBF def} if b_RGBF mind lt {/mind b_RGBF def} if /I_RGBF maxd 100 mul def /C_RGBF maxd mind sub 100 mul def /T_RGBF I_RGBF C_RGBF 0.5 mul sub def r_RGBF g_RGBF b_RGBF %for setrgbcolor } if %1080 standard colours setrgbcolor %default to create data %setrgbcolor calculates data for output in "FF_LM_de_setrgbcolor_F" %colorm=0 calculates: rgb_dyF, rgb*dyF, LAB*dyF, ,cmyk*dyF and more %colorm=1 calculates: rgb_dyF, rgb*dyF, LAB*dyF', rgb'*dyF, cmyk*dyF and more /r_xF r_dyF def /g_xF g_dyF def /b_xF b_dyF def /i_xF i_dyF def /c_xF c_dyF def /t_xF t_dyF def /r*xF r*dyF def /g*xF g*dyF def /b*xF b*dyF def /LAB*LxF LAB*LdyF def /LAB*axF LAB*adyF def /LAB*bxF LAB*bdyF def /LAB*CxF LAB*adyF dup mul LAB*bdyF dup mul add 0.0001 add sqrt def /LAB*hxF LAB*bdyF LAB*adyF 0.0001 add atan def colorm 0 eq {%colorm=0 %prog_rgb_dyF_LAB*'dyF uses rgb_dyF by default %calculates output data according to IEC 61966-2-1 prog_rgb_dyF_LAB*'dyF xchart n00 eq {%xchart=n00 n 49 le {%n<=49 %chromatic hue series /LAB*'LxF LAB*Ldd64M n get def /LAB*'axF LAB*add64M n get def /LAB*'bxF LAB*bdd64M n get def /LAB*'CxF LAB*Cdd64M n get def /LAB*'hxF LAB*hdd64M n get def }%n<=49 %chromatic hue series {%n>49 %grey series /LAB*'LxF LAB*Lja jCRi n 5 sub get get def %Offset /LAB*'axF LAB*aja jCRi n 5 sub get get def /LAB*'bxF LAB*bja jCRi n 5 sub get get def /LAB*'CxF LAB*'axF dup mul LAB*'bxF dup mul add 0.0001 add sqrt def /LAB*'hxF LAB*'bxF LAB*'axF 0.0001 add atan def } ifelse %n>49 %grey series } if%xchart=n00 xchart n01 eq {%xchart=n01 /LAB*'LxF LAB*Lja jCRi n get get def %Offset hue circle /LAB*'axF LAB*aja jCRi n get get def /LAB*'bxF LAB*bja jCRi n get get def /LAB*'CxF LAB*'axF dup mul LAB*'bxF dup mul add 0.0001 add sqrt def /LAB*'hxF LAB*'bxF LAB*'axF 0.0001 add atan def } if %xchart=n01 xchart n02 ge %xchart>=n02 {/LAB*'LxF LAB*Lja n get def %only for Offset /LAB*'axF LAB*aja n get def /LAB*'bxF LAB*bja n get def /LAB*'CxF LAB*'axF dup mul LAB*'bxF dup mul add 0.0001 add sqrt def /LAB*'hxF LAB*'bxF LAB*'axF 0.0001 add atan def } if %xchart>=n02 % /LAB*'LxF L*'dyF def %only for sRGB % /LAB*'axF a*'dyF def % /LAB*'bxF b*'dyF def % /LAB*'CxF C*'dyF def % /LAB*'hxF h*'dyF def /DE*' LAB*'LxF LAB*LxF sub dup mul LAB*'axF LAB*axF sub dup mul add LAB*'bxF LAB*bxF sub dup mul add 0.0001 add sqrt def /SUMDE*' SUMDE*' DE*' add def } if %colorm=0 colorm 1 eq {%colorm=1 % /r'*xF r'*dyF def % /g'*xF g'*dyF def % /b'*xF b'*dyF def %calculates output data according to IEC 61966-2-1 % prog_rgb'*dyF_LAB'*dyF % /LAB'*LxF L'*dyF def % /LAB'*axF a'*dyF def % /LAB'*bxF b'*dyF def % /LAB'*CxF C'*dyF def % /LAB'*hxF h'*dyF def % /DE'* LAB'*LxF LAB*LxF sub dup mul % LAB'*axF LAB*axF sub dup mul add % LAB'*bxF LAB*bxF sub dup mul add % 0.0001 add sqrt def % /SUMDE'* SUMDE'* DE'* add def } if %colorm=1 /hsi_xF hsiF def /c4*xF c4*Fa def /m4*xF m4*Fa def /y4*xF y4*Fa def /n4*xF n4*Fa def /r*xM r*dyM def /g*xM g*dyM def /b*xM b*dyM def /LAB*LxM LAB*LdyM def /LAB*axM LAB*adyM def /LAB*bxM LAB*bdyM def /LAB*CxM LAB*adyM dup mul LAB*bdyM dup mul add 0.0001 add sqrt def /LAB*hxM LAB*bdyM LAB*adyM 0.0001 add atan def /hsi_xM hsiM def 0 setgray xchart n00 eq {/nx n 8 idiv def n 49 ge {/nx nx 1 add def} if n 56 ge {/nx nx 1 sub def} if } if xchart n01 eq {/nx n 9 idiv def} if xchart n02 ge {/nx 0 def} if /iydn iymax n n1 sub nx add iyd mul sub def n n1 eq {%n=n1 00050 imaxy0 moveto (n) jshow xchart n00 eq {(/j) show} if xchart n01 eq {(/j) show} if xchart n02 eq {(=j) show} if 00700 imaxy0 moveto (HIC*) bshow (F) ishow0 Txx ishow0 02300 imaxy0 moveto (rgb) jshow (_F) ishow0 Txx ishow0 04200 imaxy0 moveto (ict) jshow (_F) ishow0 Txx ishow0 06100 imaxy0 moveto (h) jshow (si_F,) ishow0 Txx ishow0 06700 imaxym moveto 0 imaxym neg rlineto stroke 06800 imaxy0 moveto (rgb*) jshow (F) ishow0 Txx ishow0 08700 imaxy0 moveto (LabCh*) jshow (F) ishow0 Txx ishow0 12100 imaxym moveto 0 imaxym neg rlineto stroke colorm 0 eq {%colorm=1 12200 imaxy0 moveto (rgb*') jshow (F) ishow0 Txx ishow0 14100 imaxy0 moveto (LabCh*') jshow (F) ishow0 Txx ishow0 17600 imaxy0 moveto (DE*') jshow (F) ishow0 Txx ishow0 } if %colorm=0 colorm 1 eq {%colorm=1 % 12200 imaxy0 moveto (rgb'*) jshow % (F) ishow0 Txx ishow0 % 14100 imaxy0 moveto (LabCh'*) jshow (F) ishow0 % Txx ishow0 % 17600 imaxy0 moveto (DE'*) jshow (F) ishow0 % Txx ishow0 12200 imaxy0 moveto (cmyn*) jshow (sep,) ishow0 (F) ishow0 Txx ishow0 } if %colorm=1 18300 imaxy0 moveto (h) jshow (siM,) ishow0 Txx ishow0 18900 imaxym moveto 0 imaxym neg rlineto stroke 19000 imaxy0 moveto (rgb*) jshow (M) ishow0 Txx ishow0 20900 imaxy0 moveto (LabCh*) jshow (M) ishow0 Txx ishow0 () nshow } if %n=n1 00050 iydn moveto n cvishow xchart n00 eq {%xchart=n00 n 48 le {%n<=48 (/) show M1jx n get cvishow }%n<=48 {%n>48 (/) show jCRi n 4 sub get cvishow } ifelse } if %xchart=n00 xchart n01 eq {(/) show jCRi n get cvishow} if 00700 iydn moveto xchart n01 le {hcolort show Txx ishow0 () nshow} if xchart n02 ge {%xchart>n02 C_RGBF 0 eq {%ifelse achromatic (NW) show (_) show I_RGBF cvi 9 le {(00) show} if %filling cero I_RGBF cvi 9 gt I_RGBF cvi 99 le and {(0) show } if %range 0..100 I_RGBF cvi 6 string cvs show }%ifelse achromatic {%ifelse chromatic u1_RGYB show %filling cero range 0..99 u_100 cvi 9 le {(0) show} if %filling cero u_100 cvi cvi 6 string cvs show u2_RGYB show (_) show I_RGBF cvi 9 le {(00) show} if %filling cero I_RGBF cvi 9 gt I_RGBF cvi 99 le and {(0) show } if %range 0..100 I_RGBF cvi 6 string cvs show (_) show C_RGBF 9 le {(00) show} if %filling cero C_RGBF cvi 9 gt C_RGBF cvi 99 le and {(0) show } if %range 0..100 C_RGBF cvi 6 string cvs show } ifelse %ifelse chromatic Txx ishow0 () nshow } if %xchart>n02 02300 iydn moveto r_xF cvsshow3 02900 iydn moveto g_xF cvsshow3 03500 iydn moveto b_xF cvsshow3 04200 iydn moveto i_xF cvsshow3 04800 iydn moveto c_xF cvsshow3 05400 iydn moveto t_xF cvsshow3 06100 iydn moveto hsi_xF cvishow 06800 iydn moveto r*xF cvsshow3 07400 iydn moveto g*xF cvsshow3 08000 iydn moveto b*xF cvsshow3 08700 iydn moveto LAB*LxF cvsshow1 09400 iydn moveto LAB*axF cvsshow1 10100 iydn moveto LAB*bxF cvsshow1 10800 iydn moveto LAB*CxF cvsshow1 11500 iydn moveto LAB*hxF cvsshow1 colorm 0 eq {%colorm=0 12200 iydn moveto r_xF cvsshow3 12800 iydn moveto g_xF cvsshow3 13400 iydn moveto b_xF cvsshow3 14100 iydn moveto LAB*'LxF cvsshow1 14800 iydn moveto LAB*'axF cvsshow1 15500 iydn moveto LAB*'bxF cvsshow1 16200 iydn moveto LAB*'CxF cvsshow1 16900 iydn moveto LAB*'hxF cvsshow1 17600 iydn moveto DE*' cvsshow1 } if %colorm=0 colorm 1 eq {%colorm=1 % 12200 iydn moveto r'*xF cvsshow3 % 12800 iydn moveto g'*xF cvsshow3 % 13400 iydn moveto b'*xF cvsshow3 % 14100 iydn moveto LAB'*LxF cvsshow1 % 14800 iydn moveto LAB'*axF cvsshow1 % 15500 iydn moveto LAB'*bxF cvsshow1 % 16200 iydn moveto LAB'*CxF cvsshow1 % 16900 iydn moveto LAB'*hxF cvsshow1 % 17600 iydn moveto DE'* cvsshow1 12200 iydn moveto c4*xF cvsshow3 13100 iydn moveto m4*xF cvsshow3 14000 iydn moveto y4*xF cvsshow3 14900 iydn moveto n4*xF cvsshow3 } if %colorm=1 18300 iydn moveto hsi_xM cvishow 19000 iydn moveto r*xM cvsshow3 19600 iydn moveto g*xM cvsshow3 20200 iydn moveto b*xM cvsshow3 20900 iydn moveto LAB*LxM cvsshow1 21600 iydn moveto LAB*axM cvsshow1 22300 iydn moveto LAB*bxM cvsshow1 23000 iydn moveto LAB*CxM cvsshow1 23700 iydn moveto LAB*hxM cvsshow1 } for %n=n1,n2 n2 57 eq n2 53 eq or n2 80 ge or {%n2=57,53,80,161,...,971,1079 /iydn iymax n 1 add n1 sub nx add iyd mul sub def 12500 iydn moveto lanind 1 eq {(Mean color difference of this page:) bshow} if %lanind 0 eq {(Mitttlere Farbdifferenz dieser Seite: ) bshow} if 16600 iydn moveto (delta ) bshow colorm 0 eq {(E*' =) jshow} if % {(E'* =) jshow} ifelse () bshow colorm 0 eq {%colorm=0 17600 iydn moveto SUMDE*' n2 n1 sub 1 add div cvsshow1 }%colorm=0 {%colorm=1 % 17600 iydn moveto SUMDE'* n2 n1 sub 1 add div cvsshow1 } ifelse %colorm=1 } if %n2=57,53,80,161,...,971,1079 } if %END xchart>xchart3PXX %************************************************************* %%Trailer %%EndDocument EndEPSF grestore gsave showpage grestore %} for %colsepf=0,1 %} for %pchartf=0,0 } for %xchartf=0,18 %} for %xcolorf=3,3 } for %deintpf=0,1 } for %colormf=0,1 %} for %lanindf=0,0 %%Trailer