%!PS-Adobe-3.0 EPSF-3.0 http://farbe.li.tu-berlin.de/AG78/AG78L00XX.PS 20180401
%%BoundingBox: 14 08 828 584

/pdfmark where {pop} {userdict /pdfmark /cleartomark load put} ifelse
/languagelevel where {pop languagelevel} {1} ifelse
2 lt { userdict (<<) cvn ([) cvn load put
       userdict (>>) cvn (]) cvn load put} if
[ /Title (PostScript pictures: http://farbe.li.tu-berlin.de/AG78/AG78.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:2018040112000)
  /ModDate (D:20180401112000)
/DOCINFO pdfmark
[ /View [ /FitB ]
/DOCVIEW pdfmark
/sfgray {setgray} bind def %Early Frame File (f) definition
/sfrgbcolor {setrgbcolor} bind def /sfcmykcolor {setcmykcolor} bind def
%line 20******************************************************
%BEG AG78/OUTLIN10.PS Emty 20120301

%END AG78/OUTLIN10.PS Emty 20120301
                                                                         
%****************************************************
%BEG 'AG78'OUTLIN1X.PS Other procedures for sRGB output linearization
%****************************************************
%BEG COLDATA_SRGB_00.PS
%BEG TRANSFER_EARLY_F.TXT **********************************2012-02-01
%Early definition of FF_LM_setgray_F0 identical to former setgray

/FF_LM_setgray_F0 {setgray} bind def
/FF_LM_setrgbcolor_F0 {setrgbcolor} bind def
/FF_LM_setcmykcolor_F0 {setcmykcolor} bind def
/FF_LM_transfer_F0 {settransfer} bind def
/FF_LM_colortransfer_F0 {setcolortransfer} bind def
%END TRANSFER_EARLY_F.TXT **********************************2012-02-01

%*****************************************************************************

/setcolortrans_F {%BEG procedure setcolortrans_F
%1MR-Transform of setgray and setcmykcolor to FF_LM_de_setrgbcolor_F
%Three procedures and use of the procedure FF_LM_de_setrgbcolor_F of main FF

/setgray {%BEG procedure setgray_F
          dup dup FF_LM_de_setrgbcolor_F
          %STOPs
         } def %END procedure setgray_F

/setcmykcolor {%BEG procedure setcmykcolor_F
               /FF_LM_k exch def /FF_LM_y exch def
               /FF_LM_m exch def /FF_LM_c exch def
               FF_LM_k 0 eq {%FF_LM_k=0
                             1 FF_LM_c sub 1 FF_LM_m sub
                             1 FF_LM_y sub FF_LM_de_setrgbcolor_F
                            }%FF_LM_k=0
                            {%FF_LM_k#0
                             FF_LM_c 0 eq
                             FF_LM_m 0 eq and
                             FF_LM_y 0 eq and 
                                {%FF_LM_k#0 and c=m=y=0 achromatic
                                 1 FF_LM_k sub dup dup
                                 FF_LM_de_setrgbcolor_F
                                }%FF_LM_k#0 and c=m=y=0 achromatic
                                {%FF_LM_k#0 and c or m or y#0 chromatic
                                 1 FF_LM_c sub 1 FF_LM_k sub mul
                                 1 FF_LM_m sub 1 FF_LM_k sub mul
                                 1 FF_LM_y sub 1 FF_LM_k sub mul
                                 FF_LM_de_setrgbcolor_F
                                } ifelse %FF_LM_k#0 and c or m or y#0 chromatic
                            } ifelse %FF_LM_k#0
              } def %END procedure setcmykcolor_F

/setrgbcolor {%BEG procedure setrgbcolor_F
              /FF_LM_b exch def /FF_LM_g exch def /FF_LM_r exch def
              FF_LM_r FF_LM_g FF_LM_b
              FF_LM_de_setrgbcolor_F
              %STOPr
             } def %BEG procedure setrgbcolor_F

/settransfer {FF_LM_transfer_F} def

/setcolortransfer {FF_LM_colortransfer_F} def

%*******************************************************************
/FF_LM_de_setrgbcolor_F {
%BEG FF_LM_de_setrgbcolor_F

%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

             /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

FF_LM_setrgbcolor_F

} bind def %END FF_LM_de_setrgbcolor_F


/FF_LM_xchart_gamma_F {/xchart where {pop /xchartN xchart 8 idiv def
                                         /xchartP xchart
                                         xchart 8 idiv 8 mul sub def}
                                    {/xchartN 2.0 def %default
                                     /xchartP 0.5 def} ifelse
                      /gamma_F 2.4 xchartP 0.18 mul sub 2.4 div
                            1 2.4 xchartN 0.18 mul sub 2.4 div div mul def
                       gamma_F exp
                      } def

/FF_LM_setrgbcolor_F {%FF_LM_setrgbcolor_F
                     /FF_LM_b0L exch def /FF_LM_g0L exch def
                     /FF_LM_r0L exch def
                     FF_LM_r0L 0 le {/FF_LM_r0L 0.0001 def} if
                     FF_LM_g0L 0 le {/FF_LM_g0L 0.0001 def} if
                     FF_LM_b0L 0 le {/FF_LM_b0L 0.0001 def} if
                     /FF_LM_r1F FF_LM_r0L FF_LM_xchart_gamma_F def
                     /FF_LM_g1F FF_LM_g0L FF_LM_xchart_gamma_F def
                     /FF_LM_b1F FF_LM_b0L FF_LM_xchart_gamma_F def
                     FF_LM_r1F FF_LM_g1F FF_LM_b1F
                     FF_LM_setrgbcolor_F0
                    } def %FF_LM_setrgbcolor_F

/FF_LM_transfer_F {{FF_LM_xchart_gamma_F} FF_LM_transfer_F0} def

/FF_LM_colortransfer_F {{FF_LM_xchart_gamma_F} {FF_LM_xchart_gamma_F}
                       {FF_LM_xchart_gamma_F} FF_LM_colortransfer_F0} def

} def %END procedure setcolortrans_F

%*******************************************************************
/Colordata_sRGB_F {%BEG procedure Colordata_sRGB_F

/Xrx089   729 array def
/Yrx089   729 array def
/Zrx089   729 array def
/Xrx100   729 array def
/Yrx100   729 array def
/Zrx100   729 array def
/R0 729 array def
/G0 729 array def
/B0 729 array def

%/RGB0_to_XYZj_F { %BEG procedure RGB0_to_XYZj_F
%transfers standard sRGB data (IEC 61966-2-1) to XYZ data for 9x9x9=729 colours
%normalized XYZ data with Y=88.59 for display white, compare ISO 9241-306:2008.

%requires /(XYZ)rx089   729 array def
%         /(XYZ)rx100   729 array def
%requires in addition /RGB0_F 1080 array def

%/Xrx089   729 array def
%/Yrx089   729 array def
%/Zrx089   729 array def
%/Xrx100   729 array def
%/Yrx100   729 array def
%/Zrx100   729 array def
%/R0 729 array def
%/G0 729 array def
%/B0 729 array def


%row no.1 and 2: 9xrgb
/imax 08 def
/jmax 08 def
/kmax 08 def
0 1 kmax {/k exch def %beg k=0,08
0 1 jmax {/j exch def %beg j=0,jmax
0 1 imax {/i exch def %beg i=0,imax
          /n i j 9 mul add k 81 mul add def
          R0 n k kmax div 1000 mul put
          G0 n j jmax div 1000 mul put
          B0 n i imax div 1000 mul put
         } for %end i=0,jmax
         } for %end j=0,jmax
         } for %end k=0,kmax

/IM0 729 def
/IM1 IM0       1 sub def
0 1 IM1 {/i exch def %i=0,IM1
         R0 i get 0.04045 le           %equations of IEC 61966-2-1:2003
         {/RsRGB R0 i get 12.92 div def}
         {/RsRGB R0 i get 0.001 mul 0.055 add
                    1.055 div 2.4 exp def} ifelse
         G0 i get 0.04045 le
         {/GsRGB G0 i get 12.92 div def}
         {/GsRGB G0 i get 0.001 mul 0.055 add
                    1.055 div 2.4 exp def} ifelse
         B0 i get 0.04045 le
         {/BsRGB B0 i get 12.92 div def}
         {/BsRGB B0 i get 0.001 mul 0.055 add
                    1.055 div 2.4 exp def} ifelse

         Xrx100 i 0.4124 RsRGB mul 
                  0.3576 GsRGB mul add
                  0.1805 BsRGB mul add 100 mul put
         Yrx100 i 0.2126 RsRGB mul
                  0.7152 GsRGB mul add
                  0.0722 BsRGB mul add 100 mul put
         Zrx100 i 0.0193 RsRGB mul
                  0.1192 GsRGB mul add
                  0.9505 BsRGB mul add 100 mul put
        } for %i=0,IM1

0 1 IM1 {/i exch def %i=0,IM1
         Xrx089 i Xrx100 i get 0.8859 mul put
         Yrx089 i Yrx100 i get 0.8859 mul put
         Zrx089 i Zrx100 i get 0.8859 mul put
        } for %i=0,IM1

/iN 0 def
/iW 728 def

/XLN100 Xrx100 iN get def
/YLN100 Yrx100 iN get def
/ZLN100 Zrx100 iN get def

/XLW100 Xrx100 iW get def
/YLW100 Yrx100 iW get def
/ZLW100 Zrx100 iW get def

/XLN089 Xrx089 iN get def
/YLN089 Yrx089 iN get def
/ZLN089 Zrx089 iN get def

/XLW089 Xrx089 iW get def
/YLW089 Yrx089 iW get def
/ZLW089 Zrx089 iW get def

% achromatic (D65) colours
/XLWD65100  95.04 def
/YLWD65100 100.00 def
/ZLWD65100 108.88 def

/XLWD65089  95.04 0.8859 mul def
/YLWD65089 100.00 0.8859 mul def
/ZLWD65089 108.88 0.8859 mul def

/XLN001 XLWD65100 100 div def
/YLN001 YLWD65100 100 div def
/ZLN001 ZLWD65100 100 div def

%} bind def %END procedure RGB0_to_XYZj_F

%/xchartj_XYZj_FAB729a_F { %BEG Procedure xchartj_FAB729a_F
%transfer from XYZj data to LAB729a CIELAB data for 9x9x9=729 colours

%requires 0<= xchartj <=10 (11 luminance reflections)
%requires             /(XYZ)x089 3240 array def (x=rc,ra,na,la)
%requires             /(Lab)x089 3240 array def (x=rc,ra,na,la)


%requires             /x729  729 array def (x=X,Y,Z) %not adapted

%requires             /x729  729 array def (x=L,a,b) %not adapted
%requires             /x729a 729 array def (x=L,a,b) %adapted


/Lrc089 729 array def
/arc089 729 array def
/brc089 729 array def
/Xrc089  729 array def
/Yrc089  729 array def
/Zrc089  729 array def

/Lra089 729 array def
/ara089 729 array def
/bra089 729 array def
/Xra089  729 array def
/Yra089  729 array def
/Zra089  729 array def

/Lna089 729 array def
/ana089 729 array def
/bna089 729 array def
/Xna089  729 array def
/Yna089  729 array def
/Zna089  729 array def

/Lla089 729 array def
/ala089 729 array def
/bla089 729 array def
/Xla089  729 array def
/Yla089  729 array def
/Zla089  729 array def

/Xj 729 array def
/Yj 729 array def
/Zj 729 array def

/LAB*Lj 729 array def %not adapted
/LAB*aj 729 array def
/LAB*bj 729 array def

/LAB*Lja 729 array def %adapted
/LAB*aja 729 array def
/LAB*bja 729 array def

/DecodeXYZ* {dup 6 29 div ge {dup dup mul mul}
            {4 29 div sub 108 841 div mul} ifelse} bind def

/XD65W  95.04 def /YD65W 100.00 def /ZD65W 108.88 def
/XD50W  96.42 def /YD50W 100.00 def /ZD50W  82.51 def
/DAKTE [(D65) (D50)] def

/ilf 8 array def
/ilf [0.00 0.25 0.50 1.00 2.00 4.00 8.00 16.00] def

/Lrefl 11 array def
/Lrefl [(0%) (0%) (0%)
        (0%) (0,6%) (1,2%) (2,5%)
        (5%) (10%) (20%) (40%)] def

xchartj 2 le {/il 0 def}
             {/il xchartj 3 sub def} ifelse

%Reference black and factors
/YrN 2.52 def

/Xtref089 YrN ilf il get mul XLN001 mul def
/Ytref089 YrN ilf il get mul def
/Ztref089 YrN ilf il get mul ZLN001 mul def

/YNil Ytref089 def
/YNil001 YNil 100 div def

YNil001 6 29 div 3 exp ge
{/FYYn YNil001 0.3333 exp def}
{/FYYn 841 108 div YNil001 mul 4 29 div add def} ifelse

/L*Nil 116 FYYn mul 16 sub def

/IM1 728 def

0 1 IM1 {/i exch def %i=0,IM1
         Xrc089 i Xrx089 i get put
         Yrc089 i Yrx089 i get put
         Zrc089 i Zrx089 i get put
         /XQ Xrc089 i get XLWD65100 div def
         /YQ Yrc089 i get YLWD65100 div def
         /ZQ Zrc089 i get ZLWD65100 div def
         XQ 0 lt {/XQ 0.00000001 def} if
         YQ 0 lt {/YQ 0.00000001 def} if
         ZQ 0 lt {/ZQ 0.00000001 def} if
         Lrc089 i YQ 0.008856 lt {903.3 YQ mul}
                  {YQ 0.33333333 exp 116 mul 16 sub} ifelse put
         arc089 i XQ 0.008856 lt {7.787 XQ mul 16 116 div add}
                  {XQ 0.33333333 exp} ifelse
                  YQ 0.008856 lt {7.787 YQ mul 16 116 div add}
                  {YQ 0.33333333 exp} ifelse sub 500 mul put
         brc089 i YQ 0.008856 lt {7.787 YQ mul 16 116 div add}
                  {YQ 0.33333333 exp} ifelse
                  ZQ 0.008856 lt {7.787 ZQ mul 16 116 div add}
                  {ZQ 0.33333333 exp} ifelse sub 200 mul put
       } for %i=0,IM1

/L*N Lrc089 0 get def
/A*N arc089 0 get def
/B*N brc089 0 get def

/L*W Lrc089 728 get def
/A*W arc089 728 get def
/B*W brc089 728 get def

0 1 IM1 {/i exch def %i=0,IM1
        Lra089 i Lrc089 i get put
        /l*CIE Lrc089 i get L*N sub L*W L*N sub div def
                                                       %system rel. lightn.
        /a*s A*W A*N sub l*CIE mul def
        /b*s B*W B*N sub l*CIE mul def
        ara089  i arc089 i get A*N sub a*s sub put
        bra089  i brc089 i get B*N sub b*s sub put
       } for %i=0,IM1

0 1 IM1 {/i exch def %i=0,IM1
       /X* {Lra089  i get 16 add 116 div
            ara089  i get 500 div add} bind def
       /Y* {Lra089  i get 16 add 116 div} bind def
       /Z* {Lra089  i get 16 add 116 div
            bra089  i get 200 div sub} bind def
       Xra089 i X* DecodeXYZ* XLWD65100 mul put
       Yra089 i Y* DecodeXYZ* YLWD65100 mul put
       Zra089 i Z* DecodeXYZ* ZLWD65100 mul put
      } for %i=0,IM1

xchartj 2 ge {%xchartj>=2

%for white X data
/Xwref089 Xra089 728 get def
/Ywref089 Yra089 728 get def
/Zwref089 Zra089 728 get def

%for black X data
/YrN Yra089 0 get def

/Xnref089 YrN XLN001 mul def
/Ynref089 YrN def
/Znref089 YrN ZLN001 mul def

/IM1 728 def
0 1 IM1 {/i exch def %i=1,IM1
         Xna089 i Xra089 i get Xnref089 sub
                  Xwref089 Xwref089 Xnref089 sub div mul put
         Yna089 i Yra089 i get Ynref089 sub
                  Ywref089 Ywref089 Ynref089 sub div mul put
         Zna089 i Zra089 i get Znref089 sub
                  Zwref089 Zwref089 Znref089 sub div mul put
        } for %i=1,IM1

0 1 IM1 {/i exch def %i=1,IM1
       /XQ Xna089 i get XLWD65100 div def
       /YQ Yna089 i get YLWD65100 div def
       /ZQ Zna089 i get ZLWD65100 div def
       XQ 0 lt {/XQ 0.00000001 def} if
       YQ 0 lt {/YQ 0.00000001 def} if
       ZQ 0 lt {/ZQ 0.00000001 def} if
       Lna089 i YQ 0.008856 lt {903.3 YQ mul}
                {YQ 0.33333333 exp 116 mul 16 sub} ifelse put
       ana089 i XQ 0.008856 lt {7.787 XQ mul 16 116 div add}
                {XQ 0.33333333 exp} ifelse
                YQ 0.008856 lt {7.787 YQ mul 16 116 div add}
                {YQ 0.33333333 exp} ifelse sub 500 mul put
       bna089 i YQ 0.008856 lt {7.787 YQ mul 16 116 div add}
                {YQ 0.33333333 exp} ifelse
                ZQ 0.008856 lt {7.787 ZQ mul 16 116 div add}
                {ZQ 0.33333333 exp} ifelse sub 200 mul put
     } for %i=1,IM1

} if %xchart>=2

xchartj 3 ge {%xchart>=3

%for white X data
/Xwref089 Xra089 728 get def
/Ywref089 Yra089 728 get def
/Zwref089 Zra089 728 get def

/kn Ywref089 Ywref089 Ytref089 sub div def

0 1 IM1 {/i exch def %i=1,IM1
         Xla089 i Xna089 i get kn div Xtref089 add put
         Yla089 i Yna089 i get kn div Ytref089 add put
         Zla089 i Zna089 i get kn div Ztref089 add put
        } for %i=1,IM1

0 1 IM1 {/i exch def %i=1,IM1
         /XQ Xla089 i get XLWD65100 div def
         /YQ Yla089 i get YLWD65100 div def
         /ZQ Zla089 i get ZLWD65100 div def
         XQ 0 lt {/XQ 0.00000001 def} if
         YQ 0 lt {/YQ 0.00000001 def} if
         ZQ 0 lt {/ZQ 0.00000001 def} if
         Lla089 i YQ 0.008856 lt {903.3 YQ mul}
                  {YQ 0.33333333 exp 116 mul 16 sub} ifelse put
         ala089 i XQ 0.008856 lt {7.787 XQ mul 16 116 div add}
                  {XQ 0.33333333 exp} ifelse
                  YQ 0.008856 lt {7.787 YQ mul 16 116 div add}
                  {YQ 0.33333333 exp} ifelse sub 500 mul put
         bla089 i YQ 0.008856 lt {7.787 YQ mul 16 116 div add}
                  {YQ 0.33333333 exp} ifelse
                  ZQ 0.008856 lt {7.787 ZQ mul 16 116 div add}
                  {ZQ 0.33333333 exp} ifelse sub 200 mul put
     } for %i=1,IM1

} if %xchart>=3

xchartj 0 eq {%xchartj=0 (1x)
0 1 IM1 {/i exch def %i=0,IM1
         LAB*Lj i Lrc089 i get put
         LAB*aj i arc089 i get put
         LAB*bj i brc089 i get put
         Xj i Xrc089 i get put
         Yj i Yrc089 i get put
         Zj i Zrc089 i get put
        } for %i=0,IM1
} if %xchartj=0 (1x)

xchartj 1 eq {%xchartj=1 (1x)
0 1 IM1 {/i exch def %i=0,IM1
         LAB*Lj i Lra089 i get put
         LAB*aj i ara089 i get put
         LAB*bj i bra089 i get put
         Xj i Xra089 i get put
         Yj i Yra089 i get put
         Zj i Zra089 i get put
        } for %i=0,IM1
} if %xchartj=1 (1x)

xchartj 2 eq {%xchartj=2 (1x)
0 1 IM1 {/i exch def %i=0,IM1
         LAB*Lj i Lna089 i get put
         LAB*aj i ana089 i get put
         LAB*bj i bna089 i get put
         Xj i Xna089 i get put
         Yj i Yna089 i get put
         Zj i Zna089 i get put
        } for %i=0,IM1
} if %xchartj=2 (1x)

xchartj 3 ge {%xchartj=3,4,5,6,7,8,9,10 (8x)
0 1 728 {/i exch def %i=0,IM1
         LAB*Lj i Lla089 i get put
         LAB*aj i ala089 i get put
         LAB*bj i bla089 i get put
         Xj i Xla089 i get put
         Yj i Yla089 i get put
         Zj i Zla089 i get put
        } for %i=0,IM1
} if %xchartj=3,4,5,6,7,8,9,10 (8x)

%Adaptation
/L*Nio LAB*Lj 000 get def
/A*Nio LAB*aj 000 get def
/B*Nio LAB*bj 000 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 728 {/j exch def %j=0,728
         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,728

/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

/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 xchartj_XYZj_FAB729a_F

} bind def %END procedure Colordata_sRGB_F

%*****************************************************************************
%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*de362Fi
%***************** for 362 elementary hue angles
/hab*de362Fi 362 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*de362Fi im30 habe put %floating point
          } for %i=30,389

hab*de362Fi 360 hab*de362Fi 0 get 360 add put
hab*de362Fi 361 hab*de362Fi 1 get 360 add put

%***************** 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*de362Fi 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 (sRGB standard device; no separation, D65) def
/FileDatde (sRGB Norm\255Ger\344t; keine Separation, 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

%*****************************************************************
%} def %END PROC_SPEC_IOF.PS
%END COLDATA-SRGB_00.PS
%****************************************************
%END 'AG78'OUTLIN1X.PS Other procedures for sRGB output linearization
%****************************************************

%BEG AG78/OUTLIN1Y.PS Emty 20101101

%END AG78/OUTLIN1Y.PS Emty 20101101
                                                                         
/BeginEPSF {% def               % Prepare for EPS file
/b4_Inc_state save def          % Save state for cleanup
/dict_count countdictstack def
/op_count count 1 sub def       % Count objects on op stack
userdict begin                  % Make userdict current dict
/showpage {} def
0 setgray 0 setlinecap
1 setlinewidth 0 setlinejoin
10 setmiterlimit [] 0 setdash newpath
/languagelevel where            % If level not equal to 1 then
 {pop languagelevel where       % If level not equal to 1 then
 1 ne
 {false setstrokeadjust false setoverprint
 } if
} if
} bind def

/EndEPSF  {% def              % End for EPS file
 count op_count sub {pop} repeat
 countdictstack dict_count sub {end} repeat	% Clean up dict stack
 b4_Inc_state restore
} bind def

/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def /str {8 string } bind def
/languagelevel where {pop languagelevel} {1} ifelse
                     /PSL12 exch def
/dictende {counttomark 2 idiv dup dict begin {def}
           repeat pop currentdict end} bind def

% !AUSTAUSCH Times-Roman -> Times-Roman-ISOLatin1=Times-I
 
/Times-Roman findfont dup length dict  begin
{1 index /FID ne {def} {pop pop} ifelse }forall
/Encoding ISOLatin1Encoding def
currentdict end
 
/Times-ISOL1 exch definefont pop
 
/Times-Italic findfont dup length dict  begin
{1 index /FID ne {def} {pop pop} ifelse }forall
/Encoding ISOLatin1Encoding def
currentdict end
 
/TimesI-ISOL1 exch definefont pop
 
/Times-Bold findfont dup length dict  begin
{1 index /FID ne {def} {pop pop} ifelse }forall
/Encoding ISOLatin1Encoding def
currentdict end
 
/TimesB-ISOL1 exch definefont pop
 
/Times-BoldItalic findfont dup length dict  begin
{1 index /FID ne {def} {pop pop} ifelse }forall
/Encoding ISOLatin1Encoding def
currentdict end
 
/TimesBI-ISOL1 exch definefont pop
 
/TK {250 /Times-ISOL1 FS} bind def
/TM {300 /Times-ISOL1 FS} bind def
/TG {350 /Times-ISOL1 FS} bind def
 
/TIK {250 /TimesI-ISOL1 FS} bind def
/TIM {300 /TimesI-ISOL1 FS} bind def
/TIG {350 /TimesI-ISOL1 FS} bind def
 
/TBK {250 /TimesB-ISOL1 FS} bind def
/TBM {300 /TimesB-ISOL1 FS} bind def
/TBG {350 /TimesB-ISOL1 FS} bind def
 
/TBIK {250 /TimesBI-ISOL1 FS} bind def
/TBIM {300 /TimesBI-ISOL1 FS} bind def
/TBIG {350 /TimesBI-ISOL1 FS} bind def
 
%ANFA CMYKDEF
%CMYKDEA0 (A0=Standard-Drucker-CMYKDEF) 15.3.97
/tzac [1.000 0.933 0.867 0.800 0.733 0.667 0.600 0.533
       0.467 0.400 0.333 0.267 0.200 0.132 0.067 0.000
       1.000 0.750 0.500 0.250 0.000] def
/tzam [1.000 0.933 0.867 0.800 0.733 0.667 0.600 0.533
       0.467 0.400 0.333 0.267 0.200 0.132 0.067 0.000
       1.000 0.750 0.500 0.250 0.000] def
/tzay [1.000 0.933 0.867 0.800 0.733 0.667 0.600 0.533
       0.467 0.400 0.333 0.267 0.200 0.132 0.067 0.000
       1.000 0.750 0.500 0.250 0.000] def
/tzan [1.000 0.933 0.867 0.800 0.733 0.667 0.600 0.533
       0.467 0.400 0.333 0.267 0.200 0.132 0.067 0.000
       1.000 0.750 0.500 0.250 0.000] def
/tza0 [0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000
       0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000
       0.000 0.000 0.000 0.000 0.000] def
/tza1 [1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000
       1.000 1.000 1.000 1.000 1.000 1.000 1.000 1.000
       1.000 1.000 1.000 1.000 1.000] def
%ENDE CMYKD
 
/rec %x, y width heigth
  {/heigth exch def /width exch def
   moveto width 0 rlineto 0 heigth rlineto width neg 0 rlineto
   closepath } bind def
 
/colrecfiLAB* %x y width heigth LAB*
  { setcolor rec fill} bind def

/colrecstLAB* %x y width heigth LAB*
  { setcolor rec stroke} bind def

/colrecficmyn* %x y width heigth cmy0* or 000n*
  { setcmykcolor rec fill} bind def
 
/colrecstcmyn* %x y width heigth cmy0* or 000n*
  { setcmykcolor rec stroke} bind def

/colrecfiw* %x y width heigth w*
  { setgray rec fill} bind def

/colrecstw* %x y width heigth w*
  { setgray rec stroke} bind def

/colrecfiolv* %x y width heigth olv*
  { setrgbcolor rec fill} bind def

/colrecstolv* %x y width heigth olv*
  { setrgbcolor rec stroke} bind def
 
/tzocmy0* {0.0 1.0 1.0 0.0} bind def %Reproduction colours
/tzlcmy0* {1.0 0.0 1.0 0.0} bind def %cmyn* setcmykcolor
/tzvcmy0* {1.0 1.0 0.0 0.0} bind def
/tzccmy0* {1.0 0.0 0.0 0.0} bind def
/tzmcmy0* {0.0 1.0 0.0 0.0} bind def
/tzycmy0* {0.0 0.0 1.0 0.0} bind def

/tzoolv* {1.0 0.0 0.0} bind def %Reproduction colours
/tzlolv* {0.0 1.0 0.0} bind def %olv* setrgbcolor
/tzvolv* {0.0 0.0 1.0} bind def
/tzcolv* {0.0 1.0 1.0} bind def
/tzmolv* {1.0 0.0 1.0} bind def
/tzyolv* {1.0 1.0 0.0} bind def
 
/tzoLAB* [53.34  72.46  50.66] def %Reproduction colours
/tzlLAB* [84.93 -79.83  74.80] def %LAB* setcolor
/tzvLAB* [32.20  24.88 -37.89] def
/tzcLAB* [88.10 -44.88 -13.36] def
/tzmLAB* [59.66  90.32 -19.65] def
/tzyLAB* [93.76 -20.24  85.93] def

/tzncmy0* {1.00 1.00 1.00 0.00} bind def %grey series
/tzdcmy0* {0.75 0.75 0.75 0.00} bind def %cmy0* setcmykcolor
/tzzcmy0* {0.50 0.50 0.50 0.00} bind def
/tzhcmy0* {0.25 0.25 0.25 0.00} bind def
/tzwcmy0* {0.00 0.00 0.00 0.00} bind def
 
/tzn000n* {0.00 0.00 0.00 1.00} bind def %grey series 000n*
/tzd000n* {0.00 0.00 0.00 0.75} bind def %000n* setcmykcolor
/tzz000n* {0.00 0.00 0.00 0.50} bind def
/tzh000n* {0.00 0.00 0.00 0.25} bind def
/tzw000n* {0.00 0.00 0.00 0.00} bind def

/tznw* {0.00} bind def %grey series
/tzdw* {0.25} bind def %w* setgray
/tzzw* {0.50} bind def
/tzhw* {0.75} bind def
/tzww* {1.00} bind def

/tznolv* {0.00 0.00 0.00} bind def %grey series
/tzdolv* {0.25 0.25 0.25} bind def %olv* setrgbcolor
/tzzolv* {0.50 0.50 0.50} bind def
/tzholv* {0.75 0.75 0.75} bind def
/tzwolv* {1.00 1.00 1.00} bind def

/tznLAB* [18.01 0.00 0.00] def %grey series
/tzdLAB* [37.36 0.00 0.00] def %LAB* setcolor
/tzzLAB* [56.71 0.00 0.00] def
/tzhLAB* [76.06 0.00 0.00] def
/tzwLAB* [95.41 0.00 0.00] def

/tfn {0 setgray} bind def
/tfw {1 setgray} bind def
 
/A4quer {598 0 translate 90 rotate} def
/cvishow {cvi 6 string cvs show} def
/cvsshow1 {10 mul cvi 0.1 mul 7 string cvs show} def
/cvsshow2 {100 mul cvi 0.01 mul 7 string cvs show} def
/cvsshow3 {1000 mul cvi 0.001 mul 7 string cvs show} def

%%EndProlog

%***********************************************************
%%BeginPageSetup
/#copies 1 def
%A4querF
1.0 1.0 scale
/pgsave save def
%%EndPageSetup

/SS$ [(G) (E) (S) (F) (I) (J) (M)] def
/SC$ [(N) (F) (S) (D) (T) (E) (C)] def
/SX$ [(0) (1) (2) (3) (4) (5) (6) (7) (8) (9) (A) (B) (C) (D) (E) (F)] def
/SY$ [(0) (1) (2) (3) (4) (5) (6) (7) (8) (9) (A) (B) (C) (D) (E) (F)] def
%       0           1            2            3            4            5
%       6           7            8
/EX$ [(A.TXT /.PS) (B.BMP /.PS) (G.GIF /.PS) (H.HTM /.PS) (I.HTM /.PS)
      (J.JPE /.PS) (P.PDF /.PS) (T.TIF /.PS)] def
/EY$ [(A.DAT) (B.DAT) (G.DAT) (H.DAT) (I.DAT) (J.DAT)
      (P.DAT) (T.DAT)] def

%*******************************************************************
/lanind1f 00 def /lanind2f 00 def /laninddf 01 def
/colorm1f 00 def /colorm2f 00 def /colormdf 01 def
/deintp1f 00 def /deintp2f 00 def /deintpdf 01 def
/xcolor1f 00 def /xcolor2f 00 def /xcolordf 01 def
/xchart1f 00 def /xchart2f 00 def /xchartdf 01 def
/xchart3f 01 def /xchart4f 00 def /xchart5f 00 def
/pchart1f 03 def /pchart2f 03 def /pchartdf 01 def %=3 for sRGB, Lr=0
/colsep1f 00 def /colsep2f 00 def /colsepdf 01 def
/pmetam1f 00 def /pmetam2f 00 def /pmetamdf 01 def
%/lanindf lanind1f def %
/lanindf lanind1f def %lanind1f laninddf lanind2f {/lanindf exch def

%/colormf colorm1f def %
/colormf colorm1f def %colorm1f colormdf colorm2f {/colormf exch def

%/deintpf deintp1f def %
/deintpf deintp1f def %deintp1f deintpdf deintp2f {/deintpf exch def

%/xcolorf xcolor1f def %
/xcolorf xcolor1f def %xcolor1f xcolordf xcolor2f {/xcolorf exch def

%/xchartf xchart1f def %
xchart1f xchartdf xchart2f {/xchartf exch def

%/pchartf pchart1f def %
/pchartf pchart1f def %/pchartf pchart1f def %pchart1f pchartdf pchart2f {/pchartf exch def

%/colsepf colsep1f def %
/colsepf colsep1f def %colsep1f colsepdf colsep2f {/colsepf exch def

/lanind lanindf def
/colorm colormf def
/deintp deintpf def
/xcolor xcolorf def
/xchart xchartf def   /xchartm xchart2f xchart1f sub 1 add def
/xchart3 xchart3f def /xchart4 xchart4f def
/pchart pchartf def
/colsep colsepf def

%/pmetamf pmetam1f def %
/pmetamf pmetam1f def %pmetam1f pmetamdf pmetam2f {/pmetamf exch def

/pmetam pmetamf def

%*************************************************************
/setgray {sfgray} bind def
/setrgbcolor {sfrgbcolor} bind def
/setcmykcolor {sfcmykcolor} bind def

%72 90 translate

%0.01 MM dup scale
%0 0 moveto 24600 0 rlineto 0 17220 rlineto
%          -24600 0 rlineto closepath stroke
%000 -240 moveto
%240 /Times-ISOL1 FS
%lanindf cvishow (-) show
%colormf cvishow
%deintpf cvishow
%xcolorf cvishow
%xchartf cvishow
%pchartf cvishow
%colsepf cvishow (-F) show pmetamf cvishow

%grestore
gsave

/GSS$ SS$ lanind get def
/GSC$ SC$ colorm get def
/GSX$ SX$ xcolor xcolor 16 idiv 16 mul sub get def
/GSY$ SY$ xchart xchart 16 idiv 16 mul sub get def
/GEX$ EX$ 0 get def
/GEY$ EY$ 0 get def

%01
%02
%03
%04
%05
%06
%07
%08
%09
%10
%11
%12
%13
%14
%15
%16
%17
%18

%gsave
BeginEPSF
 28 MM 197 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 10

%line 329

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
 28 MM 152 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 11

%line 339
%!PS-Adobe-3.0 EPSF-3.0 AG780-1
%%BoundingBox: 70 83 405 206
 
%START PDFDE011.EPS
/pdfmark01 where {pop} {userdict /pdfmark01 /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://farbe.li.tu-berlin.de/AG78/AG78.HTM)
  /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1)
  /Subject (goto: http://farbe.li.tu-berlin.de http://130.149.60.45/~farbmetrik)
  /Keywords (image reproduction, colour devices)
  /Creator (klaus.richter@mac.com)
  /CreationDate (D:2017040112000)
  /ModDate (D:20170401112000)
/DOCINFO pdfmark01
[ /View [ /FitB ]
/DOCVIEW pdfmark01
%END  PDFDE011

% !Exchange 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
 
/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def /str {8 string } bind def
 
/TK {250 /Times-ISOL1 FS} bind def
/TM {300 /Times-ISOL1 FS} bind def
/TG {350 /Times-ISOL1 FS} bind def
 
/TIK {250 /TimesI-ISOL1 FS} bind def
/TIM {300 /TimesI-ISOL1 FS} bind def
/TIG {350 /TimesI-ISOL1 FS} bind def
 
/TBK {250 /TimesB-ISOL1 FS} bind def
/TBM {300 /TimesB-ISOL1 FS} bind def
/TBG {350 /TimesB-ISOL1 FS} bind def
 
/TBIK {250 /TimesBI-ISOL1 FS} bind def
/TBIM {300 /TimesBI-ISOL1 FS} bind def
/TBIG {350 /TimesBI-ISOL1 FS} bind def
 
/RK {250 /Times-Roman FS} bind def
/RM {300 /Times-Roman FS} bind def
/RG {350 /Times-Roman FS} bind def

/RIK {250 /Times-Italic FS} bind def
/RIM {300 /Times-Italic FS} bind def
/RIG {350 /Times-Italic FS} bind def

/RBK {250 /Times-Bold FS} bind def
/RBM {300 /Times-Bold FS} bind def
/RBG {350 /Times-Bold FS} bind def

/RBIK {250 /Times-BoldItalic FS} bind def
/RBIM {300 /Times-BoldItalic FS} bind def
/RBIG {350 /Times-BoldItalic FS} bind def

/ishowRM  {RK  -00 -60 rmoveto
           show 00  60 rmoveto RM} def
/jshowRM  {RBK -00 -60 rmoveto
           show 00  60 rmoveto RBM} def

/ishowTM  {TK  -00 -60 rmoveto
           show 00  60 rmoveto TM} def
/jshowTM  {TBK -00 -60 rmoveto
           show 00  60 rmoveto TBM} def

/ishowRG  {RM  -00 -70 rmoveto
           show 00  70 rmoveto RG} def
/jshowRG  {RBM -00 -70 rmoveto
           show 00  70 rmoveto RBG} def

/ishowTG  {TM  -00 -70 rmoveto
           show 00  70 rmoveto TG} def
/jshowTG  {TBM -00 -70 rmoveto
           show 00  70 rmoveto TBG} def

%%EndProlog
gsave

%lanindL2 START  20061001
/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 {3 lanind eq {show} {pop} ifelse} bind def
/showfr {2 lanind eq {show} {pop} ifelse} bind def
/showit {4 lanind eq {show} {pop} ifelse} bind def
/showjp {5 lanind eq {show} {pop} ifelse} bind def
/showm  {6 lanind eq {show} {pop} ifelse} bind def

/lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def}
               {/lanind1 0 def /lanind2 0 def} ifelse

/lanind lanind1 def
gsave 
 
380 85 moveto
5 /Times-Roman FS
    ( AG780-1) show

72 90 translate
 
/yhoe  4000 def
/xhoe 11700 def

0.01 MM 0.01 MM scale

15 setlinewidth
1 setgray
 0 0  moveto xhoe 0 rlineto 0 yhoe rlineto xhoe neg 0 rlineto
closepath fill

0 setgray
 0 0  moveto xhoe 0 rlineto 0 yhoe rlineto xhoe neg 0 rlineto
closepath stroke

 0 3300  moveto xhoe 0 rlineto stroke
 0 2600  moveto xhoe 0 rlineto stroke
 0 1350  moveto xhoe 0 rlineto stroke
 
/tedef {/anz exch def /ydt exch def /y0t exch def /x0t exch def} bind def
 
/TEn {RM tedef} bind def
 
/TEA {anz 1 sub -1 0 {ydt mul y0t add x0t exch moveto show} for} bind def

/yd 290 def %y-Zeilenabstand
%Spalten
/S1 0050 def
/S1a 2150 def
/S2 3050 def
/S3 7200 def
/S4 9850 def

/yhom yhoe 700 sub def
S1a 050 sub yhom moveto 0 yhom neg rlineto stroke
 S2 050 sub yhoe moveto 0 yhoe neg rlineto stroke
 S3 050 sub yhom moveto 0 yhom neg rlineto stroke
 S4 050 sub yhom moveto 0 yhom neg rlineto stroke

/yz 350 def
/ydg yz 3.7 mul def
/yu0 yhoe 080 add def
/yu1 {yu0 yz 1.0 mul sub} bind def
/yu2 {yu0 yz 3.0 mul sub} bind def
/yu3 {yu0 yz 5.1 mul sub} bind def
/yu4 yu3 ydg sub def

0 setgray
 S1 yu1 yd 0 mul sub moveto
TBM
(Elementarfarbe) showde
(Elementary colour) showen
(Elenmetary colour) showes
TBK
(Couleur \351l\351mentaire et) showfr
TBM
(Elementary colour) showit
(Elementary colour) showjp

 S1 yu1 yd 1 mul sub moveto
RBM
(und CIE-Lichtart) showde
TBM
(and CIE illuminant) showen
(and CIE illuminant) showes
TBK
(illuminant normalis\351 CIE) showfr
TBM
(and CIE illuminant) showit
(and CIE illuminant) showjp

 S2 yu1 yd 0 mul sub moveto
RBM
(CIELAB-Daten, CIE-Normfarbwerte und -wertanteile ) showde
TBM
(f\374r) showde
(CIELAB data, CIE tristimulus values and CIE chromaticity for the) showen
(CIELAB data, CIE tristimulus values and CIE chromaticity for the) showes
TBK
(Donn\351es CIELAB, composantes trichromatiques CIE et chromaticit\351 CIE pour) showfr
TBM
(CIELAB data, CIE tristimulus values and CIE chromaticity for the) showit
(CIELAB data, CIE tristimulus values and CIE chromaticity for the) showjp

 S2 yu1 yd 1 mul sub moveto
RBM
(die CIE-Normlichtart D65 and D50 und den 2-Grad-Beobachter) showde
TBM
(CIE standard illuminants D65 and D50 and the 2 degree observer) showen
(CIE standard illuminants D65 and D50 and the 2 degree observer) showes
TBK
(les illuminants normalis\351s CIE D65 et D50 et l'observateur) showfr
( \340 deux degr\351s) showfr
TBM
(CIE standard illuminants D65 and D50 and the 2 degree observer) showit
(CIE standard illuminants D65 and D50 and the 2 degree observer) showjp

 S1 yu2 yd 0 mul sub moveto
RBM
(CIE-Testfarbe) showde
(CIE-test colour) showen
(CIE-test colour) showes
RBK
(Couleur d'essai) showfr
RBM
(CIE-test colour) showit
(CIE-test colour) showjp

 S1 yu2 yd 1 mul sub moveto
TBM
() showde
() showen
() showes
TBK
(CIE) showfr
TBM
() showit
() showjp

S1a yu2 yd 0 mul sub moveto
RBM
(Licht-) showde
(Illumi-) showen
(Illu-) showes
RBK
(Illumi-) showfr
RBM
(Illu-) showit
(Illu-) showjp

S1a yu2 yd 1 mul sub moveto
RBM
(art) showde
(nant) showen
(minant) showes
RBK
(nant) showfr
RBM
(minant) showit
(minant) showjp

 S2 yu2 yd 0 mul sub moveto
TBIM
(  L*       a*       b*      C*) show
(ab) jshowTM
TBIM
300 0 rmoveto TBIM (h) show
(ab) jshowTM

 S3 yu2 yd 0 mul sub moveto
TBIM
(   X        Y         Z) show

 S4 yu2 yd 0 mul sub moveto
TBIM
(   x          y) show

0 1 1 {/i exch def %i=0,1

 S1 yu3 ydg i mul sub yd 0 mul sub moveto
TM
(09, ) show
TM
(Rot) showde
(Red) showen
(Rojo) showes
(Rouge) showfr
(Rosso) showit
(R\370d) showjp
TBIM
( R) show %(e) ishowTM

 S1 yu3 ydg i mul sub yd 1 mul sub moveto
TM
(10, ) show
(Gelb) showde
(Yellow) showen
(Amarillo) showes
(Jaune) showfr
(Giallo) showit
(Gul) showjp
TBIM ( Y) show %(e) jshowTM

 S1 yu3 ydg i mul sub yd 2 mul sub moveto
TM
(11, ) show
TM
(Gr\374n) showde
(Green) showen
(Verde) showes
(Vert) showfr
(Verde) showit
(Gr\370nn) showjp
TBIM ( G) show %(e) jshowTM

 S1 yu3 ydg i mul sub yd 3 mul sub moveto
TM
(12, ) show
TM
(Blau) showde
(Blue) showen
(Azul) showes
(Bleu) showfr
(Blu) showit
(Bl\345) showjp
TBIM ( B) show %(e) jshowTM

} for %i=0,1


 S1a yu3 yd 0 mul sub moveto
TM
(D65) show

 S1a yu3 ydg 1 mul sub yd 0 mul sub moveto
TM
(D50) show

 S2 000 add yu3 yd neg 4 TEn
(40,04   58,98   28,32  65,43   25,7)
(81,30   -2,99   71,82  71,89   92,4)
(52,27 -42,40   13,64  44,54 162,2)
(30,52     1,21 -46,35  46,37 271,5)
TEA

 S2 000 add yu4 yd neg 4 TEn
(41,88   62,00   31,82  69,69   27,2)
(81,97     1,81   71,59  71,61   88,5)
(51,62 -41,12   11,52  42,70 164,4)
(29,20   -5,28 -49,34  49,62 263,9)
TEA

 S3 yu3 yd neg 4 TEn
(20,64  11,27    4,34)
(54,89  59,01  12,02)
(12,15  20,38  15,34)
(  6,24    6,45  27,59)
TEA

 S3 yu4 yd neg 4 TEn
(23,31  12,42    3,24)
(58,84  60,24    9,50)
(12,10  19,81  11,95)
(  5,25    5,92  21,25)
 TEA

 S4 yu3 yd neg 4 TEn
(0,5693  0,3110)
(0,4359  0,4686)
(0,2538  0,4258)
(0,1550  0,1601)
TEA

 S4 yu4 yd neg 4 TEn
(0,5982  0,3188)
(0,4576  0,4685)
(0,2759  0,4515)
(0,1621  0,1825)
 TEA

showpage
grestore

%%Trailer

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
 86 MM 152 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 12

%line 349
%!PS-Adobe-3.0 EPSF-3.0 AG780-2,
%%BoundingBox: 70 90 226 206

/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
%%EndProlog
gsave

8 /Times-Roman FS
72 83 moveto
%!2     (AG780-2,) show

72 90 translate

%! 0.01 MM 0.01 MM scale
%! 15 setlinewidth
%! 0 0  moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto
%! closepath stroke

grestore

showpage
%%Trailer

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
 28 MM 108 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 13

%line 359
%!PS-Adobe-3.0 EPSF-3.0 AG780-3
%%BoundingBox: 70 83 405 206
 
%START PDFDE011.EPS
/pdfmark03 where {pop} {userdict /pdfmark03 /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://farbe.li.tu-berlin.de/AG78/AG78.HTM)
  /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1)
  /Subject (goto: http://farbe.li.tu-berlin.de http://130.149.60.45/~farbmetrik)
  /Keywords (image reproduction, colour devices)
  /Creator (klaus.richter@mac.com)
  /CreationDate (D:2017040112000)
  /ModDate (D:20170401112000)
/DOCINFO pdfmark03
[ /View [ /FitB ]
/DOCVIEW pdfmark03
%END  PDFDE011

% !Exchange 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
 
/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def /str {8 string } bind def
 
/TK {250 /Times-ISOL1 FS} bind def
/TM {300 /Times-ISOL1 FS} bind def
/TG {350 /Times-ISOL1 FS} bind def
 
/TIK {250 /TimesI-ISOL1 FS} bind def
/TIM {300 /TimesI-ISOL1 FS} bind def
/TIG {350 /TimesI-ISOL1 FS} bind def
 
/TBK {250 /TimesB-ISOL1 FS} bind def
/TBM {300 /TimesB-ISOL1 FS} bind def
/TBG {350 /TimesB-ISOL1 FS} bind def
 
/TBIK {250 /TimesBI-ISOL1 FS} bind def
/TBIM {300 /TimesBI-ISOL1 FS} bind def
/TBIG {350 /TimesBI-ISOL1 FS} bind def
 
/RK {250 /Times-Roman FS} bind def
/RM {300 /Times-Roman FS} bind def
/RG {350 /Times-Roman FS} bind def

/RIK {250 /Times-Italic FS} bind def
/RIM {300 /Times-Italic FS} bind def
/RIG {350 /Times-Italic FS} bind def

/RBK {250 /Times-Bold FS} bind def
/RBM {300 /Times-Bold FS} bind def
/RBG {350 /Times-Bold FS} bind def

/RBIK {250 /Times-BoldItalic FS} bind def
/RBIM {300 /Times-BoldItalic FS} bind def
/RBIG {350 /Times-BoldItalic FS} bind def

/ishowRM  {RK  -00 -60 rmoveto
           show 00  60 rmoveto RM} def
/jshowRM  {RBK -00 -60 rmoveto
           show 00  60 rmoveto RBM} def

/ishowTM  {TK  -00 -60 rmoveto
           show 00  60 rmoveto TM} def
/jshowTM  {TBK -00 -60 rmoveto
           show 00  60 rmoveto TBM} def

/ishowRG  {RM  -00 -70 rmoveto
           show 00  70 rmoveto RG} def
/jshowRG  {RBM -00 -70 rmoveto
           show 00  70 rmoveto RBG} def

/ishowTG  {TM  -00 -70 rmoveto
           show 00  70 rmoveto TG} def
/jshowTG  {TBM -00 -70 rmoveto
           show 00  70 rmoveto TBG} def

%%EndProlog
gsave

%lanindL2 START  20061001
/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 {3 lanind eq {show} {pop} ifelse} bind def
/showfr {2 lanind eq {show} {pop} ifelse} bind def
/showit {4 lanind eq {show} {pop} ifelse} bind def
/showjp {5 lanind eq {show} {pop} ifelse} bind def
/showm  {6 lanind eq {show} {pop} ifelse} bind def

/lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def}
               {/lanind1 0 def /lanind2 0 def} ifelse

/lanind lanind1 def
gsave 
 
380 85 moveto
5 /Times-Roman FS
    ( AG780-3) show

72 90 translate
 
/yhoe  4000 def
/xhoe 11700 def

0.01 MM 0.01 MM scale

15 setlinewidth
1 setgray
 0 0  moveto xhoe 0 rlineto 0 yhoe rlineto xhoe neg 0 rlineto
closepath fill

0 setgray
 0 0  moveto xhoe 0 rlineto 0 yhoe rlineto xhoe neg 0 rlineto
closepath stroke

 0 3300  moveto xhoe 0 rlineto stroke
 0 2600  moveto xhoe 0 rlineto stroke
 0 1350  moveto xhoe 0 rlineto stroke
 
/tedef {/anz exch def /ydt exch def /y0t exch def /x0t exch def} bind def
 
/TEn {RM tedef} bind def
 
/TEA {anz 1 sub -1 0 {ydt mul y0t add x0t exch moveto show} for} bind def

/yd 290 def %y-Zeilenabstand
%Spalten
/S1 0050 def
/S1a 2150 def
/S2 3050 def
/S3 7200 def
/S4 9850 def

/yhom yhoe 700 sub def
S1a 050 sub yhom moveto 0 yhom neg rlineto stroke
 S2 050 sub yhoe moveto 0 yhoe neg rlineto stroke
 S3 050 sub yhom moveto 0 yhom neg rlineto stroke
 S4 050 sub yhom moveto 0 yhom neg rlineto stroke

/yz 350 def
/ydg yz 3.7 mul def
/yu0 yhoe 080 add def
/yu1 {yu0 yz 1.0 mul sub} bind def
/yu2 {yu0 yz 3.0 mul sub} bind def
/yu3 {yu0 yz 5.1 mul sub} bind def
/yu4 yu3 ydg sub def

0 setgray
 S1 yu1 yd 0 mul sub moveto
TBM
(Elementarfarbe) showde
(Elementary colour) showen
(Elenmetary colour) showes
TBK
(Couleur \351l\351mentaire et) showfr
TBM
(Elementary colour) showit
(Elementary colour) showjp

 S1 yu1 yd 1 mul sub moveto
RBM
(und CIE-Lichtart) showde
TBM
(and CIE illuminant) showen
(and CIE illuminant) showes
TBK
(illuminant normalis\351 CIE) showfr
TBM
(and CIE illuminant) showit
(and CIE illuminant) showjp

 S2 yu1 yd 0 mul sub moveto
RBM
(CIELAB-Daten, CIE-Normfarbwerte und -wertanteile ) showde
TBM
(f\374r) showde
(CIELAB data, CIE tristimulus values and CIE chromaticity for the) showen
(CIELAB data, CIE tristimulus values and CIE chromaticity for the) showes
TBK
(Donn\351es CIELAB, composantes trichromatiques CIE et chromaticit\351 CIE pour) showfr
TBM
(CIELAB data, CIE tristimulus values and CIE chromaticity for the) showit
(CIELAB data, CIE tristimulus values and CIE chromaticity for the) showjp

 S2 yu1 yd 1 mul sub moveto
RBM
(die CIE-Normlichtart D65 and D50 und den 2-Grad-Beobachter) showde
TBM
(CIE standard illuminants D65 and D50 and the 2 degree observer) showen
(CIE standard illuminants D65 and D50 and the 2 degree observer) showes
TBK
(les illuminants normalis\351s CIE D65 et D50 et l'observateur) showfr
( \340 deux degr\351s) showfr
TBM
(CIE standard illuminants D65 and D50 and the 2 degree observer) showit
(CIE standard illuminants D65 and D50 and the 2 degree observer) showjp

 S1 yu2 yd 0 mul sub moveto
RBM
(CIE-Testfarbe) showde
(CIE-test colour) showen
(CIE-test colour) showes
RBK
(Couleur d'essai) showfr
RBM
(CIE-test colour) showit
(CIE-test colour) showjp

 S1 yu2 yd 1 mul sub moveto
TBM
() showde
() showen
() showes
TBK
(CIE) showfr
TBM
() showit
() showjp

S1a yu2 yd 0 mul sub moveto
RBM
(Licht-) showde
(Illumi-) showen
(Illu-) showes
RBK
(Illumi-) showfr
RBM
(Illu-) showit
(Illu-) showjp

S1a yu2 yd 1 mul sub moveto
RBM
(art) showde
(nant) showen
(minant) showes
RBK
(nant) showfr
RBM
(minant) showit
(minant) showjp

 S2 yu2 yd 0 mul sub moveto
TBIM
(  L*       a*       b*      C*) show
(ab) jshowTM
TBIM
300 0 rmoveto TBIM (h) show
(ab) jshowTM

 S3 yu2 yd 0 mul sub moveto
TBIM
(   X        Y         Z) show

 S4 yu2 yd 0 mul sub moveto
TBIM
(   x          y) show

0 1 1 {/i exch def %i=0,1

 S1 yu3 ydg i mul sub yd 0 mul sub moveto
TM
(09, ) show
TM
(Rot) showde
(Red) showen
(Rojo) showes
(Rouge) showfr
(Rosso) showit
(R\370d) showjp
TBIM
( R) show (e) ishowTM

 S1 yu3 ydg i mul sub yd 1 mul sub moveto
TM
(10, ) show
(Gelb) showde
(Yellow) showen
(Amarillo) showes
(Jaune) showfr
(Giallo) showit
(Gul) showjp
TBIM ( Y) show (e) jshowTM

 S1 yu3 ydg i mul sub yd 2 mul sub moveto
TM
(11, ) show
TM
(Gr\374n) showde
(Green) showen
(Verde) showes
(Vert) showfr
(Verde) showit
(Gr\370nn) showjp
TBIM ( G) show (e) jshowTM

 S1 yu3 ydg i mul sub yd 3 mul sub moveto
TM
(12, ) show
TM
(Blau) showde
(Blue) showen
(Azul) showes
(Bleu) showfr
(Blu) showit
(Bl\345) showjp
TBIM ( B) show (e) jshowTM

} for %i=0,1


 S1a yu3 yd 0 mul sub moveto
TM
(D65) show

 S1a yu3 ydg 1 mul sub yd 0 mul sub moveto
TM
(D50) show

 S2 000 add yu3 yd neg 4 TEn
(40,04   58,98   28,32  65,43   25,7)
(81,30   -2,99   71,82  71,89   92,4)
(52,27 -42,40   13,64  44,54 162,2)
(30,52     1,21 -46,35  46,37 271,5)
TEA

 S2 000 add yu4 yd neg 4 TEn
(41,88   62,00   31,82  69,69   27,2)
(81,97     1,81   71,59  71,61   88,5)
(51,62 -41,12   11,52  42,70 164,4)
(29,20   -5,28 -49,34  49,62 263,9)
TEA

 S3 yu3 yd neg 4 TEn
(20,64  11,27    4,34)
(54,89  59,01  12,02)
(12,15  20,38  15,34)
(  6,24    6,45  27,59)
TEA

 S3 yu4 yd neg 4 TEn
(23,31  12,42    3,24)
(58,84  60,24    9,50)
(12,10  19,81  11,95)
(  5,25    5,92  21,25)
 TEA

 S4 yu3 yd neg 4 TEn
(0,5693  0,3110)
(0,4359  0,4686)
(0,2538  0,4258)
(0,1550  0,1601)
TEA

 S4 yu4 yd neg 4 TEn
(0,5982  0,3188)
(0,4576  0,4685)
(0,2759  0,4515)
(0,1621  0,1825)
 TEA

showpage
grestore

%%Trailer

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
 86 MM 108 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 14

%line 369
%!PS-Adobe-3.0 EPSF-3.0 AG780-4,
%%BoundingBox: 70 90 226 206

/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
%%EndProlog
gsave

8 /Times-Roman FS
72 83 moveto
%!2     (AG780-4,) show

72 90 translate

%! 0.01 MM 0.01 MM scale
%! 15 setlinewidth
%! 0 0  moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto
%! closepath stroke

grestore

showpage
%%Trailer

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
 28 MM 064 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 15

%line 379
%!PS-Adobe-3.0 EPSF-3.0 AG780-5
%%BoundingBox: 70 83 405 206
 
%START PDFDE011.EPS
/pdfmark05 where {pop} {userdict /pdfmark05 /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://farbe.li.tu-berlin.de/AG78/AG78.HTM)
  /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1)
  /Subject (goto: http://farbe.li.tu-berlin.de http://130.149.60.45/~farbmetrik)
  /Keywords (image reproduction, colour devices)
  /Creator (klaus.richter@mac.com)
  /CreationDate (D:2017040112000)
  /ModDate (D:20170401112000)
/DOCINFO pdfmark05
[ /View [ /FitB ]
/DOCVIEW pdfmark05
%END  PDFDE011

% !Exchange 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
 
/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def /str {8 string } bind def
 
/TK {250 /Times-ISOL1 FS} bind def
/TM {300 /Times-ISOL1 FS} bind def
/TG {350 /Times-ISOL1 FS} bind def
 
/TIK {250 /TimesI-ISOL1 FS} bind def
/TIM {300 /TimesI-ISOL1 FS} bind def
/TIG {350 /TimesI-ISOL1 FS} bind def
 
/TBK {250 /TimesB-ISOL1 FS} bind def
/TBM {300 /TimesB-ISOL1 FS} bind def
/TBG {350 /TimesB-ISOL1 FS} bind def
 
/TBIK {250 /TimesBI-ISOL1 FS} bind def
/TBIM {300 /TimesBI-ISOL1 FS} bind def
/TBIG {350 /TimesBI-ISOL1 FS} bind def
 
/RK {250 /Times-Roman FS} bind def
/RM {300 /Times-Roman FS} bind def
/RG {350 /Times-Roman FS} bind def

/RIK {250 /Times-Italic FS} bind def
/RIM {300 /Times-Italic FS} bind def
/RIG {350 /Times-Italic FS} bind def

/RBK {250 /Times-Bold FS} bind def
/RBM {300 /Times-Bold FS} bind def
/RBG {350 /Times-Bold FS} bind def

/RBIK {250 /Times-BoldItalic FS} bind def
/RBIM {300 /Times-BoldItalic FS} bind def
/RBIG {350 /Times-BoldItalic FS} bind def

/ishowRM  {RK  -00 -60 rmoveto
           show 00  60 rmoveto RM} def
/jshowRM  {RBK -00 -60 rmoveto
           show 00  60 rmoveto RBM} def

/ishowTM  {TK  -00 -60 rmoveto
           show 00  60 rmoveto TM} def
/jshowTM  {TBK -00 -60 rmoveto
           show 00  60 rmoveto TBM} def

/ishowRG  {RM  -00 -70 rmoveto
           show 00  70 rmoveto RG} def
/jshowRG  {RBM -00 -70 rmoveto
           show 00  70 rmoveto RBG} def

/ishowTG  {TM  -00 -70 rmoveto
           show 00  70 rmoveto TG} def
/jshowTG  {TBM -00 -70 rmoveto
           show 00  70 rmoveto TBG} def

%%EndProlog
gsave

%lanindL2 START  20061001
/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 {3 lanind eq {show} {pop} ifelse} bind def
/showfr {2 lanind eq {show} {pop} ifelse} bind def
/showit {4 lanind eq {show} {pop} ifelse} bind def
/showjp {5 lanind eq {show} {pop} ifelse} bind def
/showm  {6 lanind eq {show} {pop} ifelse} bind def

/lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def}
               {/lanind1 0 def /lanind2 0 def} ifelse

/lanind lanind1 def
gsave 
 
380 85 moveto
5 /Times-Roman FS
    ( AG780-5) show

72 90 translate
 
/yhoe  4000 def
/xhoe 11700 def

0.01 MM 0.01 MM scale

15 setlinewidth
1 setgray
 0 0  moveto xhoe 0 rlineto 0 yhoe rlineto xhoe neg 0 rlineto
closepath fill

0 setgray
 0 0  moveto xhoe 0 rlineto 0 yhoe rlineto xhoe neg 0 rlineto
closepath stroke

 0 3300  moveto xhoe 0 rlineto stroke
 0 2600  moveto xhoe 0 rlineto stroke
 0 1350  moveto xhoe 0 rlineto stroke
 
/tedef {/anz exch def /ydt exch def /y0t exch def /x0t exch def} bind def
 
/TEn {RM tedef} bind def
 
/TEA {anz 1 sub -1 0 {ydt mul y0t add x0t exch moveto show} for} bind def

/yd 290 def %y-Zeilenabstand
%Spalten
/S1 0050 def
/S1a 2150 def
/S2 3050 def
/S3 7200 def
/S4 9850 def

/yhom yhoe 700 sub def
S1a 050 sub yhom moveto 0 yhom neg rlineto stroke
 S2 050 sub yhoe moveto 0 yhoe neg rlineto stroke
 S3 050 sub yhom moveto 0 yhom neg rlineto stroke
 S4 050 sub yhom moveto 0 yhom neg rlineto stroke

/yz 350 def
/ydg yz 3.7 mul def
/yu0 yhoe 080 add def
/yu1 {yu0 yz 1.0 mul sub} bind def
/yu2 {yu0 yz 3.0 mul sub} bind def
/yu3 {yu0 yz 5.1 mul sub} bind def
/yu4 yu3 ydg sub def

0 setgray
 S1 yu1 yd 0 mul sub moveto
TBM
(Elementarfarbe) showde
(Elementary colour) showen
(Elenmetary colour) showes
TBK
(Couleur \351l\351mentaire et) showfr
TBM
(Elementary colour) showit
(Elementary colour) showjp

 S1 yu1 yd 1 mul sub moveto
RBM
(und CIE-Lichtart) showde
TBM
(and CIE illuminant) showen
(and CIE illuminant) showes
TBK
(illuminant normalis\351 CIE) showfr
TBM
(and CIE illuminant) showit
(and CIE illuminant) showjp

 S2 yu1 yd 0 mul sub moveto
RBM
(CIELAB-Daten, CIE-Normfarbwerte und -wertanteile ) showde
TBM
(f\374r) showde
(CIELAB data, CIE tristimulus values and CIE chromaticity for the) showen
(CIELAB data, CIE tristimulus values and CIE chromaticity for the) showes
TBK
(Donn\351es CIELAB, composantes trichromatiques CIE et chromaticit\351 CIE pour) showfr
TBM
(CIELAB data, CIE tristimulus values and CIE chromaticity for the) showit
(CIELAB data, CIE tristimulus values and CIE chromaticity for the) showjp

 S2 yu1 yd 1 mul sub moveto
RBM
(die CIE-Normlichtart D65 and D50 und den 2-Grad-Beobachter) showde
TBM
(CIE standard illuminants D65 and D50 and the 2 degree observer) showen
(CIE standard illuminants D65 and D50 and the 2 degree observer) showes
TBK
(les illuminants normalis\351s CIE D65 et D50 et l'observateur) showfr
( \340 deux degr\351s) showfr
TBM
(CIE standard illuminants D65 and D50 and the 2 degree observer) showit
(CIE standard illuminants D65 and D50 and the 2 degree observer) showjp

 S1 yu2 yd 0 mul sub moveto
RBM
(CIE-Testfarbe) showde
(CIE-test colour) showen
(CIE-test colour) showes
RBK
(Couleur d'essai) showfr
RBM
(CIE-test colour) showit
(CIE-test colour) showjp

 S1 yu2 yd 1 mul sub moveto
TBM
() showde
() showen
() showes
TBK
(CIE) showfr
TBM
() showit
() showjp

S1a yu2 yd 0 mul sub moveto
RBM
(Licht-) showde
(Illumi-) showen
(Illu-) showes
RBK
(Illumi-) showfr
RBM
(Illu-) showit
(Illu-) showjp

S1a yu2 yd 1 mul sub moveto
RBM
(art) showde
(nant) showen
(minant) showes
RBK
(nant) showfr
RBM
(minant) showit
(minant) showjp

 S2 yu2 yd 0 mul sub moveto
TBIM
(  L*       a*       b*      C*) show
(ab) jshowTM
TBIM
300 0 rmoveto TBIM (h) show
(ab) jshowTM

 S3 yu2 yd 0 mul sub moveto
TBIM
(   X        Y         Z) show

 S4 yu2 yd 0 mul sub moveto
TBIM
(   x          y) show

0 1 1 {/i exch def %i=0,1

 S1 yu3 ydg i mul sub yd 0 mul sub moveto
TM
(09, ) show
TM
(Rot) showde
(Red) showen
(Rojo) showes
(Rouge) showfr
(Rosso) showit
(R\370d) showjp
TBIM
( R=R) show (e) ishowTM

 S1 yu3 ydg i mul sub yd 1 mul sub moveto
TM
(10, ) show
(Gelb) showde
(Yellow) showen
(Amarillo) showes
(Jaune) showfr
(Giallo) showit
(Gul) showjp
TBIM ( Y=Y) show (e) jshowTM

 S1 yu3 ydg i mul sub yd 2 mul sub moveto
TM
(11, ) show
TM
(Gr\374n) showde
(Green) showen
(Verde) showes
(Vert) showfr
(Verde) showit
(Gr\370nn) showjp
TBIM ( G=G) show (e) jshowTM

 S1 yu3 ydg i mul sub yd 3 mul sub moveto
TM
(12, ) show
TM
(Blau) showde
(Blue) showen
(Azul) showes
(Bleu) showfr
(Blu) showit
(Bl\345) showjp
TBIM ( B=B) show (e) jshowTM

} for %i=0,1


 S1a yu3 yd 0 mul sub moveto
TM
(D65) show

 S1a yu3 ydg 1 mul sub yd 0 mul sub moveto
TM
(D50) show

 S2 000 add yu3 yd neg 4 TEn
(40,04   58,98   28,32  65,43   25,7)
(81,30   -2,99   71,82  71,89   92,4)
(52,27 -42,40   13,64  44,54 162,2)
(30,52     1,21 -46,35  46,37 271,5)
TEA

 S2 000 add yu4 yd neg 4 TEn
(41,88   62,00   31,82  69,69   27,2)
(81,97     1,81   71,59  71,61   88,5)
(51,62 -41,12   11,52  42,70 164,4)
(29,20   -5,28 -49,34  49,62 263,9)
TEA

 S3 yu3 yd neg 4 TEn
(20,64  11,27    4,34)
(54,89  59,01  12,02)
(12,15  20,38  15,34)
(  6,24    6,45  27,59)
TEA

 S3 yu4 yd neg 4 TEn
(23,31  12,42    3,24)
(58,84  60,24    9,50)
(12,10  19,81  11,95)
(  5,25    5,92  21,25)
 TEA

 S4 yu3 yd neg 4 TEn
(0,5693  0,3110)
(0,4359  0,4686)
(0,2538  0,4258)
(0,1550  0,1601)
TEA

 S4 yu4 yd neg 4 TEn
(0,5982  0,3188)
(0,4576  0,4685)
(0,2759  0,4515)
(0,1621  0,1825)
 TEA

showpage
grestore

%%Trailer

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
 86 MM 064 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 16

%line 389
%!PS-Adobe-3.0 EPSF-3.0 AG780-6,
%%BoundingBox: 70 90 226 206

/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
%%EndProlog
gsave

8 /Times-Roman FS
72 83 moveto
%!2     (AG780-6,) show

72 90 translate

%! 0.01 MM 0.01 MM scale
%! 15 setlinewidth
%! 0 0  moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto
%! closepath stroke

grestore

showpage
%%Trailer

%%EndDocument
EndEPSF grestore gsave
BeginEPSF
 /xc1 16 def /yc1 12 def /xt 1 def xchart 1 eq {/xt 1 def} if
 28 MM 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 AG780-7N
%%BoundingBox: 70 85 233 206
 
%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/AG78/)
  /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:2017050112000)
  /ModDate (D:2017050112000)
/DOCINFO pdfmark07
[ /View [ /FitB ]
/DOCVIEW pdfmark07
%END  PDFDE011
 
% !Change to ISOLatin1 fonts
/Times-Roman findfont dup length dict  begin
{1 index /FID ne {def} {pop pop} ifelse }forall
/Encoding ISOLatin1Encoding def currentdict end
/Times-ISOL1 exch definefont pop
 
/Times-Italic findfont dup length dict  begin
{1 index /FID ne {def} {pop pop} ifelse }forall
/Encoding ISOLatin1Encoding def currentdict end
/TimesI-ISOL1 exch definefont pop
 
/Times-Bold findfont dup length dict  begin
{1 index /FID ne {def} {pop pop} ifelse }forall
/Encoding ISOLatin1Encoding def currentdict end
/TimesB-ISOL1 exch definefont pop
 
/Times-BoldItalic findfont dup length dict  begin
{1 index /FID ne {def} {pop pop} ifelse }forall
/Encoding ISOLatin1Encoding def currentdict end
/TimesBI-ISOL1 exch definefont pop
 
/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def /str {8 string } bind def

/TL {160 /Times-ISOL1 FS} bind def 
/TS {200 /Times-ISOL1 FS} bind def 
/TK {250 /Times-ISOL1 FS} bind def
/TM {300 /Times-ISOL1 FS} bind def
/TG {350 /Times-ISOL1 FS} bind def

/TIL {160 /TimesI-ISOL1 FS} bind def
/TIS {200 /TimesI-ISOL1 FS} bind def 
/TIK {250 /TimesI-ISOL1 FS} bind def
/TIM {300 /TimesI-ISOL1 FS} bind def
/TIG {350 /TimesI-ISOL1 FS} bind def
 
/TBL {160 /TimesB-ISOL1 FS} bind def
/TBS {200 /TimesB-ISOL1 FS} bind def
/TBK {250 /TimesB-ISOL1 FS} bind def
/TBM {300 /TimesB-ISOL1 FS} bind def
/TBG {350 /TimesB-ISOL1 FS} bind def

/TBIL {160 /TimesBI-ISOL1 FS} bind def
/TBIS {200 /TimesBI-ISOL1 FS} bind def 
/TBIK {250 /TimesBI-ISOL1 FS} bind def
/TBIM {300 /TimesBI-ISOL1 FS} bind def
/TBIG {350 /TimesBI-ISOL1 FS} bind def

/RL {160 /Times-Roman FS} bind def 
/RS {200 /Times-Roman FS} bind def 
/RK {250 /Times-Roman FS} bind def
/RM {300 /Times-Roman FS} bind def
/RG {350 /Times-Roman FS} bind def

/RIL {160 /Times-Italic FS} bind def
/RIS {200 /Times-Italic FS} bind def 
/RIK {250 /Times-Italic FS} bind def
/RIM {300 /Times-Italic FS} bind def
/RIG {350 /Times-Italic FS} bind def
 
/RBL {160 /Times-Bold FS} bind def
/RBS {200 /Times-Bold FS} bind def
/RBK {250 /Times-Bold FS} bind def
/RBM {300 /Times-Bold FS} bind def
/RBG {350 /Times-Bold FS} bind def

/RBIL {160 /Times-BoldItalic FS} bind def
/RBIS {200 /Times-BoldItalic FS} bind def 
/RBIK {250 /Times-BoldItalic FS} bind def
/RBIM {300 /Times-BoldItalic FS} bind def
/RBIG {350 /Times-BoldItalic FS} bind def

/rec %x, y width heigth
  {/heigth exch def /width exch def
   moveto width 0 rlineto 0 heigth rlineto width neg 0 rlineto
   closepath } bind def

/colrecfi %x y width heigth r g b
  {setrgbcolor rec fill} bind def

/colrecst %x y width heigth r g b
  {setrgbcolor rec stroke} bind def

/LUT 10800 array def

/LAB*Fa0100 24 array def %start output
/LAB*Fa1100 24 array def %linearized output

/LAB*FaG0100 24 array def %start output/100
/LAB*FaG1100 24 array def %linearized output/100

%*********************************************************************
%BEG AG78_LECD display 0..40%_00_LUT.DAT

/FileDataen (_LUT.DAT, 243 colours, 100101, Separation olv*, adapted) def
/FileDatade (_LUT.DAT, 243 Farben, 100101, Separation olv*, adaptiert) def

%include here JE060-7A0.TXT to JE060-7A7.TXT


%END AG78_LECD display 0..40%_00_LUT.DAT
%*********************************************************************

/cvishow {cvi 6 string cvs show} def
/cvsshow1 {10 mul cvi 0.1 mul 7 string cvs show} def
/cvsshow2 {100 mul cvi 0.01 mul 7 string cvs show} def
/cvsshow3 {1000 mul cvi 0.001 mul 7 string cvs show} def

/LAB*ioLmod {%BEG Procedure LAB*ioLmod

%requires ISRL*ioL=0,1,3

/RJGBLAB* 12 array def
/RJGBLAB*[
  39.92  58.74  27.99 % R CIE No.09 elementary colours in LAB, D65
  81.26  -2.89  71.56 % J CIE No.10
  52.23 -42.42  13.60 % G CIE No.11
  30.57   1.41 -46.47 % B CIE No.12
] def

/LAB* 84 array def %12x3=36 including N,W + 16x3=48 elementary system
/LAB*a 84 array def


0 1 11 {/sISO exch def
        /i30 sISO 3 mul def /i31 i30 1 add def /i32 i30 2 add def
        sISO 7 le { %sISO=0,7
        LAB* i30 LAB*02 i30 get put
        LAB* i31 LAB*02 i31 get put
        LAB* i32 LAB*02 i32 get put
       } %sISO=0,7
       {%sISO=8,11
        %Definition 8 to 11
        /jISO sISO 8 sub def /j30 jISO 3 mul def 
        /j31 j30 1 add def /j32 j30 2 add def
        LAB* i30 RJGBLAB* j30 get put
        LAB* i31 RJGBLAB* j31 get put
        LAB* i32 RJGBLAB* j32 get put
        
       } ifelse %sISO=0,7 and 8,11

       } for

/L*Nio LAB* 18 get def
/A*Nio LAB* 19 get def
/B*Nio LAB* 20 get def

/L*Wio LAB* 21 get def
/A*Wio LAB* 22 get def
/B*Wio LAB* 23 get def

/A*Dio A*Wio A*Nio sub def
/B*Dio B*Wio B*Nio sub def
icolor 0 eq {/cf1 1 def}{/cf1 0.95 def} ifelse
0 1 11 {/sISO exch def
        /i30 sISO 3 mul def /i31 i30 1 add def /i32 i30 2 add def
        /l*CIE LAB* i30 get L*Nio sub L*Wio L*Nio sub div def %system rel. lightn.
        /a*s A*Wio A*Nio sub l*CIE mul def
        /b*s B*Wio B*Nio sub l*CIE mul def
        /L*Z L*Nio L*Wio L*Nio sub 0.5 mul add def
        LAB*a i30 LAB* i30 get L*Z sub cf1 mul L*Z add put
        LAB*a i31 LAB* i31 get A*Nio sub a*s sub cf1 mul put
        LAB*a i32 LAB* i32 get B*Nio sub b*s sub cf1 mul put
       } for
/cLAB*s0 3 array def %C cyan blue
/vLAB*s0 3 array def %V violet blue
/mLAB*s0 3 array def %M magenta red
/oLAB*s0 3 array def %O orange red
/yLAB*s0 3 array def %Y yellow
/lLAB*s0 3 array def %L leaf green
/nLAB*s0 3 array def %N black
/wLAB*s0 3 array def %W white
/rLAB*s0 3 array def %R elementary red
/jLAB*s0 3 array def %J elementary yellow
/gLAB*s0 3 array def %G elementary green
/bLAB*s0 3 array def %B elementary blue

%Determine Matrix data input or output data
oLAB*s0 0 LAB*a  0 get L*Nio sub put
oLAB*s0 1 LAB*a  1 get put
oLAB*s0 2 LAB*a  2 get put

yLAB*s0 0 LAB*a  3 get L*Nio sub put
yLAB*s0 1 LAB*a  4 get put
yLAB*s0 2 LAB*a  5 get put

lLAB*s0 0 LAB*a  6 get L*Nio sub put
lLAB*s0 1 LAB*a  7 get put
lLAB*s0 2 LAB*a  8 get put

cLAB*s0 0 LAB*a  9 get L*Nio sub put
cLAB*s0 1 LAB*a 10 get put 
cLAB*s0 2 LAB*a 11 get put 

vLAB*s0 0 LAB*a 12 get L*Nio sub put
vLAB*s0 1 LAB*a 13 get put 
vLAB*s0 2 LAB*a 14 get put 

mLAB*s0 0 LAB*a 15 get L*Nio sub put 
mLAB*s0 1 LAB*a 16 get put 
mLAB*s0 2 LAB*a 17 get put 

nLAB*s0 0 LAB*a 18 get L*Nio sub put 
nLAB*s0 1 LAB*a 19 get put 
nLAB*s0 2 LAB*a 20 get put 

wLAB*s0 0 LAB*a 21 get L*Nio sub put 
wLAB*s0 1 LAB*a 22 get put 
wLAB*s0 2 LAB*a 23 get put

rLAB*s0 0 LAB*a 24 get L*Nio sub put
rLAB*s0 1 LAB*a 25 get put 
rLAB*s0 2 LAB*a 26 get put 

jLAB*s0 0 LAB*a 27 get L*Nio sub put 
jLAB*s0 1 LAB*a 28 get put 
jLAB*s0 2 LAB*a 29 get put 

gLAB*s0 0 LAB*a 30 get L*Nio sub put 
gLAB*s0 1 LAB*a 31 get put 
gLAB*s0 2 LAB*a 32 get put 

bLAB*s0 0 LAB*a 33 get L*Nio sub put 
bLAB*s0 1 LAB*a 34 get put 
bLAB*s0 2 LAB*a 35 get put

% Determine the input or output angle in the A* B* plane
% of each of the colours defined above
/C*Ang cLAB*s0 2 get cLAB*s0 1 get 0.0001 add atan def
/V*Ang vLAB*s0 2 get vLAB*s0 1 get 0.0001 add atan def
/M*Ang mLAB*s0 2 get mLAB*s0 1 get 0.0001 add atan def
/O*Ang oLAB*s0 2 get oLAB*s0 1 get 0.0001 add atan def
/Y*Ang yLAB*s0 2 get yLAB*s0 1 get 0.0001 add atan def
/L*Ang lLAB*s0 2 get mLAB*s0 1 get 0.0001 add atan def
/N*Ang 0 def
/W*Ang 0 def
/R*Ang rLAB*s0 2 get rLAB*s0 1 get 0.0001 add atan def
/J*Ang jLAB*s0 2 get jLAB*s0 1 get 0.0001 add atan def
/G*Ang gLAB*s0 2 get gLAB*s0 1 get 0.0001 add atan def
/B*Ang bLAB*s0 2 get bLAB*s0 1 get 0.0001 add atan def

} def %END Procedure LAB*ioLmod

%***********************************************************

/proc_LAB*Fa_LAB*MaNTABl_olvi3*cmyn3*Ma*ioL {
%BEG procedure proc_LAB*Fa_LAB*MaNTABl_olvi3*cmyn3*Ma*ioL
%only for calculation without hue tables

%input  LAB*Fa
%input  LAB*a (6 adapted colours OYLCVM)
%input  nLAB*s0 (colour white N for calculation of lab*l)
%input  wLAB*s0 (colour white W for achromatic axis)

%output LAB*Ma
%output olvi3*Ma
%output cmyn3*Ma

/UXF1a wLAB*s0 1 get B*Fa mul wLAB*s0 2 get A*Fa mul sub def
/UXF2a wLAB*s0 2 get L*Fa mul wLAB*s0 0 get B*Fa mul sub def
/UXF3a wLAB*s0 0 get A*Fa mul wLAB*s0 1 get L*Fa mul sub def

/T1 0 def
/T2 0 def
0 1 5 {/ia exch def
       /ia30 ia 3 mul def
       ia 5 eq {/ia31 0 def} {/ia31 ia30 3 add def} ifelse
       /T1 LAB*a ia30       get UXF1a mul
           LAB*a ia30 1 add get UXF2a mul add
           LAB*a ia30 2 add get UXF3a mul add def
       /T2 LAB*a ia31       get UXF1a mul
           LAB*a ia31 1 add get UXF2a mul add
           LAB*a ia31 2 add get UXF3a mul add def
       T1 0 le {/T1X (N) def} {/T1X (P) def} ifelse
       T2 0 gt {/T2X (P) def} {/T2X (N) def} ifelse
       T1 0 le T2 0 gt and {/ia3END ia30 def exit} if
      } for

/L*11a LAB*a ia3END       get def
/A*11a LAB*a ia3END 1 add get def
/B*11a LAB*a ia3END 2 add get def
ia3END 15 ge {/ia3END -3 def} if
/L*21a LAB*a ia3END 3 add get def
/A*21a LAB*a ia3END 4 add get def
/B*21a LAB*a ia3END 5 add get def

/NENNER L*21a L*11a sub UXF1a mul
        A*21a A*11a sub UXF2a mul add
        B*21a B*11a sub UXF3a mul add def
/ZAEHLE L*21a UXF1a mul
        A*21a UXF2a mul add
        B*21a UXF3a mul add def
NENNER 0 ne {/ALPH ZAEHLE NENNER div def}
            {/ALPH 99999} ifelse

/L*Ma ALPH L*11a mul 1 ALPH sub L*21a mul add def
/A*Ma ALPH A*11a mul 1 ALPH sub A*21a mul add def
/B*Ma ALPH B*11a mul 1 ALPH sub B*21a mul add def
/C*Ma A*Ma dup mul B*Ma dup mul add 0.000001 add sqrt def
/H*Ma B*Ma A*Ma 0.0001 add atan def

/ia30 ia 3 mul def /iap 1 ALPH sub def /iam ALPH def
ia 0 eq {/c3*Ma   0 def %L, c*=0, sector O->Y
         /m3*Ma iam def %L, m*=1->0
         /y3*Ma   1 def %L, y*=1
        } if
ia 1 eq {/c3*Ma iap def %L, c*=0->1, sector Y->L
         /m3*Ma   0 def %L, m*=0
         /y3*Ma   1 def %L, y*=1
        } if
ia 2 eq {/c3*Ma   1 def %L, c*=1, sector L->C
         /m3*Ma   0 def %L, m*=0
         /y3*Ma iam def %L, y*=1->0
        } if
ia 3 eq {/c3*Ma   1 def %L, c*=1, sector C->V
         /m3*Ma iap def %L, m*=1->0
         /y3*Ma   0 def %L, y*=0
        } if
ia 4 eq {/c3*Ma iam def %L, c*=1->0, sector V->M
         /m3*Ma   1 def %L, m*=1
         /y3*Ma   0 def %L, y*=0
        } if
ia 5 eq {/c3*Ma   0 def %L, c*=0, sector M->O
         /m3*Ma   1 def %L, m*=1
         /y3*Ma iap def %L, y*=0->1
        } if

/o3*Ma 1 c3*Ma sub def
/l3*Ma 1 m3*Ma sub def
/v3*Ma 1 y3*Ma sub def
/i3*Ma 1 def

/lab*nMa 0.00 def
/lab*cMa 1.00 def
/lab*wMa 0.00 def
/lab*tMa 0.50 def
/lab*hMa H*Ma 360 div def
/lab*lMa L*Ma nLAB*s0 0 get sub
         wLAB*s0 0 get nLAB*s0 0 get sub 0.000001 add div def

} bind def
%END procedure proc_LAB*Fa_LAB*MaNTABl_olvi3*cmyn3*Ma*ioL

%*******************************************************************

/proc_LAB*Fae_LAB*MaeNTABl_olvi3*cmyn3*Ma*ioL {
%BEG procedure proc_LAB*Fae_LAB*MaeNTABl_olvi3*cmyn3*Ma*ioL
%only for calculation without hue tables

%input  LAB*Fae
%input  LAB*a (4 adapted colours RJGB, No. 8 to 11)
%input  nLAB*s0 (colour white N for calculation of lab*l)
%input  wLAB*s0 (colour white W for achromatic axis)

%output LAB*Mae
%output olvi3*Mae
%output cmyn3*Mae

/UXF1a wLAB*s0 1 get B*Fae mul wLAB*s0 2 get A*Fae mul sub def
/UXF2a wLAB*s0 2 get L*Fae mul wLAB*s0 0 get B*Fae mul sub def
/UXF3a wLAB*s0 0 get A*Fae mul wLAB*s0 1 get L*Fae mul sub def

/T1 0 def
/T2 0 def
0 1 5 {/ia exch def
       /ia30 ia 3 mul def
       ia 5 eq {/ia31 0 def} {/ia31 ia30 3 add def} ifelse
       /T1 LAB*a ia30       get UXF1a mul
           LAB*a ia30 1 add get UXF2a mul add
           LAB*a ia30 2 add get UXF3a mul add def
       /T2 LAB*a ia31       get UXF1a mul
           LAB*a ia31 1 add get UXF2a mul add
           LAB*a ia31 2 add get UXF3a mul add def
       T1 0 le {/T1X (N) def} {/T1X (P) def} ifelse
       T2 0 gt {/T2X (P) def} {/T2X (N) def} ifelse
       T1 0 le T2 0 gt and {/ia3END ia30 def exit} if
      } for

/L*11a LAB*a ia3END       get def
/A*11a LAB*a ia3END 1 add get def
/B*11a LAB*a ia3END 2 add get def
ia3END 15 ge {/ia3END -3 def} if
/L*21a LAB*a ia3END 3 add get def
/A*21a LAB*a ia3END 4 add get def
/B*21a LAB*a ia3END 5 add get def

/NENNER L*21a L*11a sub UXF1a mul
        A*21a A*11a sub UXF2a mul add
        B*21a B*11a sub UXF3a mul add def
/ZAEHLE L*21a UXF1a mul
        A*21a UXF2a mul add
        B*21a UXF3a mul add def
NENNER 0 ne {/ALPH ZAEHLE NENNER div def}
            {/ALPH 99999} ifelse

/L*Mae ALPH L*11a mul 1 ALPH sub L*21a mul add def
/A*Mae ALPH A*11a mul 1 ALPH sub A*21a mul add def
/B*Mae ALPH B*11a mul 1 ALPH sub B*21a mul add def
/C*Mae A*Mae dup mul B*Mae dup mul add 0.000001 add sqrt def
/H*Mae B*Mae A*Mae 0.0001 add atan def

/ia30 ia 3 mul def /iap 1 ALPH sub def /iam ALPH def
ia 0 eq {/c3*Mae   0 def %L, c*=0, sector O->Y
         /m3*Mae iam def %L, m*=1->0
         /y3*Mae   1 def %L, y*=1
        } if
ia 1 eq {/c3*Mae iap def %L, c*=0->1, sector Y->L
         /m3*Mae   0 def %L, m*=0
         /y3*Mae   1 def %L, y*=1
        } if
ia 2 eq {/c3*Mae   1 def %L, c*=1, sector L->C
         /m3*Mae   0 def %L, m*=0
         /y3*Mae iam def %L, y*=1->0
        } if
ia 3 eq {/c3*Mae   1 def %L, c*=1, sector C->V
         /m3*Mae iap def %L, m*=1->0
         /y3*Mae   0 def %L, y*=0
        } if
ia 4 eq {/c3*Mae iam def %L, c*=1->0, sector V->M
         /m3*Mae   1 def %L, m*=1
         /y3*Mae   0 def %L, y*=0
        } if
ia 5 eq {/c3*Mae   0 def %L, c*=0, sector M->O
         /m3*Mae   1 def %L, m*=1
         /y3*Mae iap def %L, y*=0->1
        } if

/o3*Mae 1 c3*Mae sub def
/l3*Mae 1 m3*Mae sub def
/v3*Mae 1 y3*Mae sub def
/i3*Mae 1 def

/lab*nMae 0.00 def
/lab*cMae 1.00 def
/lab*wMae 0.00 def
/lab*tMae 0.50 def
/lab*hMae H*Mae 360 div def
/lab*lMae L*Mae nLAB*s0 0 get sub
          wLAB*s0 0 get nLAB*s0 0 get sub 0.000001 add div def

} bind def
%END procedure proc_LAB*Fae_LAB*MaeNTABl_olvi3*cmyn3*Ma*ioL

%*******************************************************************
%%EndProlog
gsave

%LANINDL2 START  20000505
/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 {3 lanind eq {show} {pop} ifelse} bind def
/showfr {2 lanind eq {show} {pop} ifelse} bind def
/showit {4 lanind eq {show} {pop} ifelse} bind def
/showjp {5 lanind eq {show} {pop} ifelse} bind def
/showm  {6 lanind eq {show} {pop} ifelse} bind def
 
/popde {0 lanind ne {pop} if} bind def
/popen {1 lanind ne {pop} if} bind def
/popes {3 lanind ne {pop} if} bind def
/popfr {2 lanind ne {pop} if} bind def
/popit {4 lanind ne {pop} if} bind def
/popjp {5 lanind ne {pop} if} bind def
/popm  {6 lanind ne {pop} if} bind def
 
/popxde {/n exch def 0 lanind ne {n {pop} repeat} if} bind def
/popxen {/n exch def 1 lanind ne {n {pop} repeat} if} bind def
/popxes {/n exch def 3 lanind ne {n {pop} repeat} if} bind def
/popxfr {/n exch def 2 lanind ne {n {pop} repeat} if} bind def
/popxit {/n exch def 4 lanind ne {n {pop} repeat} if} bind def
/popxjp {/n exch def 5 lanind ne {n {pop} repeat} if} bind def
/popxm  {/n exch def 6 lanind ne {n {pop} repeat} if} bind def
 
/lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def}
               {/lanind1 0 def /lanind2 0 def} ifelse
/colormg where {pop /colorm1 colormg def /colorm2 colormg def}
               {/colorm1 0 def /colorm2 0 def} ifelse
/xcolorg where {pop /xcolor1 xcolorg def /xcolor2 xcolorg def}
               {/xcolor1 0 def /xcolor2 0 def} ifelse
/xchartg where {pop /xchart1 xchartg def /xchart2 xchartg def}
               {/xchart1 0 def /xchart2 0 def} ifelse
/lanind  lanind1 def %lanind1 1 lanind2 {/lanind exch def %output showpage
/colorm  colorm1 def %colorm1 1 colorm2 {/colorm exch def %output showpage
/xcolorx xcolor1 def %xcolor1 1 xcolor2 {/xcolor exch def %output showpage
/xchartx xchart1 def %xchart1 1 xchart2 {/xchart exch def %output showpage

gsave
%LANINDL2 END

/LUTL* 247 array def %243+4=247
/LUTA* 247 array def
/LUTB* 247 array def

/LUTr* 247 array def
/LUTg* 247 array def
/LUTb* 247 array def
/C*ab  247 array def
/L*    247 array def

/LUTl*  247 array def %243+4=247
/LUTc1* 247 array def
/LUTc2* 247 array def
/LUTt1* 247 array def
/LUTt2* 247 array def
/LUTc*rgb 247 array def
/LUTt*rgb 247 array def

/l1* 247 array def %243+4=247
/l2* 247 array def %l* not possible allread used olv*
/c1* 247 array def
/c2* 247 array def
/t1* 247 array def
/t2* 247 array def
/c1*rgb 247 array def
/c2*rgb 247 array def
/t1*rgb 247 array def
/t2*rgb 247 array def

/ColNames [(O) (Y) (L) (C) (V) (M) (N) (W)
           (R) (J) (G) (B)
           (R) (R25J) (R50J) (R75J)
           (J) (J25G) (J50G) (J75G)
           (G) (G25B) (G50B) (G75B)
           (B) (B25R) (B50R) (B75R) (R)
          ] def

/o3Ma [1 1 0 0 0 1 0 1
       1 1 0 0
       1 1.00 1.00 1.00
       1 0.75 0.50 0.25
       0 0.00 0.00 0.00
       0 0.50 1.00 1.00 1] def
/l3Ma [0 1 1 1 0 0 0 1
       0 1 1 0
       0 0.25 0.50 0.75
       1 1.00 1.00 1.00
       1 1.00 1.00 0.50
       0 0.00 0.00 0.00 0] def
/v3Ma [0 0 0 1 1 1 0 1
       0 0 0 1
       0 0.00 0.00 0.00
       0 0.00 0.00 0.00
       0 0.50 1.00 1.00
       1 1.00 1.00 0.50 0] def
          
/yd 340 def %y-Zeilenabstand
%Spalten
/S1 20 def
/S2 450 def
/S3 1550 def
/S4 2650 def
/S5 3750 def
/S6 4650 def
/S7 5350 def
/S8 6400 def
/S9 7200 def
/S10 8000 def
/S11 8800 def
/S12 9600 def

/yu1 4650 def
/yu2 3800 4000 add def

/nshow {300 /Times-ISOL1 FS  show} bind def
/kshow {300 /TimesI-ISOL1 FS  show} bind def
/bshow {300 /TimesB-ISOL1 FS  show} bind def
/jshow {300 /TimesBI-ISOL1 FS  show} bind def
/sshow {300 /Symbol FS  show} bind def
/ishow {220 /Times-ISOL1 FS -00 -50 rmoveto show 00 50 rmoveto} bind def
/eshow {220 /Times-ISOL1 FS 0 100 rmoveto show 0 -100 rmoveto} bind def

72 90 translate

0.01 MM dup scale

/L*olv 8 array def
/A*olv 8 array def
/B*olv 8 array def
/C*olv 8 array def
/H*olv 8 array def
/N*olv 8 array def
/o*olv 8 array def
/l*olv 8 array def
/v*olv 8 array def

/L*rgb 8 array def
/A*rgb 8 array def
/B*rgb 8 array def
/C*rgb 8 array def
/H*rgb 8 array def
/N*rgb 8 array def
/o*rgb 8 array def
/l*rgb 8 array def
/v*rgb 8 array def

/angle_olv    7 array def
/angle_olvG01 7 array def
/angle_olvG11 7 array def
/angle_rgb    7 array def
/angle_olv [38 96 151 236 305 354 398] def %standard offset
/angle_rgb [26 92 162 217 272 329 386] def %CIE-test colors

/angle_olvi    28 array def %shift by 00,25,50,75%
/angle_olvG01i 28 array def %shift by 00,25,50,75%
/angle_olvG11i 28 array def %shift by 00,25,50,75%
/angle_rgbi    28 array def %shift by 00,25,50,75%

/xcolor xcolorx def
/xchart xchartx def

00 1 0 {/xcolor exch def %xcolor=0,1

colorm 1 eq {proc_lut0} if %Definition lut0 and lut depending on xcolor

gsave

%/icolor xcolor xcolor 2 idiv 2 mul sub def %icolor=0 or 1
/icolor 0 def

xcolor 0 eq {%xcolor 0, LAB*la0
/FileData (AG78_LECD display 0%_G0) def
/LUT [
%ps2ascii output with Ghostsript-programm: macps2pdf, date: 2010-01-04
%input file: JE060-7A.PS, output file: JE060-7AA.TXT (BBEDIT used for TXT)
%JE060-7AA.TXT la0_line 3436
%JE060-7A, Page 19 /66, LAB*la0; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
%LAB*la0, D65, adapted, Y = 0.0 , L* = 0.0 
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0000 A01
000059 001124 -02637 0000 0000 0125 1000 1000 0875 0000 %0001 A02
000349 003724 -05051 0000 0000 0250 1000 1000 0750 0000 %0002 A03
000692 005041 -06294 0000 0000 0375 1000 1000 0625 0000 %0003 A04
001080 005635 -07153 0000 0000 0500 1000 1000 0500 0000 %0004 A05
001433 006178 -07923 0000 0000 0625 1000 1000 0375 0000 %0005 A06
001760 006705 -08671 0000 0000 0750 1000 1000 0250 0000 %0006 A07
002156 007175 -09442 0000 0000 0875 1000 1000 0125 0000 %0007 A08
002939 007977 -10925 0000 0000 1000 1000 1000 0000 0000 %0008 A09
001122 -02461 001819 0000 0125 0000 1000 0875 1000 0000 %0009 B01
001201 -01260 -00776 0000 0125 0125 1000 0875 0875 0000 %0010 B02
001400 000815 -03243 0000 0125 0250 1000 0875 0750 0000 %0011 B03
001620 002283 -04768 0000 0125 0375 1000 0875 0625 0000 %0012 B04
001839 003295 -05908 0000 0125 0500 1000 0875 0500 0000 %0013 B05
002056 004237 -06882 0000 0125 0625 1000 0875 0375 0000 %0014 B06
002301 005027 -07767 0000 0125 0750 1000 0875 0250 0000 %0015 B07
002597 005769 -08686 0000 0125 0875 1000 0875 0125 0000 %0016 B08
003256 006986 -10383 0000 0125 1000 1000 0875 0000 0000 %0017 B09
002623 -03853 003888 0000 0250 0000 1000 0750 1000 0000 %0018 C01
002657 -03212 001494 0000 0250 0125 1000 0750 0875 0000 %0019 C02
002755 -01849 -01077 0000 0250 0250 1000 0750 0750 0000 %0020 C03
002864 -00658 -02688 0000 0250 0375 1000 0750 0625 0000 %0021 C04
002976 000451 -04015 0000 0250 0500 1000 0750 0500 0000 %0022 C05
003110 001428 -05142 0000 0250 0625 1000 0750 0375 0000 %0023 C06
003262 002340 -06158 0000 0250 0750 1000 0750 0250 0000 %0024 C07
003460 003313 -07259 0000 0250 0875 1000 0750 0125 0000 %0025 C08
003936 004973 -09235 0000 0250 1000 1000 0750 0000 0000 %0026 C09
003665 -04762 004979 0000 0375 0000 1000 0625 1000 0000 %0027 D01
003687 -04299 002922 0000 0375 0125 1000 0625 0875 0000 %0028 D02
003746 -03308 000464 0000 0375 0250 1000 0625 0750 0000 %0029 D03
003814 -02395 -01142 0000 0375 0375 1000 0625 0625 0000 %0030 D04
003901 -01431 -02505 0000 0375 0500 1000 0625 0500 0000 %0031 D05
003990 -00532 -03670 0000 0375 0625 1000 0625 0375 0000 %0032 D06
004100 000360 -04770 0000 0375 0750 1000 0625 0250 0000 %0033 D07
004245 001438 -05922 0000 0375 0875 1000 0625 0125 0000 %0034 D08
004613 003127 -08086 0000 0375 1000 1000 0625 0000 0000 %0035 D09
004554 -05477 005769 0000 0500 0000 1000 0500 1000 0000 %0036 E01
004574 -05149 004090 0000 0500 0125 1000 0500 0875 0000 %0037 E02
004617 -04405 001792 0000 0500 0250 1000 0500 0750 0000 %0038 E03
004668 -03650 000193 0000 0500 0375 1000 0500 0625 0000 %0039 E04
004729 -02842 -01174 0000 0500 0500 1000 0500 0500 0000 %0040 E05
004800 -02065 -02359 0000 0500 0625 1000 0500 0375 0000 %0041 E06
004885 -01212 -03494 0000 0500 0750 1000 0500 0250 0000 %0042 E07
004998 -00314 -04694 0000 0500 0875 1000 0500 0125 0000 %0043 E08
005292 001500 -06964 0000 0500 1000 1000 0500 0000 0000 %0044 E09
005352 -06101 006541 0000 0625 0000 1000 0375 1000 0000 %0045 F01
005365 -05853 005073 0000 0625 0125 1000 0375 0875 0000 %0046 F02
005399 -05260 002924 0000 0625 0250 1000 0375 0750 0000 %0047 F03
005439 -04646 001391 0000 0625 0375 1000 0375 0625 0000 %0048 F04
005488 -03948 000017 0000 0625 0500 1000 0375 0500 0000 %0049 F05
005545 -03261 -01168 0000 0625 0625 1000 0375 0375 0000 %0050 F06
005610 -02520 -02309 0000 0625 0750 1000 0375 0250 0000 %0051 F07
005705 -01663 -03546 0000 0625 0875 1000 0375 0125 0000 %0052 F08
005947 000064 -05878 0000 0625 1000 1000 0375 0000 0000 %0053 F09
006175 -06750 007310 0000 0750 0000 1000 0250 1000 0000 %0054 G01
006188 -06550 006092 0000 0750 0125 1000 0250 0875 0000 %0055 G02
006215 -06061 004094 0000 0750 0250 1000 0250 0750 0000 %0056 G03
006247 -05541 002600 0000 0750 0375 1000 0250 0625 0000 %0057 G04
006287 -04958 001260 0000 0750 0500 1000 0250 0500 0000 %0058 G05
006330 -04370 000074 0000 0750 0625 1000 0250 0375 0000 %0059 G06
006386 -03729 -01068 0000 0750 0750 1000 0250 0250 0000 %0060 G07
006461 -02962 -02313 0000 0750 0875 1000 0250 0125 0000 %0061 G08
006664 -01349 -04699 0000 0750 1000 1000 0250 0000 0000 %0062 G09
007099 -07438 008235 0000 0875 0000 1000 0125 1000 0000 %0063 H01
007107 -07272 007207 0000 0875 0125 1000 0125 0875 0000 %0064 H02
007131 -06886 005375 0000 0875 0250 1000 0125 0750 0000 %0065 H03
007157 -06458 003937 0000 0875 0375 1000 0125 0625 0000 %0066 H04
007188 -05982 002637 0000 0875 0500 1000 0125 0500 0000 %0067 H05
007224 -05475 001464 0000 0875 0625 1000 0125 0375 0000 %0068 H06
007268 -04920 000323 0000 0875 0750 1000 0125 0250 0000 %0069 H07
007330 -04248 -00929 0000 0875 0875 1000 0125 0125 0000 %0070 H08
007494 -02797 -03338 0000 0875 1000 1000 0125 0000 0000 %0071 H09
008399 -08361 009599 0000 1000 0000 1000 0000 1000 0000 %0072 I01
008405 -08248 008732 0000 1000 0125 1000 0000 0875 0000 %0073 I02
008423 -07940 007126 0000 1000 0250 1000 0000 0750 0000 %0074 I03
008444 -07619 005787 0000 1000 0375 1000 0000 0625 0000 %0075 I04
008467 -07237 004541 0000 1000 0500 1000 0000 0500 0000 %0076 I05
008495 -06845 003401 0000 1000 0625 1000 0000 0375 0000 %0077 I06
008528 -06403 002278 0000 1000 0750 1000 0000 0250 0000 %0078 I07
008577 -05847 001042 0000 1000 0875 1000 0000 0125 0000 %0079 I08
008706 -04625 -01374 0000 1000 1000 1000 0000 0000 0000 %0080 I09

000296 001717 000511 0125 0000 0000 0875 1000 1000 0000 %0081 J01
000402 002695 -01960 0125 0000 0125 0875 1000 0875 0000 %0082 J02
000718 004139 -04372 0125 0000 0250 0875 1000 0750 0000 %0083 J03
001037 004921 -05656 0125 0000 0375 0875 1000 0625 0000 %0084 J04
001348 005589 -06680 0125 0000 0500 0875 1000 0500 0000 %0085 J05
001649 006199 -07559 0125 0000 0625 0875 1000 0375 0000 %0086 J06
001939 006661 -08336 0125 0000 0750 0875 1000 0250 0000 %0087 J07
002301 007183 -09187 0125 0000 0875 0875 1000 0125 0000 %0088 J08
003040 007999 -10739 0125 0000 1000 0875 1000 0000 0000 %0089 J09
001366 -00655 002289 0125 0125 0000 0875 0875 1000 0000 %0090 K01
001450 000114 -00334 0125 0125 0125 0875 0875 0875 0000 %0091 K02
001620 001531 -02883 0125 0125 0250 0875 0875 0750 0000 %0092 K03
001800 002655 -04390 0125 0125 0375 0875 0875 0625 0000 %0093 K04
001998 003606 -05601 0125 0125 0500 0875 0875 0500 0000 %0094 K05
002209 004456 -06616 0125 0125 0625 0875 0875 0375 0000 %0095 K06
002426 005119 -07502 0125 0125 0750 0875 0875 0250 0000 %0096 K07
002715 005877 -08495 0125 0125 0875 0875 0875 0125 0000 %0097 K08
003345 007038 -10226 0125 0125 1000 0875 0875 0000 0000 %0098 K09
002731 -02818 004059 0125 0250 0000 0875 0750 1000 0000 %0099 L01
002771 -09850 000187 0125 0250 0125 0875 0750 0875 0000 %0100 L02
002857 -01188 -00876 0125 0250 0250 0875 0750 0750 0000 %0101 L03
002961 -00160 -02488 0125 0250 0375 0875 0750 0625 0000 %0102 L04
003075 000839 -03822 0125 0250 0500 0875 0750 0500 0000 %0103 L05
003204 001737 -04958 0125 0250 0625 0875 0750 0375 0000 %0104 L06
003351 002579 -06008 0125 0250 0750 0875 0750 0250 0000 %0105 L07
003536 003506 -07101 0125 0250 0875 0875 0750 0125 0000 %0106 L08
004004 005102 -09113 0125 0250 1000 0875 0750 0000 0000 %0107 L09
003735 -04052 005037 0125 0375 0000 0875 0625 1000 0000 %0108 M01
003762 -03681 003038 0125 0375 0125 0875 0625 0875 0000 %0109 M02
003825 -02788 000616 0125 0375 0250 0875 0625 0750 0000 %0110 M03
003891 -01920 -00993 0125 0375 0375 0875 0625 0625 0000 %0111 M04
003970 -01045 -02371 0125 0375 0500 0875 0625 0500 0000 %0112 M05
004057 -00201 -03544 0125 0375 0625 0875 0625 0375 0000 %0113 M06
004164 000629 -04651 0125 0375 0750 0875 0625 0250 0000 %0114 M07
004298 001550 -05814 0125 0375 0875 0875 0625 0125 0000 %0115 M08
004672 003307 -08004 0125 0375 1000 0875 0625 0000 0000 %0116 M09
004613 -04950 005840 0125 0500 0000 0875 0500 1000 0000 %0117 N01
004633 -04655 004169 0125 0500 0125 0875 0500 0875 0000 %0118 N02
004675 -03962 001891 0125 0500 0250 0875 0500 0750 0000 %0119 N03
004725 -03253 000305 0125 0500 0375 0875 0500 0625 0000 %0120 N04
004789 -02500 -01060 0125 0500 0500 0875 0500 0500 0000 %0121 N05
004852 -01752 -02248 0125 0500 0625 0875 0500 0375 0000 %0122 N06
005009 -00987 -03419 0125 0500 0750 0875 0500 0250 0000 %0123 N07
005050 -00088 -04599 0125 0500 0875 0875 0500 0125 0000 %0124 N08
005343 001668 -06885 0125 0500 1000 0875 0500 0000 0000 %0125 N09
005399 -05698 006559 0125 0625 0000 0875 0375 1000 0000 %0126 O01
005411 -05457 005170 0125 0625 0125 0875 0375 0875 0000 %0127 O02
005448 -04883 003026 0125 0625 0250 0875 0375 0750 0000 %0128 O03
005491 -04256 001430 0125 0625 0375 0875 0375 0625 0000 %0129 O04
005536 -03643 000115 0125 0625 0500 0875 0375 0500 0000 %0130 O05
005589 -02995 -01075 0125 0625 0625 0875 0375 0375 0000 %0131 O06
005659 -02276 -02229 0125 0625 0750 0875 0375 0250 0000 %0132 O07
005747 -01459 -03459 0125 0625 0875 0875 0375 0125 0000 %0133 O08
005992 000228 -05808 0125 0625 1000 0875 0375 0000 0000 %0134 O09
006218 -06424 007377 0125 0750 0000 0875 0250 1000 0000 %0135 P01
006228 -06221 006151 0125 0750 0125 0875 0250 0875 0000 %0136 P02
006255 -05753 004168 0125 0750 0250 0875 0250 0750 0000 %0137 P03
006289 -05264 002673 0125 0750 0375 0875 0250 0625 0000 %0138 P04
006328 -04697 001337 0125 0750 0500 0875 0250 0500 0000 %0139 P05
006374 -04130 000149 0125 0750 0625 0875 0250 0375 0000 %0140 P06
006426 -03503 -01001 0125 0750 0750 0875 0250 0250 0000 %0141 P07
006501 -02763 -02247 0125 0750 0875 0875 0250 0125 0000 %0142 P08
006702 -01192 -04630 0125 0750 1000 0875 0250 0000 0000 %0143 P09
007133 -07177 008269 0125 0875 0000 0875 0125 1000 0000 %0144 Q01
007143 -07007 007250 0125 0875 0125 0875 0125 0875 0000 %0145 Q02
007163 -06638 005431 0125 0875 0250 0875 0125 0750 0000 %0146 Q03
007188 -06227 003999 0125 0875 0375 0875 0125 0625 0000 %0147 Q04
007222 -05765 002696 0125 0875 0500 0875 0125 0500 0000 %0148 Q05
007257 -05271 001525 0125 0875 0625 0875 0125 0375 0000 %0149 Q06
007301 -04725 000383 0125 0875 0750 0875 0125 0250 0000 %0150 Q07
007362 -04063 -00868 0125 0875 0875 0875 0125 0125 0000 %0151 Q08
007527 -02651 -03286 0125 0875 1000 0875 0125 0000 0000 %0152 Q09
008417 -08165 009616 0125 1000 0000 0875 0000 1000 0000 %0153 R01
008425 -08042 008768 0125 1000 0125 0875 0000 0875 0000 %0154 R02
008441 -07743 007154 0125 1000 0250 0875 0000 0750 0000 %0155 R03
009897 -08413 006614 0125 1000 0375 0875 0000 0625 0000 %0156 R04
008485 -07065 004572 0125 1000 0500 0875 0000 0500 0000 %0157 R05
008513 -06672 003435 0125 1000 0625 0875 0000 0375 0000 %0158 R06
008547 -06229 002310 0125 1000 0750 0875 0000 0250 0000 %0159 R07
008594 -05693 001073 0125 1000 0875 0875 0000 0125 0000 %0160 R08
008723 -04474 -01346 0125 1000 1000 0875 0000 0000 0000 %0161 R09

001182 003261 002038 0250 0000 0000 0750 1000 1000 0000 %0162 S01
001277 003647 -00580 0250 0000 0125 0750 1000 0875 0000 %0163 S02
001466 004414 -03092 0250 0000 0250 0750 1000 0750 0000 %0164 S03
001677 005038 -04578 0250 0000 0375 0750 1000 0625 0000 %0165 S04
001877 005659 -05769 0250 0000 0500 0750 1000 0500 0000 %0166 S05
002090 006183 -06754 0250 0000 0625 0750 1000 0375 0000 %0167 S06
002340 006695 -07676 0250 0000 0750 0750 1000 0250 0000 %0168 S07
002631 007198 -08611 0250 0000 0875 0750 1000 0125 0000 %0169 S08
003282 008056 -10326 0250 0000 1000 0750 1000 0000 0000 %0170 S09
001890 001390 003072 0250 0125 0000 0750 0875 1000 0000 %0171 T01
001951 001761 000518 0250 0125 0125 0750 0875 0875 0000 %0172 T02
002079 002611 -02094 0250 0125 0250 0750 0875 0750 0000 %0173 T03
002230 003409 -03673 0250 0125 0375 0750 0875 0625 0000 %0174 T04
002389 004141 -04953 0250 0125 0500 0750 0875 0500 0000 %0175 T05
002554 004784 -05999 0250 0125 0625 0750 0875 0375 0000 %0176 T06
002739 005420 -06971 0250 0125 0750 0750 0875 0250 0000 %0177 T07
002990 006097 -08022 0250 0125 0875 0750 0875 0125 0000 %0178 T08
003559 007193 -09859 0250 0125 1000 0750 0875 0000 0000 %0179 T09
003012 -01090 004490 0250 0250 0000 0750 0750 1000 0000 %0180 U01
003040 -00729 002104 0250 0250 0125 0750 0750 0875 0000 %0181 U02
003123 000072 -00436 0250 0250 0250 0750 0750 0750 0000 %0182 U03
003210 000863 -02060 0250 0250 0375 0750 0750 0625 0000 %0183 U04
003313 001641 -03416 0250 0250 0500 0750 0750 0500 0000 %0184 U05
003430 002382 -04557 0250 0250 0625 0750 0750 0375 0000 %0185 U06
003559 003115 -05622 0250 0250 0750 0750 0750 0250 0000 %0186 U07
003741 003919 -06748 0250 0250 0875 0750 0750 0125 0000 %0187 U08
004178 005366 -08815 0250 0250 1000 0750 0750 0000 0000 %0188 U09
003926 000984 006769 0250 0375 0000 0750 0625 1000 0000 %0189 V01
003951 -02352 003329 0250 0375 0125 0750 0625 0875 0000 %0190 V02
004004 -01641 000913 0250 0375 0250 0750 0625 0750 0000 %0191 V03
004067 -00957 -00708 0250 0375 0375 0750 0625 0625 0000 %0192 V04
004141 -00219 -02082 0250 0375 0500 0750 0625 0500 0000 %0193 V05
004228 000501 -03253 0250 0375 0625 0750 0625 0375 0000 %0194 V06
004329 001231 -04372 0250 0375 0750 0750 0625 0250 0000 %0195 V07
004464 002062 -05557 0250 0375 0875 0750 0625 0125 0000 %0196 V08
004811 003654 -07755 0250 0375 1000 0750 0625 0000 0000 %0197 V09
004755 -03834 006055 0250 0500 0000 0750 0500 1000 0000 %0198 W01
004774 -03590 004413 0250 0500 0125 0750 0500 0875 0000 %0199 W02
004815 -02995 002125 0250 0500 0250 0750 0500 0750 0000 %0200 W03
004863 -02385 000544 0250 0500 0375 0750 0500 0625 0000 %0201 W04
004924 -01741 -00833 0250 0500 0500 0750 0500 0500 0000 %0202 W05
004988 -01063 -02027 0250 0500 0625 0750 0500 0375 0000 %0203 W06
005067 -00376 -03168 0250 0500 0750 0750 0500 0250 0000 %0204 W07
005175 000439 -04387 0250 0500 0875 0750 0500 0125 0000 %0205 W08
005719 002104 -06906 0250 0500 1000 0750 0500 0000 0000 %0206 W09
005512 -04806 006766 0250 0625 0000 0750 0375 1000 0000 %0207 X01
005527 -04562 005326 0250 0625 0125 0750 0375 0875 0000 %0208 X02
005563 -04058 003206 0250 0625 0250 0750 0375 0750 0000 %0209 X03
005601 -03537 001661 0250 0625 0375 0750 0375 0625 0000 %0210 X04
005648 -02948 000289 0250 0625 0500 0750 0375 0500 0000 %0211 X05
005702 -02348 -00897 0250 0625 0625 0750 0375 0375 0000 %0212 X06
005764 -01717 -02046 0250 0625 0750 0750 0375 0250 0000 %0213 X07
005853 -00948 -03287 0250 0625 0875 0750 0375 0125 0000 %0214 X08
006089 000615 -05633 0250 0625 1000 0750 0375 0000 0000 %0215 X09
006309 -05667 007493 0250 0750 0000 0750 0250 1000 0000 %0216 Y01
006321 -05491 006291 0250 0750 0125 0750 0250 0875 0000 %0217 Y02
006350 -05051 004321 0250 0750 0250 0750 0250 0750 0000 %0218 Y03
006378 -04595 002819 0250 0750 0375 0750 0250 0625 0000 %0219 Y04
006416 -04090 001480 0250 0750 0500 0750 0250 0500 0000 %0220 Y05
006461 -03556 000300 0250 0750 0625 0750 0250 0375 0000 %0221 Y06
006512 -02978 -00848 0250 0750 0750 0750 0250 0250 0000 %0222 Y07
006588 -02290 -02102 0250 0750 0875 0750 0250 0125 0000 %0223 Y08
006785 -00803 -04495 0250 0750 1000 0750 0250 0000 0000 %0224 Y09
007206 -06552 008395 0250 0875 0000 0750 0125 1000 0000 %0225 Z01
007216 -06405 007357 0250 0875 0125 0750 0125 0875 0000 %0226 Z02
007235 -06053 005542 0250 0875 0250 0750 0125 0750 0000 %0227 Z03
007263 -05666 004115 0250 0875 0375 0750 0125 0625 0000 %0228 Z04
007293 -05221 002818 0250 0875 0500 0750 0125 0500 0000 %0229 Z05
007328 -04778 001645 0250 0875 0625 0750 0125 0375 0000 %0230 Z06
007372 -04249 000497 0250 0875 0750 0750 0125 0250 0000 %0231 Z07
007432 -03646 -00745 0250 0875 0875 0750 0125 0125 0000 %0232 Z08
007596 -02284 -03168 0250 0875 1000 0750 0125 0000 0000 %0233 Z09
008468 -07685 009688 0250 1000 0000 0750 0000 1000 0000 %0234 a01
008476 -07571 008852 0250 1000 0125 0750 0000 0875 0000 %0235 a02
008494 -07290 007238 0250 1000 0250 0750 0000 0750 0000 %0236 a03
008513 -06987 005906 0250 1000 0375 0750 0000 0625 0000 %0237 a04
008535 -06626 004663 0250 1000 0500 0750 0000 0500 0000 %0238 a05
008563 -06257 003521 0250 1000 0625 0750 0000 0375 0000 %0239 a06
008599 -05829 002395 0250 1000 0750 0750 0000 0250 0000 %0240 a07
008645 -05313 001153 0250 1000 0875 0750 0000 0125 0000 %0241 a08
008772 -04137 -01264 0250 1000 1000 0750 0000 0000 0000 %0242 a09

%JE060-7A, Page 20 /66, LAB*la0; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
001877 004045 003199 0375 0000 0000 0625 1000 1000 0000 %0243 A10
001939 004294 000575 0375 0000 0125 0625 1000 0875 0000 %0244 A11
002079 004826 -02059 0375 0000 0250 0625 1000 0750 0000 %0245 A12
002219 005353 -03633 0375 0000 0375 0625 1000 0625 0000 %0246 A13
002379 005855 -04909 0375 0000 0500 0625 1000 0500 0000 %0247 A14
002545 006320 -05956 0375 0000 0625 0625 1000 0375 0000 %0248 A15
002739 006814 -06962 0375 0000 0750 0625 1000 0250 0000 %0249 A16
002983 007299 -07980 0375 0000 0875 0625 1000 0125 0000 %0250 A17
003559 008144 -09839 0375 0000 1000 0625 1000 0000 0000 %0251 A18
002379 002632 003871 0375 0125 0000 0625 0875 1000 0000 %0252 B10
002426 002896 001290 0375 0125 0125 0625 0875 0875 0000 %0253 B11
002536 003504 -01330 0375 0125 0250 0625 0875 0750 0000 %0254 B12
002648 004069 -02935 0375 0125 0375 0625 0875 0625 0000 %0255 B13
002787 004646 -04252 0375 0125 0500 0625 0875 0500 0000 %0256 B14
002925 005212 -05364 0375 0125 0625 0625 0875 0375 0000 %0257 B15
003224 005870 -06538 0375 0125 0750 0625 0875 0250 0000 %0258 B16
003301 006325 -07461 0375 0125 0875 0625 0875 0125 0000 %0259 B17
003814 007372 -09421 0375 0125 1000 0625 0875 0000 0000 %0260 B18
003313 000356 004910 0375 0250 0000 0625 0750 1000 0000 %0261 C10
003345 000619 002585 0375 0250 0125 0625 0750 0875 0000 %0262 C11
003418 001218 000050 0375 0250 0250 0625 0750 0750 0000 %0263 C12
003501 001836 -01590 0375 0250 0375 0625 0750 0625 0000 %0264 C13
003587 002470 -02950 0375 0250 0500 0625 0750 0500 0000 %0265 C14
003692 003065 -04107 0375 0250 0625 0625 0750 0375 0000 %0266 C15
003814 003707 -05203 0375 0250 0750 0625 0750 0250 0000 %0267 C16
003975 004394 -06350 0375 0250 0875 0625 0750 0125 0000 %0268 C17
004384 005703 -08473 0375 0250 1000 0625 0750 0000 0000 %0269 C18
004146 -01356 005636 0375 0375 0000 0625 0625 1000 0000 %0270 D10
004169 -01080 003665 0375 0375 0125 0625 0625 0875 0000 %0271 D11
004219 -00537 001267 0375 0375 0250 0625 0625 0750 0000 %0272 D12
004276 000017 -00345 0375 0375 0375 0625 0625 0625 0000 %0273 D13
004350 000651 -01735 0375 0375 0500 0625 0625 0500 0000 %0274 D14
004431 001269 -02921 0375 0375 0625 0625 0625 0375 0000 %0275 D15
004521 001899 -04046 0375 0375 0750 0625 0625 0250 0000 %0276 D16
004648 002630 -05244 0375 0375 0875 0625 0625 0125 0000 %0277 D17
004981 004046 -07466 0375 0375 1000 0625 0625 0000 0000 %0278 D18
004924 -02688 006266 0375 0500 0000 0625 0500 1000 0000 %0279 E10
004942 -02471 004648 0375 0500 0125 0625 0500 0875 0000 %0280 E11
004984 -01977 002391 0375 0500 0250 0625 0500 0750 0000 %0281 E12
005029 -00538 001167 0375 0500 0375 0625 0500 0625 0000 %0282 E13
005084 -00886 -00569 0375 0500 0500 0625 0500 0500 0000 %0283 E14
005148 -00311 -01760 0375 0500 0625 0625 0500 0375 0000 %0284 E15
005224 000323 -02913 0375 0500 0750 0625 0500 0250 0000 %0285 E16
005327 001024 -04139 0375 0500 0875 0625 0500 0125 0000 %0286 E17
005598 002492 -06443 0375 0500 1000 0625 0500 0000 0000 %0287 E18
005648 -03789 006903 0375 0625 0000 0625 0375 1000 0000 %0288 F10
005662 -03596 005531 0375 0625 0125 0625 0375 0875 0000 %0289 F11
005696 -03149 003413 0375 0625 0250 0625 0375 0750 0000 %0290 F12
005736 -02677 001880 0375 0625 0375 0625 0375 0625 0000 %0291 F13
005778 -02155 000510 0375 0625 0500 0625 0375 0500 0000 %0292 F14
005831 -01638 -00677 0375 0625 0625 0625 0375 0375 0000 %0293 F15
005894 -01043 -01831 0375 0625 0750 0625 0375 0250 0000 %0294 F16
005979 -00359 -03073 0375 0625 0875 0625 0375 0125 0000 %0295 F17
006208 001096 -05439 0375 0625 1000 0625 0375 0000 0000 %0296 F18
006419 -04808 007634 0375 0750 0000 0625 0250 1000 0000 %0297 G10
006431 -04651 006447 0375 0750 0125 0625 0250 0875 0000 %0298 G11
006459 -04256 004487 0375 0750 0250 0625 0250 0750 0000 %0299 G12
006489 -03839 002992 0375 0750 0375 0625 0250 0625 0000 %0300 G13
006526 -03374 001659 0375 0750 0500 0625 0250 0500 0000 %0301 G14
006567 -02893 000477 0375 0750 0625 0625 0250 0375 0000 %0302 G15
006622 -02349 -00673 0375 0750 0750 0625 0250 0250 0000 %0303 G16
006693 -01705 -01929 0375 0750 0875 0625 0250 0125 0000 %0304 G17
006885 -00330 -04326 0375 0750 1000 0625 0250 0000 0000 %0305 G18
007295 -05840 008500 0375 0875 0000 0625 0125 1000 0000 %0306 H10
007305 -05694 007485 0375 0875 0125 0625 0125 0875 0000 %0307 H11
007326 -05354 005680 0375 0875 0250 0625 0125 0750 0000 %0308 H12
007351 -05001 004251 0375 0875 0375 0625 0125 0625 0000 %0309 H13
007383 -04603 002955 0375 0875 0500 0625 0125 0500 0000 %0310 H14
007417 -04171 001787 0375 0875 0625 0625 0125 0375 0000 %0311 H15
007459 -03698 000643 0375 0875 0750 0625 0125 0250 0000 %0312 H16
007520 -03116 -00609 0375 0875 0875 0625 0125 0125 0000 %0313 H17
007680 -01827 -03031 0375 0875 1000 0625 0125 0000 0000 %0314 H18
008535 -07128 009772 0375 1000 0000 0625 0000 1000 0000 %0315 I10
008541 -07008 008932 0375 1000 0125 0625 0000 0875 0000 %0316 I11
008559 -06732 007340 0375 1000 0250 0625 0000 0750 0000 %0317 I12
008580 -06443 006011 0375 1000 0375 0625 0000 0625 0000 %0318 I13
008603 -06104 004762 0375 1000 0500 0625 0000 0500 0000 %0319 I14
008631 -05754 003626 0375 1000 0625 0625 0000 0375 0000 %0320 I15
008664 -05348 002502 0375 1000 0750 0625 0000 0250 0000 %0321 I16
008710 -04852 001262 0375 1000 0875 0625 0000 0125 0000 %0322 I17
008837 -03736 -01159 0375 1000 1000 0625 0000 0000 0000 %0323 I18

002509 004759 004175 0500 0000 0000 0500 1000 1000 0000 %0324 J10
002562 004963 001569 0500 0000 0125 0500 1000 0875 0000 %0325 J11
002657 005312 -01069 0500 0000 0250 0500 1000 0750 0000 %0326 J12
002771 005781 -02724 0500 0000 0375 0500 1000 0625 0000 %0327 J13
002895 006207 -04057 0500 0000 0500 0500 1000 0500 0000 %0328 J14
003019 006582 -05140 0500 0000 0625 0500 1000 0375 0000 %0329 J15
003184 007018 -06204 0500 0000 0750 0500 1000 0250 0000 %0330 J16
003388 007385 -07250 0500 0000 0875 0500 1000 0125 0000 %0331 J17
003891 008273 -09269 0500 0000 1000 0500 1000 0000 0000 %0332 J18
002887 003647 004633 0500 0125 0000 0500 0875 1000 0000 %0333 K10
002925 003873 002087 0500 0125 0125 0500 0875 0875 0000 %0334 K11
003012 004314 -00537 0500 0125 0250 0500 0875 0750 0000 %0335 K12
003110 004745 -02163 0500 0125 0375 0500 0875 0625 0000 %0336 K13
003217 005216 -03526 0500 0125 0500 0500 0875 0500 0000 %0337 K14
003332 005664 -04656 0500 0125 0625 0500 0875 0375 0000 %0338 K15
003472 006124 -05730 0500 0125 0750 0500 0875 0250 0000 %0339 K16
003660 006648 -06859 0500 0125 0875 0500 0875 0125 0000 %0340 K17
004114 007612 -08908 0500 0125 1000 0500 0875 0000 0000 %0341 K18
003665 001634 005403 0500 0250 0000 0500 0750 1000 0000 %0342 L10
003698 001849 003126 0500 0250 0125 0500 0750 0875 0000 %0343 L11
003757 002298 000615 0500 0250 0250 0500 0750 0750 0000 %0344 L12
003830 002777 -01027 0500 0250 0375 0500 0750 0625 0000 %0345 L13
003911 003288 -02414 0500 0250 0500 0500 0750 0500 0000 %0346 L14
004004 003783 -03583 0500 0250 0625 0500 0750 0375 0000 %0347 L15
004114 004317 -04695 0500 0250 0750 0500 0750 0250 0000 %0348 L16
004259 004916 -05870 0500 0250 0875 0500 0750 0125 0000 %0349 L17
004633 006074 -08040 0500 0250 1000 0500 0750 0000 0000 %0350 L18
004406 -00066 005978 0500 0375 0000 0500 0625 1000 0000 %0351 M10
004431 000149 004069 0500 0375 0125 0500 0625 0875 0000 %0352 M11
004480 000591 001693 0500 0375 0250 0500 0625 0750 0000 %0353 M12
004533 001066 000072 0500 0375 0375 0500 0625 0625 0000 %0354 M13
004601 001580 -01306 0500 0375 0500 0500 0625 0500 0000 %0355 M14
004672 002097 -02505 0500 0375 0625 0500 0625 0375 0000 %0356 M15
004759 002637 -03650 0500 0375 0750 0500 0625 0250 0000 %0357 M16
004877 003258 -04842 0500 0375 0875 0500 0625 0125 0000 %0358 M17
005188 004529 -07108 0500 0375 1000 0500 0625 0000 0000 %0359 M18
005132 -01486 006563 0500 0500 0000 0500 0500 1000 0000 %0360 N10
005148 -01294 004951 0500 0500 0125 0500 0500 0875 0000 %0361 N11
005188 -00879 002726 0500 0500 0250 0500 0500 0750 0000 %0362 N12
005234 -00434 001138 0500 0500 0375 0500 0500 0625 0000 %0363 N13
005286 000054 -00229 0500 0500 0500 0500 0500 0500 0000 %0364 N14
005343 000551 -01437 0500 0500 0625 0500 0500 0375 0000 %0365 N15
005415 001085 -02582 0500 0500 0750 0500 0500 0250 0000 %0366 N16
005512 001725 -03819 0500 0500 0875 0500 0500 0125 0000 %0367 N17
005775 003038 -06150 0500 0500 1000 0500 0500 0000 0000 %0368 N18
005820 -02684 007148 0500 0625 0000 0500 0375 1000 0000 %0369 O10
005831 -02517 005772 0500 0625 0125 0500 0375 0875 0000 %0370 O11
005864 -02132 003682 0500 0625 0250 0500 0375 0750 0000 %0371 O12
005902 -01720 002146 0500 0625 0375 0500 0375 0625 0000 %0372 O13
005945 -01267 000789 0500 0625 0500 0500 0375 0500 0000 %0373 O14
005992 -00787 -00409 0500 0625 0625 0500 0375 0375 0000 %0374 O15
006053 -00270 -01565 0500 0625 0750 0500 0375 0250 0000 %0375 O16
006135 000341 -02815 0500 0625 0875 0500 0375 0125 0000 %0376 O17
006357 001657 -05185 0500 0625 1000 0500 0375 0000 0000 %0377 O18
006556 -03831 007817 0500 0750 0000 0500 0250 1000 0000 %0378 P10
006570 -03674 006652 0500 0750 0125 0500 0250 0875 0000 %0379 P11
006597 -03330 004709 0500 0750 0250 0500 0250 0750 0000 %0380 P12
006626 -02962 003220 0500 0750 0375 0500 0250 0625 0000 %0381 P13
006660 -02538 001888 0500 0750 0500 0500 0250 0500 0000 %0382 P14
006704 -02107 000699 0500 0750 0625 0500 0250 0375 0000 %0383 P15
006752 -01623 -00456 0500 0750 0750 0500 0250 0250 0000 %0384 P16
006823 -01033 -01706 0500 0750 0875 0500 0250 0125 0000 %0385 P17
007010 000232 -04116 0500 0750 1000 0500 0250 0000 0000 %0386 P18
007405 -04990 008634 0500 0875 0000 0500 0125 1000 0000 %0387 Q10
007415 -04860 007651 0500 0875 0125 0500 0125 0875 0000 %0388 Q11
007439 -04546 005853 0500 0875 0250 0500 0125 0750 0000 %0389 Q12
007461 -04217 004439 0500 0875 0375 0500 0125 0625 0000 %0390 Q13
007491 -03842 003140 0500 0875 0500 0500 0125 0500 0000 %0391 Q14
007526 -03452 001974 0500 0875 0625 0500 0125 0375 0000 %0392 Q15
007567 -03016 000828 0500 0875 0750 0500 0125 0250 0000 %0393 Q16
007625 -02473 -00424 0500 0875 0875 0500 0125 0125 0000 %0394 Q17
007783 -01273 -02860 0500 0875 1000 0500 0125 0000 0000 %0395 Q18
008618 -06420 009878 0500 1000 0000 0500 0000 1000 0000 %0396 R10
008626 -06317 009056 0500 1000 0125 0500 0000 0875 0000 %0397 R11
008642 -06060 007469 0500 1000 0250 0500 0000 0750 0000 %0398 R12
008661 -05781 006147 0500 1000 0375 0500 0000 0625 0000 %0399 R13
008684 -05469 004896 0500 1000 0500 0500 0000 0500 0000 %0400 R14
008711 -05134 003768 0500 1000 0625 0500 0000 0375 0000 %0401 R15
008744 -04764 002641 0500 1000 0750 0500 0000 0250 0000 %0402 R16
008789 -04284 001401 0500 1000 0875 0500 0000 0125 0000 %0403 R17
008916 -03219 -01024 0500 1000 1000 0500 0000 0000 0000 %0404 R18

003082 005395 005052 0625 0000 0000 0375 1000 1000 0000 %0405 S10
003117 005520 002500 0625 0000 0125 0375 1000 0875 0000 %0406 S11
003204 005860 -00164 0625 0000 0250 0375 1000 0750 0000 %0407 S12
003288 006200 -01815 0625 0000 0375 0375 1000 0625 0000 %0408 S13
003388 006554 -03186 0625 0000 0500 0375 1000 0500 0000 %0409 S14
003501 006922 -04345 0625 0000 0625 0375 1000 0375 0000 %0410 S15
003626 007271 -05421 0625 0000 0750 0375 1000 0250 0000 %0411 S16
003804 007695 -06575 0625 0000 0875 0375 1000 0125 0000 %0412 S17
004241 008487 -08686 0625 0000 1000 0375 1000 0000 0000 %0413 S18
003375 004519 005359 0625 0125 0000 0375 0875 1000 0000 %0414 T10
003412 004682 002882 0625 0125 0125 0375 0875 0875 0000 %0415 T11
003483 005045 000262 0625 0125 0250 0375 0875 0750 0000 %0416 T12
003559 005376 -01387 0625 0125 0375 0375 0875 0625 0000 %0417 T13
003654 005766 -02772 0625 0125 0500 0375 0875 0500 0000 %0418 T14
003757 006176 -03952 0625 0125 0625 0375 0875 0375 0000 %0419 T15
003876 006549 -05041 0625 0125 0750 0375 0875 0250 0000 %0420 T16
004033 007013 -06214 0625 0125 0875 0375 0875 0125 0000 %0421 T17
004439 007892 -08368 0625 0125 1000 0375 0875 0000 0000 %0422 T18
004029 002762 005910 0625 0250 0000 0375 0750 1000 0000 %0423 U10
004057 002920 003728 0625 0250 0125 0375 0750 0875 0000 %0424 U11
004114 003268 001226 0625 0250 0250 0375 0750 0750 0000 %0425 U12
004178 003669 -00425 0625 0250 0375 0375 0750 0625 0000 %0426 U13
004250 004096 -01818 0625 0250 0500 0375 0750 0500 0000 %0427 U14
004333 004504 -03012 0625 0250 0625 0375 0750 0375 0000 %0428 U15
004431 004950 -04142 0625 0250 0750 0375 0750 0250 0000 %0429 U16
004562 005470 -05349 0625 0250 0875 0375 0750 0125 0000 %0430 U17
004903 006490 -07570 0625 0250 1000 0375 0750 0000 0000 %0431 U18
004691 001146 006381 0625 0375 0000 0375 0625 1000 0000 %0432 V10
004714 001321 004527 0625 0375 0125 0375 0625 0875 0000 %0433 V11
004759 001691 002167 0625 0375 0250 0375 0625 0750 0000 %0434 V12
004811 002058 000555 0625 0375 0375 0375 0625 0625 0000 %0435 V13
004866 002495 -00846 0625 0375 0500 0375 0625 0500 0000 %0436 V14
004935 002923 -02046 0625 0375 0625 0375 0625 0375 0000 %0437 V15
005019 003393 -03198 0625 0375 0750 0375 0625 0250 0000 %0438 V16
005125 003933 -04419 0625 0375 0875 0375 0625 0125 0000 %0439 V17
005418 005063 -06723 0625 0375 1000 0375 0625 0000 0000 %0440 V18
005358 -00296 006889 0625 0500 0000 0375 0500 1000 0000 %0441 W10
005374 -00131 005325 0625 0500 0125 0375 0500 0875 0000 %0442 W11
005411 000215 003104 0625 0500 0250 0375 0500 0750 0000 %0443 W12
005451 000599 001525 0625 0500 0375 0375 0500 0625 0000 %0444 W13
005503 001001 000145 0625 0500 0500 0375 0500 0500 0000 %0445 W14
005560 001435 -01052 0625 0500 0625 0375 0500 0375 0000 %0446 W15
005624 001889 -02213 0625 0500 0750 0375 0500 0250 0000 %0447 W16
005719 002453 -03458 0625 0500 0875 0375 0500 0125 0000 %0448 W17
005966 003629 -05813 0625 0500 1000 0375 0500 0000 0000 %0449 W18
006003 -01567 007409 0625 0625 0000 0375 0375 1000 0000 %0450 X10
006019 -01422 006082 0625 0625 0125 0375 0375 0875 0000 %0451 X11
006050 -01072 004007 0625 0625 0250 0375 0375 0750 0000 %0452 X12
006084 -00715 002463 0625 0625 0375 0375 0375 0625 0000 %0453 X13
006127 -00323 001107 0625 0625 0500 0375 0375 0500 0000 %0454 X14
006173 000096 -00090 0625 0625 0625 0375 0375 0375 0000 %0455 X15
006230 000548 -01254 0625 0625 0750 0375 0375 0250 0000 %0456 X16
006309 001102 -02508 0625 0625 0875 0375 0375 0125 0000 %0457 X17
006521 002288 -04906 0625 0625 1000 0375 0375 0000 0000 %0458 X18
006711 -02785 008047 0625 0750 0000 0375 0250 1000 0000 %0459 Y10
006724 -02659 006906 0625 0750 0125 0375 0250 0875 0000 %0460 Y11
006752 -02342 004967 0625 0750 0250 0375 0250 0750 0000 %0461 Y12
006780 -02025 003484 0625 0750 0375 0375 0250 0625 0000 %0462 Y13
006813 -01642 002156 0625 0750 0500 0375 0250 0500 0000 %0463 Y14
006855 -01260 000964 0625 0750 0625 0375 0250 0375 0000 %0464 Y15
006902 -00821 -00184 0625 0750 0750 0375 0250 0250 0000 %0465 Y16
006971 -00286 -01452 0625 0750 0875 0375 0250 0125 0000 %0466 Y17
007153 000869 -03865 0625 0750 1000 0375 0250 0000 0000 %0467 Y18
007535 -04059 008830 0625 0875 0000 0375 0125 1000 0000 %0468 Z10
007544 -03934 007846 0625 0875 0125 0375 0125 0875 0000 %0469 Z11
007566 -03652 006067 0625 0875 0250 0375 0125 0750 0000 %0470 Z12
007589 -03356 004656 0625 0875 0375 0375 0125 0625 0000 %0471 Z13
007619 -03001 003347 0625 0875 0500 0375 0125 0500 0000 %0472 Z14
007653 -02657 002194 0625 0875 0625 0375 0125 0375 0000 %0473 Z15
007694 -02255 001052 0625 0875 0750 0375 0125 0250 0000 %0474 Z16
007750 -01760 -00210 0625 0875 0875 0375 0125 0125 0000 %0475 Z17
007905 -00657 -02649 0625 0875 1000 0375 0125 0000 0000 %0476 Z18
008717 -05640 010027 0625 1000 0000 0375 0000 1000 0000 %0477 a10
008724 -05533 009213 0625 1000 0125 0375 0000 0875 0000 %0478 a11
008741 -05293 007627 0625 1000 0250 0375 0000 0750 0000 %0479 a12
008761 -05042 006317 0625 1000 0375 0375 0000 0625 0000 %0480 a13
008784 -04753 005072 0625 1000 0500 0375 0000 0500 0000 %0481 a14
008810 -04437 003939 0625 1000 0625 0375 0000 0375 0000 %0482 a15
008843 -04085 002810 0625 1000 0750 0375 0000 0250 0000 %0483 a16
008887 -03642 001565 0625 1000 0875 0375 0000 0125 0000 %0484 a17
009011 -02643 -00862 0625 1000 1000 0375 0000 0000 0000 %0485 a18

%JE060-7A, Page 21 /66, LAB*la0; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
003660 006064 005910 0750 0000 0000 0250 1000 1000 0000 %0486 A19
003698 006188 003435 0750 0000 0125 0250 1000 0875 0000 %0487 A20
003762 006448 000778 0750 0000 0250 0250 1000 0750 0000 %0488 A21
003830 006717 -00881 0750 0000 0375 0250 1000 0625 0000 %0489 A22
003911 007023 -02289 0750 0000 0500 0250 1000 0500 0000 %0490 A23
004004 007321 -03474 0750 0000 0625 0250 1000 0375 0000 %0491 A24
004109 007655 -04604 0750 0000 0750 0250 1000 0250 0000 %0492 A25
004259 008012 -05791 0750 0000 0875 0250 1000 0125 0000 %0493 A26
004637 008730 -07995 0750 0000 1000 0250 1000 0000 0000 %0494 A27
003901 005363 006118 0750 0125 0000 0250 0875 1000 0000 %0495 B19
003931 005493 003730 0750 0125 0125 0250 0875 0875 0000 %0496 B20
003990 005756 001128 0750 0125 0250 0250 0875 0750 0000 %0497 B21
004052 006290 -00433 0750 0125 0375 0250 0875 0625 0000 %0498 B22
004123 006376 -01960 0750 0125 0500 0250 0875 0500 0000 %0499 B23
004214 006702 -03153 0750 0125 0625 0250 0875 0375 0000 %0500 B24
004316 007045 -04289 0750 0125 0750 0250 0875 0250 0000 %0501 B25
004456 007431 -05482 0750 0125 0875 0250 0875 0125 0000 %0502 B26
004811 008214 -07718 0750 0125 1000 0250 0875 0000 0000 %0503 B27
004452 003844 006490 0750 0250 0000 0250 0750 1000 0000 %0504 C19
004476 003964 004380 0750 0250 0125 0250 0750 0875 0000 %0505 C20
004525 004256 001899 0750 0250 0250 0250 0750 0750 0000 %0506 C21
004578 004576 000251 0750 0250 0375 0250 0750 0625 0000 %0507 C22
004644 004906 -01141 0750 0250 0500 0250 0750 0500 0000 %0508 C23
004714 005253 -02359 0750 0250 0625 0250 0750 0375 0000 %0509 C24
004804 005636 -03502 0750 0250 0750 0250 0750 0250 0000 %0510 C25
004920 006074 -04728 0750 0250 0875 0250 0750 0125 0000 %0511 C26
005231 006979 -07019 0750 0250 1000 0250 0750 0000 0000 %0512 C27
005033 002346 006856 0750 0375 0000 0250 0625 1000 0000 %0513 D19
005054 002476 005063 0750 0375 0125 0250 0625 0875 0000 %0514 D20
005094 002776 002721 0750 0375 0250 0250 0625 0750 0000 %0515 D21
005142 003089 001119 0750 0375 0375 0250 0625 0625 0000 %0516 D22
005195 003441 -00286 0750 0375 0500 0250 0625 0500 0000 %0517 D23
005257 003807 -01499 0750 0375 0625 0250 0625 0375 0000 %0518 D24
005330 004213 -02656 0750 0375 0750 0250 0625 0250 0000 %0519 D25
005430 004678 -03902 0750 0375 0875 0250 0625 0125 0000 %0520 D26
005699 005657 -06244 0750 0375 1000 0250 0625 0000 0000 %0521 D27
005639 000939 007263 0750 0500 0000 0250 0500 1000 0000 %0522 E19
005656 001065 005750 0750 0500 0125 0250 0500 0875 0000 %0523 E20
005691 001356 003578 0750 0500 0250 0250 0500 0750 0000 %0524 E21
005730 001667 001991 0750 0500 0375 0250 0500 0625 0000 %0525 E22
005775 002028 000609 0750 0500 0500 0250 0500 0500 0000 %0526 E23
005828 002383 -00594 0750 0500 0625 0250 0500 0375 0000 %0527 E24
005891 002784 -01762 0750 0500 0750 0250 0500 0250 0000 %0528 E25
005977 003273 -03019 0750 0500 0875 0250 0500 0125 0000 %0529 E26
006210 004291 -05399 0750 0500 1000 0250 0500 0000 0000 %0530 E27
006242 -00345 007766 0750 0625 0000 0250 0375 1000 0000 %0531 F19
006257 -00221 006456 0750 0625 0125 0250 0375 0875 0000 %0532 F20
006287 000067 004389 0750 0625 0250 0250 0375 0750 0000 %0533 F21
006318 000374 002859 0750 0625 0375 0250 0375 0625 0000 %0534 F22
006359 000711 001503 0750 0625 0500 0250 0375 0500 0000 %0535 F23
006402 001069 000296 0750 0625 0625 0250 0375 0375 0000 %0536 F24
006459 001462 -00863 0750 0625 0750 0250 0375 0250 0000 %0537 F25
006531 001952 -02126 0750 0625 0875 0250 0375 0125 0000 %0538 F26
006735 002997 -04541 0750 0625 1000 0250 0375 0000 0000 %0539 F27
006912 -01634 008349 0750 0750 0000 0250 0250 1000 0000 %0540 G19
006925 -01509 007199 0750 0750 0125 0250 0250 0875 0000 %0541 G20
006950 -01249 005300 0750 0750 0250 0250 0250 0750 0000 %0542 G21
006977 -00958 003822 0750 0750 0375 0250 0250 0625 0000 %0543 G22
007012 004827 007019 0750 0750 0500 0250 0250 0500 0000 %0544 G23
007049 -00294 001299 0750 0750 0625 0250 0250 0375 0000 %0545 G24
007097 000089 000140 0750 0750 0750 0250 0250 0250 0000 %0546 G25
007161 000562 -01124 0750 0750 0875 0250 0250 0125 0000 %0547 G26
007337 001607 -03558 0750 0750 1000 0250 0250 0000 0000 %0548 G27
007703 -02997 009073 0750 0875 0000 0250 0125 1000 0000 %0549 H19
007713 -02877 008101 0750 0875 0125 0250 0125 0875 0000 %0550 H20
007734 -02631 006338 0750 0875 0250 0250 0125 0750 0000 %0551 H21
007757 -02366 004932 0750 0875 0375 0250 0125 0625 0000 %0552 H22
007785 -02053 003637 0750 0875 0500 0250 0125 0500 0000 %0553 H23
007798 -01736 002464 0750 0875 0625 0250 0125 0375 0000 %0554 H24
007856 -01377 001322 0750 0875 0750 0250 0125 0250 0000 %0555 H25
007911 -00931 000058 0750 0875 0875 0250 0125 0125 0000 %0556 H26
008061 000075 -02383 0750 0875 1000 0250 0125 0000 0000 %0557 H27
008847 -04715 010212 0750 1000 0000 0250 0000 1000 0000 %0558 I19
008855 -04611 009404 0750 1000 0125 0250 0000 0875 0000 %0559 I20
008872 -04398 007834 0750 1000 0250 0250 0000 0750 0000 %0560 I21
008891 -04160 006527 0750 1000 0375 0250 0000 0625 0000 %0561 I22
008913 -03895 005291 0750 1000 0500 0250 0000 0500 0000 %0562 I23
008939 -03605 004153 0750 1000 0625 0250 0000 0375 0000 %0563 I24
008971 -03268 003031 0750 1000 0750 0250 0000 0250 0000 %0564 I25
009014 -02869 001779 0750 1000 0875 0250 0000 0125 0000 %0565 I26
009138 -01937 -00654 0750 1000 1000 0250 0000 0000 0000 %0566 I27

004245 006728 006769 0875 0000 0000 0125 1000 1000 0000 %0567 J19
004272 006827 004366 0875 0000 0125 0125 1000 0875 0000 %0568 J20
004329 007063 001727 0875 0000 0250 0125 1000 0750 0000 %0569 J21
004380 007281 000050 0875 0000 0375 0125 1000 0625 0000 %0570 J22
004452 007538 -01364 0875 0000 0500 0125 1000 0500 0000 %0571 J23
004529 007807 -02582 0875 0000 0625 0125 1000 0375 0000 %0572 J24
004617 008083 -03736 0875 0000 0750 0125 1000 0250 0000 %0573 J25
004744 008403 -04960 0875 0000 0875 0125 1000 0125 0000 %0574 J26
005074 009059 -07262 0875 0000 1000 0125 1000 0000 0000 %0575 J27
004443 006164 006941 0875 0125 0000 0125 0875 1000 0000 %0576 K19
004464 006280 004575 0875 0125 0125 0125 0875 0875 0000 %0577 K20
004517 006492 002004 0875 0125 0250 0125 0875 0750 0000 %0578 K21
004574 006739 000331 0875 0125 0375 0125 0875 0625 0000 %0579 K22
004633 006999 -01095 0875 0125 0500 0125 0875 0500 0000 %0580 K23
004706 007271 -02307 0875 0125 0625 0125 0875 0375 0000 %0581 K24
004793 007572 -03468 0875 0125 0750 0125 0875 0250 0000 %0582 K25
004913 007916 -04708 0875 0125 0875 0125 0875 0125 0000 %0583 K26
005224 008604 -07009 0875 0125 1000 0125 0875 0000 0000 %0584 K27
004910 004863 007144 0875 0250 0000 0125 0750 1000 0000 %0585 L19
004928 004964 005091 0875 0250 0125 0125 0750 0875 0000 %0586 L20
004974 005207 002641 0875 0250 0250 0125 0750 0750 0000 %0587 L21
005019 005459 000997 0875 0250 0375 0125 0750 0625 0000 %0588 L22
005074 005740 -00418 0875 0250 0500 0125 0750 0500 0000 %0589 L23
005138 006032 -01631 0875 0250 0625 0125 0750 0375 0000 %0590 L24
005214 006342 -02803 0875 0250 0750 0125 0750 0250 0000 %0591 L25
005321 006707 -04047 0875 0250 0875 0125 0750 0125 0000 %0592 L26
005598 007499 -06388 0875 0250 1000 0125 0750 0000 0000 %0593 L27
005421 003503 007398 0875 0375 0000 0125 0625 1000 0000 %0594 M19
005439 003611 005682 0875 0375 0125 0125 0625 0875 0000 %0595 M20
005476 003860 003357 0875 0375 0250 0125 0625 0750 0000 %0596 M21
005518 004110 001745 0875 0375 0375 0125 0625 0625 0000 %0597 M22
005566 004412 000341 0875 0375 0500 0125 0625 0500 0000 %0598 M23
005621 004713 -00870 0875 0375 0625 0125 0625 0375 0000 %0599 M24
005688 005048 -02054 0875 0375 0750 0125 0625 0250 0000 %0600 M25
005778 005444 -03308 0875 0375 0875 0125 0625 0125 0000 %0601 M26
006024 006286 -05688 0875 0375 1000 0125 0625 0000 0000 %0602 M27
005971 002162 007775 0875 0500 0000 0125 0500 1000 0000 %0603 N19
005985 002267 006275 0875 0500 0125 0125 0500 0875 0000 %0604 N20
006019 002507 004109 0875 0500 0250 0125 0500 0750 0000 %0605 N21
006053 002773 002535 0875 0500 0375 0125 0500 0625 0000 %0606 N22
006094 003097 001122 0875 0500 0500 0125 0500 0500 0000 %0607 N23
006142 003369 -00063 0875 0500 0625 0125 0500 0375 0000 %0608 N24
006203 003715 -01237 0875 0500 0750 0125 0500 0250 0000 %0609 N25
006279 004122 -02498 0875 0500 0875 0125 0500 0125 0000 %0610 N26
006496 005026 -04911 0875 0500 1000 0125 0500 0000 0000 %0611 N27
006528 000893 008166 0875 0625 0000 0125 0375 1000 0000 %0612 O19
006540 000989 006895 0875 0625 0125 0125 0375 0875 0000 %0613 O20
006567 001243 004846 0875 0625 0250 0125 0375 0750 0000 %0614 O21
006599 001496 003329 0875 0625 0375 0125 0375 0625 0000 %0615 O22
006637 001784 001973 0875 0625 0500 0125 0375 0500 0000 %0616 O23
006677 002086 000765 0875 0625 0625 0125 0375 0375 0000 %0617 O24
006728 002440 -00405 0875 0625 0750 0125 0375 0250 0000 %0618 O25
006798 002858 -01679 0875 0625 0875 0125 0375 0125 0000 %0619 O26
006989 003763 -04106 0875 0625 1000 0125 0375 0000 0000 %0620 O27
007157 -00421 008694 0875 0750 0000 0125 0250 1000 0000 %0621 P19
007169 -00318 007589 0875 0750 0125 0125 0250 0875 0000 %0622 P20
007192 -00089 005689 0875 0750 0250 0125 0250 0750 0000 %0623 P21
007220 000164 004221 0875 0750 0375 0125 0250 0625 0000 %0624 P22
007251 000451 002884 0875 0750 0500 0125 0250 0500 0000 %0625 P23
007286 000744 001697 0875 0750 0625 0125 0250 0375 0000 %0626 P24
007330 001084 000535 0875 0750 0750 0125 0250 0250 0000 %0627 P25
007392 001489 -00735 0875 0750 0875 0125 0250 0125 0000 %0628 P26
007560 002411 -03182 0875 0750 1000 0125 0250 0000 0000 %0629 P27
007907 -01834 009379 0875 0875 0000 0125 0125 1000 0000 %0630 Q19
007917 -01735 008432 0875 0875 0125 0125 0125 0875 0000 %0631 Q20
007939 -01513 006676 0875 0875 0250 0125 0125 0750 0000 %0632 Q21
007959 -05141 003207 0875 0875 0375 0125 0125 0625 0000 %0633 Q22
007987 -01015 003975 0875 0875 0500 0125 0125 0500 0000 %0634 Q23
008018 -00727 002811 0875 0875 0625 0125 0125 0375 0000 %0635 Q24
008056 -00404 001656 0875 0875 0750 0125 0125 0250 0000 %0636 Q25
008108 -00004 000390 0875 0875 0875 0125 0125 0125 0000 %0637 Q26
008254 000900 -02060 0875 0875 1000 0125 0125 0000 0000 %0638 Q27
009010 -03657 010465 0875 1000 0000 0125 0000 1000 0000 %0639 R19
009018 -03572 009641 0875 1000 0125 0125 0000 0875 0000 %0640 R20
009034 -03375 008098 0875 1000 0250 0125 0000 0750 0000 %0641 R21
009053 -03169 006792 0875 1000 0375 0125 0000 0625 0000 %0642 R22
009074 -02925 005549 0875 1000 0500 0125 0000 0500 0000 %0643 R23
009100 -02660 004417 0875 1000 0625 0125 0000 0375 0000 %0644 R24
009130 -02361 003288 0875 1000 0750 0125 0000 0250 0000 %0645 R25
009172 -01993 002045 0875 1000 0875 0125 0000 0125 0000 %0646 R26
009291 -01148 -00392 0875 1000 1000 0125 0000 0000 0000 %0647 R27

005009 007653 007939 1000 0000 0000 0000 1000 1000 0000 %0648 S19
005022 007722 005572 1000 0000 0125 0000 1000 0875 0000 %0649 S20
005060 007896 002980 1000 0000 0250 0000 1000 0750 0000 %0650 S21
005105 008079 001277 1000 0000 0375 0000 1000 0625 0000 %0651 S22
005158 008271 -00156 1000 0000 0500 0000 1000 0500 0000 %0652 S23
005221 008498 -01399 1000 0000 0625 0000 1000 0375 0000 %0653 S24
005292 008725 -02577 1000 0000 0750 0000 1000 0250 0000 %0654 S25
005393 009002 -03849 1000 0000 0875 0000 1000 0125 0000 %0655 S26
005662 009566 -06253 1000 0000 1000 0000 1000 0000 0000 %0656 S27
005162 007207 008011 1000 0125 0000 0000 0875 1000 0000 %0657 T19
005175 007266 005746 1000 0125 0125 0000 0875 0875 0000 %0658 T20
005214 007438 003175 1000 0125 0250 0000 0875 0750 0000 %0659 T21
005257 007630 001489 1000 0125 0375 0000 0875 0625 0000 %0660 T22
005305 003811 002971 1000 0125 0500 0000 0875 0500 0000 %0661 T23
005365 008059 -01183 1000 0125 0625 0000 0875 0375 0000 %0662 T24
005436 008306 -02377 1000 0125 0750 0000 0875 0250 0000 %0663 T25
005533 008589 -03640 1000 0125 0875 0000 0875 0125 0000 %0664 T26
005792 009185 -06042 1000 0125 1000 0000 0875 0000 0000 %0665 T27
005545 006105 008109 1000 0250 0000 0000 0750 1000 0000 %0666 U19
005560 006183 006137 1000 0250 0125 0000 0750 0875 0000 %0667 U20
005592 006364 003692 1000 0250 0250 0000 0750 0750 0000 %0668 U21
005627 006563 002023 1000 0250 0375 0000 0750 0625 0000 %0669 U22
005674 006784 000603 1000 0250 0500 0000 0750 0500 0000 %0670 U23
005728 007017 -00629 1000 0250 0625 0000 0750 0375 0000 %0671 U24
005792 007272 -01817 1000 0250 0750 0000 0750 0250 0000 %0672 U25
005880 007584 -03090 1000 0250 0875 0000 0750 0125 0000 %0673 U26
006117 008235 -05512 1000 0250 1000 0000 0750 0000 0000 %0674 U27
005982 004920 008263 1000 0375 0000 0000 0625 1000 0000 %0675 V19
005995 004998 006582 1000 0375 0125 0000 0625 0875 0000 %0676 V20
006024 005185 004269 1000 0375 0250 0000 0625 0750 0000 %0677 V21
006058 005388 002648 1000 0375 0375 0000 0625 0625 0000 %0678 V22
006102 005610 001242 1000 0375 0500 0000 0625 0500 0000 %0679 V23
006147 005859 000006 1000 0375 0625 0000 0625 0375 0000 %0680 V24
006205 006126 -01178 1000 0375 0750 0000 0625 0250 0000 %0681 V25
006284 006449 -02457 1000 0375 0875 0000 0625 0125 0000 %0682 V26
006498 007158 -04894 1000 0375 1000 0000 0625 0000 0000 %0683 V27
006468 003686 008528 1000 0500 0000 0000 0500 1000 0000 %0684 W19
006480 003758 007068 1000 0500 0125 0000 0500 0875 0000 %0685 W20
006508 003944 004903 1000 0500 0250 0000 0500 0750 0000 %0686 W21
006538 004151 003320 1000 0500 0375 0000 0500 0625 0000 %0687 W22
006574 004386 001936 1000 0500 0500 0000 0500 0500 0000 %0688 W23
006617 004636 000718 1000 0500 0625 0000 0500 0375 0000 %0689 W24
006669 004907 -00462 1000 0500 0750 0000 0500 0250 0000 %0690 W25
006739 005251 -01739 1000 0500 0875 0000 0500 0125 0000 %0691 W26
006931 005977 -04183 1000 0500 1000 0000 0500 0000 0000 %0692 W27
006975 002473 008849 1000 0625 0000 0000 0375 1000 0000 %0693 X19
006985 002555 007579 1000 0625 0125 0000 0375 0875 0000 %0694 X20
007010 002734 005546 1000 0625 0250 0000 0375 0750 0000 %0695 X21
007036 002936 004026 1000 0625 0375 0000 0375 0625 0000 %0696 X22
007071 003183 002653 1000 0625 0500 0000 0375 0500 0000 %0697 X23
007107 003423 001455 1000 0625 0625 0000 0375 0375 0000 %0698 X24
007155 003708 000282 1000 0625 0750 0000 0375 0250 0000 %0699 X25
007218 004046 -00993 1000 0625 0875 0000 0375 0125 0000 %0700 X26
007388 004802 -03444 1000 0625 1000 0000 0375 0000 0000 %0701 X27
007555 001173 009295 1000 0750 0000 0000 0250 1000 0000 %0702 Y19
007566 001258 008178 1000 0750 0125 0000 0250 0875 0000 %0703 Y20
007585 001439 006286 1000 0750 0250 0000 0250 0750 0000 %0704 Y21
007611 001641 004813 1000 0750 0375 0000 0250 0625 0000 %0705 Y22
007641 001874 003483 1000 0750 0500 0000 0250 0500 0000 %0706 Y23
007673 002124 002292 1000 0750 0625 0000 0250 0375 0000 %0707 Y24
007713 002395 001134 1000 0750 0750 0000 0250 0250 0000 %0708 Y25
007769 002740 -00127 1000 0750 0875 0000 0250 0125 0000 %0709 Y26
007921 003512 -02588 1000 0750 1000 0000 0250 0000 0000 %0710 Y27
008254 -00256 009902 1000 0875 0000 0000 0125 1000 0000 %0711 Z19
008262 -00182 008937 1000 0875 0125 0000 0125 0875 0000 %0712 Z20
008279 000000 007175 1000 0875 0250 0000 0125 0750 0000 %0713 Z21
008299 000197 005772 1000 0875 0375 0000 0125 0625 0000 %0714 Z22
008324 000422 004480 1000 0875 0500 0000 0125 0500 0000 %0715 Z23
008355 000659 003309 1000 0875 0625 0000 0125 0375 0000 %0716 Z24
008390 000933 002168 1000 0875 0750 0000 0125 0250 0000 %0717 Z25
008437 001262 000908 1000 0875 0875 0000 0125 0125 0000 %0718 Z26
008571 002027 -01542 1000 0875 1000 0000 0125 0000 0000 %0719 Z27
009289 -02164 010868 1000 1000 0000 0000 0000 1000 0000 %0720 a19
009295 -02381 010687 1000 1000 0125 0000 0000 0875 0000 %0721 a20
009310 -01931 008497 1000 1000 0250 0000 0000 0750 0000 %0722 a21
009327 -01743 007184 1000 1000 0375 0000 0000 0625 0000 %0723 a22
009347 -01539 005944 1000 1000 0500 0000 0000 0500 0000 %0724 a23
009371 -01308 004812 1000 1000 0625 0000 0000 0375 0000 %0725 a24
009399 -01050 003687 1000 1000 0750 0000 0000 0250 0000 %0726 a25
009440 -00736 002454 1000 1000 0875 0000 0000 0125 0000 %0727 a26
009550 -00003 000026 1000 1000 1000 0000 0000 0000 0000 %0728 a27

%JE060-7A, Page 22 /66, LAB*la0; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
009576 000008 000046 1000 1000 1000 0000 0000 0000 0000 %0729 b01
009337 -01133 -00356 0875 1000 1000 0125 0000 0000 0000 %0730 b02
009181 -01916 -00613 0750 1000 1000 0250 0000 0000 0000 %0731 b03
009053 -02619 -00832 0625 1000 1000 0375 0000 0000 0000 %0732 b04
008950 -03202 -01006 0500 1000 1000 0500 0000 0000 0000 %0733 b05
008863 -03708 -01148 0375 1000 1000 0625 0000 0000 0000 %0734 b06
008796 -04126 -01258 0250 1000 1000 0750 0000 0000 0000 %0735 b07
008744 -04471 -01346 0125 1000 1000 0875 0000 0000 0000 %0736 b08
008721 -04608 -01383 0000 1000 1000 1000 0000 0000 0000 %0737 b09
008464 001270 000907 1000 0875 0875 0000 0125 0125 0000 %0738 c01
008159 000005 000395 0875 0875 0875 0125 0125 0125 0000 %0739 c02
007962 -00900 000061 0750 0875 0875 0250 0125 0125 0000 %0740 c03
007797 -01732 -00208 0625 0875 0875 0375 0125 0125 0000 %0741 c04
007664 -02452 -00429 0500 0875 0875 0500 0125 0125 0000 %0742 c05
007551 -03086 -00616 0375 0875 0875 0625 0125 0125 0000 %0743 c06
007461 -03619 -00768 0250 0875 0875 0750 0125 0125 0000 %0744 c07
007387 -04053 -00887 0125 0875 0875 0875 0125 0125 0000 %0745 c08
007351 -04239 -00946 0000 0875 0875 1000 0125 0125 0000 %0746 c09
007743 002396 001124 1000 0750 0750 0000 0250 0250 0000 %0747 d01
007387 001079 000525 0875 0750 0750 0125 0250 0250 0000 %0748 d02
007155 000106 000129 0750 0750 0750 0250 0250 0250 0000 %0749 d03
006954 -00794 -00200 0625 0750 0750 0375 0250 0250 0000 %0750 d04
006793 -01600 -00472 0500 0750 0750 0500 0250 0250 0000 %0751 d05
006657 -02341 -00689 0375 0750 0750 0625 0250 0250 0000 %0752 d06
006549 -02959 -00872 0250 0750 0750 0750 0250 0250 0000 %0753 d07
006456 -03501 -01025 0125 0750 0750 0875 0250 0250 0000 %0754 d08
006412 -03704 -01101 0000 0750 0750 1000 0250 0250 0000 %0755 d09
007141 003415 001429 1000 0625 0625 0000 0375 0375 0000 %0756 e01
006732 002084 000744 0875 0625 0625 0125 0375 0375 0000 %0757 e02
006459 001070 000283 0750 0625 0625 0250 0375 0375 0000 %0758 e03
006225 000096 -00098 0625 0625 0625 0375 0375 0375 0000 %0759 e04
006034 -00781 -00422 0500 0625 0625 0500 0375 0375 0000 %0760 e05
005867 -01610 -00698 0375 0625 0625 0625 0375 0375 0000 %0761 e06
005733 -02334 -00914 0250 0625 0625 0750 0375 0375 0000 %0762 e07
005619 -02971 -01102 0125 0625 0625 0875 0375 0375 0000 %0763 e08
005566 -03252 -01198 0000 0625 0625 1000 0375 0375 0000 %0764 e09
006610 004368 001906 1000 0500 0500 0000 0500 0500 0000 %0765 f01
006145 003054 001122 0875 0500 0500 0125 0500 0500 0000 %0766 f02
005828 002021 000592 0750 0500 0500 0250 0500 0500 0000 %0767 f03
005548 001011 000129 0625 0500 0500 0375 0500 0500 0000 %0768 f04
005317 000054 -00251 0500 0500 0500 0500 0500 0500 0000 %0769 f05
005115 -00867 -00584 0375 0500 0500 0625 0500 0500 0000 %0770 f06
004952 -01715 -00864 0250 0500 0500 0750 0500 0500 0000 %0771 f07
004815 -02490 -01094 0125 0500 0500 0875 0500 0500 0000 %0772 f08
004748 -02832 -01202 0000 0500 0500 1000 0500 0500 0000 %0773 f09
006094 005368 002603 1000 0375 0375 0000 0625 0625 0000 %0774 g01
005560 004061 001731 0875 0375 0375 0125 0625 0625 0000 %0775 g02
005185 003096 001085 0750 0375 0375 0250 0625 0625 0000 %0776 g03
004848 002078 000524 0625 0375 0375 0375 0625 0625 0000 %0777 g04
004562 001083 000046 0500 0375 0375 0500 0625 0625 0000 %0778 g05
004307 000049 -00370 0375 0375 0375 0625 0625 0625 0000 %0779 g06
004095 -00943 -00720 0250 0375 0375 0750 0625 0625 0000 %0780 g07
003916 -01905 -01020 0125 0375 0375 0875 0625 0625 0000 %0781 g08
003825 -02382 -01163 0000 0375 0375 1000 0625 0625 0000 %0782 g09
005621 006355 003642 1000 0250 0250 0000 0750 0750 0000 %0783 h01
005005 005197 002613 0875 0250 0250 0125 0750 0750 0000 %0784 h02
004562 004255 001883 0750 0250 0250 0250 0750 0750 0000 %0785 h03
004146 003295 001193 0625 0250 0250 0375 0750 0750 0000 %0786 h04
003778 002313 000597 0500 0250 0250 0500 0750 0750 0000 %0787 h05
003436 001210 000033 0375 0250 0250 0625 0750 0750 0000 %0788 h06
003144 000105 -00461 0250 0250 0250 0750 0750 0750 0000 %0789 h07
002872 -01161 -00899 0125 0250 0250 0875 0750 0750 0000 %0790 h08
002763 -01832 -01099 0000 0250 0250 1000 0750 0750 0000 %0791 h09
005198 007279 005701 1000 0125 0125 0000 0875 0875 0000 %0792 i01
004489 006277 004545 0875 0125 0125 0125 0875 0875 0000 %0793 i02
003951 005499 003684 0750 0125 0125 0250 0875 0875 0000 %0794 i03
003430 004708 002859 0625 0125 0125 0375 0875 0875 0000 %0795 i04
002939 003866 002085 0500 0125 0125 0500 0875 0875 0000 %0796 i05
002436 002890 001265 0375 0125 0125 0625 0875 0875 0000 %0797 i06
001963 001794 000473 0250 0125 0125 0750 0875 0875 0000 %0798 i07
001450 000146 -00360 0125 0125 0125 0875 0875 0875 0000 %0799 i08
001201 -01190 -00796 0000 0125 0125 1000 0875 0875 0000 %0800 i09
005022 007672 007967 1000 0000 0000 0000 1000 1000 0000 %0801 j01
004263 006764 006810 0875 0000 0000 0125 1000 1000 0000 %0802 j02
003676 006083 005935 0750 0000 0000 0250 1000 1000 0000 %0803 j03
003096 005385 005065 0625 0000 0000 0375 1000 1000 0000 %0804 j04
002518 004749 004189 0500 0000 0000 0500 1000 1000 0000 %0805 j05
001890 004072 003234 0375 0000 0000 0625 1000 1000 0000 %0806 j06
001182 003347 002038 0250 0000 0000 0750 1000 1000 0000 %0807 j07
000296 001701 000511 0125 0000 0000 0875 1000 1000 0000 %0808 j08
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0809 j09

009545 000000 000016 1000 1000 1000 0000 0000 0000 0000 %0810 b10
008271 000897 -02049 0875 0875 1000 0125 0125 0000 0000 %0811 b11
007360 001610 -03546 0750 0750 1000 0250 0250 0000 0000 %0812 b12
006544 002274 -04890 0625 0625 1000 0375 0375 0000 0000 %0813 b13
005781 003046 -06153 0500 0500 1000 0500 0500 0000 0000 %0814 b14
004988 004063 -07478 0375 0375 1000 0625 0625 0000 0000 %0815 b15
004183 005371 -08812 0250 0250 1000 0750 0750 0000 0000 %0816 b16
003351 007078 -10254 0125 0125 1000 0875 0875 0000 0000 %0817 b17
002932 008022 -10944 0000 0000 1000 1000 1000 0000 0000 %0818 b18
009435 -00737 002442 1000 1000 0875 0000 0000 0125 0000 %0819 c10
008127 000004 000384 0875 0875 0875 0125 0125 0125 0000 %0820 c11
007185 000568 -01130 0750 0750 0875 0250 0250 0125 0000 %0821 c12
006330 001101 -02511 0625 0625 0875 0375 0375 0125 0000 %0822 c13
005521 001723 -03824 0500 0500 0875 0500 0500 0125 0000 %0823 c14
004660 002633 -05248 0375 0375 0875 0625 0625 0125 0000 %0824 c15
003746 003939 -06769 0250 0250 0875 0750 0750 0125 0000 %0825 c16
002715 005845 -08473 0125 0125 0875 0875 0875 0125 0000 %0826 c17
002134 007195 -09436 0000 0000 0875 1000 1000 0125 0000 %0827 c18
009394 -01057 003686 1000 1000 0750 0000 0000 0250 0000 %0828 d10
008076 -00390 001632 0875 0875 0750 0125 0125 0250 0000 %0829 d11
007119 000101 000127 0750 0750 0750 0250 0250 0250 0000 %0830 d12
006252 000554 -01256 0625 0625 0750 0375 0375 0250 0000 %0831 d13
005424 001103 -02601 0500 0500 0750 0500 0500 0250 0000 %0832 d14
004533 001931 -04065 0375 0375 0750 0625 0625 0250 0000 %0833 d15
003570 003140 -05649 0250 0250 0750 0750 0750 0250 0000 %0834 d16
002445 005168 -07549 0125 0125 0750 0875 0875 0250 0000 %0835 d17
001760 006705 -08671 0000 0000 0750 1000 1000 0250 0000 %0836 d18
009365 -01315 004804 1000 1000 0625 0000 0000 0375 0000 %0837 e10
008037 -00723 002785 0875 0875 0625 0125 0125 0375 0000 %0838 e11
007073 -00281 001278 0750 0750 0625 0250 0250 0375 0000 %0839 e12
006195 000106 -00106 0625 0625 0625 0375 0375 0375 0000 %0840 e13
005352 000567 -01449 0500 0500 0625 0500 0500 0375 0000 %0841 e14
004439 001276 -02935 0375 0375 0625 0625 0625 0375 0000 %0842 e15
003436 002398 -04580 0250 0250 0625 0750 0750 0375 0000 %0843 e16
002209 004433 -06619 0125 0125 0625 0875 0875 0375 0000 %0844 e17
001417 006241 -07947 0000 0000 0625 1000 1000 0375 0000 %0845 e18
009340 -01538 005940 1000 1000 0500 0000 0000 0500 0000 %0846 f10
008002 -01006 003947 0875 0875 0500 0125 0125 0500 0000 %0847 f11
007034 -00622 002471 0750 0750 0500 0250 0250 0500 0000 %0848 f12
006145 -00308 001093 0625 0625 0500 0375 0375 0500 0000 %0849 f13
005292 000063 -00254 0500 0500 0500 0500 0500 0500 0000 %0850 f14
004359 000663 -01754 0375 0375 0500 0625 0625 0500 0000 %0851 f15
003326 001657 -03434 0250 0250 0500 0750 0750 0500 0000 %0852 f16
002010 003631 -05608 0125 0125 0500 0875 0875 0500 0000 %0853 f17
001080 005646 -07166 0000 0000 0500 1000 1000 0500 0000 %0854 f18
009319 -01753 007177 1000 1000 0375 0000 0000 0625 0000 %0855 g10
007979 -01278 005246 0875 0875 0375 0125 0125 0625 0000 %0856 g11
007000 -00959 003799 0750 0750 0375 0250 0250 0625 0000 %0857 g12
006104 -00721 002451 0625 0625 0375 0375 0375 0625 0000 %0858 g13
005240 -00427 001128 0500 0500 0375 0500 0500 0625 0000 %0859 g14
004285 000051 -00374 0375 0375 0375 0625 0625 0625 0000 %0860 g15
003217 000877 -02080 0250 0250 0375 0750 0750 0625 0000 %0861 g16
001800 002630 -04383 0125 0125 0375 0875 0875 0625 0000 %0862 g17
000692 004981 -06278 0000 0000 0375 1000 1000 0625 0000 %0863 g18
009303 -01940 008488 1000 1000 0250 0000 0000 0750 0000 %0864 h10
007956 -01505 006658 0875 0875 0250 0125 0125 0750 0000 %0865 h11
006971 -01235 005266 0750 0750 0250 0250 0250 0750 0000 %0866 h12
006068 -01063 003988 0625 0625 0250 0375 0375 0750 0000 %0867 h13
005195 -00876 002712 0500 0500 0250 0500 0500 0750 0000 %0868 h14
004228 -00530 001263 0375 0375 0250 0625 0625 0750 0000 %0869 h15
003130 000069 -00456 0250 0250 0250 0750 0750 0750 0000 %0870 h16
001634 001560 -02902 0125 0125 0250 0875 0875 0750 0000 %0871 h17
000349 003680 -05028 0000 0000 0250 1000 1000 0750 0000 %0872 h18
009289 -02104 010061 1000 1000 0125 0000 0000 0875 0000 %0873 i10
007936 -01739 008419 0875 0875 0125 0125 0125 0875 0000 %0874 i11
006946 -01521 007203 0750 0750 0125 0250 0250 0875 0000 %0875 i12
006037 -01399 006080 0625 0625 0125 0375 0375 0875 0000 %0876 i13
005155 -01303 004966 0500 0500 0125 0500 0500 0875 0000 %0877 i14
004169 -01098 003659 0375 0375 0125 0625 0625 0875 0000 %0878 i15
003047 -00723 002094 0250 0250 0125 0750 0750 0875 0000 %0879 i16
001450 000116 -00329 0125 0125 0125 0875 0875 0875 0000 %0880 i17
000032 001215 -02621 0000 0000 0125 1000 1000 0875 0000 %0881 i18
009282 -02169 010876 1000 1000 0000 0000 0000 1000 0000 %0882 j10
007924 -01834 009398 0875 0875 0000 0125 0125 1000 0000 %0883 j11
006931 -01634 008359 0750 0750 0000 0250 0250 1000 0000 %0884 j12
006021 -01549 007425 0625 0625 0000 0375 0375 1000 0000 %0885 j13
005135 -01480 006568 0500 0500 0000 0500 0500 1000 0000 %0886 j14
004146 -01346 005654 0375 0375 0000 0625 0625 1000 0000 %0887 j15
003012 -01099 004479 0250 0250 0000 0750 0750 1000 0000 %0888 j16
001366 -00659 002269 0125 0125 0000 0875 0875 1000 0000 %0889 j17
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0890 j18

009543 -00004 000009 1000 1000 1000 0000 0000 0000 0000 %0891 b19
008562 002032 -01561 1000 0875 1000 0000 0125 0000 0000 %0892 b20
007914 003512 -02603 1000 0750 1000 0000 0250 0000 0000 %0893 b21
007388 004804 -03450 1000 0625 1000 0000 0375 0000 0000 %0894 b22
006937 005981 -04186 1000 0500 1000 0000 0500 0000 0000 %0895 b23
006512 007152 -04887 1000 0375 1000 0000 0625 0000 0000 %0896 b24
006130 008228 -05504 1000 0250 1000 0000 0750 0000 0000 %0897 b25
005803 009198 -06043 1000 0125 1000 0000 0875 0000 0000 %0898 b26
005674 009580 -06255 1000 0000 1000 0000 1000 0000 0000 %0899 b27
009186 -01977 002026 0875 1000 0875 0125 0000 0125 0000 %0900 c19
008124 000000 000382 0875 0875 0875 0125 0125 0125 0000 %0901 c20
007413 001493 -00746 0875 0750 0875 0125 0250 0125 0000 %0902 c21
006821 002856 -01682 0875 0625 0875 0125 0375 0125 0000 %0903 c22
006304 004117 -02506 0875 0500 0875 0125 0500 0125 0000 %0904 c23
005801 005436 -03313 0875 0375 0875 0125 0625 0125 0000 %0905 c24
005340 006727 -04061 0875 0250 0875 0125 0750 0125 0000 %0906 c25
004928 007920 -04714 0875 0125 0875 0125 0875 0125 0000 %0907 c26
004755 008428 -04978 0875 0000 0875 0125 1000 0125 0000 %0908 c27
008983 -03258 003003 0750 1000 0750 0250 0000 0250 0000 %0909 d19
007872 -01358 001302 0750 0875 0750 0250 0125 0250 0000 %0910 d20
007115 000109 000126 0750 0750 0750 0250 0250 0250 0000 %0911 d21
006477 001462 -00875 0750 0625 0750 0250 0375 0250 0000 %0912 d22
005915 002794 -01776 0750 0500 0750 0250 0500 0250 0000 %0913 d23
005349 004216 -02675 0750 0375 0750 0250 0625 0250 0000 %0914 d24
004819 005650 -03524 0750 0250 0750 0250 0750 0250 0000 %0915 d25
004333 007052 -04302 0750 0125 0750 0250 0875 0250 0000 %0916 d26
004123 007674 -04624 0750 0000 0750 0250 1000 0250 0000 %0917 d27
008819 -04416 003904 0625 1000 0625 0375 0000 0375 0000 %0918 e19
007664 -02639 002172 0625 0875 0625 0375 0125 0375 0000 %0919 e20
006868 -01239 000946 0625 0750 0625 0375 0250 0375 0000 %0920 e21
006188 000095 -00106 0625 0625 0625 0375 0375 0375 0000 %0921 e22
005575 001446 -01075 0625 0500 0625 0375 0500 0375 0000 %0922 e23
004952 002929 -02060 0625 0375 0625 0375 0625 0375 0000 %0923 e24
004346 004508 -03032 0625 0250 0625 0375 0750 0375 0000 %0924 e25
003767 006187 -03973 0625 0125 0625 0375 0875 0375 0000 %0925 e26
003507 006929 -04370 0625 0000 0625 0375 1000 0375 0000 %0926 e27
008686 -05452 004870 0500 1000 0500 0500 0000 0500 0000 %0927 f19
007494 -03833 003114 0500 0875 0500 0500 0125 0500 0000 %0928 f20
006666 -02528 001865 0500 0750 0500 0500 0250 0500 0000 %0929 f21
005947 -01252 000763 0500 0625 0500 0500 0375 0500 0000 %0930 f22
005289 000063 -00258 0500 0500 0500 0500 0500 0500 0000 %0931 f23
004605 001598 -01338 0500 0375 0500 0500 0625 0500 0000 %0932 f24
003916 003291 -02427 0500 0250 0500 0500 0750 0500 0000 %0933 f25
003224 005208 -03542 0500 0125 0500 0500 0875 0500 0000 %0934 f26
002895 006178 -04065 0500 0000 0500 0500 1000 0500 0000 %0935 f27
008577 -06432 005974 0375 1000 0375 0625 0000 0625 0000 %0936 g19
007351 -04991 004233 0375 0875 0375 0625 0125 0625 0000 %0937 g20
006489 -03838 002976 0375 0750 0375 0625 0250 0625 0000 %0938 g21
005736 -02667 001862 0375 0625 0375 0625 0375 0625 0000 %0939 g22
005033 -01434 000789 0375 0500 0375 0625 0500 0625 0000 %0940 g23
004285 000051 -00374 0375 0375 0375 0625 0625 0625 0000 %0941 g24
003501 001847 -01603 0375 0250 0375 0625 0750 0625 0000 %0942 g25
002657 004070 -02954 0375 0125 0375 0625 0875 0625 0000 %0943 g26
002230 005332 -03642 0375 0000 0375 0625 1000 0625 0000 %0944 g27
008488 -07287 007208 0250 1000 0250 0750 0000 0750 0000 %0945 h19
007235 -06043 005528 0250 0875 0250 0750 0125 0750 0000 %0946 h20
006345 -05052 004292 0250 0750 0250 0750 0250 0750 0000 %0947 h21
005563 -04059 003187 0250 0625 0250 0750 0375 0750 0000 %0948 h22
004819 -02978 002108 0250 0500 0250 0750 0500 0750 0000 %0949 h23
004009 -01642 000900 0250 0375 0250 0750 0625 0750 0000 %0950 h24
003123 000076 -00453 0250 0250 0250 0750 0750 0750 0000 %0951 h25
002090 002641 -02129 0250 0125 0250 0750 0875 0750 0000 %0952 h26
001482 004423 -03134 0250 0000 0250 0750 1000 0750 0000 %0953 h27
008419 -08057 008745 0125 1000 0125 0875 0000 0875 0000 %0954 i19
007137 -07008 007227 0125 0875 0125 0875 0125 0875 0000 %0955 i20
006225 -06230 006136 0125 0750 0125 0875 0250 0875 0000 %0956 i21
005411 -05435 005119 0125 0625 0125 0875 0375 0875 0000 %0957 i22
004629 -04658 004157 0125 0500 0125 0875 0500 0875 0000 %0958 i23
003762 -03659 003009 0125 0375 0125 0875 0625 0875 0000 %0959 i24
002779 -02311 001654 0125 0250 0125 0875 0750 0875 0000 %0960 i25
001450 000144 -00349 0125 0125 0125 0875 0875 0875 0000 %0961 i26
000428 002743 -02015 0125 0000 0125 0875 1000 0875 0000 %0962 i27
008388 -08355 009581 0000 1000 0000 1000 0000 1000 0000 %0963 j19
007091 -07425 008249 0000 0875 0000 1000 0125 1000 0000 %0964 j20
006168 -06746 007309 0000 0750 0000 1000 0250 1000 0000 %0965 j21
005343 -06101 006512 0000 0625 0000 1000 0375 1000 0000 %0966 j22
004546 -05471 005780 0000 0500 0000 1000 0500 1000 0000 %0967 j23
003654 -04741 004948 0000 0375 0000 1000 0625 1000 0000 %0968 j24
002614 -03868 003847 0000 0250 0000 1000 0750 1000 0000 %0969 j25
001080 -02456 001800 0000 0125 0000 1000 0875 1000 0000 %0970 j26
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0971 j27

%JE060-7A, Page 23 /66, LAB*la0; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
%LAB*la0, D65, adapted, Y = 0.0 , L* = 0.0 
%100 x LAB*a          %#1000 x (r g b  c m y 0)            %nr.  pos
%z005009 007653 007939 %#1000 0000 0000 0000 1000 1000 0000 %0648 S19 %O1 0
%z009289 -02164 010868 %#1000 1000 0000 0000 0000 1000 0000 %0720 a19 %Y1 1
%z008399 -08361 009599 %#0000 1000 0000 1000 0000 1000 0000 %0072 I01 %L1 2
%z008706 -04625 -01374 %#0000 1000 1000 1000 0000 0000 0000 %0080 I09 %C1 3
%z002939 007977 -10925 %#0000 0000 1000 1000 1000 0000 0000 %0008 A09 %V1 4
%z005662 009566 -06253 %#1000 0000 1000 0000 1000 0000 0000 %0656 S27 %M1 5
%z000000 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0000 A01 %N1 6
%z009550 -00003 000026 %#1000 1000 1000 0000 0000 0000 0000 %0728 a27 %W1 7
%$
%z005022 007672 007967 %#1000 0000 0000 0000 1000 1000 0000 %0801 j01 %O2 0
%z009282 -02169 010876 %#1000 1000 0000 0000 0000 1000 0000 %0882 j10 %Y2 1
%z008388 -08355 009581 %#0000 1000 0000 1000 0000 1000 0000 %0963 j19 %L2 2
%z008721 -04608 -01383 %#0000 1000 1000 1000 0000 0000 0000 %0737 b09 %C2 3
%z002932 008022 -10944 %#0000 0000 1000 1000 1000 0000 0000 %0818 b18 %V2 4
%z005674 009580 -06255 %#1000 0000 1000 0000 1000 0000 0000 %0899 b27 %M2 5
%z000000 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0809 j09 %N2 6
%z009555 000001 000024 %#1000 1000 1000 0000 0000 0000 0000 %0729 b01 %W2 7
%$

%JE060-7A, Page 24 /66, LAB*la0; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
%100 x LAB*          1000 x (r g b  c m y 0)            %nr.  pos
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0972 k01
001450 000135 -00363 0125 0125 0125 0875 0875 0875 0000 %0973 k02
003123 000097 -00457 0250 0250 0250 0750 0750 0750 0000 %0974 k03
004281 000042 -00371 0375 0375 0375 0625 0625 0625 0000 %0975 k04
005286 000053 -00254 0500 0500 0500 0500 0500 0500 0000 %0976 k05
006188 000102 -00107 0625 0625 0625 0375 0375 0375 0000 %0977 k06
007113 000096 000121 0750 0750 0750 0250 0250 0250 0000 %0978 k07
008122 -00004 000376 0875 0875 0875 0125 0125 0125 0000 %0979 k08
009542 -00004 000003 1000 1000 1000 0000 0000 0000 0000 %0980 k09
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0981 l01
001450 000113 -00348 0125 0125 0125 0875 0875 0875 0000 %0982 l02
003123 000099 -00456 0250 0250 0250 0750 0750 0750 0000 %0983 l03
004281 000048 -00375 0375 0375 0375 0625 0625 0625 0000 %0984 l04
005286 000059 -00259 0500 0500 0500 0500 0500 0500 0000 %0985 l05
006188 000106 -00114 0625 0625 0625 0375 0375 0375 0000 %0986 l06
007113 000097 000126 0750 0750 0750 0250 0250 0250 0000 %0987 l07
008122 -00008 000379 0875 0875 0875 0125 0125 0125 0000 %0988 l08
009540 -00004 000003 1000 1000 1000 0000 0000 0000 0000 %0989 l09
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0990 m01
001433 000136 -00374 0125 0125 0125 0875 0875 0875 0000 %0991 m02
003123 000099 -00456 0250 0250 0250 0750 0750 0750 0000 %0992 m03
004281 000030 -00369 0375 0375 0375 0625 0625 0625 0000 %0993 m04
005286 000056 -00260 0500 0500 0500 0500 0500 0500 0000 %0994 m05
006188 000099 -00108 0625 0625 0625 0375 0375 0375 0000 %0995 m06
007113 000097 000126 0750 0750 0750 0250 0250 0250 0000 %0996 m07
008122 000000 000377 0875 0875 0875 0125 0125 0125 0000 %0997 m08
009540 -00009 000007 1000 1000 1000 0000 0000 0000 0000 %0998 m09
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0999 n01
001450 000138 -00322 0125 0125 0125 0875 0875 0875 0000 %1000 n02
003123 000097 -00457 0250 0250 0250 0750 0750 0750 0000 %1001 n03
004281 000036 -00373 0375 0375 0375 0625 0625 0625 0000 %1002 n04
005286 000049 -00262 0500 0500 0500 0500 0500 0500 0000 %1003 n05
006188 000099 -00108 0625 0625 0625 0375 0375 0375 0000 %1004 n06
007115 000101 000123 0750 0750 0750 0250 0250 0250 0000 %1005 n07
008122 -00004 000381 0875 0875 0875 0125 0125 0125 0000 %1006 n08
009540 -00010 000001 1000 1000 1000 0000 0000 0000 0000 %1007 n09
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %1008 k10
000217 000072 -00034 0066 0066 0066 0933 0933 0933 0000 %1009 k11
001560 000159 -00400 0133 0133 0133 0866 0866 0866 0000 %1010 k12
002623 000089 -00509 0200 0200 0200 0800 0800 0800 0000 %1011 k13
003275 000090 -00382 0266 0266 0266 0333 0333 0333 0000 %1012 k14
003886 000118 -00408 0333 0333 0333 0666 0666 0666 0000 %1013 k15
004460 000063 -00354 0400 0400 0400 0600 0600 0600 0000 %1014 k16
005026 000042 -00291 0466 0466 0466 0533 0533 0533 0000 %1015 k17
005515 000095 -00276 0533 0533 0533 0466 0466 0466 0000 %1016 k18
006013 000109 -00172 0600 0600 0600 0400 0400 0400 0000 %1017 k19
006508 000097 -00068 0666 0666 0666 0333 0333 0333 0000 %1018 k20
007002 000099 000065 0734 0734 0734 0266 0266 0266 0000 %1019 k21
007526 000077 000224 0800 0800 0800 0200 0200 0200 0000 %1020 k22
008064 000032 000359 0866 0866 0866 0133 0133 0133 0000 %1021 k23
008684 -00035 000563 0933 0933 0933 0066 0066 0066 0000 %1022 k24
009542 -00004 000003 1000 1000 1000 0000 0000 0000 0000 %1023 k25
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %1024 l10
000243 000094 -00041 0066 0066 0066 0933 0933 0933 0000 %1025 l11
001575 000175 -00388 0133 0133 0133 0866 0866 0866 0000 %1026 l12
002631 000066 -00487 0200 0200 0200 0800 0800 0800 0000 %1027 l13
003282 000102 -00395 0266 0266 0266 0333 0333 0333 0000 %1028 l14
003896 000087 -00406 0333 0333 0333 0666 0666 0666 0000 %1029 l15
004468 000066 -00359 0400 0400 0400 0600 0600 0600 0000 %1030 l16
005029 000049 -00282 0466 0466 0466 0533 0533 0533 0000 %1031 l17
005524 000095 -00268 0533 0533 0533 0466 0466 0466 0000 %1032 l18
006019 000099 -00168 0600 0600 0600 0400 0400 0400 0000 %1033 l19
006515 000094 -00065 0666 0666 0666 0333 0333 0333 0000 %1034 l20
007008 000107 000064 0734 0734 0734 0266 0266 0266 0000 %1035 l21
007531 000077 000224 0800 0800 0800 0200 0200 0200 0000 %1036 l22
008069 000028 000362 0866 0866 0866 0133 0133 0133 0000 %1037 l23
008687 -00035 000569 0933 0933 0933 0066 0066 0066 0000 %1038 l24
009543 -00004 000009 1000 1000 1000 0000 0000 0000 0000 %1039 l25
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %1040 m10
000217 000093 -00040 0066 0066 0066 0933 0933 0933 0000 %1041 m11
001575 000159 -00400 0133 0133 0133 0866 0866 0866 0000 %1042 m12
002623 000063 -00500 0200 0200 0200 0800 0800 0800 0000 %1043 m13
003282 000074 -00385 0266 0266 0266 0333 0333 0333 0000 %1044 m14
003891 000090 -00408 0333 0333 0333 0666 0666 0666 0000 %1045 m15
004460 000062 -00360 0400 0400 0400 0600 0600 0600 0000 %1046 m16
005029 000055 -00287 0466 0466 0466 0533 0533 0533 0000 %1047 m17
005518 000105 -00276 0533 0533 0533 0466 0466 0466 0000 %1048 m18
006013 000102 -00170 0600 0600 0600 0400 0400 0400 0000 %1049 m19
006510 000086 -00064 0666 0666 0666 0333 0333 0333 0000 %1050 m20
007006 000095 000064 0734 0734 0734 0266 0266 0266 0000 %1051 m21
007529 000081 000221 0800 0800 0800 0200 0200 0200 0000 %1052 m22

008067 000033 000359 0866 0866 0866 0133 0133 0133 0000 %1053 m23
008686 -00035 000569 0933 0933 0933 0066 0066 0066 0000 %1054 m24
009543 -00004 000003 1000 1000 1000 0000 0000 0000 0000 %1055 m25
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %1056 n10
000243 000105 -00058 0066 0066 0066 0933 0933 0933 0000 %1057 n11
001575 000135 -00405 0133 0133 0133 0866 0866 0866 0000 %1058 n12
002623 000054 -00493 0200 0200 0200 0800 0800 0800 0000 %1059 n13
003275 000110 -00394 0266 0266 0266 0333 0333 0333 0000 %1060 n14
003886 000104 -00412 0333 0333 0333 0666 0666 0666 0000 %1061 n15
004460 000074 -00359 0400 0400 0400 0600 0600 0600 0000 %1062 n16
005022 000052 -00291 0466 0466 0466 0533 0533 0533 0000 %1063 n17
005518 000058 -00248 0533 0533 0533 0466 0466 0466 0000 %1064 n18
006013 000102 -00170 0600 0600 0600 0400 0400 0400 0000 %1065 n19
006510 000094 -00065 0666 0666 0666 0333 0333 0333 0000 %1066 n20
007006 000103 000062 0734 0734 0734 0266 0266 0266 0000 %1067 n21
007527 000081 000221 0800 0800 0800 0200 0200 0200 0000 %1068 n22
008064 000037 000355 0866 0866 0866 0133 0133 0133 0000 %1069 n23
008686 -00035 000563 0933 0933 0933 0066 0066 0066 0000 %1070 n24
009542 -00010 000001 1000 1000 1000 0000 0000 0000 0000 %1071 n25
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %1072 k26
009540 000000 000000 1000 1000 1000 0000 0000 0000 0000 %1073 k27
005019 007672 007929 1000 0000 0000 0000 1000 1000 0000 %1074 l26
008696 -04584 -01416 0000 1000 1000 1000 0000 0000 0000 %1075 l27
009280 -02168 010874 1000 1000 0000 0000 0000 1000 0000 %1076 m26
002939 008022 -10946 0000 0000 1000 1000 1000 0000 0000 %1077 m27
008402 -08375 009574 0000 1000 0000 1000 0000 1000 0000 %1078 n26
005674 009594 -06267 1000 0000 1000 0000 1000 0000 0000 %1079 n27
%$
%z005019 007672 007929 %#1000 0000 0000 0000 1000 1000 0000 %1074 l26 %O3 0
%z009280 -02168 010874 %#1000 1000 0000 0000 0000 1000 0000 %1076 m26 %Y3 1
%z008402 -08375 009574 %#0000 1000 0000 1000 0000 1000 0000 %1078 n26 %L3 2
%z008696 -04584 -01416 %#0000 1000 1000 1000 0000 0000 0000 %1075 l27 %C3 3
%z002939 008022 -10946 %#0000 0000 1000 1000 1000 0000 0000 %1077 m27 %V3 4
%z005674 009594 -06267 %#1000 0000 1000 0000 1000 0000 0000 %1079 n27 %M3 5
%z000000 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %1072 k26 %N3 6
%z009540 000000 000000 %#1000 1000 1000 0000 0000 0000 0000 %1073 k27 %W3 7
%$
%z000000 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0972 k01 %N4 6
%z009542 -00004 000003 %#1000 1000 1000 0000 0000 0000 0000 %0980 k09 %W4 7
%$
%z000000 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0981 l01 %N5 6
%z009542 -00004 000006 %#1000 1000 1000 0000 0000 0000 0000 %0989 l09 %W5 7
%$
%z000000 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0990 m01 %N6 6
%z009542 -00007 000005 %#1000 1000 1000 0000 0000 0000 0000 %0998 m09 %W6 7
%$
%z000000 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0999 n01 %N7 6
%z009541 -00010 000001 %#1000 1000 1000 0000 0000 0000 0000 %1007 n09 %W7 7
%$ la0_line 4580
] def

%****************************************************************************

/LAB*Fa0100 [
%JE060-7A, Page 23 /66, LAB*la0; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
%LAB*la0, D65, adapted, Y = 0.0 , L* = 0.0 
%100 x LAB*a          %#1000 x (r g b  c m y 0)            %nr.  pos
%z005009 007653 007939 %#1000 0000 0000 0000 1000 1000 0000 %0648 S19 %O1 0
%z009289 -02164 010868 %#1000 1000 0000 0000 0000 1000 0000 %0720 a19 %Y1 1
%z008399 -08361 009599 %#0000 1000 0000 1000 0000 1000 0000 %0072 I01 %L1 2
%z008706 -04625 -01374 %#0000 1000 1000 1000 0000 0000 0000 %0080 I09 %C1 3
%z002939 007977 -10925 %#0000 0000 1000 1000 1000 0000 0000 %0008 A09 %V1 4
%z005662 009566 -06253 %#1000 0000 1000 0000 1000 0000 0000 %0656 S27 %M1 5
%z000000 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0000 A01 %N1 6
%z009550 -00003 000026 %#1000 1000 1000 0000 0000 0000 0000 %0728 a27 %W1 7
%$
005022 007672 007967 %#1000 0000 0000 0000 1000 1000 0000 %0801 j01 %O2 0
009282 -02169 010876 %#1000 1000 0000 0000 0000 1000 0000 %0882 j10 %Y2 1
008388 -08355 009581 %#0000 1000 0000 1000 0000 1000 0000 %0963 j19 %L2 2
008721 -04608 -01383 %#0000 1000 1000 1000 0000 0000 0000 %0737 b09 %C2 3
002932 008022 -10944 %#0000 0000 1000 1000 1000 0000 0000 %0818 b18 %V2 4
005674 009580 -06255 %#1000 0000 1000 0000 1000 0000 0000 %0899 b27 %M2 5
000000 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0809 j09 %N2 6
009555 000001 000024 %#1000 1000 1000 0000 0000 0000 0000 %0729 b01 %W2 7
%$
] def
            } if %xcolor 0, LAB*la0

%*************************************************************************
 
xcolor 1 eq {%xcolor 1, LAB*la1
/FileData (AG78_LECD display 40%_G0) def
/LUT [
%ps2ascii output with Ghostsript-programm: macps2pdf, date: 2010-01-04
%input file: JE060-7A.PS, output file: JE060-7AA.TXT (BBEDIT used for TXT)
%JE060-7AA.TXT la7_line 11451
%JE060-7A, Page 61 /66, LAB*la7; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
%LAB*la7, D65, adapted, Y = 40.32 , L* = 69.69 
006966 000001 000000 0000 0000 0000 1000 1000 1000 0000 %0000 A01
006972 000047 -00132 0000 0000 0125 1000 1000 0875 0000 %0001 A02
006984 000171 -00453 0000 0000 0250 1000 1000 0750 0000 %0002 A03
006999 000310 -00794 0000 0000 0375 1000 1000 0625 0000 %0003 A04
007017 000459 -01167 0000 0000 0500 1000 1000 0500 0000 %0004 A05
007038 000631 -01574 0000 0000 0625 1000 1000 0375 0000 %0005 A06
007062 000825 -02020 0000 0000 0750 1000 1000 0250 0000 %0006 A07
007098 001069 -02571 0000 0000 0875 1000 1000 0125 0000 %0007 A08
007195 001623 -03798 0000 0000 1000 1000 1000 0000 0000 %0008 A09
007019 -00112 000080 0000 0125 0000 1000 0875 1000 0000 %0009 B01
007023 -00065 -00052 0000 0125 0125 1000 0875 0875 0000 %0010 B02
007035 000057 -00366 0000 0125 0250 1000 0875 0750 0000 %0011 B03
007051 000201 -00722 0000 0125 0375 1000 0875 0625 0000 %0012 B04
007069 000346 -01096 0000 0125 0500 1000 0875 0500 0000 %0013 B05
007088 000521 -01498 0000 0125 0625 1000 0875 0375 0000 %0014 B06
007114 000715 -01942 0000 0125 0750 1000 0875 0250 0000 %0015 B07
007148 000954 -02487 0000 0125 0875 1000 0875 0125 0000 %0016 B08
007244 001512 -03716 0000 0125 1000 1000 0875 0000 0000 %0017 B09
007152 -00396 000287 0000 0250 0000 1000 0750 1000 0000 %0018 C01
007156 -00348 000157 0000 0250 0125 1000 0750 0875 0000 %0019 C02
007169 -00226 -00164 0000 0250 0250 1000 0750 0750 0000 %0020 C03
007184 -00089 -00508 0000 0250 0375 1000 0750 0625 0000 %0021 C04
007200 000067 -00890 0000 0250 0500 1000 0750 0500 0000 %0022 C05
007220 000236 -01298 0000 0250 0625 1000 0750 0375 0000 %0023 C06
007245 000425 -01736 0000 0250 0750 1000 0750 0250 0000 %0024 C07
007278 000668 -02290 0000 0250 0875 1000 0750 0125 0000 %0025 C08
007370 001223 -03511 0000 0250 1000 1000 0750 0000 0000 %0026 C09
007316 -00742 000540 0000 0375 0000 1000 0625 1000 0000 %0027 D01
007320 -00689 000410 0000 0375 0125 1000 0625 0875 0000 %0028 D02
007332 -00565 000086 0000 0375 0250 1000 0625 0750 0000 %0029 D03
007345 -00435 -00252 0000 0375 0375 1000 0625 0625 0000 %0030 D04
007363 -00278 -00635 0000 0375 0500 1000 0625 0500 0000 %0031 D05
007381 -00110 -01036 0000 0375 0625 1000 0625 0375 0000 %0032 D06
007405 000079 -01482 0000 0375 0750 1000 0625 0250 0000 %0033 D07
007437 000344 -02024 0000 0375 0875 1000 0625 0125 0000 %0034 D08
007526 000866 -03253 0000 0375 1000 1000 0625 0000 0000 %0035 D09
007511 -01132 000839 0000 0500 0000 1000 0500 1000 0000 %0036 E01
007516 -01083 000711 0000 0500 0125 1000 0500 0875 0000 %0037 E02
007527 -00964 000391 0000 0500 0250 1000 0500 0750 0000 %0038 E03
007539 -00832 000048 0000 0500 0375 1000 0500 0625 0000 %0039 E04
007555 -00677 -00332 0000 0500 0500 1000 0500 0500 0000 %0040 E05
007574 -00514 -00734 0000 0500 0625 1000 0500 0375 0000 %0041 E06
007597 -00317 -01182 0000 0500 0750 1000 0500 0250 0000 %0042 E07
007628 -00086 -01727 0000 0500 0875 1000 0500 0125 0000 %0043 E08
007713 000465 -02956 0000 0500 1000 1000 0500 0000 0000 %0044 E09
007731 -01554 001179 0000 0625 0000 1000 0375 1000 0000 %0045 F01
007735 -01507 001047 0000 0625 0125 1000 0375 0875 0000 %0046 F02
007745 -01391 000727 0000 0625 0250 1000 0375 0750 0000 %0047 F03
007757 -01263 000391 0000 0625 0375 1000 0375 0625 0000 %0048 F04
007772 -01108 000005 0000 0625 0500 1000 0375 0500 0000 %0049 F05
007790 -00945 -00394 0000 0625 0625 1000 0375 0375 0000 %0050 F06
007811 -00756 -00839 0000 0625 0750 1000 0375 0250 0000 %0051 F07
007842 -00520 -01390 0000 0625 0875 1000 0375 0125 0000 %0052 F08
007923 000022 -02618 0000 0625 1000 1000 0375 0000 0000 %0053 F09
008002 -02059 001595 0000 0750 0000 1000 0250 1000 0000 %0054 G01
008007 -02013 001467 0000 0750 0125 1000 0250 0875 0000 %0055 G02
008017 -01897 001148 0000 0750 0250 1000 0250 0750 0000 %0056 G03
008028 -01769 000811 0000 0750 0375 1000 0250 0625 0000 %0057 G04
008043 -01618 000429 0000 0750 0500 1000 0250 0500 0000 %0058 G05
008059 -01459 000027 0000 0750 0625 1000 0250 0375 0000 %0059 G06
008079 -01277 -00417 0000 0750 0750 1000 0250 0250 0000 %0060 G07
008107 -01047 -00965 0000 0750 0875 1000 0250 0125 0000 %0061 G08
008185 -00511 -02196 0000 0750 1000 1000 0250 0000 0000 %0062 G09
008360 -02683 002144 0000 0875 0000 1000 0125 1000 0000 %0063 H01
008363 -02636 002017 0000 0875 0125 1000 0125 0875 0000 %0064 H02
008373 -02527 001701 0000 0875 0250 1000 0125 0750 0000 %0065 H03
008384 -02402 001362 0000 0875 0375 1000 0125 0625 0000 %0066 H04
008397 -02258 000983 0000 0875 0500 1000 0125 0500 0000 %0067 H05
008412 -02100 000581 0000 0875 0625 1000 0125 0375 0000 %0068 H06
008431 -01921 000135 0000 0875 0750 1000 0125 0250 0000 %0069 H07
008457 -01696 -00413 0000 0875 0875 1000 0125 0125 0000 %0070 H08
008529 -01174 -01641 0000 0875 1000 1000 0125 0000 0000 %0071 H09
008949 -03632 003051 0000 1000 0000 1000 0000 1000 0000 %0072 I01
008952 -03593 002921 0000 1000 0125 1000 0000 0875 0000 %0073 I02
008961 -03484 002609 0000 1000 0250 1000 0000 0750 0000 %0074 I03
008971 -03370 002273 0000 1000 0375 1000 0000 0625 0000 %0075 I04
008983 -03229 001894 0000 1000 0500 1000 0000 0500 0000 %0076 I05
008997 -03084 001493 0000 1000 0625 1000 0000 0375 0000 %0077 I06
009013 -02916 001048 0000 1000 0750 1000 0000 0250 0000 %0078 I07
009037 -02700 000503 0000 1000 0875 1000 0000 0125 0000 %0079 I08
009102 -02206 -00720 0000 1000 1000 1000 0000 0000 0000 %0080 I09

006982 000073 000026 0125 0000 0000 0875 1000 1000 0000 %0081 J01
006986 000118 -00101 0125 0000 0125 0875 1000 0875 0000 %0082 J02
007000 000240 -00419 0125 0000 0250 0875 1000 0750 0000 %0083 J03
007014 000372 -00757 0125 0000 0375 0875 1000 0625 0000 %0084 J04
007032 000527 -01137 0125 0000 0500 0875 1000 0500 0000 %0085 J05
007053 000704 -01550 0125 0000 0625 0875 1000 0375 0000 %0086 J06
007077 000884 -01983 0125 0000 0750 0875 1000 0250 0000 %0087 J07
007114 001132 -02542 0125 0000 0875 0875 1000 0125 0000 %0088 J08
007210 001681 -03766 0125 0000 1000 0875 1000 0000 0000 %0089 J09
007033 -00040 000107 0125 0125 0000 0875 0875 1000 0000 %0090 K01
007039 000007 -00024 0125 0125 0125 0875 0875 0875 0000 %0091 K02
007051 000128 -00342 0125 0125 0250 0875 0875 0750 0000 %0092 K03
007065 000263 -00681 0125 0125 0375 0875 0875 0625 0000 %0093 K04
007083 000417 -01062 0125 0125 0500 0875 0875 0500 0000 %0094 K05
007104 000593 -01470 0125 0125 0625 0875 0875 0375 0000 %0095 K06
007128 000770 -01899 0125 0125 0750 0875 0875 0250 0000 %0096 K07
007163 001019 -02466 0125 0125 0875 0875 0875 0125 0000 %0097 K08
007258 001567 -03688 0125 0125 1000 0875 0875 0000 0000 %0098 K09
007166 -00323 000310 0125 0250 0000 0875 0750 1000 0000 %0099 L01
007171 -00780 000024 0125 0250 0125 0875 0750 0875 0000 %0100 L02
007183 -00157 -00136 0125 0250 0250 0875 0750 0750 0000 %0101 L03
007198 -00023 -00476 0125 0250 0375 0875 0750 0625 0000 %0102 L04
007215 000133 -00858 0125 0250 0500 0875 0750 0500 0000 %0103 L05
007235 000301 -01264 0125 0250 0625 0875 0750 0375 0000 %0104 L06
007259 000487 -01711 0125 0250 0750 0875 0750 0250 0000 %0105 L07
007292 000729 -02254 0125 0250 0875 0875 0750 0125 0000 %0106 L08
007384 001283 -03484 0125 0250 1000 0875 0750 0000 0000 %0107 L09
007330 -00669 000561 0125 0375 0000 0875 0625 1000 0000 %0108 M01
007335 -00623 000433 0125 0375 0125 0875 0625 0875 0000 %0109 M02
007347 -00501 000116 0125 0375 0250 0875 0625 0750 0000 %0110 M03
007361 -00365 -00222 0125 0375 0375 0875 0625 0625 0000 %0111 M04
007377 -00211 -00606 0125 0375 0500 0875 0625 0500 0000 %0112 M05
007395 -00043 -01008 0125 0375 0625 0875 0625 0375 0000 %0113 M06
007419 000143 -01455 0125 0375 0750 0875 0625 0250 0000 %0114 M07
007449 000377 -01995 0125 0375 0875 0875 0625 0125 0000 %0115 M08
007540 000934 -03237 0125 0375 1000 0875 0625 0000 0000 %0116 M09
007526 -01061 000863 0125 0500 0000 0875 0500 1000 0000 %0117 N01
007531 -01015 000734 0125 0500 0125 0875 0500 0875 0000 %0118 N02
007541 -00895 000416 0125 0500 0250 0875 0500 0750 0000 %0119 N03
007554 -00764 000077 0125 0500 0375 0875 0500 0625 0000 %0120 N04
007571 -00612 -00302 0125 0500 0500 0875 0500 0500 0000 %0121 N05
007588 -00446 -00702 0125 0500 0625 0875 0500 0375 0000 %0122 N06
007631 -00268 -01180 0125 0500 0750 0875 0500 0250 0000 %0123 N07
007642 -00024 -01699 0125 0500 0875 0875 0500 0125 0000 %0124 N08
007728 000525 -02934 0125 0500 1000 0875 0500 0000 0000 %0125 N09
007745 -01487 001199 0125 0625 0000 0875 0375 1000 0000 %0126 O01
007749 -01439 001073 0125 0625 0125 0875 0375 0875 0000 %0127 O02
007760 -01322 000756 0125 0625 0250 0875 0375 0750 0000 %0128 O03
007773 -01185 000405 0125 0625 0375 0875 0375 0625 0000 %0129 O04
007787 -01043 000036 0125 0625 0500 0875 0375 0500 0000 %0130 O05
007804 -00883 -00364 0125 0625 0625 0875 0375 0375 0000 %0131 O06
007827 -00695 -00814 0125 0625 0750 0875 0375 0250 0000 %0132 O07
007856 -00463 -01360 0125 0625 0875 0875 0375 0125 0000 %0133 O08
007938 000079 -02595 0125 0625 1000 0875 0375 0000 0000 %0134 O09
008018 -01994 001620 0125 0750 0000 0875 0250 1000 0000 %0135 P01
008021 -01945 001491 0125 0750 0125 0875 0250 0875 0000 %0136 P02
008031 -01830 001174 0125 0750 0250 0875 0250 0750 0000 %0137 P03
008043 -01707 000837 0125 0750 0375 0875 0250 0625 0000 %0138 P04
008058 -01556 000457 0125 0750 0500 0875 0250 0500 0000 %0139 P05
008074 -01399 000055 0125 0750 0625 0875 0250 0375 0000 %0140 P06
008094 -01215 -00392 0125 0750 0750 0875 0250 0250 0000 %0141 P07
008122 -00988 -00940 0125 0750 0875 0875 0250 0125 0000 %0142 P08
008199 -00455 -02169 0125 0750 1000 0875 0250 0000 0000 %0143 P09
008374 -02619 002165 0125 0875 0000 0875 0125 1000 0000 %0144 Q01
008378 -02570 002040 0125 0875 0125 0875 0125 0875 0000 %0145 Q02
008386 -02462 001724 0125 0875 0250 0875 0125 0750 0000 %0146 Q03
008397 -02339 001387 0125 0875 0375 0875 0125 0625 0000 %0147 Q04
008411 -02198 001008 0125 0875 0500 0875 0125 0500 0000 %0148 Q05
008426 -02041 000607 0125 0875 0625 0875 0125 0375 0000 %0149 Q06
008445 -01861 000161 0125 0875 0750 0875 0125 0250 0000 %0150 Q07
008471 -01636 -00387 0125 0875 0875 0875 0125 0125 0000 %0151 Q08
008543 -01121 -01619 0125 0875 1000 0875 0125 0000 0000 %0152 Q09
008958 -03567 003064 0125 1000 0000 0875 0000 1000 0000 %0153 R01
008962 -03524 002938 0125 1000 0125 0875 0000 0875 0000 %0154 R02
008970 -03417 002624 0125 1000 0250 0875 0000 0750 0000 %0155 R03
009738 -04331 003061 0125 1000 0375 0875 0000 0625 0000 %0156 R04
008991 -03168 001909 0125 1000 0500 0875 0000 0500 0000 %0157 R05
009005 -03020 001510 0125 1000 0625 0875 0000 0375 0000 %0158 R06
009022 -02851 001064 0125 1000 0750 0875 0000 0250 0000 %0159 R07
009046 -02640 000518 0125 1000 0875 0875 0000 0125 0000 %0160 R08
009110 -02142 -00707 0125 1000 1000 0875 0000 0000 0000 %0161 R09

007022 000238 000093 0250 0000 0000 0750 1000 1000 0000 %0162 S01
007028 000290 -00039 0250 0000 0125 0750 1000 0875 0000 %0163 S02
007040 000410 -00352 0250 0000 0250 0750 1000 0750 0000 %0164 S03
007055 000542 -00693 0250 0000 0375 0750 1000 0625 0000 %0165 S04
007072 000693 -01069 0250 0000 0500 0750 1000 0500 0000 %0166 S05
007092 000854 -01468 0250 0000 0625 0750 1000 0375 0000 %0167 S06
007118 001048 -01926 0250 0000 0750 0750 1000 0250 0000 %0168 S07
007153 001282 -02473 0250 0000 0875 0750 1000 0125 0000 %0169 S08
007248 001824 -03702 0250 0000 1000 0750 1000 0000 0000 %0170 S09
007073 000133 000171 0250 0125 0000 0750 0875 1000 0000 %0171 T01
007079 000179 000043 0250 0125 0125 0750 0875 0875 0000 %0172 T02
007091 000296 -00274 0250 0125 0250 0750 0875 0750 0000 %0173 T03
007106 000433 -00617 0250 0125 0375 0750 0875 0625 0000 %0174 T04
007123 000585 -01000 0250 0125 0500 0750 0875 0500 0000 %0175 T05
007143 000744 -01395 0250 0125 0625 0750 0875 0375 0000 %0176 T06
007167 000930 -01835 0250 0125 0750 0750 0875 0250 0000 %0177 T07
007202 001174 -02401 0250 0125 0875 0750 0875 0125 0000 %0178 T08
007296 001712 -03624 0250 0125 1000 0750 0875 0000 0000 %0179 T09
007205 -00154 000377 0250 0250 0000 0750 0750 1000 0000 %0180 U01
007210 -00106 000245 0250 0250 0125 0750 0750 0875 0000 %0181 U02
007222 000011 -00071 0250 0250 0250 0750 0750 0750 0000 %0182 U03
007236 000144 -00411 0250 0250 0375 0750 0750 0625 0000 %0183 U04
007253 000295 -00793 0250 0250 0500 0750 0750 0500 0000 %0184 U05
007273 000459 -01195 0250 0250 0625 0750 0750 0375 0000 %0185 U06
007296 000643 -01637 0250 0250 0750 0750 0750 0250 0000 %0186 U07
007331 000881 -02188 0250 0250 0875 0750 0750 0125 0000 %0187 U08
007422 001423 -03420 0250 0250 1000 0750 0750 0000 0000 %0188 U09
007368 000211 000751 0250 0375 0000 0750 0625 1000 0000 %0189 V01
007373 -00449 000496 0250 0375 0125 0750 0625 0875 0000 %0190 V02
007384 -00327 000177 0250 0375 0250 0750 0625 0750 0000 %0191 V03
007398 -00199 -00162 0250 0375 0375 0750 0625 0625 0000 %0192 V04
007414 -00048 -00544 0250 0375 0500 0750 0625 0500 0000 %0193 V05
007433 000115 -00944 0250 0375 0625 0750 0625 0375 0000 %0194 V06
007456 000299 -01392 0250 0375 0750 0750 0625 0250 0000 %0195 V07
007489 000533 -01940 0250 0375 0875 0750 0625 0125 0000 %0196 V08
007577 001076 -03170 0250 0375 1000 0750 0625 0000 0000 %0197 V09
007562 -00891 000925 0250 0500 0000 0750 0500 1000 0000 %0198 W01
007567 -00845 000797 0250 0500 0125 0750 0500 0875 0000 %0199 W02
007578 -00727 000478 0250 0500 0250 0750 0500 0750 0000 %0200 W03
007591 -00598 000140 0250 0500 0375 0750 0500 0625 0000 %0201 W04
007607 -00452 -00241 0250 0500 0500 0750 0500 0500 0000 %0202 W05
007625 -00286 -00643 0250 0500 0625 0750 0500 0375 0000 %0203 W06
007647 -00105 -01091 0250 0500 0750 0750 0500 0250 0000 %0204 W07
007678 000129 -01639 0250 0500 0875 0750 0500 0125 0000 %0205 W08
007846 000722 -03095 0250 0500 1000 0750 0500 0000 0000 %0206 W09
007780 -01324 001260 0250 0625 0000 0750 0375 1000 0000 %0207 X01
007785 -01271 001130 0250 0625 0125 0750 0375 0875 0000 %0208 X02
007796 -01156 000814 0250 0625 0250 0750 0375 0750 0000 %0209 X03
007808 -01031 000476 0250 0625 0375 0750 0375 0625 0000 %0210 X04
007823 -00882 000091 0250 0625 0500 0750 0375 0500 0000 %0211 X05
007841 -00722 -00308 0250 0625 0625 0750 0375 0375 0000 %0212 X06
007861 -00544 -00755 0250 0625 0750 0750 0375 0250 0000 %0213 X07
007891 -00311 -01304 0250 0625 0875 0750 0375 0125 0000 %0214 X08
007972 000219 -02533 0250 0625 1000 0750 0375 0000 0000 %0215 X09
008051 -01827 001674 0250 0750 0000 0750 0250 1000 0000 %0216 Y01
008055 -01782 001546 0250 0750 0125 0750 0250 0875 0000 %0217 Y02
008066 -01666 001232 0250 0750 0250 0750 0250 0750 0000 %0218 Y03
008076 -01541 000891 0250 0750 0375 0750 0250 0625 0000 %0219 Y04
008090 -01398 000510 0250 0750 0500 0750 0250 0500 0000 %0220 Y05
008107 -01240 000111 0250 0750 0625 0750 0250 0375 0000 %0221 Y06
008126 -01062 -00334 0250 0750 0750 0750 0250 0250 0000 %0222 Y07
008155 -00840 -00885 0250 0750 0875 0750 0250 0125 0000 %0223 Y08
008232 -00313 -02117 0250 0750 1000 0750 0250 0000 0000 %0224 Y09
008405 -02452 002218 0250 0875 0000 0750 0125 1000 0000 %0225 Z01
008409 -02409 002090 0250 0875 0125 0750 0125 0875 0000 %0226 Z02
008417 -02300 001774 0250 0875 0250 0750 0125 0750 0000 %0227 Z03
008428 -02179 001438 0250 0875 0375 0750 0125 0625 0000 %0228 Z04
008442 -02035 001060 0250 0875 0500 0750 0125 0500 0000 %0229 Z05
008456 -01889 000658 0250 0875 0625 0750 0125 0375 0000 %0230 Z06
008475 -01708 000210 0250 0875 0750 0750 0125 0250 0000 %0231 Z07
008501 -01495 -00333 0250 0875 0875 0750 0125 0125 0000 %0232 Z08
008574 -00981 -01567 0250 0875 1000 0750 0125 0000 0000 %0233 Z09
008983 -03406 003106 0250 1000 0000 0750 0000 1000 0000 %0234 a01
008987 -03365 002981 0250 1000 0125 0750 0000 0875 0000 %0235 a02
008996 -03262 002667 0250 1000 0250 0750 0000 0750 0000 %0236 a03
009005 -03148 002331 0250 1000 0375 0750 0000 0625 0000 %0237 a04
009016 -03010 001954 0250 1000 0500 0750 0000 0500 0000 %0238 a05
009030 -02868 001552 0250 1000 0625 0750 0000 0375 0000 %0239 a06
009048 -02700 001107 0250 1000 0750 0750 0000 0250 0000 %0240 a07
009071 -02493 000559 0250 1000 0875 0750 0000 0125 0000 %0241 a08
009136 -02000 -00665 0250 1000 1000 0750 0000 0000 0000 %0242 a09

%JE060-7A, Page 62 /66, LAB*la7; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
007072 000453 000175 0375 0000 0000 0625 1000 1000 0000 %0243 A10
007077 000502 000047 0375 0000 0125 0625 1000 0875 0000 %0244 A11
007091 000619 -00268 0375 0000 0250 0625 1000 0750 0000 %0245 A12
007105 000749 -00605 0375 0000 0375 0625 1000 0625 0000 %0246 A13
007122 000895 -00984 0375 0000 0500 0625 1000 0500 0000 %0247 A14
007142 001050 -01376 0375 0000 0625 0625 1000 0375 0000 %0248 A15
007167 001240 -01831 0375 0000 0750 0625 1000 0250 0000 %0249 A16
007201 001468 -02378 0375 0000 0875 0625 1000 0125 0000 %0250 A17
007296 001999 -03614 0375 0000 1000 0625 1000 0000 0000 %0251 A18
007122 000343 000254 0375 0125 0000 0625 0875 1000 0000 %0252 B10
007128 000391 000124 0375 0125 0125 0625 0875 0875 0000 %0253 B11
007141 000510 -00192 0375 0125 0250 0625 0875 0750 0000 %0254 B12
007155 000636 -00528 0375 0125 0375 0625 0875 0625 0000 %0255 B13
007173 000785 -00910 0375 0125 0500 0625 0875 0500 0000 %0256 B14
007192 000947 -01311 0375 0125 0625 0625 0875 0375 0000 %0257 B15
007238 001208 -01874 0375 0125 0750 0625 0875 0250 0000 %0258 B16
007251 001355 -02305 0375 0125 0875 0625 0875 0125 0000 %0259 B17
007345 001891 -03541 0375 0125 1000 0625 0875 0000 0000 %0260 B18
007253 000060 000455 0375 0250 0000 0625 0750 1000 0000 %0261 C10
007258 000107 000326 0375 0250 0125 0625 0750 0875 0000 %0262 C11
007271 000223 000008 0375 0250 0250 0625 0750 0750 0000 %0263 C12
007286 000354 -00333 0375 0250 0375 0625 0750 0625 0000 %0264 C13
007301 000502 -00712 0375 0250 0500 0625 0750 0500 0000 %0265 C14
007321 000658 -01112 0375 0250 0625 0625 0750 0375 0000 %0266 C15
007345 000845 -01561 0375 0250 0750 0625 0750 0250 0000 %0267 C16
007378 001072 -02109 0375 0250 0875 0625 0750 0125 0000 %0268 C17
007470 001607 -03345 0375 0250 1000 0625 0750 0000 0000 %0269 C18
007415 -00286 000703 0375 0375 0000 0625 0625 1000 0000 %0270 D10
007420 -00231 000573 0375 0375 0125 0625 0625 0875 0000 %0271 D11
007431 -00119 000256 0375 0375 0250 0625 0625 0750 0000 %0272 D12
007444 000003 -00081 0375 0375 0375 0625 0625 0625 0000 %0273 D13
007462 000156 -00466 0375 0375 0500 0625 0625 0500 0000 %0274 D14
007481 000317 -00868 0375 0375 0625 0625 0625 0375 0000 %0275 D15
007503 000496 -01315 0375 0375 0750 0625 0625 0250 0000 %0276 D16
007535 000724 -01864 0375 0375 0875 0625 0625 0125 0000 %0277 D17
007623 001250 -03092 0375 0375 1000 0625 0625 0000 0000 %0278 D18
007607 -00679 000998 0375 0500 0000 0625 0500 1000 0000 %0279 E10
007612 -00631 000869 0375 0500 0125 0625 0500 0875 0000 %0280 E11
007624 -00518 000552 0375 0500 0250 0625 0500 0750 0000 %0281 E12
007637 -00148 000301 0375 0500 0375 0625 0500 0625 0000 %0282 E13
007652 -00245 -00168 0375 0500 0500 0625 0500 0500 0000 %0283 E14
007670 -00089 -00568 0375 0500 0625 0625 0500 0375 0000 %0284 E15
007693 000095 -01019 0375 0500 0750 0625 0500 0250 0000 %0285 E16
007723 000316 -01568 0375 0500 0875 0625 0500 0125 0000 %0286 E17
007807 000843 -02797 0375 0500 1000 0625 0500 0000 0000 %0287 E18
007823 -01109 001327 0375 0625 0000 0625 0375 1000 0000 %0288 F10
007828 -01061 001201 0375 0625 0125 0625 0375 0875 0000 %0289 F11
007839 -00948 000884 0375 0625 0250 0625 0375 0750 0000 %0290 F12
007852 -00823 000548 0375 0625 0375 0625 0375 0625 0000 %0291 F13
007866 -00677 000164 0375 0625 0500 0625 0375 0500 0000 %0292 F14
007883 -00527 -00235 0375 0625 0625 0625 0375 0375 0000 %0293 F15
007904 -00345 -00683 0375 0625 0750 0625 0375 0250 0000 %0294 F16
007934 -00122 -01232 0375 0625 0875 0625 0375 0125 0000 %0295 F17
008014 000403 -02466 0375 0625 1000 0625 0375 0000 0000 %0296 F18
008091 -01617 001739 0375 0750 0000 0625 0250 1000 0000 %0297 G10
008096 -01574 001612 0375 0750 0125 0625 0250 0875 0000 %0298 G11
008106 -01461 001297 0375 0750 0250 0625 0250 0750 0000 %0299 G12
008118 -01338 000958 0375 0750 0375 0625 0250 0625 0000 %0300 G13
008132 -01196 000578 0375 0750 0500 0625 0250 0500 0000 %0301 G14
008147 -01044 000178 0375 0750 0625 0625 0250 0375 0000 %0302 G15
008168 -00865 -00268 0375 0750 0750 0625 0250 0250 0000 %0303 G16
008196 -00644 -00819 0375 0750 0875 0625 0250 0125 0000 %0304 G17
008272 -00132 -02050 0375 0750 1000 0625 0250 0000 0000 %0305 G18
008442 -02250 002278 0375 0875 0000 0625 0125 1000 0000 %0306 H10
008447 -02204 002152 0375 0875 0125 0625 0125 0875 0000 %0307 H11
008456 -02093 001837 0375 0875 0250 0625 0125 0750 0000 %0308 H12
008466 -01976 001499 0375 0875 0375 0625 0125 0625 0000 %0309 H13
008480 -01841 001121 0375 0875 0500 0625 0125 0500 0000 %0310 H14
008495 -01690 000720 0375 0875 0625 0625 0125 0375 0000 %0311 H15
008513 -01521 000274 0375 0875 0750 0625 0125 0250 0000 %0312 H16
008540 -01306 -00274 0375 0875 0875 0625 0125 0125 0000 %0313 H17
008611 -00799 -01506 0375 0875 1000 0625 0125 0000 0000 %0314 H18
009016 -03214 003158 0375 1000 0000 0625 0000 1000 0000 %0315 I10
009019 -03168 003031 0375 1000 0125 0625 0000 0875 0000 %0316 I11
009028 -03063 002720 0375 1000 0250 0625 0000 0750 0000 %0317 I12
009038 -02951 002386 0375 1000 0375 0625 0000 0625 0000 %0318 I13
009050 -02818 002006 0375 1000 0500 0625 0000 0500 0000 %0319 I14
009064 -02678 001606 0375 1000 0625 0625 0000 0375 0000 %0320 I15
009081 -02513 001161 0375 1000 0750 0625 0000 0250 0000 %0321 I16
009104 -02308 000614 0375 1000 0875 0625 0000 0125 0000 %0322 I17
009169 -01829 -00612 0375 1000 1000 0625 0000 0000 0000 %0323 I18

007138 000727 000283 0500 0000 0000 0500 1000 1000 0000 %0324 J10
007144 000781 000156 0500 0000 0125 0500 1000 0875 0000 %0325 J11
007156 000880 -00157 0500 0000 0250 0500 1000 0750 0000 %0326 J12
007171 001019 -00501 0500 0000 0375 0500 1000 0625 0000 %0327 J13
007188 001162 -00881 0500 0000 0500 0500 1000 0500 0000 %0328 J14
007206 001303 -01266 0500 0000 0625 0500 1000 0375 0000 %0329 J15
007232 001488 -01723 0500 0000 0750 0500 1000 0250 0000 %0330 J16
007266 001685 -02252 0500 0000 0875 0500 1000 0125 0000 %0331 J17
007361 002223 -03504 0500 0000 1000 0500 1000 0000 0000 %0332 J18
007187 000612 000361 0500 0125 0000 0500 0875 1000 0000 %0333 K10
007192 000665 000231 0500 0125 0125 0500 0875 0875 0000 %0334 K11
007205 000778 -00085 0500 0125 0250 0500 0875 0750 0000 %0335 K12
007220 000901 -00421 0500 0125 0375 0500 0875 0625 0000 %0336 K13
007237 001045 -00804 0500 0125 0500 0500 0875 0500 0000 %0337 K14
007256 001197 -01199 0500 0125 0625 0500 0875 0375 0000 %0338 K15
007280 001372 -01647 0500 0125 0750 0500 0875 0250 0000 %0339 K16
007315 001599 -02202 0500 0125 0875 0500 0875 0125 0000 %0340 K17
007408 002119 -03435 0500 0125 1000 0500 0875 0000 0000 %0341 K18
007316 000330 000558 0500 0250 0000 0500 0750 1000 0000 %0342 L10
007322 000381 000430 0500 0250 0125 0500 0750 0875 0000 %0343 L11
007334 000490 000113 0500 0250 0250 0500 0750 0750 0000 %0344 L12
007348 000616 -00226 0500 0250 0375 0500 0750 0625 0000 %0345 L13
007365 000760 -00609 0500 0250 0500 0500 0750 0500 0000 %0346 L14
007384 000912 -01009 0500 0250 0625 0500 0750 0375 0000 %0347 L15
007408 001091 -01457 0500 0250 0750 0500 0750 0250 0000 %0348 L16
007440 001313 -02006 0500 0250 0875 0500 0750 0125 0000 %0349 L17
007531 001830 -03238 0500 0250 1000 0500 0750 0000 0000 %0350 L18
007475 -00015 000802 0500 0375 0000 0500 0625 1000 0000 %0351 M10
007481 000036 000673 0500 0375 0125 0500 0625 0875 0000 %0352 M11
007493 000146 000357 0500 0375 0250 0500 0625 0750 0000 %0353 M12
007506 000272 000017 0500 0375 0375 0500 0625 0625 0000 %0354 M13
007523 000417 -00362 0500 0375 0500 0500 0625 0500 0000 %0355 M14
007540 000572 -00765 0500 0375 0625 0500 0625 0375 0000 %0356 M15
007563 000746 -01216 0500 0375 0750 0500 0625 0250 0000 %0357 M16
007595 000964 -01757 0500 0375 0875 0500 0625 0125 0000 %0358 M17
007682 001479 -02990 0500 0375 1000 0500 0625 0000 0000 %0359 M18
007666 -00410 001094 0500 0500 0000 0500 0500 1000 0000 %0360 N10
007670 -00360 000964 0500 0500 0125 0500 0500 0875 0000 %0361 N11
007682 -00250 000649 0500 0500 0250 0500 0500 0750 0000 %0362 N12
007695 -00126 000309 0500 0500 0375 0500 0500 0625 0000 %0363 N13
007711 000016 -00069 0500 0500 0500 0500 0500 0500 0000 %0364 N14
007728 000168 -00473 0500 0500 0625 0500 0500 0375 0000 %0365 N15
007750 000341 -00919 0500 0500 0750 0500 0500 0250 0000 %0366 N16
007780 000563 -01470 0500 0500 0875 0500 0500 0125 0000 %0367 N17
007865 001075 -02704 0500 0500 1000 0500 0500 0000 0000 %0368 N18
007880 -00840 001421 0500 0625 0000 0500 0375 1000 0000 %0369 O10
007883 -00793 001291 0500 0625 0125 0500 0375 0875 0000 %0370 O11
007894 -00682 000976 0500 0625 0250 0500 0375 0750 0000 %0371 O12
007907 -00560 000638 0500 0625 0375 0500 0375 0625 0000 %0372 O13
007922 -00421 000258 0500 0625 0500 0500 0375 0500 0000 %0373 O14
007938 -00267 -00144 0500 0625 0625 0500 0375 0375 0000 %0374 O15
007959 -00093 -00592 0500 0625 0750 0500 0375 0250 0000 %0375 O16
007988 000121 -01143 0500 0625 0875 0500 0375 0125 0000 %0376 O17
008068 000632 -02374 0500 0625 1000 0500 0375 0000 0000 %0377 O18
008143 -01352 001823 0500 0750 0000 0500 0250 1000 0000 %0378 P10
008148 -01304 001698 0500 0750 0125 0500 0250 0875 0000 %0379 P11
008159 -01197 001385 0500 0750 0250 0500 0250 0750 0000 %0380 P12
008170 -01078 001046 0500 0750 0375 0500 0250 0625 0000 %0381 P13
008183 -00937 000666 0500 0750 0500 0500 0250 0500 0000 %0382 P14
008200 -00791 000264 0500 0750 0625 0500 0250 0375 0000 %0383 P15
008219 -00620 -00183 0500 0750 0750 0500 0250 0250 0000 %0384 P16
008247 -00404 -00731 0500 0750 0875 0500 0250 0125 0000 %0385 P17
008323 000095 -01965 0500 0750 1000 0500 0250 0000 0000 %0386 P18
008490 -01989 002354 0500 0875 0000 0500 0125 1000 0000 %0387 Q10
008494 -01944 002230 0500 0875 0125 0500 0125 0875 0000 %0388 Q11
008504 -01836 001916 0500 0875 0250 0500 0125 0750 0000 %0389 Q12
008514 -01719 001581 0500 0875 0375 0500 0125 0625 0000 %0390 Q13
008527 -01583 001201 0500 0875 0500 0500 0125 0500 0000 %0391 Q14
008542 -01440 000802 0500 0875 0625 0500 0125 0375 0000 %0392 Q15
008561 -01275 000355 0500 0875 0750 0500 0125 0250 0000 %0393 Q16
008586 -01063 -00192 0500 0875 0875 0500 0125 0125 0000 %0394 Q17
008658 -00569 -01429 0500 0875 1000 0500 0125 0000 0000 %0395 Q18
009057 -02955 003224 0500 1000 0000 0500 0000 1000 0000 %0396 R10
009062 -02915 003100 0500 1000 0125 0500 0000 0875 0000 %0397 R11
009070 -02812 002789 0500 1000 0250 0500 0000 0750 0000 %0398 R12
009079 -02699 002455 0500 1000 0375 0500 0000 0625 0000 %0399 R13
009091 -02572 002074 0500 1000 0500 0500 0000 0500 0000 %0400 R14
009105 -02433 001677 0500 1000 0625 0500 0000 0375 0000 %0401 R15
009121 -02277 001231 0500 1000 0750 0500 0000 0250 0000 %0402 R16
009144 -02072 000684 0500 1000 0875 0500 0000 0125 0000 %0403 R17
009209 -01599 -00542 0500 1000 1000 0500 0000 0000 0000 %0404 R18

007216 001041 000414 0625 0000 0000 0375 1000 1000 0000 %0405 S10
007221 001083 000287 0625 0000 0125 0375 1000 0875 0000 %0406 S11
007235 001198 -00027 0625 0000 0250 0375 1000 0750 0000 %0407 S12
007249 001317 -00362 0625 0000 0375 0375 1000 0625 0000 %0408 S13
007266 001454 -00741 0625 0000 0500 0375 1000 0500 0000 %0409 S14
007286 001607 -01142 0625 0000 0625 0375 1000 0375 0000 %0410 S15
007309 001768 -01582 0625 0000 0750 0375 1000 0250 0000 %0411 S16
007343 001988 -02138 0625 0000 0875 0375 1000 0125 0000 %0412 S17
007436 002493 -03385 0625 0000 1000 0375 1000 0000 0000 %0413 S18
007264 000928 000487 0625 0125 0000 0375 0875 1000 0000 %0414 T10
007270 000978 000361 0625 0125 0125 0375 0875 0875 0000 %0415 T11
007283 001092 000045 0625 0125 0250 0375 0875 0750 0000 %0416 T12
007296 001204 -00290 0625 0125 0375 0375 0875 0625 0000 %0417 T13
007314 001345 -00671 0625 0125 0500 0375 0875 0500 0000 %0418 T14
007334 001503 -01076 0625 0125 0625 0375 0875 0375 0000 %0419 T15
007357 001665 -01518 0625 0125 0750 0375 0875 0250 0000 %0420 T16
007390 001882 -02072 0625 0125 0875 0375 0875 0125 0000 %0421 T17
007483 002387 -03317 0625 0125 1000 0375 0875 0000 0000 %0422 T18
007389 000648 000680 0625 0250 0000 0375 0750 1000 0000 %0423 U10
007395 000695 000555 0625 0250 0125 0375 0750 0875 0000 %0424 U11
007408 000799 000240 0625 0250 0250 0375 0750 0750 0000 %0425 U12
007422 000924 -00098 0625 0250 0375 0375 0750 0625 0000 %0426 U13
007438 001065 -00479 0625 0250 0500 0375 0750 0500 0000 %0427 U14
007457 001211 -00881 0625 0250 0625 0375 0750 0375 0000 %0428 U15
007481 001381 -01328 0625 0250 0750 0375 0750 0250 0000 %0429 U16
007513 001596 -01881 0625 0250 0875 0375 0750 0125 0000 %0430 U17
007602 002094 -03113 0625 0250 1000 0375 0750 0000 0000 %0431 U18
007545 000305 000919 0625 0375 0000 0375 0625 1000 0000 %0432 V10
007551 000356 000792 0625 0375 0125 0375 0625 0875 0000 %0433 V11
007563 000466 000478 0625 0375 0250 0375 0625 0750 0000 %0434 V12
007577 000580 000141 0625 0375 0375 0375 0625 0625 0000 %0435 V13
007592 000721 -00242 0625 0375 0500 0375 0625 0500 0000 %0436 V14
007610 000868 -00643 0625 0375 0625 0375 0625 0375 0000 %0437 V15
007634 001040 -01093 0625 0375 0750 0375 0625 0250 0000 %0438 V16
007664 001250 -01640 0625 0375 0875 0375 0625 0125 0000 %0439 V17
007751 001751 -02877 0625 0375 1000 0375 0625 0000 0000 %0440 V18
007733 -00089 001206 0625 0500 0000 0375 0500 1000 0000 %0441 W10
007737 -00039 001078 0625 0500 0125 0375 0500 0875 0000 %0442 W11
007749 000066 000763 0625 0500 0250 0375 0500 0750 0000 %0443 W12
007761 000188 000426 0625 0500 0375 0375 0500 0625 0000 %0444 W13
007777 000321 000045 0625 0500 0500 0375 0500 0500 0000 %0445 W14
007795 000470 -00354 0625 0500 0625 0375 0500 0375 0000 %0446 W15
007816 000633 -00803 0625 0500 0750 0375 0500 0250 0000 %0447 W16
007846 000848 -01354 0625 0500 0875 0375 0500 0125 0000 %0448 W17
007929 001346 -02589 0625 0500 1000 0375 0500 0000 0000 %0449 W18
007942 -00523 001524 0625 0625 0000 0375 0375 1000 0000 %0450 X10
007947 -00478 001399 0625 0625 0125 0375 0375 0875 0000 %0451 X11
007958 -00365 001086 0625 0625 0250 0375 0375 0750 0000 %0452 X12
007970 -00247 000747 0625 0625 0375 0375 0375 0625 0000 %0453 X13
007985 -00113 000368 0625 0625 0500 0375 0375 0500 0000 %0454 X14
008001 000034 -00032 0625 0625 0625 0375 0375 0375 0000 %0455 X15
008022 000200 -00481 0625 0625 0750 0375 0375 0250 0000 %0456 X16
008051 000412 -01031 0625 0625 0875 0375 0375 0125 0000 %0457 X17
008130 000906 -02270 0625 0625 1000 0375 0375 0000 0000 %0458 X18
008203 -01033 001923 0625 0750 0000 0375 0250 1000 0000 %0459 Y10
008208 -00991 001800 0625 0750 0125 0375 0250 0875 0000 %0460 Y11
008219 -00882 001487 0625 0750 0250 0375 0250 0750 0000 %0461 Y12
008230 -00771 001150 0625 0750 0375 0375 0250 0625 0000 %0462 Y13
008243 -00634 000771 0625 0750 0500 0375 0250 0500 0000 %0463 Y14
008260 -00493 000369 0625 0750 0625 0375 0250 0375 0000 %0464 Y15
008279 -00326 -00075 0625 0750 0750 0375 0250 0250 0000 %0465 Y16
008307 -00116 -00628 0625 0750 0875 0375 0250 0125 0000 %0466 Y17
008382 000369 -01861 0625 0750 1000 0375 0250 0000 0000 %0467 Y18
008546 -01677 002448 0625 0875 0000 0375 0125 1000 0000 %0468 Z10
008550 -01631 002324 0625 0875 0125 0375 0125 0875 0000 %0469 Z11
008560 -01527 002011 0625 0875 0250 0375 0125 0750 0000 %0470 Z12
008571 -01415 001677 0625 0875 0375 0375 0125 0625 0000 %0471 Z13
008584 -01278 001295 0625 0875 0500 0375 0125 0500 0000 %0472 Z14
008599 -01143 000900 0625 0875 0625 0375 0125 0375 0000 %0473 Z15
008618 -00982 000455 0625 0875 0750 0375 0125 0250 0000 %0474 Z16
008643 -00778 -00096 0625 0875 0875 0375 0125 0125 0000 %0475 Z17
008714 -00301 -01332 0625 0875 1000 0375 0125 0000 0000 %0476 Z18
009108 -02656 003307 0625 1000 0000 0375 0000 1000 0000 %0477 a10
009111 -02612 003183 0625 1000 0125 0375 0000 0875 0000 %0478 a11
009120 -02512 002872 0625 1000 0250 0375 0000 0750 0000 %0479 a12
009130 -02406 002541 0625 1000 0375 0375 0000 0625 0000 %0480 a13
009141 -02283 002162 0625 1000 0500 0375 0000 0500 0000 %0481 a14
009155 -02146 001764 0625 1000 0625 0375 0000 0375 0000 %0482 a15
009171 -01992 001317 0625 1000 0750 0375 0000 0250 0000 %0483 a16
009194 -01794 000768 0625 1000 0875 0375 0000 0125 0000 %0484 a17
009258 -01335 -00459 0625 1000 1000 0375 0000 0000 0000 %0485 a18

%JE060-7A, Page 63 /66, LAB*la7; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
007315 001431 000579 0750 0000 0000 0250 1000 1000 0000 %0486 A19
007322 001482 000456 0750 0000 0125 0250 1000 0875 0000 %0487 A20
007335 001585 000141 0750 0000 0250 0250 1000 0750 0000 %0488 A21
007348 001696 -00191 0750 0000 0375 0250 1000 0625 0000 %0489 A22
007365 001828 -00572 0750 0000 0500 0250 1000 0500 0000 %0490 A23
007384 001968 -00971 0750 0000 0625 0250 1000 0375 0000 %0491 A24
007407 002131 -01419 0750 0000 0750 0250 1000 0250 0000 %0492 A25
007440 002334 -01970 0750 0000 0875 0250 1000 0125 0000 %0493 A26
007532 002812 -03216 0750 0000 1000 0250 1000 0000 0000 %0494 A27
007363 001323 000652 0750 0125 0000 0250 0875 1000 0000 %0495 B19
007369 001371 000527 0750 0125 0125 0250 0875 0875 0000 %0496 B20
007381 001471 000214 0750 0125 0250 0250 0875 0750 0000 %0497 B21
007394 001660 -00096 0750 0125 0375 0250 0875 0625 0000 %0498 B22
007410 001718 -00505 0750 0125 0500 0250 0875 0500 0000 %0499 B23
007430 001864 -00906 0750 0125 0625 0250 0875 0375 0000 %0500 B24
007453 002026 -01355 0750 0125 0750 0250 0875 0250 0000 %0501 B25
007487 002229 -01904 0750 0125 0875 0250 0875 0125 0000 %0502 B26
007577 002708 -03150 0750 0125 1000 0250 0875 0000 0000 %0503 B27
007486 001044 000839 0750 0250 0000 0250 0750 1000 0000 %0504 C19
007492 001088 000714 0750 0250 0125 0250 0750 0875 0000 %0505 C20
007504 001191 000399 0750 0250 0250 0250 0750 0750 0000 %0506 C21
007517 001309 000061 0750 0250 0375 0250 0750 0625 0000 %0507 C22
007534 001438 -00316 0750 0250 0500 0250 0750 0500 0000 %0508 C23
007551 001578 -00720 0750 0250 0625 0250 0750 0375 0000 %0509 C24
007575 001744 -01167 0750 0250 0750 0250 0750 0250 0000 %0510 C25
007606 001947 -01719 0750 0250 0875 0250 0750 0125 0000 %0511 C26
007694 002429 -02960 0750 0250 1000 0250 0750 0000 0000 %0512 C27
007638 000702 001072 0750 0375 0000 0250 0625 1000 0000 %0513 D19
007643 000747 000946 0750 0375 0125 0250 0625 0875 0000 %0514 D20
007655 000851 000631 0750 0375 0250 0250 0625 0750 0000 %0515 D21
007668 000965 000298 0750 0375 0375 0250 0625 0625 0000 %0516 D22
007684 001096 -00085 0750 0375 0500 0250 0625 0500 0000 %0517 D23
007702 001240 -00487 0750 0375 0625 0250 0625 0375 0000 %0518 D24
007724 001405 -00935 0750 0375 0750 0250 0625 0250 0000 %0519 D25
007754 001608 -01487 0750 0375 0875 0250 0625 0125 0000 %0520 D26
007840 002085 -02727 0750 0375 1000 0250 0625 0000 0000 %0521 D27
007820 000309 001349 0750 0500 0000 0250 0500 1000 0000 %0522 E19
007826 000352 001224 0750 0500 0125 0250 0500 0875 0000 %0523 E20
007837 000455 000914 0750 0500 0250 0250 0500 0750 0000 %0524 E21
007850 000568 000575 0750 0500 0375 0250 0500 0625 0000 %0525 E22
007865 000702 000194 0750 0500 0500 0250 0500 0500 0000 %0526 E23
007882 000840 -00205 0750 0500 0625 0250 0500 0375 0000 %0527 E24
007903 001001 -00655 0750 0500 0750 0250 0500 0250 0000 %0528 E25
007933 001207 -01207 0750 0500 0875 0250 0500 0125 0000 %0529 E26
008015 001678 -02445 0750 0500 1000 0250 0500 0000 0000 %0530 E27
008026 -00123 001665 0750 0625 0000 0250 0375 1000 0000 %0531 F19
008032 -00079 001541 0750 0625 0125 0250 0375 0875 0000 %0532 F20
008043 000024 001227 0750 0625 0250 0250 0375 0750 0000 %0533 F21
008054 000138 000890 0750 0625 0375 0250 0375 0625 0000 %0534 F22
008069 000266 000512 0750 0625 0500 0250 0375 0500 0000 %0535 F23
008085 000406 000108 0750 0625 0625 0250 0375 0375 0000 %0536 F24
008106 000565 -00338 0750 0625 0750 0250 0375 0250 0000 %0537 F25
008133 000770 -00889 0750 0625 0875 0250 0375 0125 0000 %0538 F26
008212 001242 -02129 0750 0625 1000 0250 0375 0000 0000 %0539 F27
008283 -00641 002057 0750 0750 0000 0250 0250 1000 0000 %0540 G19
008288 -00594 001931 0750 0750 0125 0250 0250 0875 0000 %0541 G20
008298 -00496 001622 0750 0750 0250 0250 0250 0750 0000 %0542 G21
008309 -00384 001286 0750 0750 0375 0250 0250 0625 0000 %0543 G22
008324 002140 001946 0750 0750 0500 0250 0250 0500 0000 %0544 G23
008339 -00120 000505 0750 0750 0625 0250 0250 0375 0000 %0545 G24
008359 000037 000058 0750 0750 0750 0250 0250 0250 0000 %0546 G25
008385 000238 -00493 0750 0750 0875 0250 0250 0125 0000 %0547 G26
008460 000708 -01732 0750 0750 1000 0250 0250 0000 0000 %0548 G27
008621 -01291 002572 0750 0875 0000 0250 0125 1000 0000 %0549 H19
008626 -01244 002449 0750 0875 0125 0250 0125 0875 0000 %0550 H20
008636 -01145 002138 0750 0875 0250 0250 0125 0750 0000 %0551 H21
008646 -01037 001803 0750 0875 0375 0250 0125 0625 0000 %0552 H22
008659 -00908 001425 0750 0875 0500 0250 0125 0500 0000 %0553 H23
008665 -00772 001020 0750 0875 0625 0250 0125 0375 0000 %0554 H24
008692 -00621 000579 0750 0875 0750 0250 0125 0250 0000 %0555 H25
008716 -00425 000026 0750 0875 0875 0250 0125 0125 0000 %0556 H26
008787 000035 -01208 0750 0875 1000 0250 0125 0000 0000 %0557 H27
009174 -02281 003415 0750 1000 0000 0250 0000 1000 0000 %0558 I19
009178 -02236 003292 0750 1000 0125 0250 0000 0875 0000 %0559 I20
009186 -02143 002983 0750 1000 0250 0250 0000 0750 0000 %0560 I21
009196 -02037 002652 0750 1000 0375 0250 0000 0625 0000 %0561 I22
009208 -01918 002276 0750 1000 0500 0250 0000 0500 0000 %0562 I23
009221 -01787 001875 0750 1000 0625 0250 0000 0375 0000 %0563 I24
009237 -01632 001431 0750 1000 0750 0250 0000 0250 0000 %0564 I25
009260 -01445 000879 0750 1000 0875 0250 0000 0125 0000 %0565 I26
009325 -00998 -00350 0750 1000 1000 0250 0000 0000 0000 %0566 I27

007437 001887 000783 0875 0000 0000 0125 1000 1000 0000 %0567 J19
007443 001932 000660 0875 0000 0125 0125 1000 0875 0000 %0568 J20
007456 002038 000346 0875 0000 0250 0125 1000 0750 0000 %0569 J21
007469 002139 000011 0875 0000 0375 0125 1000 0625 0000 %0570 J22
007486 002266 -00366 0875 0000 0500 0125 1000 0500 0000 %0571 J23
007505 002403 -00767 0875 0000 0625 0125 1000 0375 0000 %0572 J24
007527 002553 -01216 0875 0000 0750 0125 1000 0250 0000 %0573 J25
007559 002745 -01768 0875 0000 0875 0125 1000 0125 0000 %0574 J26
007649 003200 -03024 0875 0000 1000 0125 1000 0000 0000 %0575 J27
007484 001783 000856 0875 0125 0000 0125 0875 1000 0000 %0576 K19
007489 001831 000728 0875 0125 0125 0125 0875 0875 0000 %0577 K20
007502 001927 000416 0875 0125 0250 0125 0875 0750 0000 %0578 K21
007516 002039 000080 0875 0125 0375 0125 0875 0625 0000 %0579 K22
007531 002159 -00301 0875 0125 0500 0125 0875 0500 0000 %0580 K23
007549 002294 -00701 0875 0125 0625 0125 0875 0375 0000 %0581 K24
007572 002450 -01151 0875 0125 0750 0125 0875 0250 0000 %0582 K25
007604 002645 -01708 0875 0125 0875 0125 0875 0125 0000 %0583 K26
007693 003094 -02952 0875 0125 1000 0125 0875 0000 0000 %0584 K27
007603 001510 001037 0875 0250 0000 0125 0750 1000 0000 %0585 L19
007608 001551 000909 0875 0250 0125 0125 0750 0875 0000 %0586 L20
007621 001653 000596 0875 0250 0250 0125 0750 0750 0000 %0587 L21
007634 001760 000259 0875 0250 0375 0125 0750 0625 0000 %0588 L22
007649 001884 -00122 0875 0250 0500 0125 0750 0500 0000 %0589 L23
007668 002019 -00521 0875 0250 0625 0125 0750 0375 0000 %0590 L24
007690 002170 -00973 0875 0250 0750 0125 0750 0250 0000 %0591 L25
007721 002360 -01525 0875 0250 0875 0125 0750 0125 0000 %0592 L26
007807 002817 -02767 0875 0250 1000 0125 0750 0000 0000 %0593 L27
007752 001170 001262 0875 0375 0000 0125 0625 1000 0000 %0594 M19
007757 001214 001138 0875 0375 0125 0125 0625 0875 0000 %0595 M20
007769 001314 000824 0875 0375 0250 0125 0625 0750 0000 %0596 M21
007782 001419 000487 0875 0375 0375 0125 0625 0625 0000 %0597 M22
007797 001547 000105 0875 0375 0500 0125 0625 0500 0000 %0598 M23
007815 001681 -00293 0875 0375 0625 0125 0625 0375 0000 %0599 M24
007836 001834 -00748 0875 0375 0750 0125 0625 0250 0000 %0600 M25
007866 002026 -01298 0875 0375 0875 0125 0625 0125 0000 %0601 M26
007949 002476 -02541 0875 0375 1000 0125 0625 0000 0000 %0602 M27
007931 000778 001536 0875 0500 0000 0125 0500 1000 0000 %0603 N19
007935 000820 001408 0875 0500 0125 0125 0500 0875 0000 %0604 N20
007947 000917 001098 0875 0500 0250 0125 0500 0750 0000 %0605 N21
007959 001026 000760 0875 0500 0375 0125 0500 0625 0000 %0606 N22
007973 001162 000370 0875 0500 0500 0125 0500 0500 0000 %0607 N23
007991 001281 -00022 0875 0500 0625 0125 0500 0375 0000 %0608 N24
008012 001436 -00472 0875 0500 0750 0125 0500 0250 0000 %0609 N25
008040 001625 -01023 0875 0500 0875 0125 0500 0125 0000 %0610 N26
008120 002081 -02266 0875 0500 1000 0125 0500 0000 0000 %0611 N27
008133 000345 001841 0875 0625 0000 0125 0375 1000 0000 %0612 O19
008137 000384 001716 0875 0625 0125 0125 0375 0875 0000 %0613 O20
008147 000487 001403 0875 0625 0250 0125 0375 0750 0000 %0614 O21
008160 000591 001068 0875 0625 0375 0125 0375 0625 0000 %0615 O22
008174 000713 000690 0875 0625 0500 0125 0375 0500 0000 %0616 O23
008190 000844 000287 0875 0625 0625 0125 0375 0375 0000 %0617 O24
008210 001001 -00162 0875 0625 0750 0125 0375 0250 0000 %0618 O25
008237 001192 -00716 0875 0625 0875 0125 0375 0125 0000 %0619 O26
008314 001637 -01955 0875 0625 1000 0125 0375 0000 0000 %0620 O27
008384 -00175 002223 0875 0750 0000 0125 0250 1000 0000 %0621 P19
008389 -00133 002100 0875 0750 0125 0125 0250 0875 0000 %0622 P20
008399 -00037 001789 0875 0750 0250 0125 0250 0750 0000 %0623 P21
008410 000069 001455 0875 0750 0375 0125 0250 0625 0000 %0624 P22
008424 000193 001073 0875 0750 0500 0125 0250 0500 0000 %0625 P23
008438 000321 000673 0875 0750 0625 0125 0250 0375 0000 %0626 P24
008457 000473 000225 0875 0750 0750 0125 0250 0250 0000 %0627 P25
008484 000660 -00327 0875 0750 0875 0125 0250 0125 0000 %0628 P26
008558 001107 -01568 0875 0750 1000 0125 0250 0000 0000 %0629 P27
008715 -00826 002728 0875 0875 0000 0125 0125 1000 0000 %0630 Q19
008720 -00784 002607 0875 0875 0125 0125 0125 0875 0000 %0631 Q20
008730 -00688 002296 0875 0875 0250 0125 0125 0750 0000 %0632 Q21
008739 -02216 001317 0875 0875 0375 0125 0125 0625 0000 %0633 Q22
008752 -00468 001583 0875 0875 0500 0125 0125 0500 0000 %0634 Q23
008767 -00337 001184 0875 0875 0625 0125 0125 0375 0000 %0635 Q24
008784 -00189 000734 0875 0875 0750 0125 0125 0250 0000 %0636 Q25
008809 -00001 000182 0875 0875 0875 0125 0125 0125 0000 %0637 Q26
008879 000438 -01055 0875 0875 1000 0125 0125 0000 0000 %0638 Q27
009258 -01825 003557 0875 1000 0000 0125 0000 1000 0000 %0639 R19
009262 -01786 003430 0875 1000 0125 0125 0000 0875 0000 %0640 R20
009270 -01694 003124 0875 1000 0250 0125 0000 0750 0000 %0641 R21
009280 -01597 002792 0875 1000 0375 0125 0000 0625 0000 %0642 R22
009291 -01481 002413 0875 1000 0500 0125 0000 0500 0000 %0643 R23
009305 -01355 002015 0875 1000 0625 0125 0000 0375 0000 %0644 R24
009321 -01210 001567 0875 1000 0750 0125 0000 0250 0000 %0645 R25
009343 -01030 001019 0875 1000 0875 0125 0000 0125 0000 %0646 R26
009406 -00605 -00211 0875 1000 1000 0125 0000 0000 0000 %0647 R27

007631 002591 001110 1000 0000 0000 0000 1000 1000 0000 %0648 S19
007635 002625 000982 1000 0000 0125 0000 1000 0875 0000 %0649 S20
007645 002714 000670 1000 0000 0250 0000 1000 0750 0000 %0650 S21
007658 002811 000333 1000 0000 0375 0000 1000 0625 0000 %0651 S22
007673 002919 -00045 1000 0000 0500 0000 1000 0500 0000 %0652 S23
007692 003048 -00449 1000 0000 0625 0000 1000 0375 0000 %0653 S24
007713 003184 -00897 1000 0000 0750 0000 1000 0250 0000 %0654 S25
007743 003361 -01454 1000 0000 0875 0000 1000 0125 0000 %0655 S26
007828 003773 -02719 1000 0000 1000 0000 1000 0000 0000 %0656 S27
007674 002488 001177 1000 0125 0000 0000 0875 1000 0000 %0657 T19
007678 002518 001050 1000 0125 0125 0000 0875 0875 0000 %0658 T20
007690 002606 000735 1000 0125 0250 0000 0875 0750 0000 %0659 T21
007702 002705 000397 1000 0125 0375 0000 0875 0625 0000 %0660 T22
007716 001253 000717 1000 0125 0500 0000 0875 0500 0000 %0661 T23
007735 002939 -00386 1000 0125 0625 0000 0875 0375 0000 %0662 T24
007756 003082 -00840 1000 0125 0750 0000 0875 0250 0000 %0663 T25
007786 003258 -01394 1000 0125 0875 0000 0875 0125 0000 %0664 T26
007870 003672 -02653 1000 0125 1000 0000 0875 0000 0000 %0665 T27
007790 002210 001353 1000 0250 0000 0000 0750 1000 0000 %0666 U19
007795 002248 001227 1000 0250 0125 0000 0750 0875 0000 %0667 U20
007805 002335 000911 1000 0250 0250 0000 0750 0750 0000 %0668 U21
007816 002433 000569 1000 0250 0375 0000 0750 0625 0000 %0669 U22
007831 002546 000188 1000 0250 0500 0000 0750 0500 0000 %0670 U23
007849 002669 -00213 1000 0250 0625 0000 0750 0375 0000 %0671 U24
007870 002809 -00665 1000 0250 0750 0000 0750 0250 0000 %0672 U25
007900 002988 -01221 1000 0250 0875 0000 0750 0125 0000 %0673 U26
007982 003402 -02476 1000 0250 1000 0000 0750 0000 0000 %0674 U27
007934 001876 001572 1000 0375 0000 0000 0625 1000 0000 %0675 V19
007939 001913 001445 1000 0375 0125 0000 0625 0875 0000 %0676 V20
007949 002001 001129 1000 0375 0250 0000 0625 0750 0000 %0677 V21
007961 002098 000789 1000 0375 0375 0000 0625 0625 0000 %0678 V22
007976 002210 000408 1000 0375 0500 0000 0625 0500 0000 %0679 V23
007992 002335 000002 1000 0375 0625 0000 0625 0375 0000 %0680 V24
008013 002474 -00449 1000 0375 0750 0000 0625 0250 0000 %0681 V25
008042 002651 -01004 1000 0375 0875 0000 0625 0125 0000 %0682 V26
008121 003069 -02257 1000 0375 1000 0000 0625 0000 0000 %0683 V27
008110 001485 001837 1000 0500 0000 0000 0500 1000 0000 %0684 W19
008114 001519 001709 1000 0500 0125 0000 0500 0875 0000 %0685 W20
008125 001606 001394 1000 0500 0250 0000 0500 0750 0000 %0686 W21
008136 001704 001053 1000 0500 0375 0000 0500 0625 0000 %0687 W22
008150 001818 000670 1000 0500 0500 0000 0500 0500 0000 %0688 W23
008166 001941 000267 1000 0500 0625 0000 0500 0375 0000 %0689 W24
008186 002079 -00183 1000 0500 0750 0000 0500 0250 0000 %0690 W25
008214 002259 -00737 1000 0500 0875 0000 0500 0125 0000 %0691 W26
008291 002667 -01984 1000 0500 1000 0000 0500 0000 0000 %0692 W27
008308 001052 002137 1000 0625 0000 0000 0375 1000 0000 %0693 X19
008313 001090 002009 1000 0625 0125 0000 0375 0875 0000 %0694 X20
008323 001173 001693 1000 0625 0250 0000 0375 0750 0000 %0695 X21
008334 001269 001354 1000 0625 0375 0000 0375 0625 0000 %0696 X22
008348 001387 000968 1000 0625 0500 0000 0375 0500 0000 %0697 X23
008363 001505 000567 1000 0625 0625 0000 0375 0375 0000 %0698 X24
008383 001647 000116 1000 0625 0750 0000 0375 0250 0000 %0699 X25
008409 001821 -00436 1000 0625 0875 0000 0375 0125 0000 %0700 X26
008483 002231 -01680 1000 0625 1000 0000 0375 0000 0000 %0701 X27
008555 000528 002510 1000 0750 0000 0000 0250 1000 0000 %0702 Y19
008560 000568 002382 1000 0750 0125 0000 0250 0875 0000 %0703 Y20
008569 000653 002066 1000 0750 0250 0000 0250 0750 0000 %0704 Y21
008580 000749 001726 1000 0750 0375 0000 0250 0625 0000 %0705 Y22
008594 000862 001343 1000 0750 0500 0000 0250 0500 0000 %0706 Y23
008608 000984 000939 1000 0750 0625 0000 0250 0375 0000 %0707 Y24
008626 001119 000490 1000 0750 0750 0000 0250 0250 0000 %0708 Y25
008651 001295 -00058 1000 0750 0875 0000 0250 0125 0000 %0709 Y26
008721 001705 -01301 1000 0750 1000 0000 0250 0000 0000 %0710 Y27
008879 -00123 003001 1000 0875 0000 0000 0125 1000 0000 %0711 Z19
008883 -00087 002874 1000 0875 0125 0000 0125 0875 0000 %0712 Z20
008891 000000 002555 1000 0875 0250 0000 0125 0750 0000 %0713 Z21
008901 000095 002216 1000 0875 0375 0000 0125 0625 0000 %0714 Z22
008913 000206 001835 1000 0875 0500 0000 0125 0500 0000 %0715 Z23
008928 000323 001431 1000 0875 0625 0000 0125 0375 0000 %0716 Z24
008945 000462 000985 1000 0875 0750 0000 0125 0250 0000 %0717 Z25
008968 000629 000433 1000 0875 0875 0000 0125 0125 0000 %0718 Z26
009034 001034 -00802 1000 0875 1000 0000 0125 0000 0000 %0719 Z27
009405 -01128 003798 1000 1000 0000 0000 0000 1000 0000 %0720 a19
009408 -01239 003775 1000 1000 0125 0000 0000 0875 0000 %0721 a20
009416 -01012 003357 1000 1000 0250 0000 0000 0750 0000 %0722 a21
009425 -00916 003019 1000 1000 0375 0000 0000 0625 0000 %0723 a22
009436 -00812 002637 1000 1000 0500 0000 0000 0500 0000 %0724 a23
009449 -00693 002235 1000 1000 0625 0000 0000 0375 0000 %0725 a24
009464 -00559 001786 1000 1000 0750 0000 0000 0250 0000 %0726 a25
009486 -00395 001241 1000 1000 0875 0000 0000 0125 0000 %0727 a26
009546 -00001 000014 1000 1000 1000 0000 0000 0000 0000 %0728 a27

%JE060-7A, Page 64 /66, LAB*la7; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
009560 000004 000025 1000 1000 1000 0000 0000 0000 0000 %0729 b01
009431 -00600 -00192 0875 1000 1000 0125 0000 0000 0000 %0730 b02
009348 -00992 -00329 0750 1000 1000 0250 0000 0000 0000 %0731 b03
009280 -01329 -00444 0625 1000 1000 0375 0000 0000 0000 %0732 b04
009227 -01596 -00534 0500 1000 1000 0500 0000 0000 0000 %0733 b05
009182 -01821 -00607 0375 1000 1000 0625 0000 0000 0000 %0734 b06
009148 -02001 -00663 0250 1000 1000 0750 0000 0000 0000 %0735 b07
009121 -02146 -00708 0125 1000 1000 0875 0000 0000 0000 %0736 b08
009110 -02202 -00726 0000 1000 1000 1000 0000 0000 0000 %0737 b09
008981 000635 000434 1000 0875 0875 0000 0125 0125 0000 %0738 c01
008833 000002 000186 0875 0875 0875 0125 0125 0125 0000 %0739 c02
008741 -00414 000028 0750 0875 0875 0250 0125 0125 0000 %0740 c03
008664 -00771 -00096 0625 0875 0875 0375 0125 0125 0000 %0741 c04
008604 -01060 -00196 0500 0875 0875 0500 0125 0125 0000 %0742 c05
008554 -01300 -00279 0375 0875 0875 0625 0125 0125 0000 %0743 c06
008514 -01491 -00345 0250 0875 0875 0750 0125 0125 0000 %0744 c07
008482 -01638 -00397 0125 0875 0875 0875 0125 0125 0000 %0745 c08
008466 -01698 -00422 0000 0875 0875 1000 0125 0125 0000 %0746 c09
008640 001124 000488 1000 0750 0750 0000 0250 0250 0000 %0747 d01
008482 000475 000222 0875 0750 0750 0125 0250 0250 0000 %0748 d02
008383 000044 000054 0750 0750 0750 0250 0250 0250 0000 %0749 d03
008300 -00318 -00082 0625 0750 0750 0375 0250 0250 0000 %0750 d04
008235 -00616 -00191 0500 0750 0750 0500 0250 0250 0000 %0751 d05
008182 -00868 -00276 0375 0750 0750 0625 0250 0250 0000 %0752 d06
008140 -01062 -00346 0250 0750 0750 0750 0250 0250 0000 %0753 d07
008105 -01221 -00404 0125 0750 0750 0875 0250 0250 0000 %0754 d08
008089 -01276 -00432 0000 0750 0750 1000 0250 0250 0000 %0755 d09
008377 001508 000560 1000 0625 0625 0000 0375 0375 0000 %0756 e01
008211 000850 000282 0875 0625 0625 0125 0375 0375 0000 %0757 e02
008106 000410 000105 0750 0625 0625 0250 0375 0375 0000 %0758 e03
008020 000035 -00035 0625 0625 0625 0375 0375 0375 0000 %0759 e04
007953 -00267 -00150 0500 0625 0625 0500 0375 0375 0000 %0760 e05
007895 -00522 -00244 0375 0625 0625 0625 0375 0375 0000 %0761 e06
007851 -00723 -00316 0250 0625 0625 0750 0375 0375 0000 %0762 e07
007814 -00883 -00376 0125 0625 0625 0875 0375 0375 0000 %0763 e08
007797 -00947 -00407 0000 0625 0625 1000 0375 0375 0000 %0764 e09
008164 001819 000665 1000 0500 0500 0000 0500 0500 0000 %0765 f01
007992 001155 000374 0875 0500 0500 0125 0500 0500 0000 %0766 f02
007882 000707 000191 0750 0500 0500 0250 0500 0500 0000 %0767 f03
007791 000327 000040 0625 0500 0500 0375 0500 0500 0000 %0768 f04
007720 000016 -00076 0500 0500 0500 0500 0500 0500 0000 %0769 f05
007661 -00242 -00174 0375 0500 0500 0625 0500 0500 0000 %0770 f06
007615 -00449 -00252 0250 0500 0500 0750 0500 0500 0000 %0771 f07
007578 -00614 -00314 0125 0500 0500 0875 0500 0500 0000 %0772 f08
007560 -00678 -00342 0000 0500 0500 1000 0500 0500 0000 %0773 f09
007973 002102 000784 1000 0375 0375 0000 0625 0625 0000 %0774 g01
007795 001411 000489 0875 0375 0375 0125 0625 0625 0000 %0775 g02
007681 000976 000292 0750 0375 0375 0250 0625 0625 0000 %0776 g03
007587 000591 000135 0625 0375 0375 0375 0625 0625 0000 %0777 g04
007513 000279 000011 0500 0375 0375 0500 0625 0625 0000 %0778 g05
007451 000011 -00088 0375 0375 0375 0625 0625 0625 0000 %0779 g06
007404 -00198 -00167 0250 0375 0375 0750 0625 0625 0000 %0780 g07
007366 -00365 -00230 0125 0375 0375 0875 0625 0625 0000 %0781 g08
007347 -00435 -00258 0000 0375 0375 1000 0625 0625 0000 %0782 g09
007815 002343 000909 1000 0250 0250 0000 0750 0750 0000 %0783 h01
007630 001661 000596 0875 0250 0250 0125 0750 0750 0000 %0784 h02
007513 001201 000401 0750 0250 0250 0250 0750 0750 0000 %0785 h03
007415 000813 000237 0625 0250 0250 0375 0750 0750 0000 %0786 h04
007338 000497 000111 0500 0250 0250 0500 0750 0750 0000 %0787 h05
007274 000223 000005 0375 0250 0250 0625 0750 0750 0000 %0788 h06
007226 000016 -00076 0250 0250 0250 0750 0750 0750 0000 %0789 h07
007185 -00154 -00141 0125 0250 0250 0875 0750 0750 0000 %0790 h08
007170 -00225 -00169 0000 0250 0250 1000 0750 0750 0000 %0791 h09
007685 002534 001054 1000 0125 0125 0000 0875 0875 0000 %0792 i01
007495 001841 000732 0875 0125 0125 0125 0875 0875 0000 %0793 i02
007373 001380 000528 0750 0125 0125 0250 0875 0875 0000 %0794 i03
007273 000990 000362 0625 0125 0125 0375 0875 0875 0000 %0795 i04
007195 000667 000232 0500 0125 0125 0500 0875 0875 0000 %0796 i05
007129 000391 000123 0375 0125 0125 0625 0875 0875 0000 %0797 i06
007080 000183 000040 0250 0125 0125 0750 0875 0875 0000 %0798 i07
007039 000010 -00026 0125 0125 0125 0875 0875 0875 0000 %0799 i08
007023 -00062 -00053 0000 0125 0125 1000 0875 0875 0000 %0800 i09
007635 002605 001117 1000 0000 0000 0000 1000 1000 0000 %0801 j01
007441 001907 000790 0875 0000 0000 0125 1000 1000 0000 %0802 j02
007318 001443 000584 0750 0000 0000 0250 1000 1000 0000 %0803 j03
007218 001044 000417 0625 0000 0000 0375 1000 1000 0000 %0804 j04
007139 000728 000285 0500 0000 0000 0500 1000 1000 0000 %0805 j05
007073 000459 000178 0375 0000 0000 0625 1000 1000 0000 %0806 j06
007022 000246 000093 0250 0000 0000 0750 1000 1000 0000 %0807 j07
006982 000072 000026 0125 0000 0000 0875 1000 1000 0000 %0808 j08
006966 000001 000000 0000 0000 0000 1000 1000 1000 0000 %0809 j09

009543 000000 000009 1000 1000 1000 0000 0000 0000 0000 %0810 b10
008887 000437 -01051 0875 0875 1000 0125 0125 0000 0000 %0811 b11
008470 000712 -01729 0750 0750 1000 0250 0250 0000 0000 %0812 b12
008139 000904 -02268 0625 0625 1000 0375 0375 0000 0000 %0813 b13
007867 001079 -02708 0500 0500 1000 0500 0500 0000 0000 %0814 b14
007625 001258 -03102 0375 0375 1000 0625 0625 0000 0000 %0815 b15
007423 001426 -03421 0250 0250 1000 0750 0750 0000 0000 %0816 b16
007259 001581 -03707 0125 0125 1000 0875 0875 0000 0000 %0817 b17
007194 001632 -03804 0000 0000 1000 1000 1000 0000 0000 %0818 b18
009483 -00395 001235 1000 1000 0875 0000 0000 0125 0000 %0819 c10
008818 000002 000180 0875 0875 0875 0125 0125 0125 0000 %0820 c11
008395 000241 -00497 0750 0750 0875 0250 0250 0125 0000 %0821 c12
008059 000413 -01036 0625 0625 0875 0375 0375 0125 0000 %0822 c13
007783 000563 -01474 0500 0500 0875 0500 0500 0125 0000 %0823 c14
007538 000727 -01869 0375 0375 0875 0625 0625 0125 0000 %0824 c15
007332 000887 -02200 0250 0250 0875 0750 0750 0125 0000 %0825 c16
007163 001012 -02457 0125 0125 0875 0875 0875 0125 0000 %0826 c17
007096 001063 -02555 0000 0000 0875 1000 1000 0125 0000 %0827 c18
009461 -00563 001785 1000 1000 0750 0000 0000 0250 0000 %0828 d10
008794 -00183 000726 0875 0875 0750 0125 0125 0250 0000 %0829 d11
008368 000042 000052 0750 0750 0750 0250 0250 0250 0000 %0830 d12
008030 000203 -00484 0625 0625 0750 0375 0375 0250 0000 %0831 d13
007753 000348 -00928 0500 0500 0750 0500 0500 0250 0000 %0832 d14
007506 000506 -01325 0375 0375 0750 0625 0625 0250 0000 %0833 d15
007298 000651 -01652 0250 0250 0750 0750 0750 0250 0000 %0834 d16
007130 000785 -01927 0125 0125 0750 0875 0875 0250 0000 %0835 d17
007062 000825 -02020 0000 0000 0750 1000 1000 0250 0000 %0836 d18
009446 -00697 002231 1000 1000 0625 0000 0000 0375 0000 %0837 e10
008775 -00336 001177 0875 0875 0625 0125 0125 0375 0000 %0838 e11
008349 -00116 000499 0750 0750 0625 0250 0250 0375 0000 %0839 e12
008009 000038 -00038 0625 0625 0625 0375 0375 0375 0000 %0840 e13
007731 000174 -00479 0500 0500 0625 0500 0500 0375 0000 %0841 e14
007483 000320 -00875 0375 0375 0625 0625 0625 0375 0000 %0842 e15
007274 000463 -01205 0250 0250 0625 0750 0750 0375 0000 %0843 e16
007104 000589 -01471 0125 0125 0625 0875 0875 0375 0000 %0844 e17
007037 000635 -01574 0000 0000 0625 1000 1000 0375 0000 %0845 e18
009432 -00811 002633 1000 1000 0500 0000 0000 0500 0000 %0846 f10
008759 -00464 001577 0875 0875 0500 0125 0125 0500 0000 %0847 f11
008333 -00253 000905 0750 0750 0500 0250 0250 0500 0000 %0848 f12
007992 -00108 000365 0625 0625 0500 0375 0375 0500 0000 %0849 f13
007713 000018 -00077 0500 0500 0500 0500 0500 0500 0000 %0850 f14
007464 000159 -00473 0375 0375 0500 0625 0625 0500 0000 %0851 f15
007255 000299 -00802 0250 0250 0500 0750 0750 0500 0000 %0852 f16
007084 000423 -01068 0125 0125 0500 0875 0875 0500 0000 %0853 f17
007017 000461 -01171 0000 0000 0500 1000 1000 0500 0000 %0854 f18
009421 -00920 003014 1000 1000 0375 0000 0000 0625 0000 %0855 g10
008748 -00586 001961 0875 0875 0375 0125 0125 0625 0000 %0856 g11
008319 -00386 001285 0750 0750 0375 0250 0250 0625 0000 %0857 g12
007977 -00250 000747 0625 0625 0375 0375 0375 0625 0000 %0858 g13
007697 -00124 000307 0500 0500 0375 0500 0500 0625 0000 %0859 g14
007446 000011 -00089 0375 0375 0375 0625 0625 0625 0000 %0860 g15
007237 000147 -00416 0250 0250 0375 0750 0750 0625 0000 %0861 g16
007065 000260 -00679 0125 0125 0375 0875 0875 0625 0000 %0862 g17
006999 000304 -00791 0000 0000 0375 1000 1000 0625 0000 %0863 g18
009412 -01016 003351 1000 1000 0250 0000 0000 0750 0000 %0864 h10
008737 -00686 002299 0875 0875 0250 0125 0125 0750 0000 %0865 h11
008307 -00492 001622 0750 0750 0250 0250 0250 0750 0000 %0866 h12
007964 -00363 001088 0625 0625 0250 0375 0375 0750 0000 %0867 h13
007684 -00249 000648 0500 0500 0250 0500 0500 0750 0000 %0868 h14
007433 -00118 000256 0375 0375 0250 0625 0625 0750 0000 %0869 h15
007223 000010 -00075 0250 0250 0250 0750 0750 0750 0000 %0870 h16
007052 000132 -00347 0125 0125 0250 0875 0875 0750 0000 %0871 h17
006984 000169 -00450 0000 0000 0250 1000 1000 0750 0000 %0872 h18
009405 -01098 003668 1000 1000 0125 0000 0000 0875 0000 %0873 i10
008728 -00788 002615 0875 0875 0125 0125 0125 0875 0000 %0874 i11
008297 -00601 001941 0750 0750 0125 0250 0250 0875 0000 %0875 i12
007954 -00472 001406 0625 0625 0125 0375 0375 0875 0000 %0876 i13
007672 -00363 000968 0500 0500 0125 0500 0500 0875 0000 %0877 i14
007420 -00235 000573 0375 0375 0125 0625 0625 0875 0000 %0878 i15
007211 -00106 000245 0250 0250 0125 0750 0750 0875 0000 %0879 i16
007039 000007 -00023 0125 0125 0125 0875 0875 0875 0000 %0880 i17
006971 000051 -00130 0000 0000 0125 1000 1000 0875 0000 %0881 i18
009401 -01130 003795 1000 1000 0000 0000 0000 1000 0000 %0882 j10
008723 -00828 002740 0875 0875 0000 0125 0125 1000 0000 %0883 j11
008291 -00643 002068 0750 0750 0000 0250 0250 1000 0000 %0884 j12
007948 -00519 001534 0625 0625 0000 0375 0375 1000 0000 %0885 j13
007667 -00408 001096 0500 0500 0000 0500 0500 1000 0000 %0886 j14
007415 -00284 000704 0375 0375 0000 0625 0625 1000 0000 %0887 j15
007205 -00156 000376 0250 0250 0000 0750 0750 1000 0000 %0888 j16
007033 -00040 000106 0125 0125 0000 0875 0875 1000 0000 %0889 j17
006965 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0890 j18

009542 -00002 000005 1000 1000 1000 0000 0000 0000 0000 %0891 b19
009030 001036 -00812 1000 0875 1000 0000 0125 0000 0000 %0892 b20
008718 001704 -01308 1000 0750 1000 0000 0250 0000 0000 %0893 b21
008483 002232 -01683 1000 0625 1000 0000 0375 0000 0000 %0894 b22
008293 002671 -01987 1000 0500 1000 0000 0500 0000 0000 %0895 b23
008126 003072 -02257 1000 0375 1000 0000 0625 0000 0000 %0896 b24
007986 003405 -02476 1000 0250 1000 0000 0750 0000 0000 %0897 b25
007874 003684 -02657 1000 0125 1000 0000 0875 0000 0000 %0898 b26
007831 003786 -02724 1000 0000 1000 0000 1000 0000 0000 %0899 b27
009350 -01023 001012 0875 1000 0875 0125 0000 0125 0000 %0900 c19
008817 000000 000179 0875 0875 0875 0125 0125 0125 0000 %0901 c20
008493 000663 -00333 0875 0750 0875 0125 0250 0125 0000 %0902 c21
008247 001196 -00720 0875 0625 0875 0125 0375 0125 0000 %0903 c22
008049 001629 -01030 0875 0500 0875 0125 0500 0125 0000 %0904 c23
007873 002030 -01305 0875 0375 0875 0125 0625 0125 0000 %0905 c24
007727 002376 -01536 0875 0250 0875 0125 0750 0125 0000 %0906 c25
007608 002654 -01714 0875 0125 0875 0125 0875 0125 0000 %0907 c26
007562 002761 -01779 0875 0000 0875 0125 1000 0125 0000 %0908 c27
009244 -01629 001421 0750 1000 0750 0250 0000 0250 0000 %0909 d19
008699 -00614 000571 0750 0875 0750 0250 0125 0250 0000 %0910 d20
008366 000045 000052 0750 0750 0750 0250 0250 0250 0000 %0911 d21
008113 000566 -00343 0750 0625 0750 0250 0375 0250 0000 %0912 d22
007912 001009 -00663 0750 0500 0750 0250 0500 0250 0000 %0913 d23
007730 001412 -00945 0750 0375 0750 0250 0625 0250 0000 %0914 d24
007579 001755 -01179 0750 0250 0750 0250 0750 0250 0000 %0915 d25
007457 002037 -01365 0750 0125 0750 0250 0875 0250 0000 %0916 d26
007410 002145 -01431 0750 0000 0750 0250 1000 0250 0000 %0917 d27
009159 -02139 001753 0625 1000 0625 0375 0000 0375 0000 %0918 e19
008604 -01137 000893 0625 0875 0625 0375 0125 0375 0000 %0919 e20
008265 -00486 000363 0625 0750 0625 0375 0250 0375 0000 %0920 e21
008007 000034 -00038 0625 0625 0625 0375 0375 0375 0000 %0921 e22
007800 000475 -00363 0625 0500 0625 0375 0500 0375 0000 %0922 e23
007615 000874 -00650 0625 0375 0625 0375 0625 0375 0000 %0923 e24
007461 001216 -00891 0625 0250 0625 0375 0750 0375 0000 %0924 e25
007336 001510 -01086 0625 0125 0625 0375 0875 0375 0000 %0925 e26
007287 001611 -01152 0625 0000 0625 0375 1000 0375 0000 %0926 e27
009092 -02565 002066 0500 1000 0500 0500 0000 0500 0000 %0927 f19
008529 -01581 001194 0500 0875 0500 0500 0125 0500 0000 %0928 f20
008186 -00935 000659 0500 0750 0500 0500 0250 0500 0000 %0929 f21
007923 -00416 000250 0500 0625 0500 0500 0375 0500 0000 %0930 f22
007712 000018 -00078 0500 0500 0500 0500 0500 0500 0000 %0931 f23
007524 000422 -00372 0500 0375 0500 0500 0625 0500 0000 %0932 f24
007366 000761 -00614 0500 0250 0500 0500 0750 0500 0000 %0933 f25
007238 001045 -00810 0500 0125 0500 0500 0875 0500 0000 %0934 f26
007188 001155 -00883 0500 0000 0500 0500 1000 0500 0000 %0935 f27
009037 -02945 002374 0375 1000 0375 0625 0000 0625 0000 %0936 g19
008466 -01972 001494 0375 0875 0375 0625 0125 0625 0000 %0937 g20
008118 -01337 000954 0375 0750 0375 0625 0250 0625 0000 %0938 g21
007852 -00820 000543 0375 0625 0375 0625 0375 0625 0000 %0939 g22
007638 -00386 000209 0375 0500 0375 0625 0500 0625 0000 %0940 g23
007446 000011 -00089 0375 0375 0375 0625 0625 0625 0000 %0941 g24
007286 000357 -00336 0375 0250 0375 0625 0750 0625 0000 %0942 g25
007156 000638 -00535 0375 0125 0375 0625 0875 0625 0000 %0943 g26
007106 000748 -00609 0375 0000 0375 0625 1000 0625 0000 %0944 g27
008993 -03258 002657 0250 1000 0250 0750 0000 0750 0000 %0945 h19
008417 -02296 001771 0250 0875 0250 0750 0125 0750 0000 %0946 h20
008064 -01665 001225 0250 0750 0250 0750 0250 0750 0000 %0947 h21
007796 -01156 000811 0250 0625 0250 0750 0375 0750 0000 %0948 h22
007579 -00724 000475 0250 0500 0250 0750 0500 0750 0000 %0949 h23
007385 -00328 000175 0250 0375 0250 0750 0625 0750 0000 %0950 h24
007222 000012 -00074 0250 0250 0250 0750 0750 0750 0000 %0951 h25
007092 000302 -00281 0250 0125 0250 0750 0875 0750 0000 %0952 h26
007041 000415 -00361 0250 0000 0250 0750 1000 0750 0000 %0953 h27
008959 -03527 002931 0125 1000 0125 0875 0000 0875 0000 %0954 i19
008375 -02568 002034 0125 0875 0125 0875 0125 0875 0000 %0955 i20
008020 -01946 001488 0125 0750 0125 0875 0250 0875 0000 %0956 i21
007749 -01434 001067 0125 0625 0125 0875 0375 0875 0000 %0957 i22
007530 -01014 000732 0125 0500 0125 0875 0500 0875 0000 %0958 i23
007335 -00620 000431 0125 0375 0125 0875 0625 0875 0000 %0959 i24
007172 -00279 000181 0125 0250 0125 0875 0750 0875 0000 %0960 i25
007039 000009 -00025 0125 0125 0125 0875 0875 0875 0000 %0961 i26
006987 000121 -00106 0125 0000 0125 0875 1000 0875 0000 %0962 i27
008944 -03625 003042 0000 1000 0000 1000 0000 1000 0000 %0963 j19
008356 -02675 002141 0000 0875 0000 1000 0125 1000 0000 %0964 j20
008000 -02054 001591 0000 0750 0000 1000 0250 1000 0000 %0965 j21
007728 -01550 001173 0000 0625 0000 1000 0375 1000 0000 %0966 j22
007509 -01128 000837 0000 0500 0000 1000 0500 1000 0000 %0967 j23
007314 -00736 000536 0000 0375 0000 1000 0625 1000 0000 %0968 j24
007150 -00396 000284 0000 0250 0000 1000 0750 1000 0000 %0969 j25
007017 -00110 000079 0000 0125 0000 1000 0875 1000 0000 %0970 j26
006966 000000 -00001 0000 0000 0000 1000 1000 1000 0000 %0971 j27

%JE060-7A, Page 65 /66, LAB*la7; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
%LAB*la7, D65, adapted, Y = 40.32 , L* = 69.69 
%100 x LAB*a          %#1000 x (r g b  c m y 0)            %nr.  pos
%z007631 002591 001110 %#1000 0000 0000 0000 1000 1000 0000 %0648 S19 %O1 0
%z009405 -01128 003798 %#1000 1000 0000 0000 0000 1000 0000 %0720 a19 %Y1 1
%z008949 -03632 003051 %#0000 1000 0000 1000 0000 1000 0000 %0072 I01 %L1 2
%z009102 -02206 -00720 %#0000 1000 1000 1000 0000 0000 0000 %0080 I09 %C1 3
%z007195 001623 -03798 %#0000 0000 1000 1000 1000 0000 0000 %0008 A09 %V1 4
%z007828 003773 -02719 %#1000 0000 1000 0000 1000 0000 0000 %0656 S27 %M1 5
%z006966 000001 000000 %#0000 0000 0000 1000 1000 1000 0000 %0000 A01 %N1 6
%z009546 -00001 000014 %#1000 1000 1000 0000 0000 0000 0000 %0728 a27 %W1 7
%$
%z007635 002605 001117 %#1000 0000 0000 0000 1000 1000 0000 %0801 j01 %O2 0
%z009401 -01130 003795 %#1000 1000 0000 0000 0000 1000 0000 %0882 j10 %Y2 1
%z008944 -03625 003042 %#0000 1000 0000 1000 0000 1000 0000 %0963 j19 %L2 2
%z009110 -02202 -00726 %#0000 1000 1000 1000 0000 0000 0000 %0737 b09 %C2 3
%z007194 001632 -03804 %#0000 0000 1000 1000 1000 0000 0000 %0818 b18 %V2 4
%z007831 003786 -02724 %#1000 0000 1000 0000 1000 0000 0000 %0899 b27 %M2 5
%z006966 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0809 j09 %N2 6
%z009548 000000 000013 %#1000 1000 1000 0000 0000 0000 0000 %0729 b01 %W2 7
%$

%JE060-7A, Page 66 /66, LAB*la7; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
%100 x LAB*          1000 x (r g b  c m y 0)            %nr.  pos
006966 -00004 000000 0000 0000 0000 1000 1000 1000 0000 %0972 k01
007039 000009 -00026 0125 0125 0125 0875 0875 0875 0000 %0973 k02
007222 000015 -00075 0250 0250 0250 0750 0750 0750 0000 %0974 k03
007445 000009 -00088 0375 0375 0375 0625 0625 0625 0000 %0975 k04
007711 000015 -00077 0500 0500 0500 0500 0500 0500 0000 %0976 k05
008007 000036 -00038 0625 0625 0625 0375 0375 0375 0000 %0977 k06
008366 000040 000050 0750 0750 0750 0250 0250 0250 0000 %0978 k07
008816 -00002 000176 0875 0875 0875 0125 0125 0125 0000 %0979 k08
009541 -00002 000002 1000 1000 1000 0000 0000 0000 0000 %0980 k09
006965 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0981 l01
007039 000007 -00025 0125 0125 0125 0875 0875 0875 0000 %0982 l02
007222 000015 -00075 0250 0250 0250 0750 0750 0750 0000 %0983 l03
007445 000011 -00089 0375 0375 0375 0625 0625 0625 0000 %0984 l04
007711 000017 -00078 0500 0500 0500 0500 0500 0500 0000 %0985 l05
008007 000038 -00041 0625 0625 0625 0375 0375 0375 0000 %0986 l06
008366 000040 000052 0750 0750 0750 0250 0250 0250 0000 %0987 l07
008816 -00004 000177 0875 0875 0875 0125 0125 0125 0000 %0988 l08
009540 -00002 000002 1000 1000 1000 0000 0000 0000 0000 %0989 l09
006966 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0990 m01
007038 000009 -00026 0125 0125 0125 0875 0875 0875 0000 %0991 m02
007222 000015 -00075 0250 0250 0250 0750 0750 0750 0000 %0992 m03
007445 000007 -00087 0375 0375 0375 0625 0625 0625 0000 %0993 m04
007711 000016 -00078 0500 0500 0500 0500 0500 0500 0000 %0994 m05
008007 000035 -00039 0625 0625 0625 0375 0375 0375 0000 %0995 m06
008366 000040 000052 0750 0750 0750 0250 0250 0250 0000 %0996 m07
008816 000000 000177 0875 0875 0875 0125 0125 0125 0000 %0997 m08
009540 -00005 000004 1000 1000 1000 0000 0000 0000 0000 %0998 m09
006966 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0999 n01
007039 000009 -00023 0125 0125 0125 0875 0875 0875 0000 %1000 n02
007222 000015 -00075 0250 0250 0250 0750 0750 0750 0000 %1001 n03
007445 000008 -00088 0375 0375 0375 0625 0625 0625 0000 %1002 n04
007711 000014 -00079 0500 0500 0500 0500 0500 0500 0000 %1003 n05
008007 000035 -00039 0625 0625 0625 0375 0375 0375 0000 %1004 n06
008366 000042 000051 0750 0750 0750 0250 0250 0250 0000 %1005 n07
008816 -00002 000178 0875 0875 0875 0125 0125 0125 0000 %1006 n08
009540 -00005 000001 1000 1000 1000 0000 0000 0000 0000 %1007 n09
006965 000000 000000 0000 0000 0000 1000 1000 1000 0000 %1008 k10
006978 000003 -00001 0066 0066 0066 0933 0933 0933 0000 %1009 k11
007047 000011 -00031 0133 0133 0133 0866 0866 0866 0000 %1010 k12
007152 000011 -00068 0200 0200 0200 0800 0800 0800 0000 %1011 k13
007247 000014 -00065 0266 0266 0266 0333 0333 0333 0000 %1012 k14
007360 000024 -00086 0333 0333 0333 0666 0666 0666 0000 %1013 k15
007488 000015 -00088 0400 0400 0400 0600 0600 0600 0000 %1014 k16
007636 000011 -00083 0466 0466 0466 0533 0533 0533 0000 %1015 k17
007781 000029 -00088 0533 0533 0533 0466 0466 0466 0000 %1016 k18
007945 000038 -00060 0600 0600 0600 0400 0400 0400 0000 %1017 k19
008125 000037 -00026 0666 0666 0666 0333 0333 0333 0000 %1018 k20
008319 000040 000026 0734 0734 0734 0266 0266 0266 0000 %1019 k21
008542 000034 000098 0800 0800 0800 0200 0200 0200 0000 %1020 k22
008788 000015 000167 0866 0866 0866 0133 0133 0133 0000 %1021 k23
009091 -00017 000279 0933 0933 0933 0066 0066 0066 0000 %1022 k24
009541 -00002 000002 1000 1000 1000 0000 0000 0000 0000 %1023 k25
006966 000000 000000 0000 0000 0000 1000 1000 1000 0000 %1024 l10
006980 000004 -00001 0066 0066 0066 0933 0933 0933 0000 %1025 l11
007048 000013 -00030 0133 0133 0133 0866 0866 0866 0000 %1026 l12
007153 000008 -00066 0200 0200 0200 0800 0800 0800 0000 %1027 l13
007248 000017 -00068 0266 0266 0266 0333 0333 0333 0000 %1028 l14
007362 000018 -00086 0333 0333 0333 0666 0666 0666 0000 %1029 l15
007490 000016 -00089 0400 0400 0400 0600 0600 0600 0000 %1030 l16
007637 000013 -00080 0466 0466 0466 0533 0533 0533 0000 %1031 l17
007784 000030 -00085 0533 0533 0533 0466 0466 0466 0000 %1032 l18
007947 000034 -00058 0600 0600 0600 0400 0400 0400 0000 %1033 l19
008127 000035 -00025 0666 0666 0666 0333 0333 0333 0000 %1034 l20
008322 000044 000026 0734 0734 0734 0266 0266 0266 0000 %1035 l21
008545 000034 000098 0800 0800 0800 0200 0200 0200 0000 %1036 l22
008791 000013 000168 0866 0866 0866 0133 0133 0133 0000 %1037 l23
009092 -00017 000282 0933 0933 0933 0066 0066 0066 0000 %1038 l24
009542 -00002 000005 1000 1000 1000 0000 0000 0000 0000 %1039 l25
006966 000000 000000 0000 0000 0000 1000 1000 1000 0000 %1040 m10
006978 000003 -00001 0066 0066 0066 0933 0933 0933 0000 %1041 m11
007048 000011 -00031 0133 0133 0133 0866 0866 0866 0000 %1042 m12
007152 000008 -00067 0200 0200 0200 0800 0800 0800 0000 %1043 m13
007248 000012 -00066 0266 0266 0266 0333 0333 0333 0000 %1044 m14
007361 000018 -00086 0333 0333 0333 0666 0666 0666 0000 %1045 m15
007488 000015 -00089 0400 0400 0400 0600 0600 0600 0000 %1046 m16
007637 000015 -00082 0466 0466 0466 0533 0533 0533 0000 %1047 m17
007782 000033 -00088 0533 0533 0533 0466 0466 0466 0000 %1048 m18
007945 000035 -00059 0600 0600 0600 0400 0400 0400 0000 %1049 m19
008126 000032 -00024 0666 0666 0666 0333 0333 0333 0000 %1050 m20
008321 000039 000026 0734 0734 0734 0266 0266 0266 0000 %1051 m21
008544 000036 000096 0800 0800 0800 0200 0200 0200 0000 %1052 m22

008790 000015 000167 0866 0866 0866 0133 0133 0133 0000 %1053 m23
009092 -00017 000282 0933 0933 0933 0066 0066 0066 0000 %1054 m24
009542 -00002 000002 1000 1000 1000 0000 0000 0000 0000 %1055 m25
006966 000000 000000 0000 0000 0000 1000 1000 1000 0000 %1056 n10
006980 000004 -00002 0066 0066 0066 0933 0933 0933 0000 %1057 n11
007048 000010 -00032 0133 0133 0133 0866 0866 0866 0000 %1058 n12
007152 000006 -00066 0200 0200 0200 0800 0800 0800 0000 %1059 n13
007247 000018 -00068 0266 0266 0266 0333 0333 0333 0000 %1060 n14
007360 000021 -00087 0333 0333 0333 0666 0666 0666 0000 %1061 n15
007488 000018 -00089 0400 0400 0400 0600 0600 0600 0000 %1062 n16
007635 000014 -00083 0466 0466 0466 0533 0533 0533 0000 %1063 n17
007782 000018 -00079 0533 0533 0533 0466 0466 0466 0000 %1064 n18
007945 000035 -00059 0600 0600 0600 0400 0400 0400 0000 %1065 n19
008126 000035 -00025 0666 0666 0666 0333 0333 0333 0000 %1066 n20
008321 000042 000025 0734 0734 0734 0266 0266 0266 0000 %1067 n21
008543 000036 000096 0800 0800 0800 0200 0200 0200 0000 %1068 n22
008788 000017 000165 0866 0866 0866 0133 0133 0133 0000 %1069 n23
009092 -00017 000279 0933 0933 0933 0066 0066 0066 0000 %1070 n24
009541 -00005 000001 1000 1000 1000 0000 0000 0000 0000 %1071 n25
006966 000000 000000 0000 0000 0000 1000 1000 1000 0000 %1072 k26
009540 000000 000000 1000 1000 1000 0000 0000 0000 0000 %1073 k27
007634 002603 001114 1000 0000 0000 0000 1000 1000 0000 %1074 l26
009097 -02185 -00743 0000 1000 1000 1000 0000 0000 0000 %1075 l27
009400 -01130 003793 1000 1000 0000 0000 0000 1000 0000 %1076 m26
007195 001635 -03809 0000 0000 1000 1000 1000 0000 0000 %1077 m27
008951 -03639 003050 0000 1000 0000 1000 0000 1000 0000 %1078 n26
007831 003792 -02730 1000 0000 1000 0000 1000 0000 0000 %1079 n27
%$
%z007634 002603 001114 %#1000 0000 0000 0000 1000 1000 0000 %1074 l26 %O3 0
%z009400 -01130 003793 %#1000 1000 0000 0000 0000 1000 0000 %1076 m26 %Y3 1
%z008951 -03639 003050 %#0000 1000 0000 1000 0000 1000 0000 %1078 n26 %L3 2
%z009097 -02185 -00743 %#0000 1000 1000 1000 0000 0000 0000 %1075 l27 %C3 3
%z007195 001635 -03809 %#0000 0000 1000 1000 1000 0000 0000 %1077 m27 %V3 4
%z007831 003792 -02730 %#1000 0000 1000 0000 1000 0000 0000 %1079 n27 %M3 5
%z006966 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %1072 k26 %N3 6
%z009540 000000 000000 %#1000 1000 1000 0000 0000 0000 0000 %1073 k27 %W3 7
%$
%z006966 -00002 000000 %#0000 0000 0000 1000 1000 1000 0000 %0972 k01 %N4 6
%z009541 -00002 000002 %#1000 1000 1000 0000 0000 0000 0000 %0980 k09 %W4 7
%$
%z006966 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0981 l01 %N5 6
%z009541 -00002 000003 %#1000 1000 1000 0000 0000 0000 0000 %0989 l09 %W5 7
%$
%z006966 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0990 m01 %N6 6
%z009541 -00003 000003 %#1000 1000 1000 0000 0000 0000 0000 %0998 m09 %W6 7
%$
%z006966 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0999 n01 %N7 6
%z009541 -00005 000001 %#1000 1000 1000 0000 0000 0000 0000 %1007 n09 %W7 7
%$ la7_line 12595
] def

%****************************************************************************

/LAB*Fa0100 [
%JE060-7A, Page 65 /66, LAB*la7; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
%LAB*la7, D65, adapted, Y = 40.32 , L* = 69.69 
%100 x LAB*a          %#1000 x (r g b  c m y 0)            %nr.  pos
%z007631 002591 001110 %#1000 0000 0000 0000 1000 1000 0000 %0648 S19 %O1 0
%z009405 -01128 003798 %#1000 1000 0000 0000 0000 1000 0000 %0720 a19 %Y1 1
%z008949 -03632 003051 %#0000 1000 0000 1000 0000 1000 0000 %0072 I01 %L1 2
%z009102 -02206 -00720 %#0000 1000 1000 1000 0000 0000 0000 %0080 I09 %C1 3
%z007195 001623 -03798 %#0000 0000 1000 1000 1000 0000 0000 %0008 A09 %V1 4
%z007828 003773 -02719 %#1000 0000 1000 0000 1000 0000 0000 %0656 S27 %M1 5
%z006966 000001 000000 %#0000 0000 0000 1000 1000 1000 0000 %0000 A01 %N1 6
%z009546 -00001 000014 %#1000 1000 1000 0000 0000 0000 0000 %0728 a27 %W1 7
%$
007635 002605 001117 %#1000 0000 0000 0000 1000 1000 0000 %0801 j01 %O2 0
009401 -01130 003795 %#1000 1000 0000 0000 0000 1000 0000 %0882 j10 %Y2 1
008944 -03625 003042 %#0000 1000 0000 1000 0000 1000 0000 %0963 j19 %L2 2
009110 -02202 -00726 %#0000 1000 1000 1000 0000 0000 0000 %0737 b09 %C2 3
007194 001632 -03804 %#0000 0000 1000 1000 1000 0000 0000 %0818 b18 %V2 4
007831 003786 -02724 %#1000 0000 1000 0000 1000 0000 0000 %0899 b27 %M2 5
006966 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0809 j09 %N2 6
009548 000000 000013 %#1000 1000 1000 0000 0000 0000 0000 %0729 b01 %W2 7
%$
] def
            } if %xcolor 7, LAB*la7

%*************************************************************************

0 1 23 {/i exch def
        LAB*FaG0100 i LAB*Fa0100 i get 100 div put
        LAB*FaG1100 i LAB*Fa0100 i get 100 div put %identical, no L-data
       } for

0 1 05 {/i exch def %i=0,5
        /A*Fa LAB*FaG0100 i 3 mul 1 add get def
        /B*Fa LAB*FaG0100 i 3 mul 2 add get def
        /H*Fa B*Fa A*Fa 0.0001 add atan def
        angle_olvG01 i H*Fa put
        i 0 eq {angle_olvG01 6 H*Fa 360 add put} if
        
        /A*Fa LAB*FaG1100 i 3 mul 1 add get def
        /B*Fa LAB*FaG1100 i 3 mul 2 add get def
        /H*Fa B*Fa A*Fa 0.0001 add atan def
        angle_olvG11 i H*Fa put
        i 0 eq {angle_olvG11 6 H*Fa 360 add put} if
       } for %i=0,5

0 1 5 {/i exch def /i1 i 1 add def %i=0,5       
       /angle_olvG01_dif angle_olvG01 i1 get angle_olvG01 i get sub def
       angle_olvG01i i angle_olvG01 i get put
       angle_olvG01i i 07 add angle_olvG01 i get angle_olvG01_dif 0.00 mul add put
       angle_olvG01i i 14 add angle_olvG01 i get angle_olvG01_dif 0.00 mul add put
       angle_olvG01i i 21 add angle_olvG01 i get angle_olvG01_dif 0.00 mul add put
       
       /angle_olvG11_dif angle_olvG11 i1 get angle_olvG11 i get sub def
       angle_olvG11i i angle_olvG11 i get put
       angle_olvG11i i 07 add angle_olvG11 i get angle_olvG11_dif 0.00 mul add put
       angle_olvG11i i 14 add angle_olvG11 i get angle_olvG11_dif 0.00 mul add put
       angle_olvG11i i 21 add angle_olvG11 i get angle_olvG11_dif 0.00 mul add put
      } for %i=0,5

/LAB*02 24 array def
/j0 0 def
729 1 971 {/jj exch def %jj=729,971
           /j jj j0 sub def
           %necessary in both cases
         jj 963 eq {%RGB*02 02 RGBCMY0*tx j get put %963 0-8-0 L 2
                   LAB*02 06 LUT j 10 mul 0 add get put
                   LAB*02 07 LUT j 10 mul 1 add get put
                   LAB*02 08 LUT j 10 mul 2 add get put} if
         jj 737 eq {%RGB*02 03 RGBCMY0*tx j get put %737 0-8-8 C 3
                   LAB*02 09 LUT j 10 mul 0 add get put
                   LAB*02 10 LUT j 10 mul 1 add get put
                   LAB*02 11 LUT j 10 mul 2 add get put} if
         jj 818 eq {%RGB*02 04 RGBCMY0*tx j get put %818 0-0-8 V 4
                   LAB*02 12 LUT j 10 mul 0 add get put
                   LAB*02 13 LUT j 10 mul 1 add get put
                   LAB*02 14 LUT j 10 mul 2 add get put} if
         jj 809 eq {%RGB*02 06 RGBCMY0*tx j get put %809 or 890 or 971 0-0-0 N 6
                   LAB*02 18 LUT j          10 mul 0 add get
                             LUT 890 j0 sub 10 mul 0 add get add
                             LUT 971 j0 sub 10 mul 0 add get add 3 div put
                   LAB*02 19 LUT j          10 mul 1 add get
                             LUT 890 j0 sub 10 mul 1 add get add
                             LUT 971 j0 sub 10 mul 1 add get add 3 div put
                   LAB*02 20 LUT j          10 mul 2 add get
                             LUT 890 j0 sub 10 mul 2 add get add
                             LUT 971 j0 sub 10 mul 2 add get add 3 div put} if
         jj 801 eq {%RGB*02 00 RGBCMY0*tx j get put %801 8-0-0 O 0
                   LAB*02 00 LUT j 10 mul 0 add get put
                   LAB*02 01 LUT j 10 mul 1 add get put
                   LAB*02 02 LUT j 10 mul 2 add get put} if
         jj 882 eq {%RGB*02 01 RGBCMY0*tx j get put %882 8-8-0 Y 1
                   LAB*02 03 LUT j 10 mul 0 add get put
                   LAB*02 04 LUT j 10 mul 1 add get put
                   LAB*02 05 LUT j 10 mul 2 add get put} if
         jj 899 eq {%RGB*02 05 RGBCMY0*tx j get put %899 8-0-8 M 5
                   LAB*02 15 LUT j 10 mul 0 add get put
                   LAB*02 16 LUT j 10 mul 1 add get put
                   LAB*02 17 LUT j 10 mul 2 add get put} if
         jj 729 eq {%RGB*02 07 RGBCMY0*tx j get put %729 or 810 or 891 8-8-8 W 7
                   LAB*02 21 LUT j          10 mul 0 add get
                             LUT 810 j0 sub 10 mul 0 add get add
                             LUT 891 j0 sub 10 mul 0 add get add 3 div put
                   LAB*02 22 LUT j          10 mul 1 add get
                             LUT 810 j0 sub 10 mul 1 add get add
                             LUT 891 j0 sub 10 mul 1 add get add 3 div put
                   LAB*02 23 LUT j          10 mul 2 add get
                             LUT 810 j0 sub 10 mul 2 add get add
                             LUT 891 j0 sub 10 mul 2 add get add 3 div put} if
        } for %jj=729,971


0 1 23 {/j exch def %j=0,23
        LAB*02 j LAB*02 j get 100 div put
       } for %j=0,23

/ISRL*ioL 0 def %standard colours
/ISIO*ioL 2 def %special for LAB*02 TLS70


LAB*ioLmod

0 1 1 {/ibild exch def %ibild=0,1

ibild 0 eq {%BEG ibild=0
0 1 05 {/ic exch def %ic=0,11
        S1 20 add yu2 yd ic mul sub moveto
        ( ) nshow
        N*olv ic ColNames ic get put
       } for %ic=0,11
0 1 05 {/i exch def %i=0,11
       /ya yu2 yd i mul sub def
       /L*Fa LAB*a i 3 mul get def
       /A*Fa LAB*a i 3 mul 1 add get def
       /B*Fa LAB*a i 3 mul 2 add get def
       /C*Fa A*Fa dup mul B*Fa dup mul add sqrt def
       /H*Fa B*Fa A*Fa 0.0001 add atan def
       L*olv i L*Fa put
       A*olv i A*Fa put
       B*olv i B*Fa put
       C*olv i C*Fa put
       H*olv i H*Fa put
       o*olv i o3Ma i get put
       l*olv i l3Ma i get put
       v*olv i v3Ma i get put
       i 5 eq {L*olv 6 L*olv 0 get put
               A*olv 6 A*olv 0 get put
               B*olv 6 B*olv 0 get put
               A*olv 6 A*olv 0 get put
               C*olv 6 C*olv 0 get put
               H*olv 6 H*olv 0 get put
               o*olv 6 o*olv 0 get put
               l*olv 6 l*olv 0 get put
               v*olv 6 v*olv 0 get put
              } if
       
       } for %i=0,11
        }%END ibild=0
        {%BEG ibild=1
12 2 27 {/ic exch def %ic=12,27
         N*rgb ic 12 sub 2 idiv ColNames ic get put
        } for %ic=12,27

%calculation of intermediate elementary colours
%/proc_LAB*Fae_LAB*MaeNTABl_olvi3*cmyn3*Ma*ioL {
%BEG procedure proc_LAB*Fae_LAB*MaeNTABl_olvi3*cmyn3*Ma*ioL
%only for calculation without hue tables

%input  LAB*Fae
%input  LAB*a (4 adapted colours RJGB, No. 8 to 11)
%input  nLAB*s0 (colour white N for calculation of lab*l)
%input  wLAB*s0 (colour white W for achromatic axis)

%output LAB*Mae
%output olvi3*Mae
%output cmyn3*Mae

0 1 3 {/j exch def %j=0,3
       /L*Fae0 LAB*a j 8 add 3 mul 0 add get def
       /A*Fae0 LAB*a j 8 add 3 mul 1 add get def
       /B*Fae0 LAB*a j 8 add 3 mul 2 add get def
       /H*Fae0 B*Fae0 A*Fae0 0.0001 add atan def
       j 2 le {/L*Fae1 LAB*a j 1 add 8 add 3 mul 0 add get def
               /A*Fae1 LAB*a j 1 add 8 add 3 mul 1 add get def
               /B*Fae1 LAB*a j 1 add 8 add 3 mul 2 add get def
               /H*Fae1 B*Fae1 A*Fae1 0.0001 add atan def
              }
              {/L*Fae1 LAB*a 0       8 add 3 mul 0 add get def
               /A*Fae1 LAB*a 0       8 add 3 mul 1 add get def
               /B*Fae1 LAB*a 0       8 add 3 mul 2 add get def
               /H*Fae1 B*Fae1 A*Fae1 0.0001 add atan 360 add def
              } ifelse
0 1 1 {/i exch def %i=0,3
       /n j 2 mul i add def
       /ya yu2 yd n mul sub 8000 add def
       /alph i 2 div def /beta 1 alph sub def
       /L*Fae L*Fae0 beta mul L*Fae1 alph mul add def
       /H*Fae H*Fae0 beta mul H*Fae1 alph mul add def
       /A*Fae 100 H*Fae cos mul def
       /B*Fae 100 H*Fae sin mul def
       
       proc_LAB*Fae_LAB*MaeNTABl_olvi3*cmyn3*Ma*ioL
       
         n 0 ge {/ineu n       def} if
         n 2 ge {/ineu n 1 sub def} if
         n 4 ge {/ineu n 2 sub def} if
         L*rgb ineu L*Mae put
         A*rgb ineu A*Mae put
         B*rgb ineu B*Mae put
         C*rgb ineu C*Mae put
         H*rgb ineu H*Mae put
         n 7 eq {/ineu 6 def %ineu=6
         L*rgb ineu L*rgb 0 get put
         A*rgb ineu A*rgb 0 get put
         B*rgb ineu B*rgb 0 get put
         C*rgb ineu C*rgb 0 get put
         H*rgb ineu H*rgb 0 get put
                 } if %ineu=6

      } for %i=0,1 
      
      } for %j=0,3 
        
        } ifelse %END ibild=1

} for %ibild=0,1

%00 1 15 {/xchart exch def %xchart=0,15

 /xchartl 2 def

200 /Times-ISOL1 FS
0 setgray
%100 -200 moveto (AG780-7A: ) show
%(Messung: ) showde
%(Measurement: ) showen
%FileData show
%lanind eq {FileDatade show} {FileDataen show} ifelse
%(, Page ) showen (, Seite ) showde
%xcolor 1 add cvishow (/8) show

20 setlinewidth
%0 0 25000 17100 1.0 1.0 1.0 colrecfi %area white grey

%0 0 25000 17100 0.0 0.0 0.0 colrecst %Rahmen Schwarz

%0 1 15 {/xchartl   exch def %xchartl=0,11

%special space for 'xm03'PROZ0.COM 2x before/after xchartl
%  xchartl   0 eq {  100 13000 translate} if
%  xchartl   1 eq { 6100 13000 translate} if
%  xchartl   2 eq {  100 08750 translate} if
%  xchartl   3 eq { 6100 08750 translate} if

%  xchartl   4 eq {  100  4500 translate} if
%  xchartl   5 eq { 6100  4500 translate} if
%  xchartl   6 eq {  100  0250 translate} if
%  xchartl   7 eq { 6100  0250 translate} if

%  xchartl   8 eq {13500 13000 translate} if
%  xchartl   9 eq {19500 13000 translate} if
%  xchartl   10 eq {13500 08750 translate} if
%  xchartl   11 eq {19500 08750 translate} if

%  xchartl   12 eq {13500  4500 translate} if
%  xchartl   13 eq {19500  4500 translate} if
%  xchartl   14 eq {13500  0250 translate} if
%  xchartl   15 eq {19500  0250 translate} if


/xwidth 5600 def
/ywidth 4000 def

0 0 xwidth ywidth 0.5 0.5 0.5 colrecfi %Rechteck Mittelgrau

20 setlinewidth

0 0 xwidth ywidth 0.0 0.0 0.0 colrecst %Rahmen Schwarz

150 /Times-ISOL1 FS
0 setgray /Param (; cf1=1.00; nt=0.18; nx=1.0, LECD_08_95) def

%xchartl=2
300 -150 moveto 
150 /Times-Roman FS
(AG780-7N) show
150 /Times-ISOL1 FS

2650 0300 translate


gsave
0.8 0.8 scale

1 setgray
-3200   4175   moveto
TBS (System: ) show
FileData show

/x400 400 def
/x700 550 def

0 1 5 {/i exch def /i1 i 1 add def %i=0,5
       /angle_olv_dif angle_olv i1 get angle_olv i get sub def
       angle_olvi i angle_olv i get put
       angle_olvi i 07 add angle_olv i get angle_olv_dif 0.00 mul add put
       angle_olvi i 14 add angle_olv i get angle_olv_dif 0.00 mul add put
       angle_olvi i 21 add angle_olv i get angle_olv_dif 0.00 mul add put

       /angle_rgb_dif angle_rgb i1 get angle_rgb i get sub def
       angle_rgbi i angle_rgb i get put
       angle_rgbi i 07 add angle_rgb i get angle_rgb_dif 0.00 mul add put
       angle_rgbi i 14 add angle_rgb i get angle_rgb_dif 0.00 mul add put
       angle_rgbi i 21 add angle_rgb i get angle_rgb_dif 0.00 mul add put
      } for %i=0,5

/angle6   7 array def
/angle6i 28 array def

/cfarb_olv_o 7 array def
/cfarb_olv_l 7 array def
/cfarb_olv_v 7 array def

/cfarb_rgb_r 7 array def
/cfarb_rgb_g 7 array def
/cfarb_rgb_b 7 array def

/cfarb_olv00_o 7 array def
/cfarb_olv00_l 7 array def
/cfarb_olv00_v 7 array def
/cfarb_olv25_o 7 array def
/cfarb_olv25_l 7 array def
/cfarb_olv25_v 7 array def
/cfarb_olv50_o 7 array def
/cfarb_olv50_l 7 array def
/cfarb_olv50_v 7 array def
/cfarb_olv75_o 7 array def
/cfarb_olv75_l 7 array def
/cfarb_olv75_v 7 array def

/cfarb_rgb00_r 7 array def
/cfarb_rgb00_g 7 array def
/cfarb_rgb00_b 7 array def
/cfarb_rgb25_r 7 array def
/cfarb_rgb25_g 7 array def
/cfarb_rgb25_b 7 array def
/cfarb_rgb50_r 7 array def
/cfarb_rgb50_g 7 array def
/cfarb_rgb50_b 7 array def
/cfarb_rgb75_r 7 array def
/cfarb_rgb75_g 7 array def
/cfarb_rgb75_b 7 array def

/cname_olv [(O) (Y) (L) (C) (V) (M) (O)] def
/cfarb_olv_o [1 1 0 0 0 1 1] def
/cfarb_olv_l [0 1 1 1 0 0 0] def
/cfarb_olv_v [0 0 0 1 1 1 0] def
/cname_rgb [(R) (J) (G) (G50B) (B) (B50R) (R)] def
/cfarb_rgb_r [1 1 0 0 0 1 1] def
/cfarb_rgb_g [0 1 1 1 0 0 0] def
/cfarb_rgb_g [0 0 0 1 1 1 0] def

/cname_olv00 [(O00Y) (Y00L) (L00C) (C00V) (V00M) (M00O) (O00Y)] def
/cfarb_olv00_o [1 1 0 0 0 1 1] def
/cfarb_olv00_l [0 1 1 1 0 0 0] def
/cfarb_olv00_v [0 0 0 1 1 1 0] def
/cname_olv25 [(O25Y) (Y25L) (L25C) (C25V) (V25M) (M25O) (O25Y)] def
/cfarb_olv25_o [1.00 0.75 0.00 0.00 0.25 1.00 1.00] def
/cfarb_olv25_l [0.25 1.00 1.00 0.75 0.00 0.00 0.25] def
/cfarb_olv25_v [0.00 0.00 0.25 1.00 1.00 0.75 0.00] def
/cname_olv50 [(O50Y) (Y50L) (L50C) (C50V) (V50M) (M50O) (O50Y)] def
/cfarb_olv50_o [1.00 0.50 0.00 0.00 0.50 1.00 1.00] def
/cfarb_olv50_l [0.50 1.00 1.00 0.50 0.00 0.00 0.50] def
/cfarb_olv50_v [0.00 0.00 0.50 1.00 1.00 0.50 0.00] def
/cname_olv75 [(O75Y) (Y75L) (L75C) (C75V) (V75M) (M75O) (O75Y)] def
/cfarb_olv75_o [1.00 0.25 0.00 0.00 0.75 1.00 1.00] def
/cfarb_olv75_l [0.75 1.00 1.00 0.25 0.00 0.00 0.75] def
/cfarb_olv75_v [0.00 0.00 0.75 1.00 1.00 0.25 0.00] def

/cname_rgb00 [(R00J) (J00G) (G00B) (G50B) (B00R) (B50R) (R00J)] def
/cfarb_rgb00_r [1 1 0 0 0 1 1] def
/cfarb_rgb00_g [0 1 1 1 0 0 0] def
/cfarb_rgb00_b [0 0 0 1 1 1 0] def
/cname_rgb25 [(R25J) (J25G) (G13B) (G62B) (B12R) (B63R) (R25J)] def
/cfarb_rgb25_r [1.00 0.75 0.00 0.00 0.25 1.00 1.00] def
/cfarb_rgb25_g [0.25 1.00 1.00 0.75 0.00 0.00 0.25] def
/cfarb_rgb25_b [0.00 0.00 0.25 1.00 1.00 0.75 0.00] def
/cname_rgb50 [(R50J) (J50G) (G25B) (G75B) (B25R) (B75R) (R50J)] def
/cfarb_rgb50_r [1.00 0.50 0.00 0.00 0.50 1.00 1.00] def
/cfarb_rgb50_g [0.50 1.00 1.00 0.50 0.00 0.00 0.50] def
/cfarb_rgb50_b [0.00 0.00 0.50 1.00 1.00 0.50 0.00] def
/cname_rgb75 [(R75J) (J75G) (G38B) (G88B) (B38R) (B88R) (R75J)] def
/cfarb_rgb75_r [1.00 0.25 0.00 0.00 0.75 1.00 1.00] def
/cfarb_rgb75_g [0.75 1.00 1.00 0.25 0.00 0.00 0.75] def
/cfarb_rgb75_b [0.00 0.00 0.75 1.00 1.00 0.25 0.00] def

/cname6 7 array def

/olvrgb 0 def


0 1 6 {/i exch def
       cname6 i
       olvrgb 0 eq {%olvrgb=0
                    xcolor 0 eq xcolor 1 eq or {cname_olv00 i get} if
                    xcolor 2 eq xcolor 3 eq or {cname_olv00 i get} if
                    xcolor 4 eq xcolor 5 eq or {cname_olv00 i get} if
                    xcolor 6 eq xcolor 7 eq or {cname_olv00 i get} if
                   } 
                   {%olvrgb=1
                    xcolor 0 eq xcolor 1 eq or {cname_rgb00 i get} if
                    xcolor 2 eq xcolor 3 eq or {cname_rgb00 i get} if
                    xcolor 4 eq xcolor 5 eq or {cname_rgb00 i get} if
                    xcolor 6 eq xcolor 7 eq or {cname_rgb00 i get} if
                   } ifelse
       put

       angle6 i
       olvrgb 0 eq {%olvrgb=0
                    xcolor 0 eq xcolor 1 eq or {angle_olvi i get} if
                    xcolor 2 eq xcolor 3 eq or {angle_olvi i get} if
                    xcolor 4 eq xcolor 5 eq or {angle_olvi i get} if
                    xcolor 6 eq xcolor 7 eq or {angle_olvi i get} if
                   }
                   {%olvrgb=1
                    xcolor 0 eq xcolor 1 eq or {angle_rgbi i get} if
                    xcolor 2 eq xcolor 3 eq or {angle_rgbi i get} if
                    xcolor 4 eq xcolor 5 eq or {angle_rgbi i get} if
                    xcolor 6 eq xcolor 7 eq or {angle_rgbi i get} if
                   } ifelse
       put
      } for             

xchartl 0 eq xchartl 4 eq or xchartl 8  eq or xchartl 12 eq or {/jbild 0 def} if
xchartl 1 eq xchartl 5 eq or xchartl 9  eq or xchartl 13 eq or {/jbild 1 def} if
xchartl 2 eq xchartl 6 eq or xchartl 10 eq or xchartl 14 eq or {/jbild 2 def} if
xchartl 3 eq xchartl 7 eq or xchartl 11 eq or xchartl 15 eq or {/jbild 3 def} if

jbild 3 ne {%jbild#3
-3200   3900   moveto
TBS 
(Buntton: ) showde
(Hue: ) showen
(Teinte: ) showfr

TBIS (h*) show
TBL 0 -50 rmoveto
jbild 0 eq {cname6 0 get show} if
jbild 1 eq {cname6 1 get show} if
jbild 2 eq {cname6 2 get show} if
0 50 rmoveto
TBS (=) show
jbild 0 eq {angle6 0 get cvishow} if
jbild 1 eq {angle6 1 get cvishow} if
jbild 2 eq {angle6 2 get cvishow} if
(/360; ) show
TBIS (h*) show
TBL 0 -50 rmoveto
jbild 0 eq {cname6 3 get show
            olvrgb 1 eq {0 -50 rmoveto (gb) show 0 50 rmoveto} if
           } if
jbild 1 eq {cname6 4 get show} if
jbild 2 eq {cname6 5 get show
            olvrgb 1 eq {0 -50 rmoveto (br) show 0 50 rmoveto} if
           } if
0 50 rmoveto
TBS (=) show
jbild 0 eq {angle6 3 get cvishow} if
jbild 1 eq {angle6 4 get cvishow} if
jbild 2 eq {angle6 5 get cvishow} if
(/360) show
         } if %jbild#3

xchartl 12 ge {%xchartl>=12
-3200  3625  xchartl 15 eq {300 add} if moveto
TBS
(Ergebnis: ) showde
(Result: ) showen
(Result: ) showfr

TBIS (c*) show
TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto
TBS (=) show
TBIS (c*) show
TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto
TBS (; ) show
TBIS (t*) show
TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto
TBS (=) show
TBIS (t*) show
TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto
             } if %xchartl>=12

xchartl   0 ge xchartl   3 le and {%0<=xchartl<=3
-3200 4400 moveto
TBS
(Beziehung ) showde
(Linear relation ) showen
(Linear relation ) showfr

TBS (CIELAB \050) show
TBIS (L*, a*, b*) show
TBS (\051) show
( und ) showde
( and ) showen
( et ) showfr

TBIS 
(adaptiertes (a) ) showde
(adapted (a) ) showen
(adapted (a) ) showfr


TBS (CIELAB \050) show
TBIS (C*) show
TBL 0 -50 rmoveto (ab,a) show 0 50 rmoveto
TBS (, ) show
TBIS (L*) show
TBS (\051) show

x400 4100 moveto
TBIS (l*) show
TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto
TBS (=\050 ) show 
TBIS (L*) show TBS ( - ) show  TBIS (L*) show
0 -50 rmoveto TBL (N) show 0 50 rmoveto
TBS ( \051 / \050) show TBIS (L*) show
0 -50 rmoveto TBL (W) show 0 50 rmoveto
( - ) show  TBIS (L*) show
0 -50 rmoveto TBL (N) show 0 50 rmoveto
TBS ( \051) show

x400 3800 moveto
TBIS (a*) show 
0 -50 rmoveto TBL (a) show 0 50 rmoveto
TBS (=) show 
TBIS (a*) show
TBS ( - ) show 
TBIS (a*) show
0 -50 rmoveto TBL (N) show 0 50 rmoveto
TBS ( - ) show 
TBIS (l*) show
TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto
TBS ( [ ) show
TBIS (a*) show
0 -50 rmoveto TBL (W) show 0 50 rmoveto
TBS ( - ) show
TBIS (a*) show
0 -50 rmoveto TBL (N) show 0 50 rmoveto
TBS ( ]) show

x400 3500 moveto
TBIS (b*) show 
0 -50 rmoveto TBL (a) show 0 50 rmoveto
TBS (=) show 
TBIS (b*) show
TBS ( - ) show 
TBIS (b*) show
0 -50 rmoveto TBL (N) show 0 50 rmoveto
TBS ( - ) show 
TBIS (l*) show
TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto
TBS ( [ ) show
TBIS (b*) show
0 -50 rmoveto TBL (W) show 0 50 rmoveto
TBS ( - ) show
TBIS (b*) show
0 -50 rmoveto TBL (N) show 0 50 rmoveto
TBS ( ]) show

x400 500 add 3200 moveto
TBIS (C*) show 
0 -50 rmoveto TBL (ab,a) show 0 50 rmoveto
TBS (=[ ) show 
TBIS (a*) show 
0 -50 rmoveto TBL (a) show 0  050 rmoveto
0 100 rmoveto TBL (2) show 0 -100 rmoveto

TBS ( + ) show 
TBIS (b*) show 
0 -50 rmoveto TBL (a) show 0  050 rmoveto
0 100 rmoveto TBL (2) show 0 -100 rmoveto
TBS ( ] ) show
0 100 rmoveto TBL (1/2) show 0 -100 rmoveto

                            } if %0<=xchartl<=3

xchartl   4 ge xchartl   7 le and {%4<=xchartl<=7
-3200 4400 moveto
TBIS 
(Adaptiertes (a) ) showde
(Adapted (a) ) showen
(Adapted (a) ) showfr

TBS (CIELAB \050) show
TBIS (C*) show
TBL 0 -50 rmoveto (ab,a) show 0 50 rmoveto
TBS (, ) show
TBIS (L*) show
TBS (\051) show
TBS
( und ) showde
( and ) showen
( et ) showfr

TBIS
(relatives ) showde
(relative ) showen
(relatif ) showfr

TBS (CIELAB \050) show
TBIS (c*) show
0 -50 rmoveto TBL (lab*) show 0 50 rmoveto
TBS (, ) show
TBIS (l*) show
0 -50 rmoveto TBL (lab*) show 0 50 rmoveto
TBS (\051) show

x700 4100 moveto
TBIS (l*) show 
0 -50 rmoveto TBL (lab*) show 0 50 rmoveto
TBS (=\050 ) show 
TBIS (L*) show TBS ( - ) show  TBIS (L*) show
0 -50 rmoveto TBL (N) show 0 50 rmoveto
TBS ( \051 / \050) show TBIS (L*) show
0 -50 rmoveto TBL (W) show 0 50 rmoveto
( - ) show  TBIS (L*) show
0 -50 rmoveto TBL (N) show 0 50 rmoveto
TBS ( \051) show

x700 3800 moveto
TBIS (c*) show
0 -50 rmoveto TBL (lab*) show 0 50 rmoveto
TBS (=) show 
TBIS (C*) show 0 -50 rmoveto TBL (ab,a) show 0 50 rmoveto
TBS ( / ) show
TBIS (C*) show 0 -50 rmoveto TBL (ab,a,M) show 0 50 rmoveto

x700 3500 moveto
TBIS (M) show
TBS
(=Maximalfarbe) showde
(=Maximum colour) showen
(=couleur maximale) showfr
                            } if %4<=xchartl<=7
                            
xchartl   8 ge xchartl  11 le and {%8<=xchartl<=11
-3200 4400 moveto
TBS
(Beziehung ) showde
(Linear relation ) showen
(Linear relation ) showfr

TBIS
(adaptiertes (a) ) showde
(adapted (a) ) showen
(adapted (a) ) showfr

TBS (CIELAB \050) show
TBIS (C*) show
TBL 0 -50 rmoveto (ab,a) show 0 50 rmoveto
TBS (, ) show
TBIS (L*) show
TBS (\051) show
TBS
( und ) showde
( and ) showen
( et ) showfr

TBIS
(relatives ) showde
(relative ) showen
(relatif ) showfr

TBS (CIELAB \050) show
TBIS (c*) show
TBS (, ) show
TBIS (t*) show
TBS (\051) show

x700 4100 moveto
TBIS (l*) show
0 -50 rmoveto TBL (M) show 0 50 rmoveto
TBS (=\050) show 
TBIS (L*) show 
0 -50 rmoveto TBL (M) show 0 50 rmoveto
TBS ( - ) show  TBIS (L*) show
0 -50 rmoveto TBL (N) show 0 50 rmoveto
TBS (\051 / \050) show TBIS (L*) show
0 -50 rmoveto TBL (W) show 0 50 rmoveto
( - ) show  TBIS (L*) show
0 -50 rmoveto TBL (N) show 0 50 rmoveto
TBS (\051) show

x700 3800 moveto
TBIS (t*) show 
TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto
TBS (=) show 
TBIS (l*) show
TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto
TBS ( - ) show  TBIS (c*) show
TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto
TBS ( [ ) show TBIS (l*) show
%TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto
0 -50 rmoveto TBL (M) show 0 50 rmoveto
TBS ( - 0,5 ]) show

x700 3500 moveto
TBIS (c*) show
TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto
TBS (=) show 
TBIS (C*) show 0 -50 rmoveto TBL (ab,a) show 0 50 rmoveto
TBS ( / ) show
TBIS (C*) show 0 -50 rmoveto TBL (ab,a,M) show 0 50 rmoveto

 700 3200 moveto
TBIS (M) show
TBS
(=Maximalfarbe) showde
(=Maximum colour) showen
(=Couleur maximale) showfr
                            } if %8<=xchartl<=11
                            
xchartl   12 ge xchartl   15 le and {%12<=xchartl<=15
-3200 4400 moveto
TBS
(Beziehung ) showde
(Linear relation ) showen
(Linear relation ) showfr

TBIS olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show
TBS
( und ) showde
( and ) showen
( et ) showfr

TBIS (relative ) show
TBS
(Buntheit ) showde
(chroma ) showen
(chroma ) showfr

TBIS (c*) show
TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto

xchartl 03 ne
xchartl 07 ne and
xchartl 11 ne and
xchartl 15 ne and {%xchart #3,7,11,15 or =3,7,11,15
RBS
( und Dreiecks\255Helligkeit ) showde
( and triangle lightness ) showen
TBS
( et triangle clart\351 ) showfr

TBIS (t*) show
TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto

        } %xchart #3,7,11,15
%*********************************************************************************
        { %xchart =3,7,11,15
TBS
( oder Buntheit ) showde
( or chroma ) showen
( ou chroma ) showfr

TBIS (a) show
xchartl 12 ge {(*) show} if
TBL 0 -50 rmoveto
xchartl  0 ge xchartl  3 le and {(rgb) show} if
xchartl  4 ge xchartl  7 le and {(olv) show} if
xchartl  8 ge xchartl 11 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if
xchartl 12 ge xchartl 15 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if
TBL 0 50 rmoveto

TBS (, ) show
TBIS (b) show
xchartl 12 ge {(*) show} if
TBL 0 -50 rmoveto
xchartl  0 ge xchartl  3 le and {(rgb) show} if
xchartl  4 ge xchartl  7 le and {(olv) show} if
xchartl  8 ge xchartl 11 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if
xchartl 12 ge xchartl 15 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if
TBL 0 50 rmoveto

        } ifelse %xchart #3,7,11,15 or =3,7,11,15

x700 4100 moveto
TBIS (c*) show
TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto
TBS (=max \050) show 
TBIS olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 
TBS (\051 - min \050) show 
TBIS olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show
TBS (\051) show

x700 3800 moveto
TBIS (n*) show
%TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto
TBS (=1 - max \050) show 
TBIS olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 
TBS (\051) show
TBS (= 1 - ) show
TBIS (i*) show
%TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto 

x700 3500 moveto
TBIS (w*) show
%TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto
TBS (=min \050) show 
TBIS olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 
TBS (\051) show
TBS (= 1 - ) show
TBIS (d*) show
%TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto

x700 3200 moveto
TBIS (t*) show
TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto
TBS (=) show 
TBIS (w*) show
%TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto
TBS ( + 0,5 ) show 
TBIS (c*) show
TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto

xchartl 14 le {
 700 2900 moveto
TBIS (M) show
TBS
(=Maximalfarbe) showde
(=Maximum colour) showen
(=Couleur maximale) showfr

             } if

                            } if %12<=xchartl<=15

xchartl   2 le {
1500   150   moveto
TBK 
(Buntheit) showde
(chroma) showen
(chroma) showfr

2500   150   moveto TBIK (C*) show 
TS 0 -50 rmoveto (ab,a) show

-1600 3100 moveto
TBK
(Helligkeit) showde
(lightness) showen
(clart\351) showfr

-350   3100   moveto TBIK (L*) show
            } if

grestore
gsave

xchart 3 le {0.75 dup scale} {0.80 dup scale} ifelse

xchartl 03 ne
xchartl 07 ne and
xchartl 11 ne and
xchartl 15 ne and {%xchart #3,7,11,15 or =3,7,11,15

xchartl 1 eq xcolor 2 eq xcolor 3 eq or and { 200 0 translate} if %special shift for J-B
xchartl 1 eq xcolor 4 eq xcolor 5 eq or and {-300 0 translate} if %special shift for J-B
xchartl 1 eq xcolor 6 eq xcolor 7 eq or and { 200 0 translate} if %special shift for J-B

/j729 0 def
xchartl   0 eq xchartl   4 eq or xchartl   8 eq or xchartl   12 eq or
{/j1 729 j729 sub         10 mul def} if %series O-C
xchartl   1 eq xchartl   5 eq or xchartl   9 eq or xchartl   13 eq or
{/j1 729 j729 sub 081 add 10 mul def} if %series Y-V
xchartl   2 eq xchartl   6 eq or xchartl  10 eq or xchartl   14 eq or
{/j1 729 j729 sub 162 add 10 mul def} if %series L-M

0 1 080 {/i exch def %i=0,080
         /i10 j1 i 10 mul add def
         LUTL* i LUT i10 0 add get  100 div put 
         LUTA* i LUT i10 1 add get  100 div put
         LUTB* i LUT i10 2 add get  100 div put
         LUTr* i LUT i10 3 add get 1000 div put
         LUTg* i LUT i10 4 add get 1000 div put
         LUTb* i LUT i10 5 add get 1000 div put
         C*ab  i LUTA* i get dup mul
                 LUTB* i get dup mul add 0.000001 add sqrt put
         L*    i LUTL* i get put
        } for %i=0,080
        
%       801 737 809 729  882 818 890 810  963 899 971 891
%       j01 b09 j09 b01  j10 b18 j18 b10  j19 b27 j27 b19
%       O   C   N1  W1   Y   V   N2  W2   L   M   N3  W3

       xchartl 0 eq xchartl   4 eq or xchartl   8 eq or xchartl  12 eq or
       {/index [801 737 809 729] def} if %O,C,N1,W1
       xchartl 1 eq xchartl   5 eq or xchartl   9 eq or xchartl  13 eq or
       {/index [882 818 890 810] def} if %Y,V,N2,W2
       xchartl 2 eq xchartl   6 eq or xchartl  10 eq or xchartl  14 eq or
       {/index [963 899 971 891] def} if %L,M,N1,W2

0 1 3 {/i exch def %i=0,3 %standard colours at the end
       /i10 index i get j729 sub 10 mul def
       /i81 81 i add def
       LUTL* i81 LUT i10 0 add get 100 div put
       LUTA* i81 LUT i10 1 add get 100 div put
       LUTB* i81 LUT i10 2 add get 100 div put
       LUTr* i81 LUT i10 3 add get 1000 div put
       LUTg* i81 LUT i10 4 add get 1000 div put
       LUTb* i81 LUT i10 5 add get 1000 div put
       C*ab  i81 LUTA* i81 get dup mul
                 LUTB* i81 get dup mul add 0.000001 add sqrt put
       L*    i81 LUTL* i81 get put
      } for %i=0,3

/L*WN LUTL* 84 get LUTL* 83 get sub def

0 1 084 {/i exch def %i=0,084
         LUTl*  i LUTL* i get LUTL* 83 get sub 
                  L*WN 0.000001 add div put
         LUTc1* i C*ab i get C*ab 81 get 0.000001 add div put
         LUTc2* i C*ab i get C*ab 82 get 0.000001 add div put
         LUTt1* i LUTl* i get LUTc1* i get 
                  L* 81 get L* 83 get sub L*WN
                  0.000001 add div 0.5 sub mul sub put
         LUTt2* i LUTl* i get LUTc2* i get
                  L* 82 get L* 83 get sub L*WN
                  0.000001 add div 0.5 sub mul sub put
                  LUTr* i get 0 lt {LUTr* i 0 put} if
         LUTg* i get 0 lt {LUTg* i 0 put} if
         LUTb* i get 0 lt {LUTb* i 0 put} if
         LUTr* i get 1 gt {LUTr* i 1 put} if
         LUTg* i get 1 gt {LUTg* i 1 put} if
         LUTb* i get 1 gt {LUTb* i 1 put} if
         %maximum
         /max LUTr* i get def %rgb brilliantness
         LUTg* i get max gt {/max LUTg* i get def} if
         LUTb* i get max gt {/max LUTb* i get def} if
         %minimum
         /min LUTr* i get def %rgb whiteness
         LUTg* i get min lt {/min LUTg* i get def} if
         LUTb* i get min lt {/min LUTb* i get def} if         
         LUTc*rgb i max min sub put %rgb chroma
         LUTt*rgb i min max min sub 0.5 mul add put %rgb triangle lightness
        } for %i=0,084
        
%axis and scales
1 setgray
-3000 0 moveto 6250  0 rlineto stroke
0 -080  moveto 0 3600  rlineto stroke
 3250 100 sub 50 moveto 100 -50 rlineto
                       -100 -50 rlineto closepath fill
0 50 sub 3600 100 sub moveto 50  100 rlineto
                             50 -100 rlineto closepath fill

0 setgray
TS
/xt001 9 array def
/xt001 [(-1,0) () (-0,5) ( ) (  0) () (  0,5) () () ] def %(  1,0)] def
/yt001 5 array def
/yt001 [( ) () (0,5) ( ) (1,0)] def

/xt100 9 array def
/xt100 [(-100) () ( -50) ( ) (     0) () (  50) () (100)] def
/yt100 5 array def
/yt100 [( ) () (50) ( ) (100)] def

0 1 8 {/i exch def %i=0,8
        -3000   i 750   mul add  -50 moveto 0 100 rlineto stroke
        -3200   i 750   mul add -250   moveto
        xchartl 3 le {xt100}{xt001} ifelse i get show
       } for %i=0,8

0 1 4 {/i exch def %i=0,4
       -75 0 i 750 mul    add moveto 150 0 rlineto stroke
        30 50 i 750 mul   add moveto
        xchartl 3 le {yt100}{yt001} ifelse i get show
      } for %i=0,4

xchartl   4 ge xchartl 7 le and {
1 setgray
-2800   3100   moveto TBIK 
(relative ) showde
(relative ) showen
(relatif ) showfr

TBK
(Helligkeit) showde
(lightness) showen
(clart\351) showfr

-600   3100   moveto TBIK (l*) show
xchartl 11 le {TS 0 -50 rmoveto (lab*) show 0 50 rmoveto} if
               } if

xchartl   8 ge {
1 setgray
-2800   3100   moveto
RBK
(Dreiecks-Helligkeit) showde
(triangle lightness) showen
TBK
(triangle clart\351) showfr

-600   3100   moveto TBIK (t*) show
xchartl 11 le {TS 0 -50 rmoveto (lab*) show 0 50 rmoveto} if
xchartl 12 ge {TS 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto} if
               } if

xchartl    4 ge {
1000   150   moveto TBIK (relative ) show
TBK
(Buntheit) showde
(chroma) showen
(chroma) showfr
2800   150   moveto TBIK (c*) show
xchartl 11 le {TS 0 -50 rmoveto (lab*) show 0 50 rmoveto} if
xchartl 12 ge {TS 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto} if
            } if

xchartl 12 ge {
1500 2350 moveto
TBIS (n*) show
%TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto
TBS (=0; ) show 
TBIS (i*) show
%TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto
TBS (=1) show

1500 0550 moveto
TBIS (w*) show
%TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto
TBS (=0; ) show 
TBIS (d*) show
%TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto
TBS (=1) show
            } if

/fakt  30 def
/fakt2 3000 def
100 /Times-ISOL1 FS
/j1 0 def
/k1 0 def
/k2 3 def

newpath

xchartl   0 ge xchartl   2 le and {%0<=xchartl  <=2
%**********************************************************************
100 /Times-ISOL1 FS

%**********************************************************************
/Vorz 1 def
k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 72 def} if %row j01 to j09: O-N
         k 1 eq {/j2 6 def /j0 64 def} if %row i02 to i08: O-N
         k 2 eq {/j2 4 def /j0 56 def} if %row h03 to h07: O-N
         k 3 eq {/j2 2 def /j0 48 def} if %row g04 to g06: O-N
       
j1 1 j2 {/j exch def %j=j1,j2 %lines
         /ja j0 j add def
         L*   j LUTL* ja get put
         C*ab j LUTA* ja get dup mul
                LUTB* ja get dup mul add sqrt Vorz mul put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         C*ab j get fakt mul
         L*   j get fakt mul
         050 0 360 arc fill
         j 1 ge {
                 C*ab j 1 sub get fakt mul
                 L*   j 1 sub get fakt mul moveto
                 C*ab j get fakt mul
                 L*   j get fakt mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         C*ab j get fakt mul
                         L*   j get fakt mul moveto
                         C*ab 0 get fakt mul
                         L*   0 get fakt mul lineto stroke
                        } if %k=0
                 } if
       } for %j=j1,j2
       
       } for %k=0,3

%**********************************************************************

/Vorz 1 def
%spalte e05 bis e05: W-O
0 1 0 {/j exch def %j=0,0 %lines
       /ja j 40 add def
       L*   j LUTL* ja get put
       C*ab j LUTA* ja get dup mul
              LUTB* ja get dup mul add sqrt Vorz mul put
       newpath
       LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
       C*ab j get fakt mul
       L*   j get fakt mul
       050 0 360 arc fill
       1 setgray
       10 setlinewidth
       C*ab j get fakt mul
       L*   j get fakt mul
       055 0 360 arc stroke
       20 setlinewidth
       newpath
      } for %j=0,0

k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 00 def} if %line b01 to j01: W-O
         k 1 eq {/j2 6 def /j0 10 def} if %line c02 to i02: W-O
         k 2 eq {/j2 4 def /j0 20 def} if %line d03 to h03: W-O
         k 3 eq {/j2 2 def /j0 30 def} if %line e04 to g04: W-O
         
j1 1 j2 {/j exch def %j=j1,j2 %lines
         /ja j0 j 9 mul add def
         L*   j LUTL* ja get put
         C*ab j LUTA* ja get dup mul
                LUTB* ja get dup mul add sqrt Vorz mul put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         C*ab j get fakt mul
         L*   j get fakt mul
         050 0 360 arc fill
         j 1 ge {C*ab j 1 sub get fakt mul
                 L*   j 1 sub get fakt mul moveto
                 C*ab j get fakt mul
                 L*   j get fakt mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         C*ab j get fakt mul
                         L*   j get fakt mul moveto
                         C*ab 0 get fakt mul
                         L*   0 get fakt mul lineto stroke
                         C*ab j get fakt mul
                         L*   j get fakt mul
                         070 0 360 arc stroke
                        } if %k=0
                 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
                 newpath 250 /TimesBI-ISOL1 FS
                 /xadd0 [-700 -700 -700] def /yadd0 [250 250 250] def
                 /xadd1 [-700 -700 -700] def /yadd1 [250 250 250] def
                 C*ab j get fakt mul olvrgb 0 eq {xadd0} {xadd1} ifelse xchartl get add
                 L*   j get fakt mul olvrgb 0 eq {yadd0} {yadd1} ifelse xchartl get add
                 moveto
                 cname6 xchartl get show
                 1 setgray
                 C*ab  j     get fakt mul 1080 sub
                 L*  j       get fakt mul 1200 sub moveto
                 TBS (\050) show TBIS (C*) show 
                 0 -50 rmoveto TBL (ab,a,M) show 0 50 rmoveto
                 TBIS (,) show
                 C*ab  j     get fakt mul 1080 sub 
                 L*  j       get fakt mul 1200 sub 300 sub moveto
                 TBIS ( L*) show
                 0 -50 rmoveto TBL (M) show 0 50 rmoveto
                 TBS (\051) show 
                 newpath
                } if
        } for %j=j1,j2

        } for %k=0,3

%**********************************************************************
/Vorz -1 def
k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 08 def} if %line b09 to j09: C-N
         k 1 eq {/j2 6 def /j0 16 def} if %line c08 to i08: C-N
         k 2 eq {/j2 4 def /j0 24 def} if %line d07 to h07: C-N
         k 3 eq {/j2 2 def /j0 32 def} if %line e06 to h06: C-N

j1 1 j2 {/j exch def %j=j1,j2 %lines
         /ja j0 j 9 mul add def
         L*   j LUTL* ja get put
         C*ab j LUTA* ja get dup mul
                LUTB* ja get dup mul add sqrt Vorz mul put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         C*ab j get fakt mul
         L*   j get fakt mul
         050 0 360 arc fill
         j 1 ge {C*ab j 1 sub get fakt mul
                 L*   j 1 sub get fakt mul moveto
                 C*ab j get fakt mul
                 L*   j get fakt mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         C*ab j get fakt mul
                         L*   j get fakt mul moveto
                         C*ab 0 get fakt mul
                         L*   0 get fakt mul lineto stroke
                        } if %k=0
                 } if
        } for %j=j1,j2
        
        } for %k=0,3

%**********************************************************************
/Vorz -1 def

%spalte e05 bis e05: W-C
0 1 0 {/j exch def %j=0,0 %lines
       /ja j 40 add def
       L*   j LUTL* ja get put
       C*ab j LUTA* ja get dup mul
              LUTB* ja get dup mul add sqrt Vorz mul put
       newpath
       LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
       C*ab j get fakt mul
       L*   j get fakt mul
       050 0 360 arc fill
       1 setgray
       10 setlinewidth
       C*ab j get fakt mul
       L*   j get fakt mul
       055 0 360 arc stroke
       20 setlinewidth
       newpath
      } for %j=0,0

k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 00 def} if %row b01 to b09: W-C
         k 1 eq {/j2 6 def /j0 10 def} if %row c02 to c08: W-C
         k 2 eq {/j2 4 def /j0 20 def} if %row d03 to d07: W-C
         k 3 eq {/j2 2 def /j0 30 def} if %row e04 to e06: W-C

j1 1 j2 {/j exch def %j=j1,j2 %rows
         /ja j0 j add def
         L*   j LUTL* ja get put
         C*ab j LUTA* ja get dup mul
                LUTB* ja get dup mul add sqrt Vorz mul put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         C*ab j get fakt mul
         L*   j get fakt mul
         050 0 360 arc fill
         j 1 ge {C*ab j 1 sub get fakt mul
                 L*   j 1 sub get fakt mul moveto
                 C*ab j get fakt mul
                 L*   j get fakt mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         C*ab j get fakt mul
                         L*   j get fakt mul moveto
                         C*ab 0 get fakt mul
                         L*   0 get fakt mul lineto stroke
                         C*ab j get fakt mul
                         L*   j get fakt mul
                         070 0 360 arc stroke
                        } if %k=0
                 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
                 newpath 250 /TimesBI-ISOL1 FS
                 /xadd0 [-000 -000 -000] def /yadd0 [400 400 400] def
                 /xadd1 [-000 -000 -000] def /yadd1 [400 400 400] def
                 C*ab j get fakt mul olvrgb 0 eq {xadd0} {xadd1} ifelse xchartl get add
                 L*   j get fakt mul olvrgb 0 eq {yadd0} {yadd1} ifelse xchartl get add
                 moveto
                 cname6 3 xchartl add get show
                 newpath
                } if
        } for %j=j1,j2
        
        } for %k=0,3
        
/fakt 30 def
icolor 1 eq {%icolor=1    
0 0 0 setrgbcolor
/i24 xcolor 2 idiv 24 mul def
/C*abW 0 def
/C*abN 0 def
/L*aN LAB*Fa0100 6 3 mul i24 add get def
/L*aW LAB*Fa0100 7 3 mul i24 add get def
/j xchartl def
/j30 j 3 mul i24 add def /j31 j30 1 add def /j32 j30 2 add def
/C*abM LAB*Fa0100 j31 get dup mul
       LAB*Fa0100 j32 get dup mul add 0.0001 add sqrt def
C*abN fakt mul L*aN fakt mul moveto
C*abM fakt mul LAB*Fa0100 j30 get fakt mul lineto
C*abW fakt mul L*aW fakt mul lineto
stroke
/j xchartl 3 add def
/j30 j 3 mul i24 add def /j31 j30 1 add def /j32 j30 2 add def
/C*abM LAB*Fa0100 j31 get dup mul
       LAB*Fa0100 j32 get dup mul add 0.0001 add sqrt def
C*abN fakt mul neg L*aN fakt mul moveto
C*abM fakt mul neg LAB*Fa0100 j30 get fakt mul lineto
C*abW fakt mul neg L*aW fakt mul lineto
stroke
} if %icolor=1

%**********************************************************************
} if %0<=xchartl  <=2

newpath

xchartl   4 ge xchartl   6 le and {%4<=xchartl  <=6
%**********************************************************************
100 /Times-ISOL1 FS

/Vorz 1 def
k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 72 def} if %row j01 to j09: O-N
         k 1 eq {/j2 6 def /j0 64 def} if %row i02 to i08: O-N
         k 2 eq {/j2 4 def /j0 56 def} if %row h03 to h07: O-N
         k 3 eq {/j2 2 def /j0 48 def} if %row g04 to g06: O-N
       
j1 1 j2 {/j exch def %j=j1,j2 %lines
         /ja j0 j add def
         l1* j LUTl*  ja get put
         c1* j LUTc1* ja get put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         c1* j get fakt2 mul Vorz mul
         l1* j get fakt2 mul
         050 0 360 arc fill
         j 1 ge {c1*  j 1 sub get fakt2 mul Vorz mul
                 l1*  j 1 sub get fakt2 mul moveto
                 c1*  j       get fakt2 mul Vorz mul
                 l1*  j       get fakt2 mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         c1* j get fakt2 mul Vorz mul
                         l1* j get fakt2 mul moveto
                         c1* 0 get fakt2 mul Vorz mul
                         l1* 0 get fakt2 mul lineto stroke
                        } if %k=0
                 } if
       } for %j=j1,j2
       
       } for %k=0,3

%**********************************************************************

/Vorz 1 def
%spalte e05 bis e05: W-O
0 1 0 {/j exch def %j=0,0 %lines
       /ja j 40 add def
       l1* j LUTl*  ja get put
       c1* j LUTc1* ja get put
       newpath
       LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
       c1* j get fakt2 mul Vorz mul
       l1* j get fakt2 mul
       050 0 360 arc fill
       1 setgray
       10 setlinewidth
       c1* j get fakt2 mul Vorz mul
       l1* j get fakt2 mul
       055 0 360 arc stroke
       20 setlinewidth
       newpath
      } for %j=0,0

k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 00 def} if %line b01 to j01: W-O
         k 1 eq {/j2 6 def /j0 10 def} if %line c02 to i02: W-O
         k 2 eq {/j2 4 def /j0 20 def} if %line d03 to h03: W-O
         k 3 eq {/j2 2 def /j0 30 def} if %line e04 to g04: W-O
         
j1 1 j2 {/j exch def %j=j1,j2 %lines
         /ja j0 j 9 mul add def
         l1* j LUTl*  ja get put
         c1* j LUTc1* ja get put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         c1* j get fakt2 mul Vorz mul
         l1* j get fakt2 mul
         050 0 360 arc fill
         j 1 ge {c1*  j 1 sub get fakt2 mul Vorz mul
                 l1*  j 1 sub get fakt2 mul moveto
                 c1*  j       get fakt2 mul Vorz mul
                 l1*  j       get fakt2 mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         c1* j get fakt2 mul Vorz mul
                         l1* j get fakt2 mul moveto
                         c1* 0 get fakt2 mul Vorz mul
                         l1* 0 get fakt2 mul lineto stroke
                         c1* j get fakt2 mul Vorz mul
                         l1* j get fakt2 mul
                         070 0 360 arc stroke
                        } if %k=0
                 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
                 newpath 250 /TimesBI-ISOL1 FS
                 /xadd0 [-200 -200 -200] def /yadd0 [250 250 250] def
                 /xadd1 [-200 -200 -200] def /yadd1 [250 250 250] def
                 c1*  j       get fakt2 mul Vorz mul olvrgb 0 eq {xadd0} {xadd1} ifelse xchartl 4 sub get add
                 l1*  j       get fakt2 mul          olvrgb 0 eq {yadd0} {yadd1} ifelse xchartl 4 sub get add
                 moveto
                 cname6 xchartl 4 sub get show
                 1 setgray
                 c1*  j       get fakt2 mul Vorz mul 580 sub
                 l1*  j       get fakt2 mul 600 sub moveto
                 TBS (\050) show TBIS (c*) show 
                 0 -50 rmoveto TBL (M) show 0 50 rmoveto
                 TBIS (, l*) show
                 0 -50 rmoveto TBL (M) show 0 50 rmoveto
                 TBS (\051) show 
                 newpath
                } if
        } for %j=j1,j2

        } for %k=0,3


%**********************************************************************

/Vorz -1 def
k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 08 def} if %line b09 to j09: C-N
         k 1 eq {/j2 6 def /j0 16 def} if %line c08 to i08: C-N
         k 2 eq {/j2 4 def /j0 24 def} if %line d07 to h07: C-N
         k 3 eq {/j2 2 def /j0 32 def} if %line e06 to h06: C-N

j1 1 j2 {/j exch def %j=j1,j2 %lines
         /ja j0 j 9 mul add def
         l2* j LUTl*  ja get put
         c2* j LUTc2* ja get put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         c2* j get fakt2 mul Vorz mul
         l2* j get fakt2 mul
         050 0 360 arc fill
         j 1 ge {c2*  j 1 sub get fakt2 mul Vorz mul
                 l2*  j 1 sub get fakt2 mul moveto
                 c2*  j       get fakt2 mul Vorz mul
                 l2*  j       get fakt2 mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         c2* j get fakt2 mul Vorz mul
                         l2* j get fakt2 mul moveto
                         c2* 0 get fakt2 mul Vorz mul
                         l2* 0 get fakt2 mul lineto stroke
                        } if %k=0
                 } if
        } for %j=j1,j2
        
        } for %k=0,3
%**********************************************************************

/Vorz -1 def
%spalte e05 bis e05: W-C
0 1 0 {/j exch def %j=0,0 %lines
       /ja j 40 add def
       l2* j LUTl*  ja get put
       c2* j LUTc1* ja get put
       newpath
       LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
       c2* j get fakt2 mul Vorz mul
       l2* j get fakt2 mul
       050 0 360 arc fill
       1 setgray
       10 setlinewidth
       c2* j get fakt2 mul Vorz mul
       l2* j get fakt2 mul
       055 0 360 arc stroke
       20 setlinewidth
       newpath
      } for %j=0,0

k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 00 def} if %row b01 to b09: W-C
         k 1 eq {/j2 6 def /j0 10 def} if %row c02 to c08: W-C
         k 2 eq {/j2 4 def /j0 20 def} if %row d03 to d07: W-C
         k 3 eq {/j2 2 def /j0 30 def} if %row e04 to e06: W-C

j1 1 j2 {/j exch def %j=j1,j2 %rows
         /ja j0 j add def
         l2* j LUTl*  ja get put
         c2* j LUTc2* ja get put

         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         c2* j get fakt2 mul Vorz mul
         l2* j get fakt2 mul
         050 0 360 arc fill
         j 1 ge {c2*  j 1 sub get fakt2 mul Vorz mul
                 l2*  j 1 sub get fakt2 mul moveto
                 c2*  j       get fakt2 mul Vorz mul
                 l2*  j       get fakt2 mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         c2* j get fakt2 mul Vorz mul
                         l2* j get fakt2 mul moveto
                         c2* 0 get fakt2 mul Vorz mul
                         l2* 0 get fakt2 mul lineto stroke
                         c2* j get fakt2 mul Vorz mul
                         l2* j get fakt2 mul
                         070 0 360 arc stroke
                        } if %k=0
                 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
                 newpath 250 /TimesBI-ISOL1 FS
                 /xadd0 [-000 -400 -400] def /yadd0 [-400 250 -400] def
                 /xadd1 [-000 -400 -400] def /yadd1 [-400 250 -400] def
                 c2*  j       get fakt2 mul Vorz mul olvrgb 0 eq {xadd0} {xadd1} ifelse xchartl 4 sub get add
                 l2*  j       get fakt2 mul          olvrgb 0 eq {yadd0} {yadd1} ifelse xchartl 4 sub get add
                 moveto
                 cname6 xchartl 4 sub 3 add get show
                 newpath
                } if
        } for %j=j1,j2
        
        } for %k=0,3
%**********************************************************************
} if %4<=xchartl  <=6

newpath

xchartl   8 ge xchartl  10 le and {%8<=xchartl  <=10
%**********************************************************************
100 /Times-ISOL1 FS

/Vorz 1 def
k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 72 def} if %row j01 to j09: O-N
         k 1 eq {/j2 6 def /j0 64 def} if %row i02 to i08: O-N
         k 2 eq {/j2 4 def /j0 56 def} if %row h03 to h07: O-N
         k 3 eq {/j2 2 def /j0 48 def} if %row g04 to g06: O-N
       
j1 1 j2 {/j exch def %j=j1,j2 %lines
         /ja j0 j add def
         t1* j LUTt1* ja get put
         c1* j LUTc1* ja get put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         c1* j get fakt2 mul Vorz mul
         t1* j get fakt2 mul
         050 0 360 arc fill
         j 1 ge {c1*  j 1 sub get fakt2 mul Vorz mul
                 t1*  j 1 sub get fakt2 mul moveto
                 c1*  j       get fakt2 mul Vorz mul
                 t1*  j       get fakt2 mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         c1* j get fakt2 mul Vorz mul
                         t1* j get fakt2 mul moveto
                         c1* 0 get fakt2 mul Vorz mul
                         t1* 0 get fakt2 mul lineto stroke
                        } if %k=0
                 } if
       } for %j=j1,j2
       
       } for %k=0,3

%**********************************************************************

/Vorz 1 def
%spalte e05 bis e05: W-O
0 1 0 {/j exch def %j=0,0 %lines
       /ja j 40 add def
       t1* j LUTt1* ja get put
       c1* j LUTc1* ja get put
       newpath
       LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
       c1* j get fakt2 mul Vorz mul
       t1* j get fakt2 mul
       050 0 360 arc fill
       1 setgray
       10 setlinewidth
       c1* j get fakt2 mul Vorz mul
       t1* j get fakt2 mul
       055 0 360 arc stroke
       20 setlinewidth
       newpath
      } for %j=0,0

k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 00 def} if %line b01 to j01: W-O
         k 1 eq {/j2 6 def /j0 10 def} if %line c02 to i02: W-O
         k 2 eq {/j2 4 def /j0 20 def} if %line d03 to h03: W-O
         k 3 eq {/j2 2 def /j0 30 def} if %line e04 to g04: W-O
         
j1 1 j2 {/j exch def %j=j1,j2 %lines
         /ja j0 j 9 mul add def
         t1* j LUTt1* ja get put
         c1* j LUTc1* ja get put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         c1* j get fakt2 mul Vorz mul
         t1* j get fakt2 mul
         050 0 360 arc fill
         j 1 ge {c1*  j 1 sub get fakt2 mul Vorz mul
                 t1*  j 1 sub get fakt2 mul moveto
                 c1*  j       get fakt2 mul Vorz mul
                 t1*  j       get fakt2 mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         c1* j get fakt2 mul Vorz mul
                         t1* j get fakt2 mul moveto
                         c1* 0 get fakt2 mul Vorz mul
                         t1* 0 get fakt2 mul lineto stroke
                         c1* j get fakt2 mul Vorz mul
                         t1* j get fakt2 mul
                         070 0 360 arc stroke
                        } if %k=0
                 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
                 newpath 250 /TimesBI-ISOL1 FS
                 /xadd0 [-200 -200 -200] def /yadd0 [250 250 250] def
                 /xadd1 [-200 -200 -200] def /yadd1 [250 250 250] def
                 c1*  j       get fakt2 mul Vorz mul olvrgb 0 eq {xadd0} {xadd1} ifelse xchartl 8 sub get add
                 t1*  j       get fakt2 mul          olvrgb 0 eq {yadd0} {yadd1} ifelse xchartl 8 sub get add
                 moveto
                 cname6 xchartl 8 sub get show
                 1 setgray
                 c1*  j       get fakt2 mul Vorz mul 580 sub
                 t1*  j       get fakt2 mul 600 sub moveto
                 TBS (\050) show TBIS (c*) show 
                 0 -50 rmoveto TBL (M) show 0 50 rmoveto
                 TBIS (, t*) show
                 0 -50 rmoveto TBL (M) show 0 50 rmoveto
                 TBS (\051) show 
                 newpath
                } if
        } for %j=j1,j2

        } for %k=0,3

%**********************************************************************
/Vorz -1 def

k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 08 def} if %line b09 to j09: C-N
         k 1 eq {/j2 6 def /j0 16 def} if %line c08 to i08: C-N
         k 2 eq {/j2 4 def /j0 24 def} if %line d07 to h07: C-N
         k 3 eq {/j2 2 def /j0 32 def} if %line e06 to h06: C-N

j1 1 j2 {/j exch def %j=j1,j2 %lines
         /ja j0 j 9 mul add def
         t2* j LUTt2* ja get put
         c2* j LUTc2* ja get put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         c2* j get fakt2 mul Vorz mul
         t2* j get fakt2 mul
         050 0 360 arc fill
         j 1 ge {c2*  j 1 sub get fakt2 mul Vorz mul
                 t2*  j 1 sub get fakt2 mul moveto
                 c2*  j       get fakt2 mul Vorz mul
                 t2*  j       get fakt2 mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         c2* j get fakt2 mul Vorz mul
                         t2* j get fakt2 mul moveto
                         c2* 0 get fakt2 mul Vorz mul
                         t2* 0 get fakt2 mul lineto stroke
                        } if %k=0
                 } if
        } for %j=j1,j2
        
        } for %k=0,3
%**********************************************************************
/Vorz -1 def
%spalte e05 bis e05: W-C
0 1 0 {/j exch def %j=0,0 %lines
       /ja j 40 add def
       t2* j LUTt1* ja get put
       c2* j LUTc1* ja get put
       newpath
       LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
       c2* j get fakt2 mul Vorz mul
       t2* j get fakt2 mul
       050 0 360 arc fill
       1 setgray
       10 setlinewidth
       c2* j get fakt2 mul Vorz mul
       t2* j get fakt2 mul
       055 0 360 arc stroke
       20 setlinewidth
       newpath
      } for %j=0,0

k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 00 def} if %row b01 to b09: W-C
         k 1 eq {/j2 6 def /j0 10 def} if %row c02 to c08: W-C
         k 2 eq {/j2 4 def /j0 20 def} if %row d03 to d07: W-C
         k 3 eq {/j2 2 def /j0 30 def} if %row e04 to e06: W-C

j1 1 j2 {/j exch def %j=j1,j2 %rows
         /ja j0 j add def
         t2* j LUTt2* ja get put
         c2* j LUTc2* ja get put

         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         c2* j get fakt2 mul Vorz mul
         t2* j get fakt2 mul
         050 0 360 arc fill
         j 1 ge {c2*  j 1 sub get fakt2 mul Vorz mul
                 t2*  j 1 sub get fakt2 mul moveto
                 c2*  j       get fakt2 mul Vorz mul
                 t2*  j       get fakt2 mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         c2* j get fakt2 mul Vorz mul
                         t2* j get fakt2 mul moveto
                         c2* 0 get fakt2 mul Vorz mul
                         t2* 0 get fakt2 mul lineto stroke
                         c2* j get fakt2 mul Vorz mul
                         t2* j get fakt2 mul
                         070 0 360 arc stroke
                        } if %k=0
                 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
                 newpath 250 /TimesBI-ISOL1 FS
                 /xadd0 [-000 -400 -400] def /yadd0 [-400 250 -400] def
                 /xadd1 [-000 -400 -400] def /yadd1 [-400 250 -400] def
                 c2*  j       get fakt2 mul Vorz mul olvrgb 0 eq {xadd0} {xadd1} ifelse xchartl 8 sub get add
                 t2*  j       get fakt2 mul          olvrgb 0 eq {yadd0} {yadd1} ifelse xchartl 8 sub get add
                 moveto
                 cname6 xchartl 8 sub 3 add get show
                 newpath
                } if
        } for %j=j1,j2
        
        } for %k=0,3

%**********************************************************************
} if %8<=xchartl  <=10

newpath

xchartl   12 ge xchartl   14 le and {%12<=xchartl  <=14
%**********************************************************************
100 /Times-ISOL1 FS

/Vorz 1 def
k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 72 def} if %row j01 to j09: O-N
         k 1 eq {/j2 6 def /j0 64 def} if %row i02 to i08: O-N
         k 2 eq {/j2 4 def /j0 56 def} if %row h03 to h07: O-N
         k 3 eq {/j2 2 def /j0 48 def} if %row g04 to g06: O-N
       
j1 1 j2 {/j exch def %j=j1,j2 %lines
         /ja j0 j add def
         t1*rgb j LUTt*rgb ja get put
         c1*rgb j LUTc*rgb ja get put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         c1*rgb j get fakt2 mul Vorz mul
         t1*rgb j get fakt2 mul
         050 0 360 arc fill
         j 1 ge {c1*rgb  j 1 sub get fakt2 mul Vorz mul
                 t1*rgb  j 1 sub get fakt2 mul moveto
                 c1*rgb  j       get fakt2 mul Vorz mul
                 t1*rgb  j       get fakt2 mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         c1*rgb j get fakt2 mul Vorz mul
                         t1*rgb j get fakt2 mul moveto
                         c1*rgb 0 get fakt2 mul Vorz mul
                         t1*rgb 0 get fakt2 mul lineto stroke
                        } if %k=0
                 } if
       } for %j=j1,j2
       
       } for %k=0,3

%**********************************************************************

/Vorz 1 def
%spalte e05 bis e05: W-O
0 1 0 {/j exch def %j=0,0 %lines
       /ja j 40 add def
       t1*rgb j LUTt*rgb ja get put
       c1*rgb j LUTc*rgb ja get put
       newpath
       LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
       c1*rgb j get fakt2 mul Vorz mul
       t1*rgb j get fakt2 mul
       050 0 360 arc fill
       1 setgray
       10 setlinewidth
       c1*rgb j get fakt2 mul Vorz mul
       t1*rgb j get fakt2 mul
       055 0 360 arc stroke
       20 setlinewidth
       newpath
      } for %j=0,0

k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 00 def} if %line b01 to j01: W-O
         k 1 eq {/j2 6 def /j0 10 def} if %line c02 to i02: W-O
         k 2 eq {/j2 4 def /j0 20 def} if %line d03 to h03: W-O
         k 3 eq {/j2 2 def /j0 30 def} if %line e04 to g04: W-O
         
j1 1 j2 {/j exch def %j=j1,j2 %lines
         /ja j0 j 9 mul add def
         t1*rgb j LUTt*rgb ja get put
         c1*rgb j LUTc*rgb ja get put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         c1*rgb j get fakt2 mul Vorz mul
         t1*rgb j get fakt2 mul
         050 0 360 arc fill
         j 1 ge {c1*rgb  j 1 sub get fakt2 mul Vorz mul
                 t1*rgb  j 1 sub get fakt2 mul moveto
                 c1*rgb  j       get fakt2 mul Vorz mul
                 t1*rgb  j       get fakt2 mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         c1*rgb j get fakt2 mul Vorz mul
                         t1*rgb j get fakt2 mul moveto
                         c1*rgb 0 get fakt2 mul Vorz mul
                         t1*rgb 0 get fakt2 mul lineto stroke
                         c1*rgb j get fakt2 mul Vorz mul
                         t1*rgb j get fakt2 mul
                         070 0 360 arc stroke
                        } if %k=0
                 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
                 newpath 250 /TimesBI-ISOL1 FS
                 /xadd0 [-200 -200 -200] def /yadd0 [250 250 250] def
                 /xadd1 [-200 -200 -200] def /yadd1 [250 250 250] def
                 c1*rgb  j       get fakt2 mul Vorz mul olvrgb 0 eq {xadd0} {xadd1} ifelse xchartl 12 sub get add
                 t1*rgb  j       get fakt2 mul          olvrgb 0 eq {yadd0} {yadd1} ifelse xchartl 12 sub get add
                 moveto
                 cname6 xchartl 12 sub get show
                 1 setgray
                 c1*rgb  j       get fakt2 mul Vorz mul 580 sub
                 t1*rgb  j       get fakt2 mul 600 sub moveto
                 TBS (\050) show TBIS (c*) show 
                 0 -50 rmoveto TBL (M) show 0 50 rmoveto
                 TBIS (, t*) show
                 0 -50 rmoveto TBL (M) show 0 50 rmoveto
                 TBS (\051) show 
                 newpath
                } if
        } for %j=j1,j2

        } for %k=0,3


%**********************************************************************
/Vorz -1 def
k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 08 def} if %line b09 to j09: C-N
         k 1 eq {/j2 6 def /j0 16 def} if %line c08 to i08: C-N
         k 2 eq {/j2 4 def /j0 24 def} if %line d07 to h07: C-N
         k 3 eq {/j2 2 def /j0 32 def} if %line e06 to h06: C-N

j1 1 j2 {/j exch def %j=j1,j2 %lines
         /ja j0 j 9 mul add def
         t2*rgb j LUTt*rgb ja get put
         c2*rgb j LUTc*rgb ja get put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         c2*rgb j get fakt2 mul Vorz mul
         t2*rgb j get fakt2 mul
         050 0 360 arc fill
         j 1 ge {c2*rgb  j 1 sub get fakt2 mul Vorz mul
                 t2*rgb  j 1 sub get fakt2 mul moveto
                 c2*rgb  j       get fakt2 mul Vorz mul
                 t2*rgb  j       get fakt2 mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         c2*rgb j get fakt2 mul Vorz mul
                         t2*rgb j get fakt2 mul moveto
                         c2*rgb 0 get fakt2 mul Vorz mul
                         t2*rgb 0 get fakt2 mul lineto stroke
                        } if %k=0
                 } if
        } for %j=j1,j2
        
        } for %k=0,3
%**********************************************************************
/Vorz -1 def
%spalte e05 bis e05: W-C
0 1 0 {/j exch def %j=0,0 %lines
       /ja j 40 add def
       t2*rgb j LUTt*rgb ja get put
       c2*rgb j LUTc*rgb ja get put
       newpath
       LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
       c2*rgb j get fakt2 mul Vorz mul
       t2*rgb j get fakt2 mul
       050 0 360 arc fill
       1 setgray
       10 setlinewidth
       c2*rgb j get fakt2 mul Vorz mul
       t2*rgb j get fakt2 mul
       055 0 360 arc stroke
       20 setlinewidth
       newpath
      } for %j=0,0

k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 00 def} if %row b01 to b09: W-C
         k 1 eq {/j2 6 def /j0 10 def} if %row c02 to c08: W-C
         k 2 eq {/j2 4 def /j0 20 def} if %row d03 to d07: W-C
         k 3 eq {/j2 2 def /j0 30 def} if %row e04 to e06: W-C

j1 1 j2 {/j exch def %j=j1,j2 %rows
         /ja j0 j add def
         t2*rgb j LUTt*rgb ja get put
         c2*rgb j LUTc*rgb ja get put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         c2*rgb j get fakt2 mul Vorz mul
         t2*rgb j get fakt2 mul
         050 0 360 arc fill
         j 1 ge {c2*rgb  j 1 sub get fakt2 mul Vorz mul
                 t2*rgb  j 1 sub get fakt2 mul moveto
                 c2*rgb  j       get fakt2 mul Vorz mul
                 t2*rgb  j       get fakt2 mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         c2*rgb j get fakt2 mul Vorz mul
                         t2*rgb j get fakt2 mul moveto
                         c2*rgb 0 get fakt2 mul Vorz mul
                         t2*rgb 0 get fakt2 mul lineto stroke
                         c2*rgb j get fakt2 mul Vorz mul
                         t2*rgb j get fakt2 mul
                         070 0 360 arc stroke
                        } if %k=0
                 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
                 newpath 250 /TimesBI-ISOL1 FS
                 /xadd0 [-000 -400 -400] def /yadd0 [-400 250 -400] def
                 /xadd1 [-000 -400 -400] def /yadd1 [-400 250 -400] def
                 c2*rgb  j       get fakt2 mul Vorz mul olvrgb 0 eq {xadd0} {xadd1} ifelse xchartl 12 sub get add
                 t2*rgb  j       get fakt2 mul          olvrgb 0 eq {yadd0} {yadd1} ifelse xchartl 12 sub get add
                 moveto
                 cname6 xchartl 12 sub 3 add get show
                 newpath
                } if
        } for %j=j1,j2
        
        } for %k=0,3

%**********************************************************************
} if %12<=xchartl  <=14

xchartl 1 eq xcolor 2 eq xcolor 3 eq or and {-200 0 translate} if %special shift for J-B TLS00a
xchartl 1 eq xcolor 4 eq xcolor 5 eq or and { 300 0 translate} if %special shift for J-B FRS06a
xchartl 1 eq xcolor 6 eq xcolor 7 eq or and {-200 0 translate} if %special shift for J-B TLS18a

%**********************************************************************
        } %xchart #3,7,11,15
%*********************************************************************************
        { %xchart =3,7,11,15

1 setgray        
%xchartl 3 eq {
-3400  4175 moveto
TBS (CIELAB) show
RBS
(-Bunttonwinkel: ) showde
TBS
( hue angles: ) showen
( angle de teinte: ) showfr

%              } if

xchartl 11 le {
-3400 xchartl 7 ge {200 add} if 3900 moveto
TBIS (h) show
0 -50 rmoveto TBL (ab,d) show 0 50 rmoveto
TBS (=[) show
0 1 5 {/i exch def %i=0,5
       angle_olvG11i i get cvishow
       i 5 ne {(, ) show} if
      } for %i=0,5
(]) show

-3400 xchartl 7 ge {200 add} if 3625 moveto
TBIS (h) show
0 -50 rmoveto TBL (ab,dx) show 0 50 rmoveto
TBS (=[) show
0 1 5 {/i exch def %i=0,5
       H*olv i get cvishow
       i 5 ne {(, ) show} if
      } for %i=0,5
(]) show
} if %xchartl,<=11

olvrgb 1 eq {%olvrgb=1
-3400 xchartl 7 ge {200 add} if 3350 moveto
TBIS (h) show
0 -50 rmoveto TBL (ab,e) show 0 50 rmoveto
TBS (=[) show
0 1 5 {/i exch def %i=0,5
       angle_rgb i get cvishow
       i 5 ne {(, ) show} if
      } for %i=0,5
(]) show
           } if %olvrgb=1

1600 200 add 2900 moveto %xchartl 3 eq {200 sub} if 2900 moveto
TBIS (a*) show
TBL 0 -50 rmoveto
xchartl  0 ge xchartl  3 le and {(a) show} if
xchartl  4 ge xchartl  7 le and {(lab*) show} if
xchartl  8 ge xchartl 11 le and {(lab*) show} if
xchartl 12 ge xchartl 15 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if
TBL 0 50 rmoveto
TBS (=) show
xchartl 4 le {
              TBIS (C*) show
              TBL 0 -50 rmoveto (ab,a) show TBL 0 50 rmoveto
             }
             {
              TBIS (c*) show
              TBL 0 -50 rmoveto
              xchartl 4  ge xchartl  7 le and {(lab*) show} if
              xchartl 8  ge xchartl 11 le and {(lab*) show} if
              xchartl 12 ge xchartl 15 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if
              TBL 0 50 rmoveto
             } ifelse
TBIS ( cos h) show
0 -50 rmoveto TBL (ab) show 0 50 rmoveto
 

1600 200 add 2600 moveto %xchartl 3 eq {200 sub} if 2600 moveto
TBIS (b*) show
TBL 0 -50 rmoveto
xchartl  0 ge xchartl  3 le and {(a) show} if
xchartl  4 ge xchartl  7 le and {(lab*) show} if
xchartl  8 ge xchartl 11 le and {(lab*) show} if
xchartl 12 ge xchartl 15 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if
TBL 0 50 rmoveto
TBS (=) show
xchartl 4 le {
              TBIS (C*) show
              TBL 0 -50 rmoveto (ab,a) show TBL 0 50 rmoveto
             }
             {
              TBIS (c*) show
              TBL 0 -50 rmoveto
              xchartl 4  ge xchartl  7 le and {(lab*) show} if
              xchartl 8  ge xchartl 11 le and {(lab*) show} if
              xchartl 12 ge xchartl 15 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if
              TBL 0 50 rmoveto
             } ifelse
TBIS ( sin h) show
0 -50 rmoveto TBL (ab) show 0 50 rmoveto

-400 200 add 3800 moveto %xchartl 11 le {300 add} if 3500 moveto
TBIK (b*) show
TBS 0 -50 rmoveto
xchartl  0 ge xchartl  3 le and {(a) show} if
xchartl  4 ge xchartl  7 le and {(lab*) show} if
xchartl  8 ge xchartl 11 le and {(lab*) show} if
xchartl 12 ge xchartl 15 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if
TBS 0 50 rmoveto

1800 xchartl 3 le {700 add } if 1900 moveto
xchartl 4 ge {TBIK (relative ) show} if
TBK
(Buntheit ) showde
(chroma ) showen
(chroma ) showfr

2700 1650 moveto
TBIK (a*) show
TBS 0 -50 rmoveto
xchartl  0 ge xchartl  3 le and {(a) show} if
xchartl  4 ge xchartl  7 le and {(lab*) show} if
xchartl  8 ge xchartl 11 le and {(lab*) show} if
xchartl 12 ge xchartl 15 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if
TBS 0 50 rmoveto

          
%new shift in middle
0 1500 translate

%axis and scales
1 setgray
-3000 0 moveto 6300  0 rlineto stroke
0 -1880  moveto 0 3600  rlineto stroke
3300 100 sub 50 moveto 100 -50 rlineto
                      -100 -50 rlineto closepath fill
0 50 sub 1800 100 sub moveto 50  100 rlineto
                             50 -100 rlineto closepath fill
0 setgray
TS
/xt001 9 array def
/xt001 [(-2,0) () (-1,0) ( ) (  ) () () () () ]def %(  1,0) () (  2,0)] def
/yt001 5 array def
/yt001 [(-1,0 ) () ( ) ( ) (1,0)] def

/xt100 9 array def
/xt100 [(-200) () (-100) ( ) (  ) () (  100) () (  200)] def
/yt100 5 array def
/yt100 [(-100 ) () ( ) ( ) (100)] def

2 1 6 {/i exch def %i=2,6
        -3000   i 750   mul add  -50 moveto 0 100 rlineto stroke
        -3650   i 850   mul add -200   moveto
        xchartl 3 le {xt100} {xt001} ifelse i get show
       } for %i=2,6
      
0 1 4 {/i exch def %i=0,4
       -75 -1500 i 750 mul    add moveto 150 0 rlineto stroke
       100 -1650 i 800 mul    add moveto
       xchartl 3 le {yt100} {yt001} ifelse i get show
       } for %i=0,4
newpath

%**********************************************************************

%For all xchartl=3,7,11,15
%Variable hue series O00Y-O83Y, Y00L-Y83L, L00C-L83C,
%                    C00V-C83V, C00V-C83V, C00V-C83V-O00Y
250 /TimesBI-ISOL1 FS
/fcolor1 1.10 def
/fcolor2 1.20 def

/j729 0 def
0 1 5 {/xtonj exch def %xton=0,5

0 1 7 {/j exch def %i=0,08
       xtonj 0 eq {/j10 648 j729 sub j 09 mul add 10 mul def} if %series O00Y-O83Y, -09
       xtonj 1 eq {/j10 720 j729 sub j 81 mul sub 10 mul def} if %series Y00L-Y83L, -81
       xtonj 2 eq {/j10 072 j729 sub j        add 10 mul def} if %series L00C-L83C, +01
       xtonj 3 eq {/j10 080 j729 sub j 09 mul sub 10 mul def} if %series C00V-C83V, -09
       xtonj 4 eq {/j10 008 j729 sub j 81 mul add 10 mul def} if %series C00V-C83V, -81
       xtonj 5 eq {/j10 656 j729 sub j        sub 10 mul def} if %series C00V-C83V, +01
       LUTL* j LUT j10 0 add get  100 div put 
       LUTA* j LUT j10 1 add get  100 div put
       LUTB* j LUT j10 2 add get  100 div put
       LUTr* j LUT j10 3 add get 1000 div put
       LUTg* j LUT j10 4 add get 1000 div put
       LUTb* j LUT j10 5 add get 1000 div put
       C*ab  j LUTA* j get dup mul
               LUTB* j get dup mul add 0.000001 add sqrt put
       L*    j LUTL* j get put
       LUTc*rgb j 1000 put
      } for %j=0,08

%**********************************************************************

/j0 0 def /j1 0 def /j2 8 def /k 0 def
/fakt  30 def
/fakt1  15 def
/fakt2 1500 def

 0 1 7  {/j exch def %j=0,8 %lines
         /ja j0 j add def
         c1*rgb j LUTc*rgb ja get put
         C*ab j LUTA* ja get dup mul
                LUTB* ja get dup mul add sqrt put
         /angleWO LUTB* ja get LUTA* ja get 0.0001 add atan def
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         xchartl 3 le {%xchart=3
                       newpath
                       C*ab j get fakt1 mul angleWO cos mul
                       C*ab j get fakt1 mul angleWO sin mul moveto
                       C*ab j get fakt1 mul angleWO cos mul
                       C*ab j get fakt1 mul angleWO sin mul
                       050 0 360 arc fill
                      }
                      {%xchart>=7
                       newpath
                       c1*rgb j get fakt2 mul angleWO cos mul
                       c1*rgb j get fakt2 mul angleWO sin mul moveto
                       c1*rgb j get fakt2 mul angleWO cos mul
                       c1*rgb j get fakt2 mul angleWO sin mul
                       050 0 360 arc fill
                      } ifelse %xchart=3,>=7
        } for %j=0,8

} for %xton=0,5

%END for all xchartl=3,7,11,15

%**********************************************************************

%For all xchartl=3,7,11,15
%Constant hue series
250 /TimesBI-ISOL1 FS
/fcolor1 1.10 def
/fcolor2 1.20 def

/j729 0 def
%xcolor 1 le {/j729 0 def}{/j729 729 def} ifelse

0 1 2 {/xtonj exch def %xton=0,2

       xtonj 0 eq {/j1 729 j729 sub         10 mul def} if %series O-C
       xtonj 1 eq {/j1 729 j729 sub 081 add 10 mul def} if %series Y-V
       xtonj 2 eq {/j1 729 j729 sub 162 add 10 mul def} if %series L-M

       0 1 080 {/i exch def %i=0,080
                /i10 j1 i 10 mul add def
                LUTL* i LUT i10 0 add get  100 div put 
                LUTA* i LUT i10 1 add get  100 div put
                LUTB* i LUT i10 2 add get  100 div put
                LUTr* i LUT i10 3 add get 1000 div put
                LUTg* i LUT i10 4 add get 1000 div put
                LUTb* i LUT i10 5 add get 1000 div put
                C*ab  i LUTA* i get dup mul
                        LUTB* i get dup mul add 0.000001 add sqrt put
                L*    i LUTL* i get put
               } for %i=0,080
        
          %       801 737 809 729  882 818 890 810  963 899 971 891
          %       j01 b09 j09 b01  j10 b18 j18 b10  j19 b27 j27 b19
          %       O   C   N1  W1   Y   V   N2  W2   L   M   N3  W3

          xtonj 0 eq {/index [801 737 809 729] def} if %O,C,N1,W1
          xtonj 1 eq {/index [882 818 890 810] def} if %Y,V,N2,W2
          xtonj 2 eq {/index [963 899 971 891] def} if %L,M,N1,W2

          0 1 3 {/i exch def %i=0,3 %standard colours at the end
                 /i10 index i get j729 sub 10 mul def
                 /i81 81 i add def
                 LUTL* i81 LUT i10 0 add get 100 div put
                 LUTA* i81 LUT i10 1 add get 100 div put
                 LUTB* i81 LUT i10 2 add get 100 div put
                 LUTr* i81 LUT i10 3 add get 1000 div put
                 LUTg* i81 LUT i10 4 add get 1000 div put
                 LUTb* i81 LUT i10 5 add get 1000 div put
                 C*ab  i81 LUTA* i81 get dup mul
                           LUTB* i81 get dup mul add 0.000001 add sqrt put
                 L*    i81 LUTL* i81 get put
                } for %i=0,3

          /L*WN LUTL* 84 get LUTL* 83 get sub def

          0 1 084 {/i exch def %i=0,084
                   LUTl*  i LUTL* i get LUTL* 83 get sub 
                            L*WN 0.000001 add div put
                   LUTc1* i C*ab i get C*ab 81 get 0.000001 add div put
                   LUTc2* i C*ab i get C*ab 82 get 0.000001 add div put
                   LUTt1* i LUTl* i get LUTc1* i get 
                            L* 81 get L* 83 get sub L*WN
                            0.000001 add div 0.5 sub mul sub put
                   LUTt2* i LUTl* i get LUTc2* i get
                            L* 82 get L* 83 get sub L*WN
                            0.000001 add div 0.5 sub mul sub put
                   LUTr* i get 0 lt {LUTr* i 0 put} if
                   LUTg* i get 0 lt {LUTg* i 0 put} if
                   LUTb* i get 0 lt {LUTb* i 0 put} if
                   LUTr* i get 1 gt {LUTr* i 1 put} if
                   LUTg* i get 1 gt {LUTg* i 1 put} if
                   LUTb* i get 1 gt {LUTb* i 1 put} if
                   %maximum
                   /max LUTr* i get def %rgb brilliantness
                   LUTg* i get max gt {/max LUTg* i get def} if
                   LUTb* i get max gt {/max LUTb* i get def} if
                   %minimum
                   /min LUTr* i get def %rgb whiteness
                   LUTg* i get min lt {/min LUTg* i get def} if
                   LUTb* i get min lt {/min LUTb* i get def} if         
                   LUTc*rgb i max min sub put %rgb chroma
                   LUTt*rgb i min max min sub 0.5 mul add put %rgb triangle lightness
                  } for %i=0,084

%**********************************************************************

/j0 0 def /j1 0 def /j2 8 def /k 0 def
/fakt  30 def
/fakt1  15 def
/fakt2 1500 def

 0 1 8  {/j exch def %j=0,8 %lines
         /ja j0 j 9 mul add def
         c1*rgb j LUTc*rgb ja get put
         C*ab j LUTA* ja get dup mul
                LUTB* ja get dup mul add sqrt put
         /angleWO LUTB* ja get LUTA* ja get 0.0001 add atan def
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         xchartl 3 le {%xchart=3
                       C*ab j get fakt1 mul angleWO cos mul
                       C*ab j get fakt1 mul angleWO sin mul
                       050 0 360 arc fill
                       j j2 eq {%j=j2
                                0 0 0 setrgbcolor
                                C*ab j get fakt1 mul angleWO cos mul
                                C*ab j get fakt1 mul angleWO sin mul
                                065 0 360 arc stroke
                                LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
                                /xadd0 [-100 -500 -500 -700 -200  000] def
                                /yadd0 [ 100 -000 -200 -100 -200  100] def
                                C*ab j get fakt1 mul fcolor2 mul angleWO cos mul 
                                xadd0 xtonj get add
                                C*ab j get fakt1 mul fcolor2 mul angleWO sin mul
                                yadd0 xtonj get add moveto
                                cname6 xtonj get show
                                icolor 1 eq {1 0 0 setrgbcolor
                                             0 0 moveto
                                             C*ab j get fakt1 mul angleWO cos mul
                                             C*ab j get fakt1 mul angleWO sin mul
                                             lineto stroke
                                            } if
                                } if %j=j2
                      }
                      {%xchart>=7
                       c1*rgb j get fakt2 mul angleWO cos mul
                       c1*rgb j get fakt2 mul angleWO sin mul
                       050 0 360 arc fill
                       j j2 eq {%j=j2
                                0 0 0 setrgbcolor
                                c1*rgb j get fakt2 mul angleWO cos mul
                                c1*rgb j get fakt2 mul angleWO sin mul
                                065 0 360 arc stroke
                                LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
                                /xadd0 [-100 -500 -500 -700 -200  000] def
                                /yadd0 [ 100 -000 -200 -100 -200  100] def
                                c1*rgb j get fakt2 mul fcolor2 mul angleWO cos mul
                                xadd0 xtonj get add
                                c1*rgb j get fakt2 mul fcolor2 mul angleWO sin mul
                                yadd0 xtonj get add moveto
                                cname6 xtonj get show
                                icolor 1 eq {1 0 0 setrgbcolor %icolor=1
                                             0 0 moveto
                                             c1*rgb j get fakt2 mul angleWO cos mul
                                             c1*rgb j get fakt2 mul angleWO sin mul
                                             lineto stroke
                                            } if %icolor=1
                               } if %j=j2
                      } ifelse %xchart=3,>=7
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         j 1 ge {xchartl 3 eq {olvrgb 0 eq {C*ab j 1 sub get fakt1 mul angleWO cos mul
                                            C*ab j 1 sub get fakt1 mul angleWO sin mul moveto
                                            C*ab j       get fakt1 mul angleWO cos mul
                                            C*ab j       get fakt1 mul angleWO sin mul lineto stroke
                                           } if
                              }
                              {c1*rgb  j 1 sub get fakt2 mul angleWO cos mul
                               c1*rgb  j 1 sub get fakt2 mul angleWO sin mul moveto
                               c1*rgb  j       get fakt2 mul angleWO cos mul
                               c1*rgb  j       get fakt2 mul angleWO sin mul lineto stroke
                              } ifelse
                } if
        } for %j=0,8

%**********************************************************************

 0 1 8  {/j exch def %j=0,8 %lines
         /ja j0 j add def
         c2*rgb j LUTc*rgb ja get put
         C*ab j LUTA* ja get dup mul
                LUTB* ja get dup mul add sqrt put
         /angleWO LUTB* ja get LUTA* ja get 0.0001 add atan def
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         xchartl 3 le {%xchart=3
                       C*ab j get fakt1 mul angleWO cos mul
                       C*ab j get fakt1 mul angleWO sin mul
                       050 0 360 arc fill
                       j j2 eq {%j=j2
                                0 0 0 setrgbcolor
                                C*ab j get fakt1 mul angleWO cos mul
                                C*ab j get fakt1 mul angleWO sin mul
                                065 0 360 arc stroke
                                LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
                                /xadd0 [-000 -100 -500 -700 -200  000] def
                                /yadd0 [ 100 -000  000 -100 -200  100] def
                                C*ab j get fakt1 mul fcolor2 mul angleWO cos mul
                                xadd0 xtonj 3 add get add
                                C*ab j get fakt1 mul fcolor2 mul angleWO sin mul
                                yadd0 xtonj 3 add get add moveto
                                cname6 xtonj 3 add get show
                                icolor 1 eq {1 0 0 setrgbcolor
                                             0 0 moveto
                                             C*ab j get fakt1 mul angleWO cos mul
                                             C*ab j get fakt1 mul angleWO sin mul
                                             lineto stroke
                                            } if
                               } if %j=j2
                      }
                      {%xchart=7
                       c2*rgb j get fakt2 mul angleWO cos mul
                       c2*rgb j get fakt2 mul angleWO sin mul
                       050 0 360 arc fill
                       j j2 eq {%j=j2
                                0 0 0 setrgbcolor
                                c2*rgb j get fakt2 mul angleWO cos mul
                                c2*rgb j get fakt2 mul angleWO sin mul
                                065 0 360 arc stroke
                                LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
                                /xadd0 [-000 -100 -500 -700 -200  000] def
                                /yadd0 [ 100 -000  000 -100 -200  100] def
                                c2*rgb j get fakt2 mul fcolor2 mul angleWO cos mul
                                xadd0 xtonj 3 add get add
                                c2*rgb j get fakt2 mul fcolor2 mul angleWO sin mul
                                yadd0 xtonj 3 add get add moveto
                                cname6 xtonj 3 add get show
                                icolor 1 eq {1 0 0 setrgbcolor %icolor=1
                                             0 0 moveto
                                             c2*rgb j get fakt2 mul angleWO cos mul
                                             c2*rgb j get fakt2 mul angleWO sin mul
                                             lineto stroke
                                            } if %icolor=1
                               } if %j=j2
                      } ifelse %xchart=3, %xchart>=7
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         j 1 ge {xchartl 3 le {C*ab j 1 sub get fakt1 mul angleWO cos mul
                               C*ab j 1 sub get fakt1 mul angleWO sin mul moveto
                               C*ab j       get fakt1 mul angleWO cos mul
                               C*ab j       get fakt1 mul angleWO sin mul lineto stroke
                              }
                              {c2*rgb  j 1 sub get fakt2 mul angleWO cos mul
                               c2*rgb  j 1 sub get fakt2 mul angleWO sin mul moveto
                               c2*rgb  j       get fakt2 mul angleWO cos mul
                               c2*rgb  j       get fakt2 mul angleWO sin mul lineto stroke
                              } ifelse
                } if
        } for %j=00,08

%xtonj=0 %series O-C
%xtonj=1 %series Y-V
%xtonj=2 %series L-M

} for %xton=0,2

%END for all xchartl=3,7,11,15

%**********************************************************************

xchartl 3 eq {%xchartl=3 only

%BEG Hexagon
%       801 737 809 729  882 818 890 810  963 899 971 891
%       j01 b09 j09 b01  j10 b18 j18 b10  j19 b27 j27 b19
%       O   C   N1  W1   Y   V   N2  W2   L   M   N3  W3

/fakt1  15 def
/indexX 7 array def
/indexX [801 882 963 737 818 899 801] def
/LUTL*X 7 array def
/LUTA*X 7 array def
/LUTB*X 7 array def

0 setgray
/fcolor1 1.10 def
/fcolor2 1.20 def
250 /TimesBI-ISOL1 FS

/j729 0 def
0 1 6 {/iX exch def %iX=0,6 %hexagon standard colours at the end
       /i10 indexX iX get j729 sub 10 mul def
                    LUTL*X iX LUT i10 0 add get 100 div put
                    LUTA*X iX LUT i10 1 add get 100 div put
                    LUTB*X iX LUT i10 2 add get 100 div put
                    LUTr* iX LUT i10 3 add get 1000 div put
                    LUTg* iX LUT i10 4 add get 1000 div put
                    LUTb* iX LUT i10 5 add get 1000 div put

       iX 5 le {0 0 0 setrgbcolor
                0 0 moveto
                LUTA*X iX get fakt1 mul fcolor1 mul cf1 div
                LUTB*X iX get fakt1 mul fcolor1 mul cf1 div lineto stroke
                
                /xadd0 [-000 -100 -500 -700 -200  000] def
                /yadd0 [ 100 -000  000 -100 -200  100] def
                LUTA*X iX get fakt1 mul fcolor2 mul cf1 div xadd0 iX get add
                LUTB*X iX get fakt1 mul fcolor2 mul cf1 div yadd0 iX get add moveto
%                xcolor 2 ge {%xcolor>=2
%                             0 0 0 setrgbcolor
%                             cname_olv00 iX get show
%                            } if %xcolor>=2
               } if
       iX 5 le icolor 1 eq and {xcolor 2 ge {0 0 0}{1 0 0} ifelse setrgbcolor
                                0 0 moveto
                                LUTA*X iX get fakt1 mul
                                LUTB*X iX get fakt1 mul lineto stroke
                               } if
                       
       iX 1 ge {0 0 0 setrgbcolor
                LUTA*X iX 1 sub get fakt1 mul cf1 div
                LUTB*X iX 1 sub get fakt1 mul cf1 div moveto
                LUTA*X iX get fakt1 mul cf1 div
                LUTB*X iX get fakt1 mul cf1 div lineto stroke
               } if
       iX 1 ge icolor 1 eq and {1 0 0 setrgbcolor
                                LUTA*X iX 1 sub get fakt1 mul
                                LUTB*X iX 1 sub get fakt1 mul moveto
                                LUTA*X iX get fakt1 mul
                                LUTB*X iX get fakt1 mul lineto stroke
                               } if
      } for  %iX=0,6 %hexagon
      
} if %xchartl=3

%**********************************************************************

xchartl 7 ge {%xchart>=7

%circle
icolor 0 eq {0 0 0 setrgbcolor} {1 0 0 setrgbcolor} ifelse
0 1500 moveto
newpath
0 0 1500  0 360 arc stroke

%BEG Hexagon
%       801 737 809 729  882 818 890 810  963 899 971 891
%       j01 b09 j09 b01  j10 b18 j18 b10  j19 b27 j27 b19
%       O   C   N1  W1   Y   V   N2  W2   L   M   N3  W3

/fakt1  15 def
/indexX 7 array def
/indexX [801 882 963 737 818 899 801] def
/LUTL*X 7 array def
/LUTA*X 7 array def
/LUTB*X 7 array def

0 setgray
/fcolor1 1.10 def
/fcolor2 1.20 def
/c1000 1 fakt2 mul def
250 /TimesBI-ISOL1 FS

/j729 0 def
0 1 6 {/iX exch def %iX=0,5 %hexagon standard colours at the end
       /i10 indexX iX get j729 sub 10 mul def
                    
       LUTL*X iX LUT i10 0 add get 100 div put
       LUTA*X iX LUT i10 1 add get 100 div put
       LUTB*X iX LUT i10 2 add get 100 div put
       LUTr* iX LUT i10 3 add get 1000 div put
       LUTg* iX LUT i10 4 add get 1000 div put
       LUTb* iX LUT i10 5 add get 1000 div put
       /angleOLV LUTB*X iX get LUTA*X iX get 0.0001 add atan def

       iX 5 le {0 0 0 setrgbcolor
                0 0 moveto
                c1000 angleOLV cos mul fcolor2 mul 
                c1000 angleOLV sin mul fcolor2 mul 
                lineto stroke
                /xadd0 [-200 -300 -300 -500 -400 -000] def
                /yadd0 [ 100 -000  000 -100 -200  100] def
                c1000 angleOLV cos mul fcolor2 mul xadd0 iX get add
                c1000 angleOLV sin mul fcolor2 mul yadd0 iX get add moveto
%                xcolor 2 ge {%xcolor>=2
%                             0 0 0 setrgbcolor
%                             cname_olv00 iX get show
%                            } if %xcolor>=2
               } if
       iX 5 le icolor 1 eq and {xcolor 2 ge {0 0 0}{1 0 0} ifelse setrgbcolor
                                0 0 moveto
                                c1000 angleOLV cos mul fcolor2 mul
                                c1000 angleOLV sin mul fcolor2 mul lineto stroke
                               } if
      } for  %iX=0,6 %hexagon

} if %xchartl>=7

%**********************************************************************
          
          0 1500 neg translate
        } ifelse %xchart #3,7,11,15 or =3,7,11,15

grestore

2600 neg 0300 neg translate

%special space for 'xm03'PROZ0.COM 2x before/after xchartl
%  xchartl    0 eq {  100 neg 13000 neg translate} if
%  xchartl    1 eq { 6100 neg 13000 neg translate} if
%  xchartl    2 eq {  100 neg 08750 neg translate} if
%  xchartl    3 eq { 6100 neg 08750 neg translate} if

%  xchartl    4 eq {  100 neg  4500 neg translate} if
%  xchartl    5 eq { 6100 neg  4500 neg translate} if
%  xchartl    6 eq {  100 neg  0250 neg translate} if
%  xchartl    7 eq { 6100 neg  0250 neg translate} if

%  xchartl    8 eq {13500 neg 13000 neg translate} if
%  xchartl    9 eq {19500 neg 13000 neg translate} if
%  xchartl   10 eq {13500 neg 08750 neg translate} if
%  xchartl   11 eq {19500 neg 08750 neg translate} if

%  xchartl   12 eq {13500 neg  4500 neg translate} if
%  xchartl   13 eq {19500 neg  4500 neg translate} if
%  xchartl   14 eq {13500 neg  0250 neg translate} if
%  xchartl   15 eq {19500 neg  0250 neg translate} if

%} for % xchartl=0,15

showpage

%} for %xchart=0,15

grestore

} for %xcolor=0,1

%%Trailer

%%EndDocument
EndEPSF grestore gsave

BeginEPSF  86 MM 020 MM translate 12 /Times-ISOL1 FS -9 MM -7 MM  moveto
( ) show
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 18

%line 409
%!PS-Adobe-3.0 EPSF-3.0 AG780-3A
%%BoundingBox: 70 85 226 206
 
%START PDFDE011.EPS
/pdfmark08 where {pop} {userdict /pdfmark08 /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/AG78/)
  /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:2015050112000)
  /ModDate (D:2015050112000)
/DOCINFO pdfmark08
[ /View [ /FitB ]
/DOCVIEW pdfmark08
%END  PDFDE011
 
% !Change to ISOLatin1 fonts
/Times-Roman findfont dup length dict  begin
{1 index /FID ne {def} {pop pop} ifelse }forall
/Encoding ISOLatin1Encoding def currentdict end
/Times-ISOL1 exch definefont pop
 
/Times-Italic findfont dup length dict  begin
{1 index /FID ne {def} {pop pop} ifelse }forall
/Encoding ISOLatin1Encoding def currentdict end
/TimesI-ISOL1 exch definefont pop
 
/Times-Bold findfont dup length dict  begin
{1 index /FID ne {def} {pop pop} ifelse }forall
/Encoding ISOLatin1Encoding def currentdict end
/TimesB-ISOL1 exch definefont pop
 
/Times-BoldItalic findfont dup length dict  begin
{1 index /FID ne {def} {pop pop} ifelse }forall
/Encoding ISOLatin1Encoding def currentdict end
/TimesBI-ISOL1 exch definefont pop
 
/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def /str {8 string } bind def

/TL {160 /Times-ISOL1 FS} bind def 
/TS {200 /Times-ISOL1 FS} bind def 
/TK {250 /Times-ISOL1 FS} bind def
/TM {300 /Times-ISOL1 FS} bind def
/TG {350 /Times-ISOL1 FS} bind def

/TIL {160 /TimesI-ISOL1 FS} bind def
/TIS {200 /TimesI-ISOL1 FS} bind def 
/TIK {250 /TimesI-ISOL1 FS} bind def
/TIM {300 /TimesI-ISOL1 FS} bind def
/TIG {350 /TimesI-ISOL1 FS} bind def
 
/TBL {160 /TimesB-ISOL1 FS} bind def
/TBS {200 /TimesB-ISOL1 FS} bind def
/TBK {250 /TimesB-ISOL1 FS} bind def
/TBM {300 /TimesB-ISOL1 FS} bind def
/TBG {350 /TimesB-ISOL1 FS} bind def

/TBIL {160 /TimesBI-ISOL1 FS} bind def
/TBIS {200 /TimesBI-ISOL1 FS} bind def 
/TBIK {250 /TimesBI-ISOL1 FS} bind def
/TBIM {300 /TimesBI-ISOL1 FS} bind def
/TBIG {350 /TimesBI-ISOL1 FS} bind def

/RL {160 /Times-Roman FS} bind def 
/RS {200 /Times-Roman FS} bind def 
/RK {250 /Times-Roman FS} bind def
/RM {300 /Times-Roman FS} bind def
/RG {350 /Times-Roman FS} bind def

/RIL {160 /Times-Italic FS} bind def
/RIS {200 /Times-Italic FS} bind def 
/RIK {250 /Times-Italic FS} bind def
/RIM {300 /Times-Italic FS} bind def
/RIG {350 /Times-Italic FS} bind def
 
/RBL {160 /Times-Bold FS} bind def
/RBS {200 /Times-Bold FS} bind def
/RBK {250 /Times-Bold FS} bind def
/RBM {300 /Times-Bold FS} bind def
/RBG {350 /Times-Bold FS} bind def

/RBIL {160 /Times-BoldItalic FS} bind def
/RBIS {200 /Times-BoldItalic FS} bind def 
/RBIK {250 /Times-BoldItalic FS} bind def
/RBIM {300 /Times-BoldItalic FS} bind def
/RBIG {350 /Times-BoldItalic FS} bind def

/rec %x, y width heigth
  {/heigth exch def /width exch def
   moveto width 0 rlineto 0 heigth rlineto width neg 0 rlineto
   closepath } bind def

/colrecfi %x y width heigth r g b
  {setrgbcolor rec fill} bind def

/colrecst %x y width heigth r g b
  {setrgbcolor rec stroke} bind def

/LUT 10800 array def

/LAB*Fa0100 24 array def %start output
/LAB*Fa1100 24 array def %linearized output

/LAB*FaG0100 24 array def %start output/100
/LAB*FaG1100 24 array def %linearized output/100

%*********************************************************************
%BEG AG78_LECD display 0..40%_00_LUT.DAT

/FileDataen (_LUT.DAT, 243 colours, 100101, Separation olv*, adapted) def
/FileDatade (_LUT.DAT, 243 Farben, 100101, Separation olv*, adaptiert) def

%include here JE060-7A0.TXT to JE060-7A7.TXT


%END AG78_LECD display 0..40%_00_LUT.DAT
%*********************************************************************

/cvishow {cvi 6 string cvs show} def
/cvsshow1 {10 mul cvi 0.1 mul 7 string cvs show} def
/cvsshow2 {100 mul cvi 0.01 mul 7 string cvs show} def
/cvsshow3 {1000 mul cvi 0.001 mul 7 string cvs show} def

/LAB*ioLmod {%BEG Procedure LAB*ioLmod

%requires ISRL*ioL=0,1,3

/RJGBLAB* 12 array def
/RJGBLAB*[
  39.92  58.74  27.99 % R CIE No.09 elementary colours in LAB, D65
  81.26  -2.89  71.56 % J CIE No.10
  52.23 -42.42  13.60 % G CIE No.11
  30.57   1.41 -46.47 % B CIE No.12
] def

/LAB* 84 array def %12x3=36 including N,W + 16x3=48 elementary system
/LAB*a 84 array def


0 1 11 {/sISO exch def
        /i30 sISO 3 mul def /i31 i30 1 add def /i32 i30 2 add def
        sISO 7 le { %sISO=0,7
        LAB* i30 LAB*02 i30 get put
        LAB* i31 LAB*02 i31 get put
        LAB* i32 LAB*02 i32 get put
       } %sISO=0,7
       {%sISO=8,11
        %Definition 8 to 11
        /jISO sISO 8 sub def /j30 jISO 3 mul def 
        /j31 j30 1 add def /j32 j30 2 add def
        LAB* i30 RJGBLAB* j30 get put
        LAB* i31 RJGBLAB* j31 get put
        LAB* i32 RJGBLAB* j32 get put
        
       } ifelse %sISO=0,7 and 8,11

       } for

/L*Nio LAB* 18 get def
/A*Nio LAB* 19 get def
/B*Nio LAB* 20 get def

/L*Wio LAB* 21 get def
/A*Wio LAB* 22 get def
/B*Wio LAB* 23 get def

/A*Dio A*Wio A*Nio sub def
/B*Dio B*Wio B*Nio sub def
icolor 0 eq {/cf1 1 def}{/cf1 0.95 def} ifelse
0 1 11 {/sISO exch def
        /i30 sISO 3 mul def /i31 i30 1 add def /i32 i30 2 add def
        /l*CIE LAB* i30 get L*Nio sub L*Wio L*Nio sub div def %system rel. lightn.
        /a*s A*Wio A*Nio sub l*CIE mul def
        /b*s B*Wio B*Nio sub l*CIE mul def
        /L*Z L*Nio L*Wio L*Nio sub 0.5 mul add def
        LAB*a i30 LAB* i30 get L*Z sub cf1 mul L*Z add put
        LAB*a i31 LAB* i31 get A*Nio sub a*s sub cf1 mul put
        LAB*a i32 LAB* i32 get B*Nio sub b*s sub cf1 mul put
       } for
/cLAB*s0 3 array def %C cyan blue
/vLAB*s0 3 array def %V violet blue
/mLAB*s0 3 array def %M magenta red
/oLAB*s0 3 array def %O orange red
/yLAB*s0 3 array def %Y yellow
/lLAB*s0 3 array def %L leaf green
/nLAB*s0 3 array def %N black
/wLAB*s0 3 array def %W white
/rLAB*s0 3 array def %R elementary red
/jLAB*s0 3 array def %J elementary yellow
/gLAB*s0 3 array def %G elementary green
/bLAB*s0 3 array def %B elementary blue

%Determine Matrix data input or output data
oLAB*s0 0 LAB*a  0 get L*Nio sub put
oLAB*s0 1 LAB*a  1 get put
oLAB*s0 2 LAB*a  2 get put

yLAB*s0 0 LAB*a  3 get L*Nio sub put
yLAB*s0 1 LAB*a  4 get put
yLAB*s0 2 LAB*a  5 get put

lLAB*s0 0 LAB*a  6 get L*Nio sub put
lLAB*s0 1 LAB*a  7 get put
lLAB*s0 2 LAB*a  8 get put

cLAB*s0 0 LAB*a  9 get L*Nio sub put
cLAB*s0 1 LAB*a 10 get put 
cLAB*s0 2 LAB*a 11 get put 

vLAB*s0 0 LAB*a 12 get L*Nio sub put
vLAB*s0 1 LAB*a 13 get put 
vLAB*s0 2 LAB*a 14 get put 

mLAB*s0 0 LAB*a 15 get L*Nio sub put 
mLAB*s0 1 LAB*a 16 get put 
mLAB*s0 2 LAB*a 17 get put 

nLAB*s0 0 LAB*a 18 get L*Nio sub put 
nLAB*s0 1 LAB*a 19 get put 
nLAB*s0 2 LAB*a 20 get put 

wLAB*s0 0 LAB*a 21 get L*Nio sub put 
wLAB*s0 1 LAB*a 22 get put 
wLAB*s0 2 LAB*a 23 get put

rLAB*s0 0 LAB*a 24 get L*Nio sub put
rLAB*s0 1 LAB*a 25 get put 
rLAB*s0 2 LAB*a 26 get put 

jLAB*s0 0 LAB*a 27 get L*Nio sub put 
jLAB*s0 1 LAB*a 28 get put 
jLAB*s0 2 LAB*a 29 get put 

gLAB*s0 0 LAB*a 30 get L*Nio sub put 
gLAB*s0 1 LAB*a 31 get put 
gLAB*s0 2 LAB*a 32 get put 

bLAB*s0 0 LAB*a 33 get L*Nio sub put 
bLAB*s0 1 LAB*a 34 get put 
bLAB*s0 2 LAB*a 35 get put

% Determine the input or output angle in the A* B* plane
% of each of the colours defined above
/C*Ang cLAB*s0 2 get cLAB*s0 1 get 0.0001 add atan def
/V*Ang vLAB*s0 2 get vLAB*s0 1 get 0.0001 add atan def
/M*Ang mLAB*s0 2 get mLAB*s0 1 get 0.0001 add atan def
/O*Ang oLAB*s0 2 get oLAB*s0 1 get 0.0001 add atan def
/Y*Ang yLAB*s0 2 get yLAB*s0 1 get 0.0001 add atan def
/L*Ang lLAB*s0 2 get mLAB*s0 1 get 0.0001 add atan def
/N*Ang 0 def
/W*Ang 0 def
/R*Ang rLAB*s0 2 get rLAB*s0 1 get 0.0001 add atan def
/J*Ang jLAB*s0 2 get jLAB*s0 1 get 0.0001 add atan def
/G*Ang gLAB*s0 2 get gLAB*s0 1 get 0.0001 add atan def
/B*Ang bLAB*s0 2 get bLAB*s0 1 get 0.0001 add atan def

} def %END Procedure LAB*ioLmod

%***********************************************************

/proc_LAB*Fa_LAB*MaNTABl_olvi3*cmyn3*Ma*ioL {
%BEG procedure proc_LAB*Fa_LAB*MaNTABl_olvi3*cmyn3*Ma*ioL
%only for calculation without hue tables

%input  LAB*Fa
%input  LAB*a (6 adapted colours OYLCVM)
%input  nLAB*s0 (colour white N for calculation of lab*l)
%input  wLAB*s0 (colour white W for achromatic axis)

%output LAB*Ma
%output olvi3*Ma
%output cmyn3*Ma

/UXF1a wLAB*s0 1 get B*Fa mul wLAB*s0 2 get A*Fa mul sub def
/UXF2a wLAB*s0 2 get L*Fa mul wLAB*s0 0 get B*Fa mul sub def
/UXF3a wLAB*s0 0 get A*Fa mul wLAB*s0 1 get L*Fa mul sub def

/T1 0 def
/T2 0 def
0 1 5 {/ia exch def
       /ia30 ia 3 mul def
       ia 5 eq {/ia31 0 def} {/ia31 ia30 3 add def} ifelse
       /T1 LAB*a ia30       get UXF1a mul
           LAB*a ia30 1 add get UXF2a mul add
           LAB*a ia30 2 add get UXF3a mul add def
       /T2 LAB*a ia31       get UXF1a mul
           LAB*a ia31 1 add get UXF2a mul add
           LAB*a ia31 2 add get UXF3a mul add def
       T1 0 le {/T1X (N) def} {/T1X (P) def} ifelse
       T2 0 gt {/T2X (P) def} {/T2X (N) def} ifelse
       T1 0 le T2 0 gt and {/ia3END ia30 def exit} if
      } for

/L*11a LAB*a ia3END       get def
/A*11a LAB*a ia3END 1 add get def
/B*11a LAB*a ia3END 2 add get def
ia3END 15 ge {/ia3END -3 def} if
/L*21a LAB*a ia3END 3 add get def
/A*21a LAB*a ia3END 4 add get def
/B*21a LAB*a ia3END 5 add get def

/NENNER L*21a L*11a sub UXF1a mul
        A*21a A*11a sub UXF2a mul add
        B*21a B*11a sub UXF3a mul add def
/ZAEHLE L*21a UXF1a mul
        A*21a UXF2a mul add
        B*21a UXF3a mul add def
NENNER 0 ne {/ALPH ZAEHLE NENNER div def}
            {/ALPH 99999} ifelse

/L*Ma ALPH L*11a mul 1 ALPH sub L*21a mul add def
/A*Ma ALPH A*11a mul 1 ALPH sub A*21a mul add def
/B*Ma ALPH B*11a mul 1 ALPH sub B*21a mul add def
/C*Ma A*Ma dup mul B*Ma dup mul add 0.000001 add sqrt def
/H*Ma B*Ma A*Ma 0.0001 add atan def

/ia30 ia 3 mul def /iap 1 ALPH sub def /iam ALPH def
ia 0 eq {/c3*Ma   0 def %L, c*=0, sector O->Y
         /m3*Ma iam def %L, m*=1->0
         /y3*Ma   1 def %L, y*=1
        } if
ia 1 eq {/c3*Ma iap def %L, c*=0->1, sector Y->L
         /m3*Ma   0 def %L, m*=0
         /y3*Ma   1 def %L, y*=1
        } if
ia 2 eq {/c3*Ma   1 def %L, c*=1, sector L->C
         /m3*Ma   0 def %L, m*=0
         /y3*Ma iam def %L, y*=1->0
        } if
ia 3 eq {/c3*Ma   1 def %L, c*=1, sector C->V
         /m3*Ma iap def %L, m*=1->0
         /y3*Ma   0 def %L, y*=0
        } if
ia 4 eq {/c3*Ma iam def %L, c*=1->0, sector V->M
         /m3*Ma   1 def %L, m*=1
         /y3*Ma   0 def %L, y*=0
        } if
ia 5 eq {/c3*Ma   0 def %L, c*=0, sector M->O
         /m3*Ma   1 def %L, m*=1
         /y3*Ma iap def %L, y*=0->1
        } if

/o3*Ma 1 c3*Ma sub def
/l3*Ma 1 m3*Ma sub def
/v3*Ma 1 y3*Ma sub def
/i3*Ma 1 def

/lab*nMa 0.00 def
/lab*cMa 1.00 def
/lab*wMa 0.00 def
/lab*tMa 0.50 def
/lab*hMa H*Ma 360 div def
/lab*lMa L*Ma nLAB*s0 0 get sub
         wLAB*s0 0 get nLAB*s0 0 get sub 0.000001 add div def

} bind def
%END procedure proc_LAB*Fa_LAB*MaNTABl_olvi3*cmyn3*Ma*ioL

%*******************************************************************

/proc_LAB*Fae_LAB*MaeNTABl_olvi3*cmyn3*Ma*ioL {
%BEG procedure proc_LAB*Fae_LAB*MaeNTABl_olvi3*cmyn3*Ma*ioL
%only for calculation without hue tables

%input  LAB*Fae
%input  LAB*a (4 adapted colours RJGB, No. 8 to 11)
%input  nLAB*s0 (colour white N for calculation of lab*l)
%input  wLAB*s0 (colour white W for achromatic axis)

%output LAB*Mae
%output olvi3*Mae
%output cmyn3*Mae

/UXF1a wLAB*s0 1 get B*Fae mul wLAB*s0 2 get A*Fae mul sub def
/UXF2a wLAB*s0 2 get L*Fae mul wLAB*s0 0 get B*Fae mul sub def
/UXF3a wLAB*s0 0 get A*Fae mul wLAB*s0 1 get L*Fae mul sub def

/T1 0 def
/T2 0 def
0 1 5 {/ia exch def
       /ia30 ia 3 mul def
       ia 5 eq {/ia31 0 def} {/ia31 ia30 3 add def} ifelse
       /T1 LAB*a ia30       get UXF1a mul
           LAB*a ia30 1 add get UXF2a mul add
           LAB*a ia30 2 add get UXF3a mul add def
       /T2 LAB*a ia31       get UXF1a mul
           LAB*a ia31 1 add get UXF2a mul add
           LAB*a ia31 2 add get UXF3a mul add def
       T1 0 le {/T1X (N) def} {/T1X (P) def} ifelse
       T2 0 gt {/T2X (P) def} {/T2X (N) def} ifelse
       T1 0 le T2 0 gt and {/ia3END ia30 def exit} if
      } for

/L*11a LAB*a ia3END       get def
/A*11a LAB*a ia3END 1 add get def
/B*11a LAB*a ia3END 2 add get def
ia3END 15 ge {/ia3END -3 def} if
/L*21a LAB*a ia3END 3 add get def
/A*21a LAB*a ia3END 4 add get def
/B*21a LAB*a ia3END 5 add get def

/NENNER L*21a L*11a sub UXF1a mul
        A*21a A*11a sub UXF2a mul add
        B*21a B*11a sub UXF3a mul add def
/ZAEHLE L*21a UXF1a mul
        A*21a UXF2a mul add
        B*21a UXF3a mul add def
NENNER 0 ne {/ALPH ZAEHLE NENNER div def}
            {/ALPH 99999} ifelse

/L*Mae ALPH L*11a mul 1 ALPH sub L*21a mul add def
/A*Mae ALPH A*11a mul 1 ALPH sub A*21a mul add def
/B*Mae ALPH B*11a mul 1 ALPH sub B*21a mul add def
/C*Mae A*Mae dup mul B*Mae dup mul add 0.000001 add sqrt def
/H*Mae B*Mae A*Mae 0.0001 add atan def

/ia30 ia 3 mul def /iap 1 ALPH sub def /iam ALPH def
ia 0 eq {/c3*Mae   0 def %L, c*=0, sector O->Y
         /m3*Mae iam def %L, m*=1->0
         /y3*Mae   1 def %L, y*=1
        } if
ia 1 eq {/c3*Mae iap def %L, c*=0->1, sector Y->L
         /m3*Mae   0 def %L, m*=0
         /y3*Mae   1 def %L, y*=1
        } if
ia 2 eq {/c3*Mae   1 def %L, c*=1, sector L->C
         /m3*Mae   0 def %L, m*=0
         /y3*Mae iam def %L, y*=1->0
        } if
ia 3 eq {/c3*Mae   1 def %L, c*=1, sector C->V
         /m3*Mae iap def %L, m*=1->0
         /y3*Mae   0 def %L, y*=0
        } if
ia 4 eq {/c3*Mae iam def %L, c*=1->0, sector V->M
         /m3*Mae   1 def %L, m*=1
         /y3*Mae   0 def %L, y*=0
        } if
ia 5 eq {/c3*Mae   0 def %L, c*=0, sector M->O
         /m3*Mae   1 def %L, m*=1
         /y3*Mae iap def %L, y*=0->1
        } if

/o3*Mae 1 c3*Mae sub def
/l3*Mae 1 m3*Mae sub def
/v3*Mae 1 y3*Mae sub def
/i3*Mae 1 def

/lab*nMae 0.00 def
/lab*cMae 1.00 def
/lab*wMae 0.00 def
/lab*tMae 0.50 def
/lab*hMae H*Mae 360 div def
/lab*lMae L*Mae nLAB*s0 0 get sub
          wLAB*s0 0 get nLAB*s0 0 get sub 0.000001 add div def

} bind def
%END procedure proc_LAB*Fae_LAB*MaeNTABl_olvi3*cmyn3*Ma*ioL

%*******************************************************************
%%EndProlog
gsave

%lanindL2 START  20000505
/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 {3 lanind eq {show} {pop} ifelse} bind def
/showfr {2 lanind eq {show} {pop} ifelse} bind def
/showit {4 lanind eq {show} {pop} ifelse} bind def
/showjp {5 lanind eq {show} {pop} ifelse} bind def
/showm  {6 lanind eq {show} {pop} ifelse} bind def
 
/popde {0 lanind ne {pop} if} bind def
/popen {1 lanind ne {pop} if} bind def
/popes {3 lanind ne {pop} if} bind def
/popfr {2 lanind ne {pop} if} bind def
/popit {4 lanind ne {pop} if} bind def
/popjp {5 lanind ne {pop} if} bind def
/popm  {6 lanind ne {pop} if} bind def
 
/popxde {/n exch def 0 lanind ne {n {pop} repeat} if} bind def
/popxen {/n exch def 1 lanind ne {n {pop} repeat} if} bind def
/popxes {/n exch def 3 lanind ne {n {pop} repeat} if} bind def
/popxfr {/n exch def 2 lanind ne {n {pop} repeat} if} bind def
/popxit {/n exch def 4 lanind ne {n {pop} repeat} if} bind def
/popxjp {/n exch def 5 lanind ne {n {pop} repeat} if} bind def
/popxm  {/n exch def 6 lanind ne {n {pop} repeat} if} bind def
 
/lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def}
               {/lanind1 0 def /lanind2 0 def} ifelse
/colormg where {pop /colorm1 colormg def /colorm2 colormg def}
               {/colorm1 0 def /colorm2 0 def} ifelse
/xcolorg where {pop /xcolor1 xcolorg def /xcolor2 xcolorg def}
               {/xcolor1 0 def /xcolor2 0 def} ifelse
/xchartg where {pop /xchart1 xchartg def /xchart2 xchartg def}
               {/xchart1 0 def /xchart2 0 def} ifelse
/lanind  lanind1 def %lanind1 1 lanind2 {/lanind exch def %output showpage
/colorm  colorm1 def %colorm1 1 colorm2 {/colorm exch def %output showpage
/xcolorx xcolor1 def %xcolor1 1 xcolor2 {/xcolor exch def %output showpage
/xchartx xchart1 def %xchart1 1 xchart2 {/xchart exch def %output showpage

gsave
%lanindL2 END

/LUTL* 247 array def %243+4=247
/LUTA* 247 array def
/LUTB* 247 array def

/LUTr* 247 array def
/LUTg* 247 array def
/LUTb* 247 array def
/C*ab  247 array def
/L*    247 array def

/LUTl*  247 array def %243+4=247
/LUTc1* 247 array def
/LUTc2* 247 array def
/LUTt1* 247 array def
/LUTt2* 247 array def
/LUTc*rgb 247 array def
/LUTt*rgb 247 array def

/l1* 247 array def %243+4=247
/l2* 247 array def %l* not possible allread used olv*
/c1* 247 array def
/c2* 247 array def
/t1* 247 array def
/t2* 247 array def
/c1*rgb 247 array def
/c2*rgb 247 array def
/t1*rgb 247 array def
/t2*rgb 247 array def

/ColNames [(O) (Y) (L) (C) (V) (M) (N) (W)
           (R) (J) (G) (B)
           (R) (R25J) (R50J) (R75J)
           (J) (J25G) (J50G) (J75G)
           (G) (G25B) (G50B) (G75B)
           (B) (B25R) (B50R) (B75R) (R)
          ] def

/o3Ma [1 1 0 0 0 1 0 1
       1 1 0 0
       1 1.00 1.00 1.00
       1 0.75 0.50 0.25
       0 0.00 0.00 0.00
       0 0.50 1.00 1.00 1] def
/l3Ma [0 1 1 1 0 0 0 1
       0 1 1 0
       0 0.25 0.50 0.75
       1 1.00 1.00 1.00
       1 1.00 1.00 0.50
       0 0.00 0.00 0.00 0] def
/v3Ma [0 0 0 1 1 1 0 1
       0 0 0 1
       0 0.00 0.00 0.00
       0 0.00 0.00 0.00
       0 0.50 1.00 1.00
       1 1.00 1.00 0.50 0] def
          
/yd 340 def %y-Zeilenabstand
%Spalten
/S1 20 def
/S2 450 def
/S3 1550 def
/S4 2650 def
/S5 3750 def
/S6 4650 def
/S7 5350 def
/S8 6400 def
/S9 7200 def
/S10 8000 def
/S11 8800 def
/S12 9600 def

/yu1 4650 def
/yu2 3800 4000 add def

/nshow {300 /Times-ISOL1 FS  show} bind def
/kshow {300 /TimesI-ISOL1 FS  show} bind def
/bshow {300 /TimesB-ISOL1 FS  show} bind def
/jshow {300 /TimesBI-ISOL1 FS  show} bind def
/sshow {300 /Symbol FS  show} bind def
/ishow {220 /Times-ISOL1 FS -00 -50 rmoveto show 00 50 rmoveto} bind def
/eshow {220 /Times-ISOL1 FS 0 100 rmoveto show 0 -100 rmoveto} bind def

72 90 translate

0.01 MM dup scale

/L*olv 8 array def
/A*olv 8 array def
/B*olv 8 array def
/C*olv 8 array def
/H*olv 8 array def
/N*olv 8 array def
/o*olv 8 array def
/l*olv 8 array def
/v*olv 8 array def

/L*rgb 8 array def
/A*rgb 8 array def
/B*rgb 8 array def
/C*rgb 8 array def
/H*rgb 8 array def
/N*rgb 8 array def
/o*rgb 8 array def
/l*rgb 8 array def
/v*rgb 8 array def

/angle_olv    7 array def
/angle_olvG01 7 array def
/angle_olvG11 7 array def
/angle_rgb    7 array def
/angle_olv [38 96 151 236 305 354 398] def %standard offset
/angle_rgb [26 92 162 217 272 329 386] def %CIE-test colors

/angle_olvi    28 array def %shift by 00,25,50,75%
/angle_olvG01i 28 array def %shift by 00,25,50,75%
/angle_olvG11i 28 array def %shift by 00,25,50,75%
/angle_rgbi    28 array def %shift by 00,25,50,75%

/xcolor xcolorx def
/xchart xchartx def

01 1 1 {/xcolor exch def %xcolor=0,1

colorm 1 eq {proc_lut0} if %Definition lut0 and lut depending on xcolor

gsave

%/icolor xcolor xcolor 2 idiv 2 mul sub def %icolor=0 or 1
/icolor 0 def

xcolor 0 eq {%xcolor 0, LAB*la0
/FileData (AG78_LECD display 0%_G0) def
/LUT [
%ps2ascii output with Ghostsript-programm: macps2pdf, date: 2010-01-04
%input file: JE060-7A.PS, output file: JE060-7AA.TXT (BBEDIT used for TXT)
%JE060-7AA.TXT la0_line 3436
%JE060-7A, Page 19 /66, LAB*la0; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
%LAB*la0, D65, adapted, Y = 0.0 , L* = 0.0 
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0000 A01
000059 001124 -02637 0000 0000 0125 1000 1000 0875 0000 %0001 A02
000349 003724 -05051 0000 0000 0250 1000 1000 0750 0000 %0002 A03
000692 005041 -06294 0000 0000 0375 1000 1000 0625 0000 %0003 A04
001080 005635 -07153 0000 0000 0500 1000 1000 0500 0000 %0004 A05
001433 006178 -07923 0000 0000 0625 1000 1000 0375 0000 %0005 A06
001760 006705 -08671 0000 0000 0750 1000 1000 0250 0000 %0006 A07
002156 007175 -09442 0000 0000 0875 1000 1000 0125 0000 %0007 A08
002939 007977 -10925 0000 0000 1000 1000 1000 0000 0000 %0008 A09
001122 -02461 001819 0000 0125 0000 1000 0875 1000 0000 %0009 B01
001201 -01260 -00776 0000 0125 0125 1000 0875 0875 0000 %0010 B02
001400 000815 -03243 0000 0125 0250 1000 0875 0750 0000 %0011 B03
001620 002283 -04768 0000 0125 0375 1000 0875 0625 0000 %0012 B04
001839 003295 -05908 0000 0125 0500 1000 0875 0500 0000 %0013 B05
002056 004237 -06882 0000 0125 0625 1000 0875 0375 0000 %0014 B06
002301 005027 -07767 0000 0125 0750 1000 0875 0250 0000 %0015 B07
002597 005769 -08686 0000 0125 0875 1000 0875 0125 0000 %0016 B08
003256 006986 -10383 0000 0125 1000 1000 0875 0000 0000 %0017 B09
002623 -03853 003888 0000 0250 0000 1000 0750 1000 0000 %0018 C01
002657 -03212 001494 0000 0250 0125 1000 0750 0875 0000 %0019 C02
002755 -01849 -01077 0000 0250 0250 1000 0750 0750 0000 %0020 C03
002864 -00658 -02688 0000 0250 0375 1000 0750 0625 0000 %0021 C04
002976 000451 -04015 0000 0250 0500 1000 0750 0500 0000 %0022 C05
003110 001428 -05142 0000 0250 0625 1000 0750 0375 0000 %0023 C06
003262 002340 -06158 0000 0250 0750 1000 0750 0250 0000 %0024 C07
003460 003313 -07259 0000 0250 0875 1000 0750 0125 0000 %0025 C08
003936 004973 -09235 0000 0250 1000 1000 0750 0000 0000 %0026 C09
003665 -04762 004979 0000 0375 0000 1000 0625 1000 0000 %0027 D01
003687 -04299 002922 0000 0375 0125 1000 0625 0875 0000 %0028 D02
003746 -03308 000464 0000 0375 0250 1000 0625 0750 0000 %0029 D03
003814 -02395 -01142 0000 0375 0375 1000 0625 0625 0000 %0030 D04
003901 -01431 -02505 0000 0375 0500 1000 0625 0500 0000 %0031 D05
003990 -00532 -03670 0000 0375 0625 1000 0625 0375 0000 %0032 D06
004100 000360 -04770 0000 0375 0750 1000 0625 0250 0000 %0033 D07
004245 001438 -05922 0000 0375 0875 1000 0625 0125 0000 %0034 D08
004613 003127 -08086 0000 0375 1000 1000 0625 0000 0000 %0035 D09
004554 -05477 005769 0000 0500 0000 1000 0500 1000 0000 %0036 E01
004574 -05149 004090 0000 0500 0125 1000 0500 0875 0000 %0037 E02
004617 -04405 001792 0000 0500 0250 1000 0500 0750 0000 %0038 E03
004668 -03650 000193 0000 0500 0375 1000 0500 0625 0000 %0039 E04
004729 -02842 -01174 0000 0500 0500 1000 0500 0500 0000 %0040 E05
004800 -02065 -02359 0000 0500 0625 1000 0500 0375 0000 %0041 E06
004885 -01212 -03494 0000 0500 0750 1000 0500 0250 0000 %0042 E07
004998 -00314 -04694 0000 0500 0875 1000 0500 0125 0000 %0043 E08
005292 001500 -06964 0000 0500 1000 1000 0500 0000 0000 %0044 E09
005352 -06101 006541 0000 0625 0000 1000 0375 1000 0000 %0045 F01
005365 -05853 005073 0000 0625 0125 1000 0375 0875 0000 %0046 F02
005399 -05260 002924 0000 0625 0250 1000 0375 0750 0000 %0047 F03
005439 -04646 001391 0000 0625 0375 1000 0375 0625 0000 %0048 F04
005488 -03948 000017 0000 0625 0500 1000 0375 0500 0000 %0049 F05
005545 -03261 -01168 0000 0625 0625 1000 0375 0375 0000 %0050 F06
005610 -02520 -02309 0000 0625 0750 1000 0375 0250 0000 %0051 F07
005705 -01663 -03546 0000 0625 0875 1000 0375 0125 0000 %0052 F08
005947 000064 -05878 0000 0625 1000 1000 0375 0000 0000 %0053 F09
006175 -06750 007310 0000 0750 0000 1000 0250 1000 0000 %0054 G01
006188 -06550 006092 0000 0750 0125 1000 0250 0875 0000 %0055 G02
006215 -06061 004094 0000 0750 0250 1000 0250 0750 0000 %0056 G03
006247 -05541 002600 0000 0750 0375 1000 0250 0625 0000 %0057 G04
006287 -04958 001260 0000 0750 0500 1000 0250 0500 0000 %0058 G05
006330 -04370 000074 0000 0750 0625 1000 0250 0375 0000 %0059 G06
006386 -03729 -01068 0000 0750 0750 1000 0250 0250 0000 %0060 G07
006461 -02962 -02313 0000 0750 0875 1000 0250 0125 0000 %0061 G08
006664 -01349 -04699 0000 0750 1000 1000 0250 0000 0000 %0062 G09
007099 -07438 008235 0000 0875 0000 1000 0125 1000 0000 %0063 H01
007107 -07272 007207 0000 0875 0125 1000 0125 0875 0000 %0064 H02
007131 -06886 005375 0000 0875 0250 1000 0125 0750 0000 %0065 H03
007157 -06458 003937 0000 0875 0375 1000 0125 0625 0000 %0066 H04
007188 -05982 002637 0000 0875 0500 1000 0125 0500 0000 %0067 H05
007224 -05475 001464 0000 0875 0625 1000 0125 0375 0000 %0068 H06
007268 -04920 000323 0000 0875 0750 1000 0125 0250 0000 %0069 H07
007330 -04248 -00929 0000 0875 0875 1000 0125 0125 0000 %0070 H08
007494 -02797 -03338 0000 0875 1000 1000 0125 0000 0000 %0071 H09
008399 -08361 009599 0000 1000 0000 1000 0000 1000 0000 %0072 I01
008405 -08248 008732 0000 1000 0125 1000 0000 0875 0000 %0073 I02
008423 -07940 007126 0000 1000 0250 1000 0000 0750 0000 %0074 I03
008444 -07619 005787 0000 1000 0375 1000 0000 0625 0000 %0075 I04
008467 -07237 004541 0000 1000 0500 1000 0000 0500 0000 %0076 I05
008495 -06845 003401 0000 1000 0625 1000 0000 0375 0000 %0077 I06
008528 -06403 002278 0000 1000 0750 1000 0000 0250 0000 %0078 I07
008577 -05847 001042 0000 1000 0875 1000 0000 0125 0000 %0079 I08
008706 -04625 -01374 0000 1000 1000 1000 0000 0000 0000 %0080 I09

000296 001717 000511 0125 0000 0000 0875 1000 1000 0000 %0081 J01
000402 002695 -01960 0125 0000 0125 0875 1000 0875 0000 %0082 J02
000718 004139 -04372 0125 0000 0250 0875 1000 0750 0000 %0083 J03
001037 004921 -05656 0125 0000 0375 0875 1000 0625 0000 %0084 J04
001348 005589 -06680 0125 0000 0500 0875 1000 0500 0000 %0085 J05
001649 006199 -07559 0125 0000 0625 0875 1000 0375 0000 %0086 J06
001939 006661 -08336 0125 0000 0750 0875 1000 0250 0000 %0087 J07
002301 007183 -09187 0125 0000 0875 0875 1000 0125 0000 %0088 J08
003040 007999 -10739 0125 0000 1000 0875 1000 0000 0000 %0089 J09
001366 -00655 002289 0125 0125 0000 0875 0875 1000 0000 %0090 K01
001450 000114 -00334 0125 0125 0125 0875 0875 0875 0000 %0091 K02
001620 001531 -02883 0125 0125 0250 0875 0875 0750 0000 %0092 K03
001800 002655 -04390 0125 0125 0375 0875 0875 0625 0000 %0093 K04
001998 003606 -05601 0125 0125 0500 0875 0875 0500 0000 %0094 K05
002209 004456 -06616 0125 0125 0625 0875 0875 0375 0000 %0095 K06
002426 005119 -07502 0125 0125 0750 0875 0875 0250 0000 %0096 K07
002715 005877 -08495 0125 0125 0875 0875 0875 0125 0000 %0097 K08
003345 007038 -10226 0125 0125 1000 0875 0875 0000 0000 %0098 K09
002731 -02818 004059 0125 0250 0000 0875 0750 1000 0000 %0099 L01
002771 -09850 000187 0125 0250 0125 0875 0750 0875 0000 %0100 L02
002857 -01188 -00876 0125 0250 0250 0875 0750 0750 0000 %0101 L03
002961 -00160 -02488 0125 0250 0375 0875 0750 0625 0000 %0102 L04
003075 000839 -03822 0125 0250 0500 0875 0750 0500 0000 %0103 L05
003204 001737 -04958 0125 0250 0625 0875 0750 0375 0000 %0104 L06
003351 002579 -06008 0125 0250 0750 0875 0750 0250 0000 %0105 L07
003536 003506 -07101 0125 0250 0875 0875 0750 0125 0000 %0106 L08
004004 005102 -09113 0125 0250 1000 0875 0750 0000 0000 %0107 L09
003735 -04052 005037 0125 0375 0000 0875 0625 1000 0000 %0108 M01
003762 -03681 003038 0125 0375 0125 0875 0625 0875 0000 %0109 M02
003825 -02788 000616 0125 0375 0250 0875 0625 0750 0000 %0110 M03
003891 -01920 -00993 0125 0375 0375 0875 0625 0625 0000 %0111 M04
003970 -01045 -02371 0125 0375 0500 0875 0625 0500 0000 %0112 M05
004057 -00201 -03544 0125 0375 0625 0875 0625 0375 0000 %0113 M06
004164 000629 -04651 0125 0375 0750 0875 0625 0250 0000 %0114 M07
004298 001550 -05814 0125 0375 0875 0875 0625 0125 0000 %0115 M08
004672 003307 -08004 0125 0375 1000 0875 0625 0000 0000 %0116 M09
004613 -04950 005840 0125 0500 0000 0875 0500 1000 0000 %0117 N01
004633 -04655 004169 0125 0500 0125 0875 0500 0875 0000 %0118 N02
004675 -03962 001891 0125 0500 0250 0875 0500 0750 0000 %0119 N03
004725 -03253 000305 0125 0500 0375 0875 0500 0625 0000 %0120 N04
004789 -02500 -01060 0125 0500 0500 0875 0500 0500 0000 %0121 N05
004852 -01752 -02248 0125 0500 0625 0875 0500 0375 0000 %0122 N06
005009 -00987 -03419 0125 0500 0750 0875 0500 0250 0000 %0123 N07
005050 -00088 -04599 0125 0500 0875 0875 0500 0125 0000 %0124 N08
005343 001668 -06885 0125 0500 1000 0875 0500 0000 0000 %0125 N09
005399 -05698 006559 0125 0625 0000 0875 0375 1000 0000 %0126 O01
005411 -05457 005170 0125 0625 0125 0875 0375 0875 0000 %0127 O02
005448 -04883 003026 0125 0625 0250 0875 0375 0750 0000 %0128 O03
005491 -04256 001430 0125 0625 0375 0875 0375 0625 0000 %0129 O04
005536 -03643 000115 0125 0625 0500 0875 0375 0500 0000 %0130 O05
005589 -02995 -01075 0125 0625 0625 0875 0375 0375 0000 %0131 O06
005659 -02276 -02229 0125 0625 0750 0875 0375 0250 0000 %0132 O07
005747 -01459 -03459 0125 0625 0875 0875 0375 0125 0000 %0133 O08
005992 000228 -05808 0125 0625 1000 0875 0375 0000 0000 %0134 O09
006218 -06424 007377 0125 0750 0000 0875 0250 1000 0000 %0135 P01
006228 -06221 006151 0125 0750 0125 0875 0250 0875 0000 %0136 P02
006255 -05753 004168 0125 0750 0250 0875 0250 0750 0000 %0137 P03
006289 -05264 002673 0125 0750 0375 0875 0250 0625 0000 %0138 P04
006328 -04697 001337 0125 0750 0500 0875 0250 0500 0000 %0139 P05
006374 -04130 000149 0125 0750 0625 0875 0250 0375 0000 %0140 P06
006426 -03503 -01001 0125 0750 0750 0875 0250 0250 0000 %0141 P07
006501 -02763 -02247 0125 0750 0875 0875 0250 0125 0000 %0142 P08
006702 -01192 -04630 0125 0750 1000 0875 0250 0000 0000 %0143 P09
007133 -07177 008269 0125 0875 0000 0875 0125 1000 0000 %0144 Q01
007143 -07007 007250 0125 0875 0125 0875 0125 0875 0000 %0145 Q02
007163 -06638 005431 0125 0875 0250 0875 0125 0750 0000 %0146 Q03
007188 -06227 003999 0125 0875 0375 0875 0125 0625 0000 %0147 Q04
007222 -05765 002696 0125 0875 0500 0875 0125 0500 0000 %0148 Q05
007257 -05271 001525 0125 0875 0625 0875 0125 0375 0000 %0149 Q06
007301 -04725 000383 0125 0875 0750 0875 0125 0250 0000 %0150 Q07
007362 -04063 -00868 0125 0875 0875 0875 0125 0125 0000 %0151 Q08
007527 -02651 -03286 0125 0875 1000 0875 0125 0000 0000 %0152 Q09
008417 -08165 009616 0125 1000 0000 0875 0000 1000 0000 %0153 R01
008425 -08042 008768 0125 1000 0125 0875 0000 0875 0000 %0154 R02
008441 -07743 007154 0125 1000 0250 0875 0000 0750 0000 %0155 R03
009897 -08413 006614 0125 1000 0375 0875 0000 0625 0000 %0156 R04
008485 -07065 004572 0125 1000 0500 0875 0000 0500 0000 %0157 R05
008513 -06672 003435 0125 1000 0625 0875 0000 0375 0000 %0158 R06
008547 -06229 002310 0125 1000 0750 0875 0000 0250 0000 %0159 R07
008594 -05693 001073 0125 1000 0875 0875 0000 0125 0000 %0160 R08
008723 -04474 -01346 0125 1000 1000 0875 0000 0000 0000 %0161 R09

001182 003261 002038 0250 0000 0000 0750 1000 1000 0000 %0162 S01
001277 003647 -00580 0250 0000 0125 0750 1000 0875 0000 %0163 S02
001466 004414 -03092 0250 0000 0250 0750 1000 0750 0000 %0164 S03
001677 005038 -04578 0250 0000 0375 0750 1000 0625 0000 %0165 S04
001877 005659 -05769 0250 0000 0500 0750 1000 0500 0000 %0166 S05
002090 006183 -06754 0250 0000 0625 0750 1000 0375 0000 %0167 S06
002340 006695 -07676 0250 0000 0750 0750 1000 0250 0000 %0168 S07
002631 007198 -08611 0250 0000 0875 0750 1000 0125 0000 %0169 S08
003282 008056 -10326 0250 0000 1000 0750 1000 0000 0000 %0170 S09
001890 001390 003072 0250 0125 0000 0750 0875 1000 0000 %0171 T01
001951 001761 000518 0250 0125 0125 0750 0875 0875 0000 %0172 T02
002079 002611 -02094 0250 0125 0250 0750 0875 0750 0000 %0173 T03
002230 003409 -03673 0250 0125 0375 0750 0875 0625 0000 %0174 T04
002389 004141 -04953 0250 0125 0500 0750 0875 0500 0000 %0175 T05
002554 004784 -05999 0250 0125 0625 0750 0875 0375 0000 %0176 T06
002739 005420 -06971 0250 0125 0750 0750 0875 0250 0000 %0177 T07
002990 006097 -08022 0250 0125 0875 0750 0875 0125 0000 %0178 T08
003559 007193 -09859 0250 0125 1000 0750 0875 0000 0000 %0179 T09
003012 -01090 004490 0250 0250 0000 0750 0750 1000 0000 %0180 U01
003040 -00729 002104 0250 0250 0125 0750 0750 0875 0000 %0181 U02
003123 000072 -00436 0250 0250 0250 0750 0750 0750 0000 %0182 U03
003210 000863 -02060 0250 0250 0375 0750 0750 0625 0000 %0183 U04
003313 001641 -03416 0250 0250 0500 0750 0750 0500 0000 %0184 U05
003430 002382 -04557 0250 0250 0625 0750 0750 0375 0000 %0185 U06
003559 003115 -05622 0250 0250 0750 0750 0750 0250 0000 %0186 U07
003741 003919 -06748 0250 0250 0875 0750 0750 0125 0000 %0187 U08
004178 005366 -08815 0250 0250 1000 0750 0750 0000 0000 %0188 U09
003926 000984 006769 0250 0375 0000 0750 0625 1000 0000 %0189 V01
003951 -02352 003329 0250 0375 0125 0750 0625 0875 0000 %0190 V02
004004 -01641 000913 0250 0375 0250 0750 0625 0750 0000 %0191 V03
004067 -00957 -00708 0250 0375 0375 0750 0625 0625 0000 %0192 V04
004141 -00219 -02082 0250 0375 0500 0750 0625 0500 0000 %0193 V05
004228 000501 -03253 0250 0375 0625 0750 0625 0375 0000 %0194 V06
004329 001231 -04372 0250 0375 0750 0750 0625 0250 0000 %0195 V07
004464 002062 -05557 0250 0375 0875 0750 0625 0125 0000 %0196 V08
004811 003654 -07755 0250 0375 1000 0750 0625 0000 0000 %0197 V09
004755 -03834 006055 0250 0500 0000 0750 0500 1000 0000 %0198 W01
004774 -03590 004413 0250 0500 0125 0750 0500 0875 0000 %0199 W02
004815 -02995 002125 0250 0500 0250 0750 0500 0750 0000 %0200 W03
004863 -02385 000544 0250 0500 0375 0750 0500 0625 0000 %0201 W04
004924 -01741 -00833 0250 0500 0500 0750 0500 0500 0000 %0202 W05
004988 -01063 -02027 0250 0500 0625 0750 0500 0375 0000 %0203 W06
005067 -00376 -03168 0250 0500 0750 0750 0500 0250 0000 %0204 W07
005175 000439 -04387 0250 0500 0875 0750 0500 0125 0000 %0205 W08
005719 002104 -06906 0250 0500 1000 0750 0500 0000 0000 %0206 W09
005512 -04806 006766 0250 0625 0000 0750 0375 1000 0000 %0207 X01
005527 -04562 005326 0250 0625 0125 0750 0375 0875 0000 %0208 X02
005563 -04058 003206 0250 0625 0250 0750 0375 0750 0000 %0209 X03
005601 -03537 001661 0250 0625 0375 0750 0375 0625 0000 %0210 X04
005648 -02948 000289 0250 0625 0500 0750 0375 0500 0000 %0211 X05
005702 -02348 -00897 0250 0625 0625 0750 0375 0375 0000 %0212 X06
005764 -01717 -02046 0250 0625 0750 0750 0375 0250 0000 %0213 X07
005853 -00948 -03287 0250 0625 0875 0750 0375 0125 0000 %0214 X08
006089 000615 -05633 0250 0625 1000 0750 0375 0000 0000 %0215 X09
006309 -05667 007493 0250 0750 0000 0750 0250 1000 0000 %0216 Y01
006321 -05491 006291 0250 0750 0125 0750 0250 0875 0000 %0217 Y02
006350 -05051 004321 0250 0750 0250 0750 0250 0750 0000 %0218 Y03
006378 -04595 002819 0250 0750 0375 0750 0250 0625 0000 %0219 Y04
006416 -04090 001480 0250 0750 0500 0750 0250 0500 0000 %0220 Y05
006461 -03556 000300 0250 0750 0625 0750 0250 0375 0000 %0221 Y06
006512 -02978 -00848 0250 0750 0750 0750 0250 0250 0000 %0222 Y07
006588 -02290 -02102 0250 0750 0875 0750 0250 0125 0000 %0223 Y08
006785 -00803 -04495 0250 0750 1000 0750 0250 0000 0000 %0224 Y09
007206 -06552 008395 0250 0875 0000 0750 0125 1000 0000 %0225 Z01
007216 -06405 007357 0250 0875 0125 0750 0125 0875 0000 %0226 Z02
007235 -06053 005542 0250 0875 0250 0750 0125 0750 0000 %0227 Z03
007263 -05666 004115 0250 0875 0375 0750 0125 0625 0000 %0228 Z04
007293 -05221 002818 0250 0875 0500 0750 0125 0500 0000 %0229 Z05
007328 -04778 001645 0250 0875 0625 0750 0125 0375 0000 %0230 Z06
007372 -04249 000497 0250 0875 0750 0750 0125 0250 0000 %0231 Z07
007432 -03646 -00745 0250 0875 0875 0750 0125 0125 0000 %0232 Z08
007596 -02284 -03168 0250 0875 1000 0750 0125 0000 0000 %0233 Z09
008468 -07685 009688 0250 1000 0000 0750 0000 1000 0000 %0234 a01
008476 -07571 008852 0250 1000 0125 0750 0000 0875 0000 %0235 a02
008494 -07290 007238 0250 1000 0250 0750 0000 0750 0000 %0236 a03
008513 -06987 005906 0250 1000 0375 0750 0000 0625 0000 %0237 a04
008535 -06626 004663 0250 1000 0500 0750 0000 0500 0000 %0238 a05
008563 -06257 003521 0250 1000 0625 0750 0000 0375 0000 %0239 a06
008599 -05829 002395 0250 1000 0750 0750 0000 0250 0000 %0240 a07
008645 -05313 001153 0250 1000 0875 0750 0000 0125 0000 %0241 a08
008772 -04137 -01264 0250 1000 1000 0750 0000 0000 0000 %0242 a09

%JE060-7A, Page 20 /66, LAB*la0; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
001877 004045 003199 0375 0000 0000 0625 1000 1000 0000 %0243 A10
001939 004294 000575 0375 0000 0125 0625 1000 0875 0000 %0244 A11
002079 004826 -02059 0375 0000 0250 0625 1000 0750 0000 %0245 A12
002219 005353 -03633 0375 0000 0375 0625 1000 0625 0000 %0246 A13
002379 005855 -04909 0375 0000 0500 0625 1000 0500 0000 %0247 A14
002545 006320 -05956 0375 0000 0625 0625 1000 0375 0000 %0248 A15
002739 006814 -06962 0375 0000 0750 0625 1000 0250 0000 %0249 A16
002983 007299 -07980 0375 0000 0875 0625 1000 0125 0000 %0250 A17
003559 008144 -09839 0375 0000 1000 0625 1000 0000 0000 %0251 A18
002379 002632 003871 0375 0125 0000 0625 0875 1000 0000 %0252 B10
002426 002896 001290 0375 0125 0125 0625 0875 0875 0000 %0253 B11
002536 003504 -01330 0375 0125 0250 0625 0875 0750 0000 %0254 B12
002648 004069 -02935 0375 0125 0375 0625 0875 0625 0000 %0255 B13
002787 004646 -04252 0375 0125 0500 0625 0875 0500 0000 %0256 B14
002925 005212 -05364 0375 0125 0625 0625 0875 0375 0000 %0257 B15
003224 005870 -06538 0375 0125 0750 0625 0875 0250 0000 %0258 B16
003301 006325 -07461 0375 0125 0875 0625 0875 0125 0000 %0259 B17
003814 007372 -09421 0375 0125 1000 0625 0875 0000 0000 %0260 B18
003313 000356 004910 0375 0250 0000 0625 0750 1000 0000 %0261 C10
003345 000619 002585 0375 0250 0125 0625 0750 0875 0000 %0262 C11
003418 001218 000050 0375 0250 0250 0625 0750 0750 0000 %0263 C12
003501 001836 -01590 0375 0250 0375 0625 0750 0625 0000 %0264 C13
003587 002470 -02950 0375 0250 0500 0625 0750 0500 0000 %0265 C14
003692 003065 -04107 0375 0250 0625 0625 0750 0375 0000 %0266 C15
003814 003707 -05203 0375 0250 0750 0625 0750 0250 0000 %0267 C16
003975 004394 -06350 0375 0250 0875 0625 0750 0125 0000 %0268 C17
004384 005703 -08473 0375 0250 1000 0625 0750 0000 0000 %0269 C18
004146 -01356 005636 0375 0375 0000 0625 0625 1000 0000 %0270 D10
004169 -01080 003665 0375 0375 0125 0625 0625 0875 0000 %0271 D11
004219 -00537 001267 0375 0375 0250 0625 0625 0750 0000 %0272 D12
004276 000017 -00345 0375 0375 0375 0625 0625 0625 0000 %0273 D13
004350 000651 -01735 0375 0375 0500 0625 0625 0500 0000 %0274 D14
004431 001269 -02921 0375 0375 0625 0625 0625 0375 0000 %0275 D15
004521 001899 -04046 0375 0375 0750 0625 0625 0250 0000 %0276 D16
004648 002630 -05244 0375 0375 0875 0625 0625 0125 0000 %0277 D17
004981 004046 -07466 0375 0375 1000 0625 0625 0000 0000 %0278 D18
004924 -02688 006266 0375 0500 0000 0625 0500 1000 0000 %0279 E10
004942 -02471 004648 0375 0500 0125 0625 0500 0875 0000 %0280 E11
004984 -01977 002391 0375 0500 0250 0625 0500 0750 0000 %0281 E12
005029 -00538 001167 0375 0500 0375 0625 0500 0625 0000 %0282 E13
005084 -00886 -00569 0375 0500 0500 0625 0500 0500 0000 %0283 E14
005148 -00311 -01760 0375 0500 0625 0625 0500 0375 0000 %0284 E15
005224 000323 -02913 0375 0500 0750 0625 0500 0250 0000 %0285 E16
005327 001024 -04139 0375 0500 0875 0625 0500 0125 0000 %0286 E17
005598 002492 -06443 0375 0500 1000 0625 0500 0000 0000 %0287 E18
005648 -03789 006903 0375 0625 0000 0625 0375 1000 0000 %0288 F10
005662 -03596 005531 0375 0625 0125 0625 0375 0875 0000 %0289 F11
005696 -03149 003413 0375 0625 0250 0625 0375 0750 0000 %0290 F12
005736 -02677 001880 0375 0625 0375 0625 0375 0625 0000 %0291 F13
005778 -02155 000510 0375 0625 0500 0625 0375 0500 0000 %0292 F14
005831 -01638 -00677 0375 0625 0625 0625 0375 0375 0000 %0293 F15
005894 -01043 -01831 0375 0625 0750 0625 0375 0250 0000 %0294 F16
005979 -00359 -03073 0375 0625 0875 0625 0375 0125 0000 %0295 F17
006208 001096 -05439 0375 0625 1000 0625 0375 0000 0000 %0296 F18
006419 -04808 007634 0375 0750 0000 0625 0250 1000 0000 %0297 G10
006431 -04651 006447 0375 0750 0125 0625 0250 0875 0000 %0298 G11
006459 -04256 004487 0375 0750 0250 0625 0250 0750 0000 %0299 G12
006489 -03839 002992 0375 0750 0375 0625 0250 0625 0000 %0300 G13
006526 -03374 001659 0375 0750 0500 0625 0250 0500 0000 %0301 G14
006567 -02893 000477 0375 0750 0625 0625 0250 0375 0000 %0302 G15
006622 -02349 -00673 0375 0750 0750 0625 0250 0250 0000 %0303 G16
006693 -01705 -01929 0375 0750 0875 0625 0250 0125 0000 %0304 G17
006885 -00330 -04326 0375 0750 1000 0625 0250 0000 0000 %0305 G18
007295 -05840 008500 0375 0875 0000 0625 0125 1000 0000 %0306 H10
007305 -05694 007485 0375 0875 0125 0625 0125 0875 0000 %0307 H11
007326 -05354 005680 0375 0875 0250 0625 0125 0750 0000 %0308 H12
007351 -05001 004251 0375 0875 0375 0625 0125 0625 0000 %0309 H13
007383 -04603 002955 0375 0875 0500 0625 0125 0500 0000 %0310 H14
007417 -04171 001787 0375 0875 0625 0625 0125 0375 0000 %0311 H15
007459 -03698 000643 0375 0875 0750 0625 0125 0250 0000 %0312 H16
007520 -03116 -00609 0375 0875 0875 0625 0125 0125 0000 %0313 H17
007680 -01827 -03031 0375 0875 1000 0625 0125 0000 0000 %0314 H18
008535 -07128 009772 0375 1000 0000 0625 0000 1000 0000 %0315 I10
008541 -07008 008932 0375 1000 0125 0625 0000 0875 0000 %0316 I11
008559 -06732 007340 0375 1000 0250 0625 0000 0750 0000 %0317 I12
008580 -06443 006011 0375 1000 0375 0625 0000 0625 0000 %0318 I13
008603 -06104 004762 0375 1000 0500 0625 0000 0500 0000 %0319 I14
008631 -05754 003626 0375 1000 0625 0625 0000 0375 0000 %0320 I15
008664 -05348 002502 0375 1000 0750 0625 0000 0250 0000 %0321 I16
008710 -04852 001262 0375 1000 0875 0625 0000 0125 0000 %0322 I17
008837 -03736 -01159 0375 1000 1000 0625 0000 0000 0000 %0323 I18

002509 004759 004175 0500 0000 0000 0500 1000 1000 0000 %0324 J10
002562 004963 001569 0500 0000 0125 0500 1000 0875 0000 %0325 J11
002657 005312 -01069 0500 0000 0250 0500 1000 0750 0000 %0326 J12
002771 005781 -02724 0500 0000 0375 0500 1000 0625 0000 %0327 J13
002895 006207 -04057 0500 0000 0500 0500 1000 0500 0000 %0328 J14
003019 006582 -05140 0500 0000 0625 0500 1000 0375 0000 %0329 J15
003184 007018 -06204 0500 0000 0750 0500 1000 0250 0000 %0330 J16
003388 007385 -07250 0500 0000 0875 0500 1000 0125 0000 %0331 J17
003891 008273 -09269 0500 0000 1000 0500 1000 0000 0000 %0332 J18
002887 003647 004633 0500 0125 0000 0500 0875 1000 0000 %0333 K10
002925 003873 002087 0500 0125 0125 0500 0875 0875 0000 %0334 K11
003012 004314 -00537 0500 0125 0250 0500 0875 0750 0000 %0335 K12
003110 004745 -02163 0500 0125 0375 0500 0875 0625 0000 %0336 K13
003217 005216 -03526 0500 0125 0500 0500 0875 0500 0000 %0337 K14
003332 005664 -04656 0500 0125 0625 0500 0875 0375 0000 %0338 K15
003472 006124 -05730 0500 0125 0750 0500 0875 0250 0000 %0339 K16
003660 006648 -06859 0500 0125 0875 0500 0875 0125 0000 %0340 K17
004114 007612 -08908 0500 0125 1000 0500 0875 0000 0000 %0341 K18
003665 001634 005403 0500 0250 0000 0500 0750 1000 0000 %0342 L10
003698 001849 003126 0500 0250 0125 0500 0750 0875 0000 %0343 L11
003757 002298 000615 0500 0250 0250 0500 0750 0750 0000 %0344 L12
003830 002777 -01027 0500 0250 0375 0500 0750 0625 0000 %0345 L13
003911 003288 -02414 0500 0250 0500 0500 0750 0500 0000 %0346 L14
004004 003783 -03583 0500 0250 0625 0500 0750 0375 0000 %0347 L15
004114 004317 -04695 0500 0250 0750 0500 0750 0250 0000 %0348 L16
004259 004916 -05870 0500 0250 0875 0500 0750 0125 0000 %0349 L17
004633 006074 -08040 0500 0250 1000 0500 0750 0000 0000 %0350 L18
004406 -00066 005978 0500 0375 0000 0500 0625 1000 0000 %0351 M10
004431 000149 004069 0500 0375 0125 0500 0625 0875 0000 %0352 M11
004480 000591 001693 0500 0375 0250 0500 0625 0750 0000 %0353 M12
004533 001066 000072 0500 0375 0375 0500 0625 0625 0000 %0354 M13
004601 001580 -01306 0500 0375 0500 0500 0625 0500 0000 %0355 M14
004672 002097 -02505 0500 0375 0625 0500 0625 0375 0000 %0356 M15
004759 002637 -03650 0500 0375 0750 0500 0625 0250 0000 %0357 M16
004877 003258 -04842 0500 0375 0875 0500 0625 0125 0000 %0358 M17
005188 004529 -07108 0500 0375 1000 0500 0625 0000 0000 %0359 M18
005132 -01486 006563 0500 0500 0000 0500 0500 1000 0000 %0360 N10
005148 -01294 004951 0500 0500 0125 0500 0500 0875 0000 %0361 N11
005188 -00879 002726 0500 0500 0250 0500 0500 0750 0000 %0362 N12
005234 -00434 001138 0500 0500 0375 0500 0500 0625 0000 %0363 N13
005286 000054 -00229 0500 0500 0500 0500 0500 0500 0000 %0364 N14
005343 000551 -01437 0500 0500 0625 0500 0500 0375 0000 %0365 N15
005415 001085 -02582 0500 0500 0750 0500 0500 0250 0000 %0366 N16
005512 001725 -03819 0500 0500 0875 0500 0500 0125 0000 %0367 N17
005775 003038 -06150 0500 0500 1000 0500 0500 0000 0000 %0368 N18
005820 -02684 007148 0500 0625 0000 0500 0375 1000 0000 %0369 O10
005831 -02517 005772 0500 0625 0125 0500 0375 0875 0000 %0370 O11
005864 -02132 003682 0500 0625 0250 0500 0375 0750 0000 %0371 O12
005902 -01720 002146 0500 0625 0375 0500 0375 0625 0000 %0372 O13
005945 -01267 000789 0500 0625 0500 0500 0375 0500 0000 %0373 O14
005992 -00787 -00409 0500 0625 0625 0500 0375 0375 0000 %0374 O15
006053 -00270 -01565 0500 0625 0750 0500 0375 0250 0000 %0375 O16
006135 000341 -02815 0500 0625 0875 0500 0375 0125 0000 %0376 O17
006357 001657 -05185 0500 0625 1000 0500 0375 0000 0000 %0377 O18
006556 -03831 007817 0500 0750 0000 0500 0250 1000 0000 %0378 P10
006570 -03674 006652 0500 0750 0125 0500 0250 0875 0000 %0379 P11
006597 -03330 004709 0500 0750 0250 0500 0250 0750 0000 %0380 P12
006626 -02962 003220 0500 0750 0375 0500 0250 0625 0000 %0381 P13
006660 -02538 001888 0500 0750 0500 0500 0250 0500 0000 %0382 P14
006704 -02107 000699 0500 0750 0625 0500 0250 0375 0000 %0383 P15
006752 -01623 -00456 0500 0750 0750 0500 0250 0250 0000 %0384 P16
006823 -01033 -01706 0500 0750 0875 0500 0250 0125 0000 %0385 P17
007010 000232 -04116 0500 0750 1000 0500 0250 0000 0000 %0386 P18
007405 -04990 008634 0500 0875 0000 0500 0125 1000 0000 %0387 Q10
007415 -04860 007651 0500 0875 0125 0500 0125 0875 0000 %0388 Q11
007439 -04546 005853 0500 0875 0250 0500 0125 0750 0000 %0389 Q12
007461 -04217 004439 0500 0875 0375 0500 0125 0625 0000 %0390 Q13
007491 -03842 003140 0500 0875 0500 0500 0125 0500 0000 %0391 Q14
007526 -03452 001974 0500 0875 0625 0500 0125 0375 0000 %0392 Q15
007567 -03016 000828 0500 0875 0750 0500 0125 0250 0000 %0393 Q16
007625 -02473 -00424 0500 0875 0875 0500 0125 0125 0000 %0394 Q17
007783 -01273 -02860 0500 0875 1000 0500 0125 0000 0000 %0395 Q18
008618 -06420 009878 0500 1000 0000 0500 0000 1000 0000 %0396 R10
008626 -06317 009056 0500 1000 0125 0500 0000 0875 0000 %0397 R11
008642 -06060 007469 0500 1000 0250 0500 0000 0750 0000 %0398 R12
008661 -05781 006147 0500 1000 0375 0500 0000 0625 0000 %0399 R13
008684 -05469 004896 0500 1000 0500 0500 0000 0500 0000 %0400 R14
008711 -05134 003768 0500 1000 0625 0500 0000 0375 0000 %0401 R15
008744 -04764 002641 0500 1000 0750 0500 0000 0250 0000 %0402 R16
008789 -04284 001401 0500 1000 0875 0500 0000 0125 0000 %0403 R17
008916 -03219 -01024 0500 1000 1000 0500 0000 0000 0000 %0404 R18

003082 005395 005052 0625 0000 0000 0375 1000 1000 0000 %0405 S10
003117 005520 002500 0625 0000 0125 0375 1000 0875 0000 %0406 S11
003204 005860 -00164 0625 0000 0250 0375 1000 0750 0000 %0407 S12
003288 006200 -01815 0625 0000 0375 0375 1000 0625 0000 %0408 S13
003388 006554 -03186 0625 0000 0500 0375 1000 0500 0000 %0409 S14
003501 006922 -04345 0625 0000 0625 0375 1000 0375 0000 %0410 S15
003626 007271 -05421 0625 0000 0750 0375 1000 0250 0000 %0411 S16
003804 007695 -06575 0625 0000 0875 0375 1000 0125 0000 %0412 S17
004241 008487 -08686 0625 0000 1000 0375 1000 0000 0000 %0413 S18
003375 004519 005359 0625 0125 0000 0375 0875 1000 0000 %0414 T10
003412 004682 002882 0625 0125 0125 0375 0875 0875 0000 %0415 T11
003483 005045 000262 0625 0125 0250 0375 0875 0750 0000 %0416 T12
003559 005376 -01387 0625 0125 0375 0375 0875 0625 0000 %0417 T13
003654 005766 -02772 0625 0125 0500 0375 0875 0500 0000 %0418 T14
003757 006176 -03952 0625 0125 0625 0375 0875 0375 0000 %0419 T15
003876 006549 -05041 0625 0125 0750 0375 0875 0250 0000 %0420 T16
004033 007013 -06214 0625 0125 0875 0375 0875 0125 0000 %0421 T17
004439 007892 -08368 0625 0125 1000 0375 0875 0000 0000 %0422 T18
004029 002762 005910 0625 0250 0000 0375 0750 1000 0000 %0423 U10
004057 002920 003728 0625 0250 0125 0375 0750 0875 0000 %0424 U11
004114 003268 001226 0625 0250 0250 0375 0750 0750 0000 %0425 U12
004178 003669 -00425 0625 0250 0375 0375 0750 0625 0000 %0426 U13
004250 004096 -01818 0625 0250 0500 0375 0750 0500 0000 %0427 U14
004333 004504 -03012 0625 0250 0625 0375 0750 0375 0000 %0428 U15
004431 004950 -04142 0625 0250 0750 0375 0750 0250 0000 %0429 U16
004562 005470 -05349 0625 0250 0875 0375 0750 0125 0000 %0430 U17
004903 006490 -07570 0625 0250 1000 0375 0750 0000 0000 %0431 U18
004691 001146 006381 0625 0375 0000 0375 0625 1000 0000 %0432 V10
004714 001321 004527 0625 0375 0125 0375 0625 0875 0000 %0433 V11
004759 001691 002167 0625 0375 0250 0375 0625 0750 0000 %0434 V12
004811 002058 000555 0625 0375 0375 0375 0625 0625 0000 %0435 V13
004866 002495 -00846 0625 0375 0500 0375 0625 0500 0000 %0436 V14
004935 002923 -02046 0625 0375 0625 0375 0625 0375 0000 %0437 V15
005019 003393 -03198 0625 0375 0750 0375 0625 0250 0000 %0438 V16
005125 003933 -04419 0625 0375 0875 0375 0625 0125 0000 %0439 V17
005418 005063 -06723 0625 0375 1000 0375 0625 0000 0000 %0440 V18
005358 -00296 006889 0625 0500 0000 0375 0500 1000 0000 %0441 W10
005374 -00131 005325 0625 0500 0125 0375 0500 0875 0000 %0442 W11
005411 000215 003104 0625 0500 0250 0375 0500 0750 0000 %0443 W12
005451 000599 001525 0625 0500 0375 0375 0500 0625 0000 %0444 W13
005503 001001 000145 0625 0500 0500 0375 0500 0500 0000 %0445 W14
005560 001435 -01052 0625 0500 0625 0375 0500 0375 0000 %0446 W15
005624 001889 -02213 0625 0500 0750 0375 0500 0250 0000 %0447 W16
005719 002453 -03458 0625 0500 0875 0375 0500 0125 0000 %0448 W17
005966 003629 -05813 0625 0500 1000 0375 0500 0000 0000 %0449 W18
006003 -01567 007409 0625 0625 0000 0375 0375 1000 0000 %0450 X10
006019 -01422 006082 0625 0625 0125 0375 0375 0875 0000 %0451 X11
006050 -01072 004007 0625 0625 0250 0375 0375 0750 0000 %0452 X12
006084 -00715 002463 0625 0625 0375 0375 0375 0625 0000 %0453 X13
006127 -00323 001107 0625 0625 0500 0375 0375 0500 0000 %0454 X14
006173 000096 -00090 0625 0625 0625 0375 0375 0375 0000 %0455 X15
006230 000548 -01254 0625 0625 0750 0375 0375 0250 0000 %0456 X16
006309 001102 -02508 0625 0625 0875 0375 0375 0125 0000 %0457 X17
006521 002288 -04906 0625 0625 1000 0375 0375 0000 0000 %0458 X18
006711 -02785 008047 0625 0750 0000 0375 0250 1000 0000 %0459 Y10
006724 -02659 006906 0625 0750 0125 0375 0250 0875 0000 %0460 Y11
006752 -02342 004967 0625 0750 0250 0375 0250 0750 0000 %0461 Y12
006780 -02025 003484 0625 0750 0375 0375 0250 0625 0000 %0462 Y13
006813 -01642 002156 0625 0750 0500 0375 0250 0500 0000 %0463 Y14
006855 -01260 000964 0625 0750 0625 0375 0250 0375 0000 %0464 Y15
006902 -00821 -00184 0625 0750 0750 0375 0250 0250 0000 %0465 Y16
006971 -00286 -01452 0625 0750 0875 0375 0250 0125 0000 %0466 Y17
007153 000869 -03865 0625 0750 1000 0375 0250 0000 0000 %0467 Y18
007535 -04059 008830 0625 0875 0000 0375 0125 1000 0000 %0468 Z10
007544 -03934 007846 0625 0875 0125 0375 0125 0875 0000 %0469 Z11
007566 -03652 006067 0625 0875 0250 0375 0125 0750 0000 %0470 Z12
007589 -03356 004656 0625 0875 0375 0375 0125 0625 0000 %0471 Z13
007619 -03001 003347 0625 0875 0500 0375 0125 0500 0000 %0472 Z14
007653 -02657 002194 0625 0875 0625 0375 0125 0375 0000 %0473 Z15
007694 -02255 001052 0625 0875 0750 0375 0125 0250 0000 %0474 Z16
007750 -01760 -00210 0625 0875 0875 0375 0125 0125 0000 %0475 Z17
007905 -00657 -02649 0625 0875 1000 0375 0125 0000 0000 %0476 Z18
008717 -05640 010027 0625 1000 0000 0375 0000 1000 0000 %0477 a10
008724 -05533 009213 0625 1000 0125 0375 0000 0875 0000 %0478 a11
008741 -05293 007627 0625 1000 0250 0375 0000 0750 0000 %0479 a12
008761 -05042 006317 0625 1000 0375 0375 0000 0625 0000 %0480 a13
008784 -04753 005072 0625 1000 0500 0375 0000 0500 0000 %0481 a14
008810 -04437 003939 0625 1000 0625 0375 0000 0375 0000 %0482 a15
008843 -04085 002810 0625 1000 0750 0375 0000 0250 0000 %0483 a16
008887 -03642 001565 0625 1000 0875 0375 0000 0125 0000 %0484 a17
009011 -02643 -00862 0625 1000 1000 0375 0000 0000 0000 %0485 a18

%JE060-7A, Page 21 /66, LAB*la0; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
003660 006064 005910 0750 0000 0000 0250 1000 1000 0000 %0486 A19
003698 006188 003435 0750 0000 0125 0250 1000 0875 0000 %0487 A20
003762 006448 000778 0750 0000 0250 0250 1000 0750 0000 %0488 A21
003830 006717 -00881 0750 0000 0375 0250 1000 0625 0000 %0489 A22
003911 007023 -02289 0750 0000 0500 0250 1000 0500 0000 %0490 A23
004004 007321 -03474 0750 0000 0625 0250 1000 0375 0000 %0491 A24
004109 007655 -04604 0750 0000 0750 0250 1000 0250 0000 %0492 A25
004259 008012 -05791 0750 0000 0875 0250 1000 0125 0000 %0493 A26
004637 008730 -07995 0750 0000 1000 0250 1000 0000 0000 %0494 A27
003901 005363 006118 0750 0125 0000 0250 0875 1000 0000 %0495 B19
003931 005493 003730 0750 0125 0125 0250 0875 0875 0000 %0496 B20
003990 005756 001128 0750 0125 0250 0250 0875 0750 0000 %0497 B21
004052 006290 -00433 0750 0125 0375 0250 0875 0625 0000 %0498 B22
004123 006376 -01960 0750 0125 0500 0250 0875 0500 0000 %0499 B23
004214 006702 -03153 0750 0125 0625 0250 0875 0375 0000 %0500 B24
004316 007045 -04289 0750 0125 0750 0250 0875 0250 0000 %0501 B25
004456 007431 -05482 0750 0125 0875 0250 0875 0125 0000 %0502 B26
004811 008214 -07718 0750 0125 1000 0250 0875 0000 0000 %0503 B27
004452 003844 006490 0750 0250 0000 0250 0750 1000 0000 %0504 C19
004476 003964 004380 0750 0250 0125 0250 0750 0875 0000 %0505 C20
004525 004256 001899 0750 0250 0250 0250 0750 0750 0000 %0506 C21
004578 004576 000251 0750 0250 0375 0250 0750 0625 0000 %0507 C22
004644 004906 -01141 0750 0250 0500 0250 0750 0500 0000 %0508 C23
004714 005253 -02359 0750 0250 0625 0250 0750 0375 0000 %0509 C24
004804 005636 -03502 0750 0250 0750 0250 0750 0250 0000 %0510 C25
004920 006074 -04728 0750 0250 0875 0250 0750 0125 0000 %0511 C26
005231 006979 -07019 0750 0250 1000 0250 0750 0000 0000 %0512 C27
005033 002346 006856 0750 0375 0000 0250 0625 1000 0000 %0513 D19
005054 002476 005063 0750 0375 0125 0250 0625 0875 0000 %0514 D20
005094 002776 002721 0750 0375 0250 0250 0625 0750 0000 %0515 D21
005142 003089 001119 0750 0375 0375 0250 0625 0625 0000 %0516 D22
005195 003441 -00286 0750 0375 0500 0250 0625 0500 0000 %0517 D23
005257 003807 -01499 0750 0375 0625 0250 0625 0375 0000 %0518 D24
005330 004213 -02656 0750 0375 0750 0250 0625 0250 0000 %0519 D25
005430 004678 -03902 0750 0375 0875 0250 0625 0125 0000 %0520 D26
005699 005657 -06244 0750 0375 1000 0250 0625 0000 0000 %0521 D27
005639 000939 007263 0750 0500 0000 0250 0500 1000 0000 %0522 E19
005656 001065 005750 0750 0500 0125 0250 0500 0875 0000 %0523 E20
005691 001356 003578 0750 0500 0250 0250 0500 0750 0000 %0524 E21
005730 001667 001991 0750 0500 0375 0250 0500 0625 0000 %0525 E22
005775 002028 000609 0750 0500 0500 0250 0500 0500 0000 %0526 E23
005828 002383 -00594 0750 0500 0625 0250 0500 0375 0000 %0527 E24
005891 002784 -01762 0750 0500 0750 0250 0500 0250 0000 %0528 E25
005977 003273 -03019 0750 0500 0875 0250 0500 0125 0000 %0529 E26
006210 004291 -05399 0750 0500 1000 0250 0500 0000 0000 %0530 E27
006242 -00345 007766 0750 0625 0000 0250 0375 1000 0000 %0531 F19
006257 -00221 006456 0750 0625 0125 0250 0375 0875 0000 %0532 F20
006287 000067 004389 0750 0625 0250 0250 0375 0750 0000 %0533 F21
006318 000374 002859 0750 0625 0375 0250 0375 0625 0000 %0534 F22
006359 000711 001503 0750 0625 0500 0250 0375 0500 0000 %0535 F23
006402 001069 000296 0750 0625 0625 0250 0375 0375 0000 %0536 F24
006459 001462 -00863 0750 0625 0750 0250 0375 0250 0000 %0537 F25
006531 001952 -02126 0750 0625 0875 0250 0375 0125 0000 %0538 F26
006735 002997 -04541 0750 0625 1000 0250 0375 0000 0000 %0539 F27
006912 -01634 008349 0750 0750 0000 0250 0250 1000 0000 %0540 G19
006925 -01509 007199 0750 0750 0125 0250 0250 0875 0000 %0541 G20
006950 -01249 005300 0750 0750 0250 0250 0250 0750 0000 %0542 G21
006977 -00958 003822 0750 0750 0375 0250 0250 0625 0000 %0543 G22
007012 004827 007019 0750 0750 0500 0250 0250 0500 0000 %0544 G23
007049 -00294 001299 0750 0750 0625 0250 0250 0375 0000 %0545 G24
007097 000089 000140 0750 0750 0750 0250 0250 0250 0000 %0546 G25
007161 000562 -01124 0750 0750 0875 0250 0250 0125 0000 %0547 G26
007337 001607 -03558 0750 0750 1000 0250 0250 0000 0000 %0548 G27
007703 -02997 009073 0750 0875 0000 0250 0125 1000 0000 %0549 H19
007713 -02877 008101 0750 0875 0125 0250 0125 0875 0000 %0550 H20
007734 -02631 006338 0750 0875 0250 0250 0125 0750 0000 %0551 H21
007757 -02366 004932 0750 0875 0375 0250 0125 0625 0000 %0552 H22
007785 -02053 003637 0750 0875 0500 0250 0125 0500 0000 %0553 H23
007798 -01736 002464 0750 0875 0625 0250 0125 0375 0000 %0554 H24
007856 -01377 001322 0750 0875 0750 0250 0125 0250 0000 %0555 H25
007911 -00931 000058 0750 0875 0875 0250 0125 0125 0000 %0556 H26
008061 000075 -02383 0750 0875 1000 0250 0125 0000 0000 %0557 H27
008847 -04715 010212 0750 1000 0000 0250 0000 1000 0000 %0558 I19
008855 -04611 009404 0750 1000 0125 0250 0000 0875 0000 %0559 I20
008872 -04398 007834 0750 1000 0250 0250 0000 0750 0000 %0560 I21
008891 -04160 006527 0750 1000 0375 0250 0000 0625 0000 %0561 I22
008913 -03895 005291 0750 1000 0500 0250 0000 0500 0000 %0562 I23
008939 -03605 004153 0750 1000 0625 0250 0000 0375 0000 %0563 I24
008971 -03268 003031 0750 1000 0750 0250 0000 0250 0000 %0564 I25
009014 -02869 001779 0750 1000 0875 0250 0000 0125 0000 %0565 I26
009138 -01937 -00654 0750 1000 1000 0250 0000 0000 0000 %0566 I27

004245 006728 006769 0875 0000 0000 0125 1000 1000 0000 %0567 J19
004272 006827 004366 0875 0000 0125 0125 1000 0875 0000 %0568 J20
004329 007063 001727 0875 0000 0250 0125 1000 0750 0000 %0569 J21
004380 007281 000050 0875 0000 0375 0125 1000 0625 0000 %0570 J22
004452 007538 -01364 0875 0000 0500 0125 1000 0500 0000 %0571 J23
004529 007807 -02582 0875 0000 0625 0125 1000 0375 0000 %0572 J24
004617 008083 -03736 0875 0000 0750 0125 1000 0250 0000 %0573 J25
004744 008403 -04960 0875 0000 0875 0125 1000 0125 0000 %0574 J26
005074 009059 -07262 0875 0000 1000 0125 1000 0000 0000 %0575 J27
004443 006164 006941 0875 0125 0000 0125 0875 1000 0000 %0576 K19
004464 006280 004575 0875 0125 0125 0125 0875 0875 0000 %0577 K20
004517 006492 002004 0875 0125 0250 0125 0875 0750 0000 %0578 K21
004574 006739 000331 0875 0125 0375 0125 0875 0625 0000 %0579 K22
004633 006999 -01095 0875 0125 0500 0125 0875 0500 0000 %0580 K23
004706 007271 -02307 0875 0125 0625 0125 0875 0375 0000 %0581 K24
004793 007572 -03468 0875 0125 0750 0125 0875 0250 0000 %0582 K25
004913 007916 -04708 0875 0125 0875 0125 0875 0125 0000 %0583 K26
005224 008604 -07009 0875 0125 1000 0125 0875 0000 0000 %0584 K27
004910 004863 007144 0875 0250 0000 0125 0750 1000 0000 %0585 L19
004928 004964 005091 0875 0250 0125 0125 0750 0875 0000 %0586 L20
004974 005207 002641 0875 0250 0250 0125 0750 0750 0000 %0587 L21
005019 005459 000997 0875 0250 0375 0125 0750 0625 0000 %0588 L22
005074 005740 -00418 0875 0250 0500 0125 0750 0500 0000 %0589 L23
005138 006032 -01631 0875 0250 0625 0125 0750 0375 0000 %0590 L24
005214 006342 -02803 0875 0250 0750 0125 0750 0250 0000 %0591 L25
005321 006707 -04047 0875 0250 0875 0125 0750 0125 0000 %0592 L26
005598 007499 -06388 0875 0250 1000 0125 0750 0000 0000 %0593 L27
005421 003503 007398 0875 0375 0000 0125 0625 1000 0000 %0594 M19
005439 003611 005682 0875 0375 0125 0125 0625 0875 0000 %0595 M20
005476 003860 003357 0875 0375 0250 0125 0625 0750 0000 %0596 M21
005518 004110 001745 0875 0375 0375 0125 0625 0625 0000 %0597 M22
005566 004412 000341 0875 0375 0500 0125 0625 0500 0000 %0598 M23
005621 004713 -00870 0875 0375 0625 0125 0625 0375 0000 %0599 M24
005688 005048 -02054 0875 0375 0750 0125 0625 0250 0000 %0600 M25
005778 005444 -03308 0875 0375 0875 0125 0625 0125 0000 %0601 M26
006024 006286 -05688 0875 0375 1000 0125 0625 0000 0000 %0602 M27
005971 002162 007775 0875 0500 0000 0125 0500 1000 0000 %0603 N19
005985 002267 006275 0875 0500 0125 0125 0500 0875 0000 %0604 N20
006019 002507 004109 0875 0500 0250 0125 0500 0750 0000 %0605 N21
006053 002773 002535 0875 0500 0375 0125 0500 0625 0000 %0606 N22
006094 003097 001122 0875 0500 0500 0125 0500 0500 0000 %0607 N23
006142 003369 -00063 0875 0500 0625 0125 0500 0375 0000 %0608 N24
006203 003715 -01237 0875 0500 0750 0125 0500 0250 0000 %0609 N25
006279 004122 -02498 0875 0500 0875 0125 0500 0125 0000 %0610 N26
006496 005026 -04911 0875 0500 1000 0125 0500 0000 0000 %0611 N27
006528 000893 008166 0875 0625 0000 0125 0375 1000 0000 %0612 O19
006540 000989 006895 0875 0625 0125 0125 0375 0875 0000 %0613 O20
006567 001243 004846 0875 0625 0250 0125 0375 0750 0000 %0614 O21
006599 001496 003329 0875 0625 0375 0125 0375 0625 0000 %0615 O22
006637 001784 001973 0875 0625 0500 0125 0375 0500 0000 %0616 O23
006677 002086 000765 0875 0625 0625 0125 0375 0375 0000 %0617 O24
006728 002440 -00405 0875 0625 0750 0125 0375 0250 0000 %0618 O25
006798 002858 -01679 0875 0625 0875 0125 0375 0125 0000 %0619 O26
006989 003763 -04106 0875 0625 1000 0125 0375 0000 0000 %0620 O27
007157 -00421 008694 0875 0750 0000 0125 0250 1000 0000 %0621 P19
007169 -00318 007589 0875 0750 0125 0125 0250 0875 0000 %0622 P20
007192 -00089 005689 0875 0750 0250 0125 0250 0750 0000 %0623 P21
007220 000164 004221 0875 0750 0375 0125 0250 0625 0000 %0624 P22
007251 000451 002884 0875 0750 0500 0125 0250 0500 0000 %0625 P23
007286 000744 001697 0875 0750 0625 0125 0250 0375 0000 %0626 P24
007330 001084 000535 0875 0750 0750 0125 0250 0250 0000 %0627 P25
007392 001489 -00735 0875 0750 0875 0125 0250 0125 0000 %0628 P26
007560 002411 -03182 0875 0750 1000 0125 0250 0000 0000 %0629 P27
007907 -01834 009379 0875 0875 0000 0125 0125 1000 0000 %0630 Q19
007917 -01735 008432 0875 0875 0125 0125 0125 0875 0000 %0631 Q20
007939 -01513 006676 0875 0875 0250 0125 0125 0750 0000 %0632 Q21
007959 -05141 003207 0875 0875 0375 0125 0125 0625 0000 %0633 Q22
007987 -01015 003975 0875 0875 0500 0125 0125 0500 0000 %0634 Q23
008018 -00727 002811 0875 0875 0625 0125 0125 0375 0000 %0635 Q24
008056 -00404 001656 0875 0875 0750 0125 0125 0250 0000 %0636 Q25
008108 -00004 000390 0875 0875 0875 0125 0125 0125 0000 %0637 Q26
008254 000900 -02060 0875 0875 1000 0125 0125 0000 0000 %0638 Q27
009010 -03657 010465 0875 1000 0000 0125 0000 1000 0000 %0639 R19
009018 -03572 009641 0875 1000 0125 0125 0000 0875 0000 %0640 R20
009034 -03375 008098 0875 1000 0250 0125 0000 0750 0000 %0641 R21
009053 -03169 006792 0875 1000 0375 0125 0000 0625 0000 %0642 R22
009074 -02925 005549 0875 1000 0500 0125 0000 0500 0000 %0643 R23
009100 -02660 004417 0875 1000 0625 0125 0000 0375 0000 %0644 R24
009130 -02361 003288 0875 1000 0750 0125 0000 0250 0000 %0645 R25
009172 -01993 002045 0875 1000 0875 0125 0000 0125 0000 %0646 R26
009291 -01148 -00392 0875 1000 1000 0125 0000 0000 0000 %0647 R27

005009 007653 007939 1000 0000 0000 0000 1000 1000 0000 %0648 S19
005022 007722 005572 1000 0000 0125 0000 1000 0875 0000 %0649 S20
005060 007896 002980 1000 0000 0250 0000 1000 0750 0000 %0650 S21
005105 008079 001277 1000 0000 0375 0000 1000 0625 0000 %0651 S22
005158 008271 -00156 1000 0000 0500 0000 1000 0500 0000 %0652 S23
005221 008498 -01399 1000 0000 0625 0000 1000 0375 0000 %0653 S24
005292 008725 -02577 1000 0000 0750 0000 1000 0250 0000 %0654 S25
005393 009002 -03849 1000 0000 0875 0000 1000 0125 0000 %0655 S26
005662 009566 -06253 1000 0000 1000 0000 1000 0000 0000 %0656 S27
005162 007207 008011 1000 0125 0000 0000 0875 1000 0000 %0657 T19
005175 007266 005746 1000 0125 0125 0000 0875 0875 0000 %0658 T20
005214 007438 003175 1000 0125 0250 0000 0875 0750 0000 %0659 T21
005257 007630 001489 1000 0125 0375 0000 0875 0625 0000 %0660 T22
005305 003811 002971 1000 0125 0500 0000 0875 0500 0000 %0661 T23
005365 008059 -01183 1000 0125 0625 0000 0875 0375 0000 %0662 T24
005436 008306 -02377 1000 0125 0750 0000 0875 0250 0000 %0663 T25
005533 008589 -03640 1000 0125 0875 0000 0875 0125 0000 %0664 T26
005792 009185 -06042 1000 0125 1000 0000 0875 0000 0000 %0665 T27
005545 006105 008109 1000 0250 0000 0000 0750 1000 0000 %0666 U19
005560 006183 006137 1000 0250 0125 0000 0750 0875 0000 %0667 U20
005592 006364 003692 1000 0250 0250 0000 0750 0750 0000 %0668 U21
005627 006563 002023 1000 0250 0375 0000 0750 0625 0000 %0669 U22
005674 006784 000603 1000 0250 0500 0000 0750 0500 0000 %0670 U23
005728 007017 -00629 1000 0250 0625 0000 0750 0375 0000 %0671 U24
005792 007272 -01817 1000 0250 0750 0000 0750 0250 0000 %0672 U25
005880 007584 -03090 1000 0250 0875 0000 0750 0125 0000 %0673 U26
006117 008235 -05512 1000 0250 1000 0000 0750 0000 0000 %0674 U27
005982 004920 008263 1000 0375 0000 0000 0625 1000 0000 %0675 V19
005995 004998 006582 1000 0375 0125 0000 0625 0875 0000 %0676 V20
006024 005185 004269 1000 0375 0250 0000 0625 0750 0000 %0677 V21
006058 005388 002648 1000 0375 0375 0000 0625 0625 0000 %0678 V22
006102 005610 001242 1000 0375 0500 0000 0625 0500 0000 %0679 V23
006147 005859 000006 1000 0375 0625 0000 0625 0375 0000 %0680 V24
006205 006126 -01178 1000 0375 0750 0000 0625 0250 0000 %0681 V25
006284 006449 -02457 1000 0375 0875 0000 0625 0125 0000 %0682 V26
006498 007158 -04894 1000 0375 1000 0000 0625 0000 0000 %0683 V27
006468 003686 008528 1000 0500 0000 0000 0500 1000 0000 %0684 W19
006480 003758 007068 1000 0500 0125 0000 0500 0875 0000 %0685 W20
006508 003944 004903 1000 0500 0250 0000 0500 0750 0000 %0686 W21
006538 004151 003320 1000 0500 0375 0000 0500 0625 0000 %0687 W22
006574 004386 001936 1000 0500 0500 0000 0500 0500 0000 %0688 W23
006617 004636 000718 1000 0500 0625 0000 0500 0375 0000 %0689 W24
006669 004907 -00462 1000 0500 0750 0000 0500 0250 0000 %0690 W25
006739 005251 -01739 1000 0500 0875 0000 0500 0125 0000 %0691 W26
006931 005977 -04183 1000 0500 1000 0000 0500 0000 0000 %0692 W27
006975 002473 008849 1000 0625 0000 0000 0375 1000 0000 %0693 X19
006985 002555 007579 1000 0625 0125 0000 0375 0875 0000 %0694 X20
007010 002734 005546 1000 0625 0250 0000 0375 0750 0000 %0695 X21
007036 002936 004026 1000 0625 0375 0000 0375 0625 0000 %0696 X22
007071 003183 002653 1000 0625 0500 0000 0375 0500 0000 %0697 X23
007107 003423 001455 1000 0625 0625 0000 0375 0375 0000 %0698 X24
007155 003708 000282 1000 0625 0750 0000 0375 0250 0000 %0699 X25
007218 004046 -00993 1000 0625 0875 0000 0375 0125 0000 %0700 X26
007388 004802 -03444 1000 0625 1000 0000 0375 0000 0000 %0701 X27
007555 001173 009295 1000 0750 0000 0000 0250 1000 0000 %0702 Y19
007566 001258 008178 1000 0750 0125 0000 0250 0875 0000 %0703 Y20
007585 001439 006286 1000 0750 0250 0000 0250 0750 0000 %0704 Y21
007611 001641 004813 1000 0750 0375 0000 0250 0625 0000 %0705 Y22
007641 001874 003483 1000 0750 0500 0000 0250 0500 0000 %0706 Y23
007673 002124 002292 1000 0750 0625 0000 0250 0375 0000 %0707 Y24
007713 002395 001134 1000 0750 0750 0000 0250 0250 0000 %0708 Y25
007769 002740 -00127 1000 0750 0875 0000 0250 0125 0000 %0709 Y26
007921 003512 -02588 1000 0750 1000 0000 0250 0000 0000 %0710 Y27
008254 -00256 009902 1000 0875 0000 0000 0125 1000 0000 %0711 Z19
008262 -00182 008937 1000 0875 0125 0000 0125 0875 0000 %0712 Z20
008279 000000 007175 1000 0875 0250 0000 0125 0750 0000 %0713 Z21
008299 000197 005772 1000 0875 0375 0000 0125 0625 0000 %0714 Z22
008324 000422 004480 1000 0875 0500 0000 0125 0500 0000 %0715 Z23
008355 000659 003309 1000 0875 0625 0000 0125 0375 0000 %0716 Z24
008390 000933 002168 1000 0875 0750 0000 0125 0250 0000 %0717 Z25
008437 001262 000908 1000 0875 0875 0000 0125 0125 0000 %0718 Z26
008571 002027 -01542 1000 0875 1000 0000 0125 0000 0000 %0719 Z27
009289 -02164 010868 1000 1000 0000 0000 0000 1000 0000 %0720 a19
009295 -02381 010687 1000 1000 0125 0000 0000 0875 0000 %0721 a20
009310 -01931 008497 1000 1000 0250 0000 0000 0750 0000 %0722 a21
009327 -01743 007184 1000 1000 0375 0000 0000 0625 0000 %0723 a22
009347 -01539 005944 1000 1000 0500 0000 0000 0500 0000 %0724 a23
009371 -01308 004812 1000 1000 0625 0000 0000 0375 0000 %0725 a24
009399 -01050 003687 1000 1000 0750 0000 0000 0250 0000 %0726 a25
009440 -00736 002454 1000 1000 0875 0000 0000 0125 0000 %0727 a26
009550 -00003 000026 1000 1000 1000 0000 0000 0000 0000 %0728 a27

%JE060-7A, Page 22 /66, LAB*la0; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
009576 000008 000046 1000 1000 1000 0000 0000 0000 0000 %0729 b01
009337 -01133 -00356 0875 1000 1000 0125 0000 0000 0000 %0730 b02
009181 -01916 -00613 0750 1000 1000 0250 0000 0000 0000 %0731 b03
009053 -02619 -00832 0625 1000 1000 0375 0000 0000 0000 %0732 b04
008950 -03202 -01006 0500 1000 1000 0500 0000 0000 0000 %0733 b05
008863 -03708 -01148 0375 1000 1000 0625 0000 0000 0000 %0734 b06
008796 -04126 -01258 0250 1000 1000 0750 0000 0000 0000 %0735 b07
008744 -04471 -01346 0125 1000 1000 0875 0000 0000 0000 %0736 b08
008721 -04608 -01383 0000 1000 1000 1000 0000 0000 0000 %0737 b09
008464 001270 000907 1000 0875 0875 0000 0125 0125 0000 %0738 c01
008159 000005 000395 0875 0875 0875 0125 0125 0125 0000 %0739 c02
007962 -00900 000061 0750 0875 0875 0250 0125 0125 0000 %0740 c03
007797 -01732 -00208 0625 0875 0875 0375 0125 0125 0000 %0741 c04
007664 -02452 -00429 0500 0875 0875 0500 0125 0125 0000 %0742 c05
007551 -03086 -00616 0375 0875 0875 0625 0125 0125 0000 %0743 c06
007461 -03619 -00768 0250 0875 0875 0750 0125 0125 0000 %0744 c07
007387 -04053 -00887 0125 0875 0875 0875 0125 0125 0000 %0745 c08
007351 -04239 -00946 0000 0875 0875 1000 0125 0125 0000 %0746 c09
007743 002396 001124 1000 0750 0750 0000 0250 0250 0000 %0747 d01
007387 001079 000525 0875 0750 0750 0125 0250 0250 0000 %0748 d02
007155 000106 000129 0750 0750 0750 0250 0250 0250 0000 %0749 d03
006954 -00794 -00200 0625 0750 0750 0375 0250 0250 0000 %0750 d04
006793 -01600 -00472 0500 0750 0750 0500 0250 0250 0000 %0751 d05
006657 -02341 -00689 0375 0750 0750 0625 0250 0250 0000 %0752 d06
006549 -02959 -00872 0250 0750 0750 0750 0250 0250 0000 %0753 d07
006456 -03501 -01025 0125 0750 0750 0875 0250 0250 0000 %0754 d08
006412 -03704 -01101 0000 0750 0750 1000 0250 0250 0000 %0755 d09
007141 003415 001429 1000 0625 0625 0000 0375 0375 0000 %0756 e01
006732 002084 000744 0875 0625 0625 0125 0375 0375 0000 %0757 e02
006459 001070 000283 0750 0625 0625 0250 0375 0375 0000 %0758 e03
006225 000096 -00098 0625 0625 0625 0375 0375 0375 0000 %0759 e04
006034 -00781 -00422 0500 0625 0625 0500 0375 0375 0000 %0760 e05
005867 -01610 -00698 0375 0625 0625 0625 0375 0375 0000 %0761 e06
005733 -02334 -00914 0250 0625 0625 0750 0375 0375 0000 %0762 e07
005619 -02971 -01102 0125 0625 0625 0875 0375 0375 0000 %0763 e08
005566 -03252 -01198 0000 0625 0625 1000 0375 0375 0000 %0764 e09
006610 004368 001906 1000 0500 0500 0000 0500 0500 0000 %0765 f01
006145 003054 001122 0875 0500 0500 0125 0500 0500 0000 %0766 f02
005828 002021 000592 0750 0500 0500 0250 0500 0500 0000 %0767 f03
005548 001011 000129 0625 0500 0500 0375 0500 0500 0000 %0768 f04
005317 000054 -00251 0500 0500 0500 0500 0500 0500 0000 %0769 f05
005115 -00867 -00584 0375 0500 0500 0625 0500 0500 0000 %0770 f06
004952 -01715 -00864 0250 0500 0500 0750 0500 0500 0000 %0771 f07
004815 -02490 -01094 0125 0500 0500 0875 0500 0500 0000 %0772 f08
004748 -02832 -01202 0000 0500 0500 1000 0500 0500 0000 %0773 f09
006094 005368 002603 1000 0375 0375 0000 0625 0625 0000 %0774 g01
005560 004061 001731 0875 0375 0375 0125 0625 0625 0000 %0775 g02
005185 003096 001085 0750 0375 0375 0250 0625 0625 0000 %0776 g03
004848 002078 000524 0625 0375 0375 0375 0625 0625 0000 %0777 g04
004562 001083 000046 0500 0375 0375 0500 0625 0625 0000 %0778 g05
004307 000049 -00370 0375 0375 0375 0625 0625 0625 0000 %0779 g06
004095 -00943 -00720 0250 0375 0375 0750 0625 0625 0000 %0780 g07
003916 -01905 -01020 0125 0375 0375 0875 0625 0625 0000 %0781 g08
003825 -02382 -01163 0000 0375 0375 1000 0625 0625 0000 %0782 g09
005621 006355 003642 1000 0250 0250 0000 0750 0750 0000 %0783 h01
005005 005197 002613 0875 0250 0250 0125 0750 0750 0000 %0784 h02
004562 004255 001883 0750 0250 0250 0250 0750 0750 0000 %0785 h03
004146 003295 001193 0625 0250 0250 0375 0750 0750 0000 %0786 h04
003778 002313 000597 0500 0250 0250 0500 0750 0750 0000 %0787 h05
003436 001210 000033 0375 0250 0250 0625 0750 0750 0000 %0788 h06
003144 000105 -00461 0250 0250 0250 0750 0750 0750 0000 %0789 h07
002872 -01161 -00899 0125 0250 0250 0875 0750 0750 0000 %0790 h08
002763 -01832 -01099 0000 0250 0250 1000 0750 0750 0000 %0791 h09
005198 007279 005701 1000 0125 0125 0000 0875 0875 0000 %0792 i01
004489 006277 004545 0875 0125 0125 0125 0875 0875 0000 %0793 i02
003951 005499 003684 0750 0125 0125 0250 0875 0875 0000 %0794 i03
003430 004708 002859 0625 0125 0125 0375 0875 0875 0000 %0795 i04
002939 003866 002085 0500 0125 0125 0500 0875 0875 0000 %0796 i05
002436 002890 001265 0375 0125 0125 0625 0875 0875 0000 %0797 i06
001963 001794 000473 0250 0125 0125 0750 0875 0875 0000 %0798 i07
001450 000146 -00360 0125 0125 0125 0875 0875 0875 0000 %0799 i08
001201 -01190 -00796 0000 0125 0125 1000 0875 0875 0000 %0800 i09
005022 007672 007967 1000 0000 0000 0000 1000 1000 0000 %0801 j01
004263 006764 006810 0875 0000 0000 0125 1000 1000 0000 %0802 j02
003676 006083 005935 0750 0000 0000 0250 1000 1000 0000 %0803 j03
003096 005385 005065 0625 0000 0000 0375 1000 1000 0000 %0804 j04
002518 004749 004189 0500 0000 0000 0500 1000 1000 0000 %0805 j05
001890 004072 003234 0375 0000 0000 0625 1000 1000 0000 %0806 j06
001182 003347 002038 0250 0000 0000 0750 1000 1000 0000 %0807 j07
000296 001701 000511 0125 0000 0000 0875 1000 1000 0000 %0808 j08
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0809 j09

009545 000000 000016 1000 1000 1000 0000 0000 0000 0000 %0810 b10
008271 000897 -02049 0875 0875 1000 0125 0125 0000 0000 %0811 b11
007360 001610 -03546 0750 0750 1000 0250 0250 0000 0000 %0812 b12
006544 002274 -04890 0625 0625 1000 0375 0375 0000 0000 %0813 b13
005781 003046 -06153 0500 0500 1000 0500 0500 0000 0000 %0814 b14
004988 004063 -07478 0375 0375 1000 0625 0625 0000 0000 %0815 b15
004183 005371 -08812 0250 0250 1000 0750 0750 0000 0000 %0816 b16
003351 007078 -10254 0125 0125 1000 0875 0875 0000 0000 %0817 b17
002932 008022 -10944 0000 0000 1000 1000 1000 0000 0000 %0818 b18
009435 -00737 002442 1000 1000 0875 0000 0000 0125 0000 %0819 c10
008127 000004 000384 0875 0875 0875 0125 0125 0125 0000 %0820 c11
007185 000568 -01130 0750 0750 0875 0250 0250 0125 0000 %0821 c12
006330 001101 -02511 0625 0625 0875 0375 0375 0125 0000 %0822 c13
005521 001723 -03824 0500 0500 0875 0500 0500 0125 0000 %0823 c14
004660 002633 -05248 0375 0375 0875 0625 0625 0125 0000 %0824 c15
003746 003939 -06769 0250 0250 0875 0750 0750 0125 0000 %0825 c16
002715 005845 -08473 0125 0125 0875 0875 0875 0125 0000 %0826 c17
002134 007195 -09436 0000 0000 0875 1000 1000 0125 0000 %0827 c18
009394 -01057 003686 1000 1000 0750 0000 0000 0250 0000 %0828 d10
008076 -00390 001632 0875 0875 0750 0125 0125 0250 0000 %0829 d11
007119 000101 000127 0750 0750 0750 0250 0250 0250 0000 %0830 d12
006252 000554 -01256 0625 0625 0750 0375 0375 0250 0000 %0831 d13
005424 001103 -02601 0500 0500 0750 0500 0500 0250 0000 %0832 d14
004533 001931 -04065 0375 0375 0750 0625 0625 0250 0000 %0833 d15
003570 003140 -05649 0250 0250 0750 0750 0750 0250 0000 %0834 d16
002445 005168 -07549 0125 0125 0750 0875 0875 0250 0000 %0835 d17
001760 006705 -08671 0000 0000 0750 1000 1000 0250 0000 %0836 d18
009365 -01315 004804 1000 1000 0625 0000 0000 0375 0000 %0837 e10
008037 -00723 002785 0875 0875 0625 0125 0125 0375 0000 %0838 e11
007073 -00281 001278 0750 0750 0625 0250 0250 0375 0000 %0839 e12
006195 000106 -00106 0625 0625 0625 0375 0375 0375 0000 %0840 e13
005352 000567 -01449 0500 0500 0625 0500 0500 0375 0000 %0841 e14
004439 001276 -02935 0375 0375 0625 0625 0625 0375 0000 %0842 e15
003436 002398 -04580 0250 0250 0625 0750 0750 0375 0000 %0843 e16
002209 004433 -06619 0125 0125 0625 0875 0875 0375 0000 %0844 e17
001417 006241 -07947 0000 0000 0625 1000 1000 0375 0000 %0845 e18
009340 -01538 005940 1000 1000 0500 0000 0000 0500 0000 %0846 f10
008002 -01006 003947 0875 0875 0500 0125 0125 0500 0000 %0847 f11
007034 -00622 002471 0750 0750 0500 0250 0250 0500 0000 %0848 f12
006145 -00308 001093 0625 0625 0500 0375 0375 0500 0000 %0849 f13
005292 000063 -00254 0500 0500 0500 0500 0500 0500 0000 %0850 f14
004359 000663 -01754 0375 0375 0500 0625 0625 0500 0000 %0851 f15
003326 001657 -03434 0250 0250 0500 0750 0750 0500 0000 %0852 f16
002010 003631 -05608 0125 0125 0500 0875 0875 0500 0000 %0853 f17
001080 005646 -07166 0000 0000 0500 1000 1000 0500 0000 %0854 f18
009319 -01753 007177 1000 1000 0375 0000 0000 0625 0000 %0855 g10
007979 -01278 005246 0875 0875 0375 0125 0125 0625 0000 %0856 g11
007000 -00959 003799 0750 0750 0375 0250 0250 0625 0000 %0857 g12
006104 -00721 002451 0625 0625 0375 0375 0375 0625 0000 %0858 g13
005240 -00427 001128 0500 0500 0375 0500 0500 0625 0000 %0859 g14
004285 000051 -00374 0375 0375 0375 0625 0625 0625 0000 %0860 g15
003217 000877 -02080 0250 0250 0375 0750 0750 0625 0000 %0861 g16
001800 002630 -04383 0125 0125 0375 0875 0875 0625 0000 %0862 g17
000692 004981 -06278 0000 0000 0375 1000 1000 0625 0000 %0863 g18
009303 -01940 008488 1000 1000 0250 0000 0000 0750 0000 %0864 h10
007956 -01505 006658 0875 0875 0250 0125 0125 0750 0000 %0865 h11
006971 -01235 005266 0750 0750 0250 0250 0250 0750 0000 %0866 h12
006068 -01063 003988 0625 0625 0250 0375 0375 0750 0000 %0867 h13
005195 -00876 002712 0500 0500 0250 0500 0500 0750 0000 %0868 h14
004228 -00530 001263 0375 0375 0250 0625 0625 0750 0000 %0869 h15
003130 000069 -00456 0250 0250 0250 0750 0750 0750 0000 %0870 h16
001634 001560 -02902 0125 0125 0250 0875 0875 0750 0000 %0871 h17
000349 003680 -05028 0000 0000 0250 1000 1000 0750 0000 %0872 h18
009289 -02104 010061 1000 1000 0125 0000 0000 0875 0000 %0873 i10
007936 -01739 008419 0875 0875 0125 0125 0125 0875 0000 %0874 i11
006946 -01521 007203 0750 0750 0125 0250 0250 0875 0000 %0875 i12
006037 -01399 006080 0625 0625 0125 0375 0375 0875 0000 %0876 i13
005155 -01303 004966 0500 0500 0125 0500 0500 0875 0000 %0877 i14
004169 -01098 003659 0375 0375 0125 0625 0625 0875 0000 %0878 i15
003047 -00723 002094 0250 0250 0125 0750 0750 0875 0000 %0879 i16
001450 000116 -00329 0125 0125 0125 0875 0875 0875 0000 %0880 i17
000032 001215 -02621 0000 0000 0125 1000 1000 0875 0000 %0881 i18
009282 -02169 010876 1000 1000 0000 0000 0000 1000 0000 %0882 j10
007924 -01834 009398 0875 0875 0000 0125 0125 1000 0000 %0883 j11
006931 -01634 008359 0750 0750 0000 0250 0250 1000 0000 %0884 j12
006021 -01549 007425 0625 0625 0000 0375 0375 1000 0000 %0885 j13
005135 -01480 006568 0500 0500 0000 0500 0500 1000 0000 %0886 j14
004146 -01346 005654 0375 0375 0000 0625 0625 1000 0000 %0887 j15
003012 -01099 004479 0250 0250 0000 0750 0750 1000 0000 %0888 j16
001366 -00659 002269 0125 0125 0000 0875 0875 1000 0000 %0889 j17
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0890 j18

009543 -00004 000009 1000 1000 1000 0000 0000 0000 0000 %0891 b19
008562 002032 -01561 1000 0875 1000 0000 0125 0000 0000 %0892 b20
007914 003512 -02603 1000 0750 1000 0000 0250 0000 0000 %0893 b21
007388 004804 -03450 1000 0625 1000 0000 0375 0000 0000 %0894 b22
006937 005981 -04186 1000 0500 1000 0000 0500 0000 0000 %0895 b23
006512 007152 -04887 1000 0375 1000 0000 0625 0000 0000 %0896 b24
006130 008228 -05504 1000 0250 1000 0000 0750 0000 0000 %0897 b25
005803 009198 -06043 1000 0125 1000 0000 0875 0000 0000 %0898 b26
005674 009580 -06255 1000 0000 1000 0000 1000 0000 0000 %0899 b27
009186 -01977 002026 0875 1000 0875 0125 0000 0125 0000 %0900 c19
008124 000000 000382 0875 0875 0875 0125 0125 0125 0000 %0901 c20
007413 001493 -00746 0875 0750 0875 0125 0250 0125 0000 %0902 c21
006821 002856 -01682 0875 0625 0875 0125 0375 0125 0000 %0903 c22
006304 004117 -02506 0875 0500 0875 0125 0500 0125 0000 %0904 c23
005801 005436 -03313 0875 0375 0875 0125 0625 0125 0000 %0905 c24
005340 006727 -04061 0875 0250 0875 0125 0750 0125 0000 %0906 c25
004928 007920 -04714 0875 0125 0875 0125 0875 0125 0000 %0907 c26
004755 008428 -04978 0875 0000 0875 0125 1000 0125 0000 %0908 c27
008983 -03258 003003 0750 1000 0750 0250 0000 0250 0000 %0909 d19
007872 -01358 001302 0750 0875 0750 0250 0125 0250 0000 %0910 d20
007115 000109 000126 0750 0750 0750 0250 0250 0250 0000 %0911 d21
006477 001462 -00875 0750 0625 0750 0250 0375 0250 0000 %0912 d22
005915 002794 -01776 0750 0500 0750 0250 0500 0250 0000 %0913 d23
005349 004216 -02675 0750 0375 0750 0250 0625 0250 0000 %0914 d24
004819 005650 -03524 0750 0250 0750 0250 0750 0250 0000 %0915 d25
004333 007052 -04302 0750 0125 0750 0250 0875 0250 0000 %0916 d26
004123 007674 -04624 0750 0000 0750 0250 1000 0250 0000 %0917 d27
008819 -04416 003904 0625 1000 0625 0375 0000 0375 0000 %0918 e19
007664 -02639 002172 0625 0875 0625 0375 0125 0375 0000 %0919 e20
006868 -01239 000946 0625 0750 0625 0375 0250 0375 0000 %0920 e21
006188 000095 -00106 0625 0625 0625 0375 0375 0375 0000 %0921 e22
005575 001446 -01075 0625 0500 0625 0375 0500 0375 0000 %0922 e23
004952 002929 -02060 0625 0375 0625 0375 0625 0375 0000 %0923 e24
004346 004508 -03032 0625 0250 0625 0375 0750 0375 0000 %0924 e25
003767 006187 -03973 0625 0125 0625 0375 0875 0375 0000 %0925 e26
003507 006929 -04370 0625 0000 0625 0375 1000 0375 0000 %0926 e27
008686 -05452 004870 0500 1000 0500 0500 0000 0500 0000 %0927 f19
007494 -03833 003114 0500 0875 0500 0500 0125 0500 0000 %0928 f20
006666 -02528 001865 0500 0750 0500 0500 0250 0500 0000 %0929 f21
005947 -01252 000763 0500 0625 0500 0500 0375 0500 0000 %0930 f22
005289 000063 -00258 0500 0500 0500 0500 0500 0500 0000 %0931 f23
004605 001598 -01338 0500 0375 0500 0500 0625 0500 0000 %0932 f24
003916 003291 -02427 0500 0250 0500 0500 0750 0500 0000 %0933 f25
003224 005208 -03542 0500 0125 0500 0500 0875 0500 0000 %0934 f26
002895 006178 -04065 0500 0000 0500 0500 1000 0500 0000 %0935 f27
008577 -06432 005974 0375 1000 0375 0625 0000 0625 0000 %0936 g19
007351 -04991 004233 0375 0875 0375 0625 0125 0625 0000 %0937 g20
006489 -03838 002976 0375 0750 0375 0625 0250 0625 0000 %0938 g21
005736 -02667 001862 0375 0625 0375 0625 0375 0625 0000 %0939 g22
005033 -01434 000789 0375 0500 0375 0625 0500 0625 0000 %0940 g23
004285 000051 -00374 0375 0375 0375 0625 0625 0625 0000 %0941 g24
003501 001847 -01603 0375 0250 0375 0625 0750 0625 0000 %0942 g25
002657 004070 -02954 0375 0125 0375 0625 0875 0625 0000 %0943 g26
002230 005332 -03642 0375 0000 0375 0625 1000 0625 0000 %0944 g27
008488 -07287 007208 0250 1000 0250 0750 0000 0750 0000 %0945 h19
007235 -06043 005528 0250 0875 0250 0750 0125 0750 0000 %0946 h20
006345 -05052 004292 0250 0750 0250 0750 0250 0750 0000 %0947 h21
005563 -04059 003187 0250 0625 0250 0750 0375 0750 0000 %0948 h22
004819 -02978 002108 0250 0500 0250 0750 0500 0750 0000 %0949 h23
004009 -01642 000900 0250 0375 0250 0750 0625 0750 0000 %0950 h24
003123 000076 -00453 0250 0250 0250 0750 0750 0750 0000 %0951 h25
002090 002641 -02129 0250 0125 0250 0750 0875 0750 0000 %0952 h26
001482 004423 -03134 0250 0000 0250 0750 1000 0750 0000 %0953 h27
008419 -08057 008745 0125 1000 0125 0875 0000 0875 0000 %0954 i19
007137 -07008 007227 0125 0875 0125 0875 0125 0875 0000 %0955 i20
006225 -06230 006136 0125 0750 0125 0875 0250 0875 0000 %0956 i21
005411 -05435 005119 0125 0625 0125 0875 0375 0875 0000 %0957 i22
004629 -04658 004157 0125 0500 0125 0875 0500 0875 0000 %0958 i23
003762 -03659 003009 0125 0375 0125 0875 0625 0875 0000 %0959 i24
002779 -02311 001654 0125 0250 0125 0875 0750 0875 0000 %0960 i25
001450 000144 -00349 0125 0125 0125 0875 0875 0875 0000 %0961 i26
000428 002743 -02015 0125 0000 0125 0875 1000 0875 0000 %0962 i27
008388 -08355 009581 0000 1000 0000 1000 0000 1000 0000 %0963 j19
007091 -07425 008249 0000 0875 0000 1000 0125 1000 0000 %0964 j20
006168 -06746 007309 0000 0750 0000 1000 0250 1000 0000 %0965 j21
005343 -06101 006512 0000 0625 0000 1000 0375 1000 0000 %0966 j22
004546 -05471 005780 0000 0500 0000 1000 0500 1000 0000 %0967 j23
003654 -04741 004948 0000 0375 0000 1000 0625 1000 0000 %0968 j24
002614 -03868 003847 0000 0250 0000 1000 0750 1000 0000 %0969 j25
001080 -02456 001800 0000 0125 0000 1000 0875 1000 0000 %0970 j26
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0971 j27

%JE060-7A, Page 23 /66, LAB*la0; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
%LAB*la0, D65, adapted, Y = 0.0 , L* = 0.0 
%100 x LAB*a          %#1000 x (r g b  c m y 0)            %nr.  pos
%z005009 007653 007939 %#1000 0000 0000 0000 1000 1000 0000 %0648 S19 %O1 0
%z009289 -02164 010868 %#1000 1000 0000 0000 0000 1000 0000 %0720 a19 %Y1 1
%z008399 -08361 009599 %#0000 1000 0000 1000 0000 1000 0000 %0072 I01 %L1 2
%z008706 -04625 -01374 %#0000 1000 1000 1000 0000 0000 0000 %0080 I09 %C1 3
%z002939 007977 -10925 %#0000 0000 1000 1000 1000 0000 0000 %0008 A09 %V1 4
%z005662 009566 -06253 %#1000 0000 1000 0000 1000 0000 0000 %0656 S27 %M1 5
%z000000 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0000 A01 %N1 6
%z009550 -00003 000026 %#1000 1000 1000 0000 0000 0000 0000 %0728 a27 %W1 7
%$
%z005022 007672 007967 %#1000 0000 0000 0000 1000 1000 0000 %0801 j01 %O2 0
%z009282 -02169 010876 %#1000 1000 0000 0000 0000 1000 0000 %0882 j10 %Y2 1
%z008388 -08355 009581 %#0000 1000 0000 1000 0000 1000 0000 %0963 j19 %L2 2
%z008721 -04608 -01383 %#0000 1000 1000 1000 0000 0000 0000 %0737 b09 %C2 3
%z002932 008022 -10944 %#0000 0000 1000 1000 1000 0000 0000 %0818 b18 %V2 4
%z005674 009580 -06255 %#1000 0000 1000 0000 1000 0000 0000 %0899 b27 %M2 5
%z000000 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0809 j09 %N2 6
%z009555 000001 000024 %#1000 1000 1000 0000 0000 0000 0000 %0729 b01 %W2 7
%$

%JE060-7A, Page 24 /66, LAB*la0; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
%100 x LAB*          1000 x (r g b  c m y 0)            %nr.  pos
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0972 k01
001450 000135 -00363 0125 0125 0125 0875 0875 0875 0000 %0973 k02
003123 000097 -00457 0250 0250 0250 0750 0750 0750 0000 %0974 k03
004281 000042 -00371 0375 0375 0375 0625 0625 0625 0000 %0975 k04
005286 000053 -00254 0500 0500 0500 0500 0500 0500 0000 %0976 k05
006188 000102 -00107 0625 0625 0625 0375 0375 0375 0000 %0977 k06
007113 000096 000121 0750 0750 0750 0250 0250 0250 0000 %0978 k07
008122 -00004 000376 0875 0875 0875 0125 0125 0125 0000 %0979 k08
009542 -00004 000003 1000 1000 1000 0000 0000 0000 0000 %0980 k09
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0981 l01
001450 000113 -00348 0125 0125 0125 0875 0875 0875 0000 %0982 l02
003123 000099 -00456 0250 0250 0250 0750 0750 0750 0000 %0983 l03
004281 000048 -00375 0375 0375 0375 0625 0625 0625 0000 %0984 l04
005286 000059 -00259 0500 0500 0500 0500 0500 0500 0000 %0985 l05
006188 000106 -00114 0625 0625 0625 0375 0375 0375 0000 %0986 l06
007113 000097 000126 0750 0750 0750 0250 0250 0250 0000 %0987 l07
008122 -00008 000379 0875 0875 0875 0125 0125 0125 0000 %0988 l08
009540 -00004 000003 1000 1000 1000 0000 0000 0000 0000 %0989 l09
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0990 m01
001433 000136 -00374 0125 0125 0125 0875 0875 0875 0000 %0991 m02
003123 000099 -00456 0250 0250 0250 0750 0750 0750 0000 %0992 m03
004281 000030 -00369 0375 0375 0375 0625 0625 0625 0000 %0993 m04
005286 000056 -00260 0500 0500 0500 0500 0500 0500 0000 %0994 m05
006188 000099 -00108 0625 0625 0625 0375 0375 0375 0000 %0995 m06
007113 000097 000126 0750 0750 0750 0250 0250 0250 0000 %0996 m07
008122 000000 000377 0875 0875 0875 0125 0125 0125 0000 %0997 m08
009540 -00009 000007 1000 1000 1000 0000 0000 0000 0000 %0998 m09
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0999 n01
001450 000138 -00322 0125 0125 0125 0875 0875 0875 0000 %1000 n02
003123 000097 -00457 0250 0250 0250 0750 0750 0750 0000 %1001 n03
004281 000036 -00373 0375 0375 0375 0625 0625 0625 0000 %1002 n04
005286 000049 -00262 0500 0500 0500 0500 0500 0500 0000 %1003 n05
006188 000099 -00108 0625 0625 0625 0375 0375 0375 0000 %1004 n06
007115 000101 000123 0750 0750 0750 0250 0250 0250 0000 %1005 n07
008122 -00004 000381 0875 0875 0875 0125 0125 0125 0000 %1006 n08
009540 -00010 000001 1000 1000 1000 0000 0000 0000 0000 %1007 n09
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %1008 k10
000217 000072 -00034 0066 0066 0066 0933 0933 0933 0000 %1009 k11
001560 000159 -00400 0133 0133 0133 0866 0866 0866 0000 %1010 k12
002623 000089 -00509 0200 0200 0200 0800 0800 0800 0000 %1011 k13
003275 000090 -00382 0266 0266 0266 0333 0333 0333 0000 %1012 k14
003886 000118 -00408 0333 0333 0333 0666 0666 0666 0000 %1013 k15
004460 000063 -00354 0400 0400 0400 0600 0600 0600 0000 %1014 k16
005026 000042 -00291 0466 0466 0466 0533 0533 0533 0000 %1015 k17
005515 000095 -00276 0533 0533 0533 0466 0466 0466 0000 %1016 k18
006013 000109 -00172 0600 0600 0600 0400 0400 0400 0000 %1017 k19
006508 000097 -00068 0666 0666 0666 0333 0333 0333 0000 %1018 k20
007002 000099 000065 0734 0734 0734 0266 0266 0266 0000 %1019 k21
007526 000077 000224 0800 0800 0800 0200 0200 0200 0000 %1020 k22
008064 000032 000359 0866 0866 0866 0133 0133 0133 0000 %1021 k23
008684 -00035 000563 0933 0933 0933 0066 0066 0066 0000 %1022 k24
009542 -00004 000003 1000 1000 1000 0000 0000 0000 0000 %1023 k25
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %1024 l10
000243 000094 -00041 0066 0066 0066 0933 0933 0933 0000 %1025 l11
001575 000175 -00388 0133 0133 0133 0866 0866 0866 0000 %1026 l12
002631 000066 -00487 0200 0200 0200 0800 0800 0800 0000 %1027 l13
003282 000102 -00395 0266 0266 0266 0333 0333 0333 0000 %1028 l14
003896 000087 -00406 0333 0333 0333 0666 0666 0666 0000 %1029 l15
004468 000066 -00359 0400 0400 0400 0600 0600 0600 0000 %1030 l16
005029 000049 -00282 0466 0466 0466 0533 0533 0533 0000 %1031 l17
005524 000095 -00268 0533 0533 0533 0466 0466 0466 0000 %1032 l18
006019 000099 -00168 0600 0600 0600 0400 0400 0400 0000 %1033 l19
006515 000094 -00065 0666 0666 0666 0333 0333 0333 0000 %1034 l20
007008 000107 000064 0734 0734 0734 0266 0266 0266 0000 %1035 l21
007531 000077 000224 0800 0800 0800 0200 0200 0200 0000 %1036 l22
008069 000028 000362 0866 0866 0866 0133 0133 0133 0000 %1037 l23
008687 -00035 000569 0933 0933 0933 0066 0066 0066 0000 %1038 l24
009543 -00004 000009 1000 1000 1000 0000 0000 0000 0000 %1039 l25
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %1040 m10
000217 000093 -00040 0066 0066 0066 0933 0933 0933 0000 %1041 m11
001575 000159 -00400 0133 0133 0133 0866 0866 0866 0000 %1042 m12
002623 000063 -00500 0200 0200 0200 0800 0800 0800 0000 %1043 m13
003282 000074 -00385 0266 0266 0266 0333 0333 0333 0000 %1044 m14
003891 000090 -00408 0333 0333 0333 0666 0666 0666 0000 %1045 m15
004460 000062 -00360 0400 0400 0400 0600 0600 0600 0000 %1046 m16
005029 000055 -00287 0466 0466 0466 0533 0533 0533 0000 %1047 m17
005518 000105 -00276 0533 0533 0533 0466 0466 0466 0000 %1048 m18
006013 000102 -00170 0600 0600 0600 0400 0400 0400 0000 %1049 m19
006510 000086 -00064 0666 0666 0666 0333 0333 0333 0000 %1050 m20
007006 000095 000064 0734 0734 0734 0266 0266 0266 0000 %1051 m21
007529 000081 000221 0800 0800 0800 0200 0200 0200 0000 %1052 m22

008067 000033 000359 0866 0866 0866 0133 0133 0133 0000 %1053 m23
008686 -00035 000569 0933 0933 0933 0066 0066 0066 0000 %1054 m24
009543 -00004 000003 1000 1000 1000 0000 0000 0000 0000 %1055 m25
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %1056 n10
000243 000105 -00058 0066 0066 0066 0933 0933 0933 0000 %1057 n11
001575 000135 -00405 0133 0133 0133 0866 0866 0866 0000 %1058 n12
002623 000054 -00493 0200 0200 0200 0800 0800 0800 0000 %1059 n13
003275 000110 -00394 0266 0266 0266 0333 0333 0333 0000 %1060 n14
003886 000104 -00412 0333 0333 0333 0666 0666 0666 0000 %1061 n15
004460 000074 -00359 0400 0400 0400 0600 0600 0600 0000 %1062 n16
005022 000052 -00291 0466 0466 0466 0533 0533 0533 0000 %1063 n17
005518 000058 -00248 0533 0533 0533 0466 0466 0466 0000 %1064 n18
006013 000102 -00170 0600 0600 0600 0400 0400 0400 0000 %1065 n19
006510 000094 -00065 0666 0666 0666 0333 0333 0333 0000 %1066 n20
007006 000103 000062 0734 0734 0734 0266 0266 0266 0000 %1067 n21
007527 000081 000221 0800 0800 0800 0200 0200 0200 0000 %1068 n22
008064 000037 000355 0866 0866 0866 0133 0133 0133 0000 %1069 n23
008686 -00035 000563 0933 0933 0933 0066 0066 0066 0000 %1070 n24
009542 -00010 000001 1000 1000 1000 0000 0000 0000 0000 %1071 n25
000000 000000 000000 0000 0000 0000 1000 1000 1000 0000 %1072 k26
009540 000000 000000 1000 1000 1000 0000 0000 0000 0000 %1073 k27
005019 007672 007929 1000 0000 0000 0000 1000 1000 0000 %1074 l26
008696 -04584 -01416 0000 1000 1000 1000 0000 0000 0000 %1075 l27
009280 -02168 010874 1000 1000 0000 0000 0000 1000 0000 %1076 m26
002939 008022 -10946 0000 0000 1000 1000 1000 0000 0000 %1077 m27
008402 -08375 009574 0000 1000 0000 1000 0000 1000 0000 %1078 n26
005674 009594 -06267 1000 0000 1000 0000 1000 0000 0000 %1079 n27
%$
%z005019 007672 007929 %#1000 0000 0000 0000 1000 1000 0000 %1074 l26 %O3 0
%z009280 -02168 010874 %#1000 1000 0000 0000 0000 1000 0000 %1076 m26 %Y3 1
%z008402 -08375 009574 %#0000 1000 0000 1000 0000 1000 0000 %1078 n26 %L3 2
%z008696 -04584 -01416 %#0000 1000 1000 1000 0000 0000 0000 %1075 l27 %C3 3
%z002939 008022 -10946 %#0000 0000 1000 1000 1000 0000 0000 %1077 m27 %V3 4
%z005674 009594 -06267 %#1000 0000 1000 0000 1000 0000 0000 %1079 n27 %M3 5
%z000000 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %1072 k26 %N3 6
%z009540 000000 000000 %#1000 1000 1000 0000 0000 0000 0000 %1073 k27 %W3 7
%$
%z000000 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0972 k01 %N4 6
%z009542 -00004 000003 %#1000 1000 1000 0000 0000 0000 0000 %0980 k09 %W4 7
%$
%z000000 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0981 l01 %N5 6
%z009542 -00004 000006 %#1000 1000 1000 0000 0000 0000 0000 %0989 l09 %W5 7
%$
%z000000 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0990 m01 %N6 6
%z009542 -00007 000005 %#1000 1000 1000 0000 0000 0000 0000 %0998 m09 %W6 7
%$
%z000000 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0999 n01 %N7 6
%z009541 -00010 000001 %#1000 1000 1000 0000 0000 0000 0000 %1007 n09 %W7 7
%$ la0_line 4580
] def

%****************************************************************************

/LAB*Fa0100 [
%JE060-7A, Page 23 /66, LAB*la0; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
%LAB*la0, D65, adapted, Y = 0.0 , L* = 0.0 
%100 x LAB*a          %#1000 x (r g b  c m y 0)            %nr.  pos
%z005009 007653 007939 %#1000 0000 0000 0000 1000 1000 0000 %0648 S19 %O1 0
%z009289 -02164 010868 %#1000 1000 0000 0000 0000 1000 0000 %0720 a19 %Y1 1
%z008399 -08361 009599 %#0000 1000 0000 1000 0000 1000 0000 %0072 I01 %L1 2
%z008706 -04625 -01374 %#0000 1000 1000 1000 0000 0000 0000 %0080 I09 %C1 3
%z002939 007977 -10925 %#0000 0000 1000 1000 1000 0000 0000 %0008 A09 %V1 4
%z005662 009566 -06253 %#1000 0000 1000 0000 1000 0000 0000 %0656 S27 %M1 5
%z000000 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0000 A01 %N1 6
%z009550 -00003 000026 %#1000 1000 1000 0000 0000 0000 0000 %0728 a27 %W1 7
%$
005022 007672 007967 %#1000 0000 0000 0000 1000 1000 0000 %0801 j01 %O2 0
009282 -02169 010876 %#1000 1000 0000 0000 0000 1000 0000 %0882 j10 %Y2 1
008388 -08355 009581 %#0000 1000 0000 1000 0000 1000 0000 %0963 j19 %L2 2
008721 -04608 -01383 %#0000 1000 1000 1000 0000 0000 0000 %0737 b09 %C2 3
002932 008022 -10944 %#0000 0000 1000 1000 1000 0000 0000 %0818 b18 %V2 4
005674 009580 -06255 %#1000 0000 1000 0000 1000 0000 0000 %0899 b27 %M2 5
000000 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0809 j09 %N2 6
009555 000001 000024 %#1000 1000 1000 0000 0000 0000 0000 %0729 b01 %W2 7
%$
] def
            } if %xcolor 0, LAB*la0

%*************************************************************************
 
xcolor 1 eq {%xcolor 1, LAB*la1
/FileData (AG78_LECD display 40%_G0) def
/LUT [
%ps2ascii output with Ghostsript-programm: macps2pdf, date: 2010-01-04
%input file: JE060-7A.PS, output file: JE060-7AA.TXT (BBEDIT used for TXT)
%JE060-7AA.TXT la7_line 11451
%JE060-7A, Page 61 /66, LAB*la7; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
%LAB*la7, D65, adapted, Y = 40.32 , L* = 69.69 
006966 000001 000000 0000 0000 0000 1000 1000 1000 0000 %0000 A01
006972 000047 -00132 0000 0000 0125 1000 1000 0875 0000 %0001 A02
006984 000171 -00453 0000 0000 0250 1000 1000 0750 0000 %0002 A03
006999 000310 -00794 0000 0000 0375 1000 1000 0625 0000 %0003 A04
007017 000459 -01167 0000 0000 0500 1000 1000 0500 0000 %0004 A05
007038 000631 -01574 0000 0000 0625 1000 1000 0375 0000 %0005 A06
007062 000825 -02020 0000 0000 0750 1000 1000 0250 0000 %0006 A07
007098 001069 -02571 0000 0000 0875 1000 1000 0125 0000 %0007 A08
007195 001623 -03798 0000 0000 1000 1000 1000 0000 0000 %0008 A09
007019 -00112 000080 0000 0125 0000 1000 0875 1000 0000 %0009 B01
007023 -00065 -00052 0000 0125 0125 1000 0875 0875 0000 %0010 B02
007035 000057 -00366 0000 0125 0250 1000 0875 0750 0000 %0011 B03
007051 000201 -00722 0000 0125 0375 1000 0875 0625 0000 %0012 B04
007069 000346 -01096 0000 0125 0500 1000 0875 0500 0000 %0013 B05
007088 000521 -01498 0000 0125 0625 1000 0875 0375 0000 %0014 B06
007114 000715 -01942 0000 0125 0750 1000 0875 0250 0000 %0015 B07
007148 000954 -02487 0000 0125 0875 1000 0875 0125 0000 %0016 B08
007244 001512 -03716 0000 0125 1000 1000 0875 0000 0000 %0017 B09
007152 -00396 000287 0000 0250 0000 1000 0750 1000 0000 %0018 C01
007156 -00348 000157 0000 0250 0125 1000 0750 0875 0000 %0019 C02
007169 -00226 -00164 0000 0250 0250 1000 0750 0750 0000 %0020 C03
007184 -00089 -00508 0000 0250 0375 1000 0750 0625 0000 %0021 C04
007200 000067 -00890 0000 0250 0500 1000 0750 0500 0000 %0022 C05
007220 000236 -01298 0000 0250 0625 1000 0750 0375 0000 %0023 C06
007245 000425 -01736 0000 0250 0750 1000 0750 0250 0000 %0024 C07
007278 000668 -02290 0000 0250 0875 1000 0750 0125 0000 %0025 C08
007370 001223 -03511 0000 0250 1000 1000 0750 0000 0000 %0026 C09
007316 -00742 000540 0000 0375 0000 1000 0625 1000 0000 %0027 D01
007320 -00689 000410 0000 0375 0125 1000 0625 0875 0000 %0028 D02
007332 -00565 000086 0000 0375 0250 1000 0625 0750 0000 %0029 D03
007345 -00435 -00252 0000 0375 0375 1000 0625 0625 0000 %0030 D04
007363 -00278 -00635 0000 0375 0500 1000 0625 0500 0000 %0031 D05
007381 -00110 -01036 0000 0375 0625 1000 0625 0375 0000 %0032 D06
007405 000079 -01482 0000 0375 0750 1000 0625 0250 0000 %0033 D07
007437 000344 -02024 0000 0375 0875 1000 0625 0125 0000 %0034 D08
007526 000866 -03253 0000 0375 1000 1000 0625 0000 0000 %0035 D09
007511 -01132 000839 0000 0500 0000 1000 0500 1000 0000 %0036 E01
007516 -01083 000711 0000 0500 0125 1000 0500 0875 0000 %0037 E02
007527 -00964 000391 0000 0500 0250 1000 0500 0750 0000 %0038 E03
007539 -00832 000048 0000 0500 0375 1000 0500 0625 0000 %0039 E04
007555 -00677 -00332 0000 0500 0500 1000 0500 0500 0000 %0040 E05
007574 -00514 -00734 0000 0500 0625 1000 0500 0375 0000 %0041 E06
007597 -00317 -01182 0000 0500 0750 1000 0500 0250 0000 %0042 E07
007628 -00086 -01727 0000 0500 0875 1000 0500 0125 0000 %0043 E08
007713 000465 -02956 0000 0500 1000 1000 0500 0000 0000 %0044 E09
007731 -01554 001179 0000 0625 0000 1000 0375 1000 0000 %0045 F01
007735 -01507 001047 0000 0625 0125 1000 0375 0875 0000 %0046 F02
007745 -01391 000727 0000 0625 0250 1000 0375 0750 0000 %0047 F03
007757 -01263 000391 0000 0625 0375 1000 0375 0625 0000 %0048 F04
007772 -01108 000005 0000 0625 0500 1000 0375 0500 0000 %0049 F05
007790 -00945 -00394 0000 0625 0625 1000 0375 0375 0000 %0050 F06
007811 -00756 -00839 0000 0625 0750 1000 0375 0250 0000 %0051 F07
007842 -00520 -01390 0000 0625 0875 1000 0375 0125 0000 %0052 F08
007923 000022 -02618 0000 0625 1000 1000 0375 0000 0000 %0053 F09
008002 -02059 001595 0000 0750 0000 1000 0250 1000 0000 %0054 G01
008007 -02013 001467 0000 0750 0125 1000 0250 0875 0000 %0055 G02
008017 -01897 001148 0000 0750 0250 1000 0250 0750 0000 %0056 G03
008028 -01769 000811 0000 0750 0375 1000 0250 0625 0000 %0057 G04
008043 -01618 000429 0000 0750 0500 1000 0250 0500 0000 %0058 G05
008059 -01459 000027 0000 0750 0625 1000 0250 0375 0000 %0059 G06
008079 -01277 -00417 0000 0750 0750 1000 0250 0250 0000 %0060 G07
008107 -01047 -00965 0000 0750 0875 1000 0250 0125 0000 %0061 G08
008185 -00511 -02196 0000 0750 1000 1000 0250 0000 0000 %0062 G09
008360 -02683 002144 0000 0875 0000 1000 0125 1000 0000 %0063 H01
008363 -02636 002017 0000 0875 0125 1000 0125 0875 0000 %0064 H02
008373 -02527 001701 0000 0875 0250 1000 0125 0750 0000 %0065 H03
008384 -02402 001362 0000 0875 0375 1000 0125 0625 0000 %0066 H04
008397 -02258 000983 0000 0875 0500 1000 0125 0500 0000 %0067 H05
008412 -02100 000581 0000 0875 0625 1000 0125 0375 0000 %0068 H06
008431 -01921 000135 0000 0875 0750 1000 0125 0250 0000 %0069 H07
008457 -01696 -00413 0000 0875 0875 1000 0125 0125 0000 %0070 H08
008529 -01174 -01641 0000 0875 1000 1000 0125 0000 0000 %0071 H09
008949 -03632 003051 0000 1000 0000 1000 0000 1000 0000 %0072 I01
008952 -03593 002921 0000 1000 0125 1000 0000 0875 0000 %0073 I02
008961 -03484 002609 0000 1000 0250 1000 0000 0750 0000 %0074 I03
008971 -03370 002273 0000 1000 0375 1000 0000 0625 0000 %0075 I04
008983 -03229 001894 0000 1000 0500 1000 0000 0500 0000 %0076 I05
008997 -03084 001493 0000 1000 0625 1000 0000 0375 0000 %0077 I06
009013 -02916 001048 0000 1000 0750 1000 0000 0250 0000 %0078 I07
009037 -02700 000503 0000 1000 0875 1000 0000 0125 0000 %0079 I08
009102 -02206 -00720 0000 1000 1000 1000 0000 0000 0000 %0080 I09

006982 000073 000026 0125 0000 0000 0875 1000 1000 0000 %0081 J01
006986 000118 -00101 0125 0000 0125 0875 1000 0875 0000 %0082 J02
007000 000240 -00419 0125 0000 0250 0875 1000 0750 0000 %0083 J03
007014 000372 -00757 0125 0000 0375 0875 1000 0625 0000 %0084 J04
007032 000527 -01137 0125 0000 0500 0875 1000 0500 0000 %0085 J05
007053 000704 -01550 0125 0000 0625 0875 1000 0375 0000 %0086 J06
007077 000884 -01983 0125 0000 0750 0875 1000 0250 0000 %0087 J07
007114 001132 -02542 0125 0000 0875 0875 1000 0125 0000 %0088 J08
007210 001681 -03766 0125 0000 1000 0875 1000 0000 0000 %0089 J09
007033 -00040 000107 0125 0125 0000 0875 0875 1000 0000 %0090 K01
007039 000007 -00024 0125 0125 0125 0875 0875 0875 0000 %0091 K02
007051 000128 -00342 0125 0125 0250 0875 0875 0750 0000 %0092 K03
007065 000263 -00681 0125 0125 0375 0875 0875 0625 0000 %0093 K04
007083 000417 -01062 0125 0125 0500 0875 0875 0500 0000 %0094 K05
007104 000593 -01470 0125 0125 0625 0875 0875 0375 0000 %0095 K06
007128 000770 -01899 0125 0125 0750 0875 0875 0250 0000 %0096 K07
007163 001019 -02466 0125 0125 0875 0875 0875 0125 0000 %0097 K08
007258 001567 -03688 0125 0125 1000 0875 0875 0000 0000 %0098 K09
007166 -00323 000310 0125 0250 0000 0875 0750 1000 0000 %0099 L01
007171 -00780 000024 0125 0250 0125 0875 0750 0875 0000 %0100 L02
007183 -00157 -00136 0125 0250 0250 0875 0750 0750 0000 %0101 L03
007198 -00023 -00476 0125 0250 0375 0875 0750 0625 0000 %0102 L04
007215 000133 -00858 0125 0250 0500 0875 0750 0500 0000 %0103 L05
007235 000301 -01264 0125 0250 0625 0875 0750 0375 0000 %0104 L06
007259 000487 -01711 0125 0250 0750 0875 0750 0250 0000 %0105 L07
007292 000729 -02254 0125 0250 0875 0875 0750 0125 0000 %0106 L08
007384 001283 -03484 0125 0250 1000 0875 0750 0000 0000 %0107 L09
007330 -00669 000561 0125 0375 0000 0875 0625 1000 0000 %0108 M01
007335 -00623 000433 0125 0375 0125 0875 0625 0875 0000 %0109 M02
007347 -00501 000116 0125 0375 0250 0875 0625 0750 0000 %0110 M03
007361 -00365 -00222 0125 0375 0375 0875 0625 0625 0000 %0111 M04
007377 -00211 -00606 0125 0375 0500 0875 0625 0500 0000 %0112 M05
007395 -00043 -01008 0125 0375 0625 0875 0625 0375 0000 %0113 M06
007419 000143 -01455 0125 0375 0750 0875 0625 0250 0000 %0114 M07
007449 000377 -01995 0125 0375 0875 0875 0625 0125 0000 %0115 M08
007540 000934 -03237 0125 0375 1000 0875 0625 0000 0000 %0116 M09
007526 -01061 000863 0125 0500 0000 0875 0500 1000 0000 %0117 N01
007531 -01015 000734 0125 0500 0125 0875 0500 0875 0000 %0118 N02
007541 -00895 000416 0125 0500 0250 0875 0500 0750 0000 %0119 N03
007554 -00764 000077 0125 0500 0375 0875 0500 0625 0000 %0120 N04
007571 -00612 -00302 0125 0500 0500 0875 0500 0500 0000 %0121 N05
007588 -00446 -00702 0125 0500 0625 0875 0500 0375 0000 %0122 N06
007631 -00268 -01180 0125 0500 0750 0875 0500 0250 0000 %0123 N07
007642 -00024 -01699 0125 0500 0875 0875 0500 0125 0000 %0124 N08
007728 000525 -02934 0125 0500 1000 0875 0500 0000 0000 %0125 N09
007745 -01487 001199 0125 0625 0000 0875 0375 1000 0000 %0126 O01
007749 -01439 001073 0125 0625 0125 0875 0375 0875 0000 %0127 O02
007760 -01322 000756 0125 0625 0250 0875 0375 0750 0000 %0128 O03
007773 -01185 000405 0125 0625 0375 0875 0375 0625 0000 %0129 O04
007787 -01043 000036 0125 0625 0500 0875 0375 0500 0000 %0130 O05
007804 -00883 -00364 0125 0625 0625 0875 0375 0375 0000 %0131 O06
007827 -00695 -00814 0125 0625 0750 0875 0375 0250 0000 %0132 O07
007856 -00463 -01360 0125 0625 0875 0875 0375 0125 0000 %0133 O08
007938 000079 -02595 0125 0625 1000 0875 0375 0000 0000 %0134 O09
008018 -01994 001620 0125 0750 0000 0875 0250 1000 0000 %0135 P01
008021 -01945 001491 0125 0750 0125 0875 0250 0875 0000 %0136 P02
008031 -01830 001174 0125 0750 0250 0875 0250 0750 0000 %0137 P03
008043 -01707 000837 0125 0750 0375 0875 0250 0625 0000 %0138 P04
008058 -01556 000457 0125 0750 0500 0875 0250 0500 0000 %0139 P05
008074 -01399 000055 0125 0750 0625 0875 0250 0375 0000 %0140 P06
008094 -01215 -00392 0125 0750 0750 0875 0250 0250 0000 %0141 P07
008122 -00988 -00940 0125 0750 0875 0875 0250 0125 0000 %0142 P08
008199 -00455 -02169 0125 0750 1000 0875 0250 0000 0000 %0143 P09
008374 -02619 002165 0125 0875 0000 0875 0125 1000 0000 %0144 Q01
008378 -02570 002040 0125 0875 0125 0875 0125 0875 0000 %0145 Q02
008386 -02462 001724 0125 0875 0250 0875 0125 0750 0000 %0146 Q03
008397 -02339 001387 0125 0875 0375 0875 0125 0625 0000 %0147 Q04
008411 -02198 001008 0125 0875 0500 0875 0125 0500 0000 %0148 Q05
008426 -02041 000607 0125 0875 0625 0875 0125 0375 0000 %0149 Q06
008445 -01861 000161 0125 0875 0750 0875 0125 0250 0000 %0150 Q07
008471 -01636 -00387 0125 0875 0875 0875 0125 0125 0000 %0151 Q08
008543 -01121 -01619 0125 0875 1000 0875 0125 0000 0000 %0152 Q09
008958 -03567 003064 0125 1000 0000 0875 0000 1000 0000 %0153 R01
008962 -03524 002938 0125 1000 0125 0875 0000 0875 0000 %0154 R02
008970 -03417 002624 0125 1000 0250 0875 0000 0750 0000 %0155 R03
009738 -04331 003061 0125 1000 0375 0875 0000 0625 0000 %0156 R04
008991 -03168 001909 0125 1000 0500 0875 0000 0500 0000 %0157 R05
009005 -03020 001510 0125 1000 0625 0875 0000 0375 0000 %0158 R06
009022 -02851 001064 0125 1000 0750 0875 0000 0250 0000 %0159 R07
009046 -02640 000518 0125 1000 0875 0875 0000 0125 0000 %0160 R08
009110 -02142 -00707 0125 1000 1000 0875 0000 0000 0000 %0161 R09

007022 000238 000093 0250 0000 0000 0750 1000 1000 0000 %0162 S01
007028 000290 -00039 0250 0000 0125 0750 1000 0875 0000 %0163 S02
007040 000410 -00352 0250 0000 0250 0750 1000 0750 0000 %0164 S03
007055 000542 -00693 0250 0000 0375 0750 1000 0625 0000 %0165 S04
007072 000693 -01069 0250 0000 0500 0750 1000 0500 0000 %0166 S05
007092 000854 -01468 0250 0000 0625 0750 1000 0375 0000 %0167 S06
007118 001048 -01926 0250 0000 0750 0750 1000 0250 0000 %0168 S07
007153 001282 -02473 0250 0000 0875 0750 1000 0125 0000 %0169 S08
007248 001824 -03702 0250 0000 1000 0750 1000 0000 0000 %0170 S09
007073 000133 000171 0250 0125 0000 0750 0875 1000 0000 %0171 T01
007079 000179 000043 0250 0125 0125 0750 0875 0875 0000 %0172 T02
007091 000296 -00274 0250 0125 0250 0750 0875 0750 0000 %0173 T03
007106 000433 -00617 0250 0125 0375 0750 0875 0625 0000 %0174 T04
007123 000585 -01000 0250 0125 0500 0750 0875 0500 0000 %0175 T05
007143 000744 -01395 0250 0125 0625 0750 0875 0375 0000 %0176 T06
007167 000930 -01835 0250 0125 0750 0750 0875 0250 0000 %0177 T07
007202 001174 -02401 0250 0125 0875 0750 0875 0125 0000 %0178 T08
007296 001712 -03624 0250 0125 1000 0750 0875 0000 0000 %0179 T09
007205 -00154 000377 0250 0250 0000 0750 0750 1000 0000 %0180 U01
007210 -00106 000245 0250 0250 0125 0750 0750 0875 0000 %0181 U02
007222 000011 -00071 0250 0250 0250 0750 0750 0750 0000 %0182 U03
007236 000144 -00411 0250 0250 0375 0750 0750 0625 0000 %0183 U04
007253 000295 -00793 0250 0250 0500 0750 0750 0500 0000 %0184 U05
007273 000459 -01195 0250 0250 0625 0750 0750 0375 0000 %0185 U06
007296 000643 -01637 0250 0250 0750 0750 0750 0250 0000 %0186 U07
007331 000881 -02188 0250 0250 0875 0750 0750 0125 0000 %0187 U08
007422 001423 -03420 0250 0250 1000 0750 0750 0000 0000 %0188 U09
007368 000211 000751 0250 0375 0000 0750 0625 1000 0000 %0189 V01
007373 -00449 000496 0250 0375 0125 0750 0625 0875 0000 %0190 V02
007384 -00327 000177 0250 0375 0250 0750 0625 0750 0000 %0191 V03
007398 -00199 -00162 0250 0375 0375 0750 0625 0625 0000 %0192 V04
007414 -00048 -00544 0250 0375 0500 0750 0625 0500 0000 %0193 V05
007433 000115 -00944 0250 0375 0625 0750 0625 0375 0000 %0194 V06
007456 000299 -01392 0250 0375 0750 0750 0625 0250 0000 %0195 V07
007489 000533 -01940 0250 0375 0875 0750 0625 0125 0000 %0196 V08
007577 001076 -03170 0250 0375 1000 0750 0625 0000 0000 %0197 V09
007562 -00891 000925 0250 0500 0000 0750 0500 1000 0000 %0198 W01
007567 -00845 000797 0250 0500 0125 0750 0500 0875 0000 %0199 W02
007578 -00727 000478 0250 0500 0250 0750 0500 0750 0000 %0200 W03
007591 -00598 000140 0250 0500 0375 0750 0500 0625 0000 %0201 W04
007607 -00452 -00241 0250 0500 0500 0750 0500 0500 0000 %0202 W05
007625 -00286 -00643 0250 0500 0625 0750 0500 0375 0000 %0203 W06
007647 -00105 -01091 0250 0500 0750 0750 0500 0250 0000 %0204 W07
007678 000129 -01639 0250 0500 0875 0750 0500 0125 0000 %0205 W08
007846 000722 -03095 0250 0500 1000 0750 0500 0000 0000 %0206 W09
007780 -01324 001260 0250 0625 0000 0750 0375 1000 0000 %0207 X01
007785 -01271 001130 0250 0625 0125 0750 0375 0875 0000 %0208 X02
007796 -01156 000814 0250 0625 0250 0750 0375 0750 0000 %0209 X03
007808 -01031 000476 0250 0625 0375 0750 0375 0625 0000 %0210 X04
007823 -00882 000091 0250 0625 0500 0750 0375 0500 0000 %0211 X05
007841 -00722 -00308 0250 0625 0625 0750 0375 0375 0000 %0212 X06
007861 -00544 -00755 0250 0625 0750 0750 0375 0250 0000 %0213 X07
007891 -00311 -01304 0250 0625 0875 0750 0375 0125 0000 %0214 X08
007972 000219 -02533 0250 0625 1000 0750 0375 0000 0000 %0215 X09
008051 -01827 001674 0250 0750 0000 0750 0250 1000 0000 %0216 Y01
008055 -01782 001546 0250 0750 0125 0750 0250 0875 0000 %0217 Y02
008066 -01666 001232 0250 0750 0250 0750 0250 0750 0000 %0218 Y03
008076 -01541 000891 0250 0750 0375 0750 0250 0625 0000 %0219 Y04
008090 -01398 000510 0250 0750 0500 0750 0250 0500 0000 %0220 Y05
008107 -01240 000111 0250 0750 0625 0750 0250 0375 0000 %0221 Y06
008126 -01062 -00334 0250 0750 0750 0750 0250 0250 0000 %0222 Y07
008155 -00840 -00885 0250 0750 0875 0750 0250 0125 0000 %0223 Y08
008232 -00313 -02117 0250 0750 1000 0750 0250 0000 0000 %0224 Y09
008405 -02452 002218 0250 0875 0000 0750 0125 1000 0000 %0225 Z01
008409 -02409 002090 0250 0875 0125 0750 0125 0875 0000 %0226 Z02
008417 -02300 001774 0250 0875 0250 0750 0125 0750 0000 %0227 Z03
008428 -02179 001438 0250 0875 0375 0750 0125 0625 0000 %0228 Z04
008442 -02035 001060 0250 0875 0500 0750 0125 0500 0000 %0229 Z05
008456 -01889 000658 0250 0875 0625 0750 0125 0375 0000 %0230 Z06
008475 -01708 000210 0250 0875 0750 0750 0125 0250 0000 %0231 Z07
008501 -01495 -00333 0250 0875 0875 0750 0125 0125 0000 %0232 Z08
008574 -00981 -01567 0250 0875 1000 0750 0125 0000 0000 %0233 Z09
008983 -03406 003106 0250 1000 0000 0750 0000 1000 0000 %0234 a01
008987 -03365 002981 0250 1000 0125 0750 0000 0875 0000 %0235 a02
008996 -03262 002667 0250 1000 0250 0750 0000 0750 0000 %0236 a03
009005 -03148 002331 0250 1000 0375 0750 0000 0625 0000 %0237 a04
009016 -03010 001954 0250 1000 0500 0750 0000 0500 0000 %0238 a05
009030 -02868 001552 0250 1000 0625 0750 0000 0375 0000 %0239 a06
009048 -02700 001107 0250 1000 0750 0750 0000 0250 0000 %0240 a07
009071 -02493 000559 0250 1000 0875 0750 0000 0125 0000 %0241 a08
009136 -02000 -00665 0250 1000 1000 0750 0000 0000 0000 %0242 a09

%JE060-7A, Page 62 /66, LAB*la7; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
007072 000453 000175 0375 0000 0000 0625 1000 1000 0000 %0243 A10
007077 000502 000047 0375 0000 0125 0625 1000 0875 0000 %0244 A11
007091 000619 -00268 0375 0000 0250 0625 1000 0750 0000 %0245 A12
007105 000749 -00605 0375 0000 0375 0625 1000 0625 0000 %0246 A13
007122 000895 -00984 0375 0000 0500 0625 1000 0500 0000 %0247 A14
007142 001050 -01376 0375 0000 0625 0625 1000 0375 0000 %0248 A15
007167 001240 -01831 0375 0000 0750 0625 1000 0250 0000 %0249 A16
007201 001468 -02378 0375 0000 0875 0625 1000 0125 0000 %0250 A17
007296 001999 -03614 0375 0000 1000 0625 1000 0000 0000 %0251 A18
007122 000343 000254 0375 0125 0000 0625 0875 1000 0000 %0252 B10
007128 000391 000124 0375 0125 0125 0625 0875 0875 0000 %0253 B11
007141 000510 -00192 0375 0125 0250 0625 0875 0750 0000 %0254 B12
007155 000636 -00528 0375 0125 0375 0625 0875 0625 0000 %0255 B13
007173 000785 -00910 0375 0125 0500 0625 0875 0500 0000 %0256 B14
007192 000947 -01311 0375 0125 0625 0625 0875 0375 0000 %0257 B15
007238 001208 -01874 0375 0125 0750 0625 0875 0250 0000 %0258 B16
007251 001355 -02305 0375 0125 0875 0625 0875 0125 0000 %0259 B17
007345 001891 -03541 0375 0125 1000 0625 0875 0000 0000 %0260 B18
007253 000060 000455 0375 0250 0000 0625 0750 1000 0000 %0261 C10
007258 000107 000326 0375 0250 0125 0625 0750 0875 0000 %0262 C11
007271 000223 000008 0375 0250 0250 0625 0750 0750 0000 %0263 C12
007286 000354 -00333 0375 0250 0375 0625 0750 0625 0000 %0264 C13
007301 000502 -00712 0375 0250 0500 0625 0750 0500 0000 %0265 C14
007321 000658 -01112 0375 0250 0625 0625 0750 0375 0000 %0266 C15
007345 000845 -01561 0375 0250 0750 0625 0750 0250 0000 %0267 C16
007378 001072 -02109 0375 0250 0875 0625 0750 0125 0000 %0268 C17
007470 001607 -03345 0375 0250 1000 0625 0750 0000 0000 %0269 C18
007415 -00286 000703 0375 0375 0000 0625 0625 1000 0000 %0270 D10
007420 -00231 000573 0375 0375 0125 0625 0625 0875 0000 %0271 D11
007431 -00119 000256 0375 0375 0250 0625 0625 0750 0000 %0272 D12
007444 000003 -00081 0375 0375 0375 0625 0625 0625 0000 %0273 D13
007462 000156 -00466 0375 0375 0500 0625 0625 0500 0000 %0274 D14
007481 000317 -00868 0375 0375 0625 0625 0625 0375 0000 %0275 D15
007503 000496 -01315 0375 0375 0750 0625 0625 0250 0000 %0276 D16
007535 000724 -01864 0375 0375 0875 0625 0625 0125 0000 %0277 D17
007623 001250 -03092 0375 0375 1000 0625 0625 0000 0000 %0278 D18
007607 -00679 000998 0375 0500 0000 0625 0500 1000 0000 %0279 E10
007612 -00631 000869 0375 0500 0125 0625 0500 0875 0000 %0280 E11
007624 -00518 000552 0375 0500 0250 0625 0500 0750 0000 %0281 E12
007637 -00148 000301 0375 0500 0375 0625 0500 0625 0000 %0282 E13
007652 -00245 -00168 0375 0500 0500 0625 0500 0500 0000 %0283 E14
007670 -00089 -00568 0375 0500 0625 0625 0500 0375 0000 %0284 E15
007693 000095 -01019 0375 0500 0750 0625 0500 0250 0000 %0285 E16
007723 000316 -01568 0375 0500 0875 0625 0500 0125 0000 %0286 E17
007807 000843 -02797 0375 0500 1000 0625 0500 0000 0000 %0287 E18
007823 -01109 001327 0375 0625 0000 0625 0375 1000 0000 %0288 F10
007828 -01061 001201 0375 0625 0125 0625 0375 0875 0000 %0289 F11
007839 -00948 000884 0375 0625 0250 0625 0375 0750 0000 %0290 F12
007852 -00823 000548 0375 0625 0375 0625 0375 0625 0000 %0291 F13
007866 -00677 000164 0375 0625 0500 0625 0375 0500 0000 %0292 F14
007883 -00527 -00235 0375 0625 0625 0625 0375 0375 0000 %0293 F15
007904 -00345 -00683 0375 0625 0750 0625 0375 0250 0000 %0294 F16
007934 -00122 -01232 0375 0625 0875 0625 0375 0125 0000 %0295 F17
008014 000403 -02466 0375 0625 1000 0625 0375 0000 0000 %0296 F18
008091 -01617 001739 0375 0750 0000 0625 0250 1000 0000 %0297 G10
008096 -01574 001612 0375 0750 0125 0625 0250 0875 0000 %0298 G11
008106 -01461 001297 0375 0750 0250 0625 0250 0750 0000 %0299 G12
008118 -01338 000958 0375 0750 0375 0625 0250 0625 0000 %0300 G13
008132 -01196 000578 0375 0750 0500 0625 0250 0500 0000 %0301 G14
008147 -01044 000178 0375 0750 0625 0625 0250 0375 0000 %0302 G15
008168 -00865 -00268 0375 0750 0750 0625 0250 0250 0000 %0303 G16
008196 -00644 -00819 0375 0750 0875 0625 0250 0125 0000 %0304 G17
008272 -00132 -02050 0375 0750 1000 0625 0250 0000 0000 %0305 G18
008442 -02250 002278 0375 0875 0000 0625 0125 1000 0000 %0306 H10
008447 -02204 002152 0375 0875 0125 0625 0125 0875 0000 %0307 H11
008456 -02093 001837 0375 0875 0250 0625 0125 0750 0000 %0308 H12
008466 -01976 001499 0375 0875 0375 0625 0125 0625 0000 %0309 H13
008480 -01841 001121 0375 0875 0500 0625 0125 0500 0000 %0310 H14
008495 -01690 000720 0375 0875 0625 0625 0125 0375 0000 %0311 H15
008513 -01521 000274 0375 0875 0750 0625 0125 0250 0000 %0312 H16
008540 -01306 -00274 0375 0875 0875 0625 0125 0125 0000 %0313 H17
008611 -00799 -01506 0375 0875 1000 0625 0125 0000 0000 %0314 H18
009016 -03214 003158 0375 1000 0000 0625 0000 1000 0000 %0315 I10
009019 -03168 003031 0375 1000 0125 0625 0000 0875 0000 %0316 I11
009028 -03063 002720 0375 1000 0250 0625 0000 0750 0000 %0317 I12
009038 -02951 002386 0375 1000 0375 0625 0000 0625 0000 %0318 I13
009050 -02818 002006 0375 1000 0500 0625 0000 0500 0000 %0319 I14
009064 -02678 001606 0375 1000 0625 0625 0000 0375 0000 %0320 I15
009081 -02513 001161 0375 1000 0750 0625 0000 0250 0000 %0321 I16
009104 -02308 000614 0375 1000 0875 0625 0000 0125 0000 %0322 I17
009169 -01829 -00612 0375 1000 1000 0625 0000 0000 0000 %0323 I18

007138 000727 000283 0500 0000 0000 0500 1000 1000 0000 %0324 J10
007144 000781 000156 0500 0000 0125 0500 1000 0875 0000 %0325 J11
007156 000880 -00157 0500 0000 0250 0500 1000 0750 0000 %0326 J12
007171 001019 -00501 0500 0000 0375 0500 1000 0625 0000 %0327 J13
007188 001162 -00881 0500 0000 0500 0500 1000 0500 0000 %0328 J14
007206 001303 -01266 0500 0000 0625 0500 1000 0375 0000 %0329 J15
007232 001488 -01723 0500 0000 0750 0500 1000 0250 0000 %0330 J16
007266 001685 -02252 0500 0000 0875 0500 1000 0125 0000 %0331 J17
007361 002223 -03504 0500 0000 1000 0500 1000 0000 0000 %0332 J18
007187 000612 000361 0500 0125 0000 0500 0875 1000 0000 %0333 K10
007192 000665 000231 0500 0125 0125 0500 0875 0875 0000 %0334 K11
007205 000778 -00085 0500 0125 0250 0500 0875 0750 0000 %0335 K12
007220 000901 -00421 0500 0125 0375 0500 0875 0625 0000 %0336 K13
007237 001045 -00804 0500 0125 0500 0500 0875 0500 0000 %0337 K14
007256 001197 -01199 0500 0125 0625 0500 0875 0375 0000 %0338 K15
007280 001372 -01647 0500 0125 0750 0500 0875 0250 0000 %0339 K16
007315 001599 -02202 0500 0125 0875 0500 0875 0125 0000 %0340 K17
007408 002119 -03435 0500 0125 1000 0500 0875 0000 0000 %0341 K18
007316 000330 000558 0500 0250 0000 0500 0750 1000 0000 %0342 L10
007322 000381 000430 0500 0250 0125 0500 0750 0875 0000 %0343 L11
007334 000490 000113 0500 0250 0250 0500 0750 0750 0000 %0344 L12
007348 000616 -00226 0500 0250 0375 0500 0750 0625 0000 %0345 L13
007365 000760 -00609 0500 0250 0500 0500 0750 0500 0000 %0346 L14
007384 000912 -01009 0500 0250 0625 0500 0750 0375 0000 %0347 L15
007408 001091 -01457 0500 0250 0750 0500 0750 0250 0000 %0348 L16
007440 001313 -02006 0500 0250 0875 0500 0750 0125 0000 %0349 L17
007531 001830 -03238 0500 0250 1000 0500 0750 0000 0000 %0350 L18
007475 -00015 000802 0500 0375 0000 0500 0625 1000 0000 %0351 M10
007481 000036 000673 0500 0375 0125 0500 0625 0875 0000 %0352 M11
007493 000146 000357 0500 0375 0250 0500 0625 0750 0000 %0353 M12
007506 000272 000017 0500 0375 0375 0500 0625 0625 0000 %0354 M13
007523 000417 -00362 0500 0375 0500 0500 0625 0500 0000 %0355 M14
007540 000572 -00765 0500 0375 0625 0500 0625 0375 0000 %0356 M15
007563 000746 -01216 0500 0375 0750 0500 0625 0250 0000 %0357 M16
007595 000964 -01757 0500 0375 0875 0500 0625 0125 0000 %0358 M17
007682 001479 -02990 0500 0375 1000 0500 0625 0000 0000 %0359 M18
007666 -00410 001094 0500 0500 0000 0500 0500 1000 0000 %0360 N10
007670 -00360 000964 0500 0500 0125 0500 0500 0875 0000 %0361 N11
007682 -00250 000649 0500 0500 0250 0500 0500 0750 0000 %0362 N12
007695 -00126 000309 0500 0500 0375 0500 0500 0625 0000 %0363 N13
007711 000016 -00069 0500 0500 0500 0500 0500 0500 0000 %0364 N14
007728 000168 -00473 0500 0500 0625 0500 0500 0375 0000 %0365 N15
007750 000341 -00919 0500 0500 0750 0500 0500 0250 0000 %0366 N16
007780 000563 -01470 0500 0500 0875 0500 0500 0125 0000 %0367 N17
007865 001075 -02704 0500 0500 1000 0500 0500 0000 0000 %0368 N18
007880 -00840 001421 0500 0625 0000 0500 0375 1000 0000 %0369 O10
007883 -00793 001291 0500 0625 0125 0500 0375 0875 0000 %0370 O11
007894 -00682 000976 0500 0625 0250 0500 0375 0750 0000 %0371 O12
007907 -00560 000638 0500 0625 0375 0500 0375 0625 0000 %0372 O13
007922 -00421 000258 0500 0625 0500 0500 0375 0500 0000 %0373 O14
007938 -00267 -00144 0500 0625 0625 0500 0375 0375 0000 %0374 O15
007959 -00093 -00592 0500 0625 0750 0500 0375 0250 0000 %0375 O16
007988 000121 -01143 0500 0625 0875 0500 0375 0125 0000 %0376 O17
008068 000632 -02374 0500 0625 1000 0500 0375 0000 0000 %0377 O18
008143 -01352 001823 0500 0750 0000 0500 0250 1000 0000 %0378 P10
008148 -01304 001698 0500 0750 0125 0500 0250 0875 0000 %0379 P11
008159 -01197 001385 0500 0750 0250 0500 0250 0750 0000 %0380 P12
008170 -01078 001046 0500 0750 0375 0500 0250 0625 0000 %0381 P13
008183 -00937 000666 0500 0750 0500 0500 0250 0500 0000 %0382 P14
008200 -00791 000264 0500 0750 0625 0500 0250 0375 0000 %0383 P15
008219 -00620 -00183 0500 0750 0750 0500 0250 0250 0000 %0384 P16
008247 -00404 -00731 0500 0750 0875 0500 0250 0125 0000 %0385 P17
008323 000095 -01965 0500 0750 1000 0500 0250 0000 0000 %0386 P18
008490 -01989 002354 0500 0875 0000 0500 0125 1000 0000 %0387 Q10
008494 -01944 002230 0500 0875 0125 0500 0125 0875 0000 %0388 Q11
008504 -01836 001916 0500 0875 0250 0500 0125 0750 0000 %0389 Q12
008514 -01719 001581 0500 0875 0375 0500 0125 0625 0000 %0390 Q13
008527 -01583 001201 0500 0875 0500 0500 0125 0500 0000 %0391 Q14
008542 -01440 000802 0500 0875 0625 0500 0125 0375 0000 %0392 Q15
008561 -01275 000355 0500 0875 0750 0500 0125 0250 0000 %0393 Q16
008586 -01063 -00192 0500 0875 0875 0500 0125 0125 0000 %0394 Q17
008658 -00569 -01429 0500 0875 1000 0500 0125 0000 0000 %0395 Q18
009057 -02955 003224 0500 1000 0000 0500 0000 1000 0000 %0396 R10
009062 -02915 003100 0500 1000 0125 0500 0000 0875 0000 %0397 R11
009070 -02812 002789 0500 1000 0250 0500 0000 0750 0000 %0398 R12
009079 -02699 002455 0500 1000 0375 0500 0000 0625 0000 %0399 R13
009091 -02572 002074 0500 1000 0500 0500 0000 0500 0000 %0400 R14
009105 -02433 001677 0500 1000 0625 0500 0000 0375 0000 %0401 R15
009121 -02277 001231 0500 1000 0750 0500 0000 0250 0000 %0402 R16
009144 -02072 000684 0500 1000 0875 0500 0000 0125 0000 %0403 R17
009209 -01599 -00542 0500 1000 1000 0500 0000 0000 0000 %0404 R18

007216 001041 000414 0625 0000 0000 0375 1000 1000 0000 %0405 S10
007221 001083 000287 0625 0000 0125 0375 1000 0875 0000 %0406 S11
007235 001198 -00027 0625 0000 0250 0375 1000 0750 0000 %0407 S12
007249 001317 -00362 0625 0000 0375 0375 1000 0625 0000 %0408 S13
007266 001454 -00741 0625 0000 0500 0375 1000 0500 0000 %0409 S14
007286 001607 -01142 0625 0000 0625 0375 1000 0375 0000 %0410 S15
007309 001768 -01582 0625 0000 0750 0375 1000 0250 0000 %0411 S16
007343 001988 -02138 0625 0000 0875 0375 1000 0125 0000 %0412 S17
007436 002493 -03385 0625 0000 1000 0375 1000 0000 0000 %0413 S18
007264 000928 000487 0625 0125 0000 0375 0875 1000 0000 %0414 T10
007270 000978 000361 0625 0125 0125 0375 0875 0875 0000 %0415 T11
007283 001092 000045 0625 0125 0250 0375 0875 0750 0000 %0416 T12
007296 001204 -00290 0625 0125 0375 0375 0875 0625 0000 %0417 T13
007314 001345 -00671 0625 0125 0500 0375 0875 0500 0000 %0418 T14
007334 001503 -01076 0625 0125 0625 0375 0875 0375 0000 %0419 T15
007357 001665 -01518 0625 0125 0750 0375 0875 0250 0000 %0420 T16
007390 001882 -02072 0625 0125 0875 0375 0875 0125 0000 %0421 T17
007483 002387 -03317 0625 0125 1000 0375 0875 0000 0000 %0422 T18
007389 000648 000680 0625 0250 0000 0375 0750 1000 0000 %0423 U10
007395 000695 000555 0625 0250 0125 0375 0750 0875 0000 %0424 U11
007408 000799 000240 0625 0250 0250 0375 0750 0750 0000 %0425 U12
007422 000924 -00098 0625 0250 0375 0375 0750 0625 0000 %0426 U13
007438 001065 -00479 0625 0250 0500 0375 0750 0500 0000 %0427 U14
007457 001211 -00881 0625 0250 0625 0375 0750 0375 0000 %0428 U15
007481 001381 -01328 0625 0250 0750 0375 0750 0250 0000 %0429 U16
007513 001596 -01881 0625 0250 0875 0375 0750 0125 0000 %0430 U17
007602 002094 -03113 0625 0250 1000 0375 0750 0000 0000 %0431 U18
007545 000305 000919 0625 0375 0000 0375 0625 1000 0000 %0432 V10
007551 000356 000792 0625 0375 0125 0375 0625 0875 0000 %0433 V11
007563 000466 000478 0625 0375 0250 0375 0625 0750 0000 %0434 V12
007577 000580 000141 0625 0375 0375 0375 0625 0625 0000 %0435 V13
007592 000721 -00242 0625 0375 0500 0375 0625 0500 0000 %0436 V14
007610 000868 -00643 0625 0375 0625 0375 0625 0375 0000 %0437 V15
007634 001040 -01093 0625 0375 0750 0375 0625 0250 0000 %0438 V16
007664 001250 -01640 0625 0375 0875 0375 0625 0125 0000 %0439 V17
007751 001751 -02877 0625 0375 1000 0375 0625 0000 0000 %0440 V18
007733 -00089 001206 0625 0500 0000 0375 0500 1000 0000 %0441 W10
007737 -00039 001078 0625 0500 0125 0375 0500 0875 0000 %0442 W11
007749 000066 000763 0625 0500 0250 0375 0500 0750 0000 %0443 W12
007761 000188 000426 0625 0500 0375 0375 0500 0625 0000 %0444 W13
007777 000321 000045 0625 0500 0500 0375 0500 0500 0000 %0445 W14
007795 000470 -00354 0625 0500 0625 0375 0500 0375 0000 %0446 W15
007816 000633 -00803 0625 0500 0750 0375 0500 0250 0000 %0447 W16
007846 000848 -01354 0625 0500 0875 0375 0500 0125 0000 %0448 W17
007929 001346 -02589 0625 0500 1000 0375 0500 0000 0000 %0449 W18
007942 -00523 001524 0625 0625 0000 0375 0375 1000 0000 %0450 X10
007947 -00478 001399 0625 0625 0125 0375 0375 0875 0000 %0451 X11
007958 -00365 001086 0625 0625 0250 0375 0375 0750 0000 %0452 X12
007970 -00247 000747 0625 0625 0375 0375 0375 0625 0000 %0453 X13
007985 -00113 000368 0625 0625 0500 0375 0375 0500 0000 %0454 X14
008001 000034 -00032 0625 0625 0625 0375 0375 0375 0000 %0455 X15
008022 000200 -00481 0625 0625 0750 0375 0375 0250 0000 %0456 X16
008051 000412 -01031 0625 0625 0875 0375 0375 0125 0000 %0457 X17
008130 000906 -02270 0625 0625 1000 0375 0375 0000 0000 %0458 X18
008203 -01033 001923 0625 0750 0000 0375 0250 1000 0000 %0459 Y10
008208 -00991 001800 0625 0750 0125 0375 0250 0875 0000 %0460 Y11
008219 -00882 001487 0625 0750 0250 0375 0250 0750 0000 %0461 Y12
008230 -00771 001150 0625 0750 0375 0375 0250 0625 0000 %0462 Y13
008243 -00634 000771 0625 0750 0500 0375 0250 0500 0000 %0463 Y14
008260 -00493 000369 0625 0750 0625 0375 0250 0375 0000 %0464 Y15
008279 -00326 -00075 0625 0750 0750 0375 0250 0250 0000 %0465 Y16
008307 -00116 -00628 0625 0750 0875 0375 0250 0125 0000 %0466 Y17
008382 000369 -01861 0625 0750 1000 0375 0250 0000 0000 %0467 Y18
008546 -01677 002448 0625 0875 0000 0375 0125 1000 0000 %0468 Z10
008550 -01631 002324 0625 0875 0125 0375 0125 0875 0000 %0469 Z11
008560 -01527 002011 0625 0875 0250 0375 0125 0750 0000 %0470 Z12
008571 -01415 001677 0625 0875 0375 0375 0125 0625 0000 %0471 Z13
008584 -01278 001295 0625 0875 0500 0375 0125 0500 0000 %0472 Z14
008599 -01143 000900 0625 0875 0625 0375 0125 0375 0000 %0473 Z15
008618 -00982 000455 0625 0875 0750 0375 0125 0250 0000 %0474 Z16
008643 -00778 -00096 0625 0875 0875 0375 0125 0125 0000 %0475 Z17
008714 -00301 -01332 0625 0875 1000 0375 0125 0000 0000 %0476 Z18
009108 -02656 003307 0625 1000 0000 0375 0000 1000 0000 %0477 a10
009111 -02612 003183 0625 1000 0125 0375 0000 0875 0000 %0478 a11
009120 -02512 002872 0625 1000 0250 0375 0000 0750 0000 %0479 a12
009130 -02406 002541 0625 1000 0375 0375 0000 0625 0000 %0480 a13
009141 -02283 002162 0625 1000 0500 0375 0000 0500 0000 %0481 a14
009155 -02146 001764 0625 1000 0625 0375 0000 0375 0000 %0482 a15
009171 -01992 001317 0625 1000 0750 0375 0000 0250 0000 %0483 a16
009194 -01794 000768 0625 1000 0875 0375 0000 0125 0000 %0484 a17
009258 -01335 -00459 0625 1000 1000 0375 0000 0000 0000 %0485 a18

%JE060-7A, Page 63 /66, LAB*la7; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
007315 001431 000579 0750 0000 0000 0250 1000 1000 0000 %0486 A19
007322 001482 000456 0750 0000 0125 0250 1000 0875 0000 %0487 A20
007335 001585 000141 0750 0000 0250 0250 1000 0750 0000 %0488 A21
007348 001696 -00191 0750 0000 0375 0250 1000 0625 0000 %0489 A22
007365 001828 -00572 0750 0000 0500 0250 1000 0500 0000 %0490 A23
007384 001968 -00971 0750 0000 0625 0250 1000 0375 0000 %0491 A24
007407 002131 -01419 0750 0000 0750 0250 1000 0250 0000 %0492 A25
007440 002334 -01970 0750 0000 0875 0250 1000 0125 0000 %0493 A26
007532 002812 -03216 0750 0000 1000 0250 1000 0000 0000 %0494 A27
007363 001323 000652 0750 0125 0000 0250 0875 1000 0000 %0495 B19
007369 001371 000527 0750 0125 0125 0250 0875 0875 0000 %0496 B20
007381 001471 000214 0750 0125 0250 0250 0875 0750 0000 %0497 B21
007394 001660 -00096 0750 0125 0375 0250 0875 0625 0000 %0498 B22
007410 001718 -00505 0750 0125 0500 0250 0875 0500 0000 %0499 B23
007430 001864 -00906 0750 0125 0625 0250 0875 0375 0000 %0500 B24
007453 002026 -01355 0750 0125 0750 0250 0875 0250 0000 %0501 B25
007487 002229 -01904 0750 0125 0875 0250 0875 0125 0000 %0502 B26
007577 002708 -03150 0750 0125 1000 0250 0875 0000 0000 %0503 B27
007486 001044 000839 0750 0250 0000 0250 0750 1000 0000 %0504 C19
007492 001088 000714 0750 0250 0125 0250 0750 0875 0000 %0505 C20
007504 001191 000399 0750 0250 0250 0250 0750 0750 0000 %0506 C21
007517 001309 000061 0750 0250 0375 0250 0750 0625 0000 %0507 C22
007534 001438 -00316 0750 0250 0500 0250 0750 0500 0000 %0508 C23
007551 001578 -00720 0750 0250 0625 0250 0750 0375 0000 %0509 C24
007575 001744 -01167 0750 0250 0750 0250 0750 0250 0000 %0510 C25
007606 001947 -01719 0750 0250 0875 0250 0750 0125 0000 %0511 C26
007694 002429 -02960 0750 0250 1000 0250 0750 0000 0000 %0512 C27
007638 000702 001072 0750 0375 0000 0250 0625 1000 0000 %0513 D19
007643 000747 000946 0750 0375 0125 0250 0625 0875 0000 %0514 D20
007655 000851 000631 0750 0375 0250 0250 0625 0750 0000 %0515 D21
007668 000965 000298 0750 0375 0375 0250 0625 0625 0000 %0516 D22
007684 001096 -00085 0750 0375 0500 0250 0625 0500 0000 %0517 D23
007702 001240 -00487 0750 0375 0625 0250 0625 0375 0000 %0518 D24
007724 001405 -00935 0750 0375 0750 0250 0625 0250 0000 %0519 D25
007754 001608 -01487 0750 0375 0875 0250 0625 0125 0000 %0520 D26
007840 002085 -02727 0750 0375 1000 0250 0625 0000 0000 %0521 D27
007820 000309 001349 0750 0500 0000 0250 0500 1000 0000 %0522 E19
007826 000352 001224 0750 0500 0125 0250 0500 0875 0000 %0523 E20
007837 000455 000914 0750 0500 0250 0250 0500 0750 0000 %0524 E21
007850 000568 000575 0750 0500 0375 0250 0500 0625 0000 %0525 E22
007865 000702 000194 0750 0500 0500 0250 0500 0500 0000 %0526 E23
007882 000840 -00205 0750 0500 0625 0250 0500 0375 0000 %0527 E24
007903 001001 -00655 0750 0500 0750 0250 0500 0250 0000 %0528 E25
007933 001207 -01207 0750 0500 0875 0250 0500 0125 0000 %0529 E26
008015 001678 -02445 0750 0500 1000 0250 0500 0000 0000 %0530 E27
008026 -00123 001665 0750 0625 0000 0250 0375 1000 0000 %0531 F19
008032 -00079 001541 0750 0625 0125 0250 0375 0875 0000 %0532 F20
008043 000024 001227 0750 0625 0250 0250 0375 0750 0000 %0533 F21
008054 000138 000890 0750 0625 0375 0250 0375 0625 0000 %0534 F22
008069 000266 000512 0750 0625 0500 0250 0375 0500 0000 %0535 F23
008085 000406 000108 0750 0625 0625 0250 0375 0375 0000 %0536 F24
008106 000565 -00338 0750 0625 0750 0250 0375 0250 0000 %0537 F25
008133 000770 -00889 0750 0625 0875 0250 0375 0125 0000 %0538 F26
008212 001242 -02129 0750 0625 1000 0250 0375 0000 0000 %0539 F27
008283 -00641 002057 0750 0750 0000 0250 0250 1000 0000 %0540 G19
008288 -00594 001931 0750 0750 0125 0250 0250 0875 0000 %0541 G20
008298 -00496 001622 0750 0750 0250 0250 0250 0750 0000 %0542 G21
008309 -00384 001286 0750 0750 0375 0250 0250 0625 0000 %0543 G22
008324 002140 001946 0750 0750 0500 0250 0250 0500 0000 %0544 G23
008339 -00120 000505 0750 0750 0625 0250 0250 0375 0000 %0545 G24
008359 000037 000058 0750 0750 0750 0250 0250 0250 0000 %0546 G25
008385 000238 -00493 0750 0750 0875 0250 0250 0125 0000 %0547 G26
008460 000708 -01732 0750 0750 1000 0250 0250 0000 0000 %0548 G27
008621 -01291 002572 0750 0875 0000 0250 0125 1000 0000 %0549 H19
008626 -01244 002449 0750 0875 0125 0250 0125 0875 0000 %0550 H20
008636 -01145 002138 0750 0875 0250 0250 0125 0750 0000 %0551 H21
008646 -01037 001803 0750 0875 0375 0250 0125 0625 0000 %0552 H22
008659 -00908 001425 0750 0875 0500 0250 0125 0500 0000 %0553 H23
008665 -00772 001020 0750 0875 0625 0250 0125 0375 0000 %0554 H24
008692 -00621 000579 0750 0875 0750 0250 0125 0250 0000 %0555 H25
008716 -00425 000026 0750 0875 0875 0250 0125 0125 0000 %0556 H26
008787 000035 -01208 0750 0875 1000 0250 0125 0000 0000 %0557 H27
009174 -02281 003415 0750 1000 0000 0250 0000 1000 0000 %0558 I19
009178 -02236 003292 0750 1000 0125 0250 0000 0875 0000 %0559 I20
009186 -02143 002983 0750 1000 0250 0250 0000 0750 0000 %0560 I21
009196 -02037 002652 0750 1000 0375 0250 0000 0625 0000 %0561 I22
009208 -01918 002276 0750 1000 0500 0250 0000 0500 0000 %0562 I23
009221 -01787 001875 0750 1000 0625 0250 0000 0375 0000 %0563 I24
009237 -01632 001431 0750 1000 0750 0250 0000 0250 0000 %0564 I25
009260 -01445 000879 0750 1000 0875 0250 0000 0125 0000 %0565 I26
009325 -00998 -00350 0750 1000 1000 0250 0000 0000 0000 %0566 I27

007437 001887 000783 0875 0000 0000 0125 1000 1000 0000 %0567 J19
007443 001932 000660 0875 0000 0125 0125 1000 0875 0000 %0568 J20
007456 002038 000346 0875 0000 0250 0125 1000 0750 0000 %0569 J21
007469 002139 000011 0875 0000 0375 0125 1000 0625 0000 %0570 J22
007486 002266 -00366 0875 0000 0500 0125 1000 0500 0000 %0571 J23
007505 002403 -00767 0875 0000 0625 0125 1000 0375 0000 %0572 J24
007527 002553 -01216 0875 0000 0750 0125 1000 0250 0000 %0573 J25
007559 002745 -01768 0875 0000 0875 0125 1000 0125 0000 %0574 J26
007649 003200 -03024 0875 0000 1000 0125 1000 0000 0000 %0575 J27
007484 001783 000856 0875 0125 0000 0125 0875 1000 0000 %0576 K19
007489 001831 000728 0875 0125 0125 0125 0875 0875 0000 %0577 K20
007502 001927 000416 0875 0125 0250 0125 0875 0750 0000 %0578 K21
007516 002039 000080 0875 0125 0375 0125 0875 0625 0000 %0579 K22
007531 002159 -00301 0875 0125 0500 0125 0875 0500 0000 %0580 K23
007549 002294 -00701 0875 0125 0625 0125 0875 0375 0000 %0581 K24
007572 002450 -01151 0875 0125 0750 0125 0875 0250 0000 %0582 K25
007604 002645 -01708 0875 0125 0875 0125 0875 0125 0000 %0583 K26
007693 003094 -02952 0875 0125 1000 0125 0875 0000 0000 %0584 K27
007603 001510 001037 0875 0250 0000 0125 0750 1000 0000 %0585 L19
007608 001551 000909 0875 0250 0125 0125 0750 0875 0000 %0586 L20
007621 001653 000596 0875 0250 0250 0125 0750 0750 0000 %0587 L21
007634 001760 000259 0875 0250 0375 0125 0750 0625 0000 %0588 L22
007649 001884 -00122 0875 0250 0500 0125 0750 0500 0000 %0589 L23
007668 002019 -00521 0875 0250 0625 0125 0750 0375 0000 %0590 L24
007690 002170 -00973 0875 0250 0750 0125 0750 0250 0000 %0591 L25
007721 002360 -01525 0875 0250 0875 0125 0750 0125 0000 %0592 L26
007807 002817 -02767 0875 0250 1000 0125 0750 0000 0000 %0593 L27
007752 001170 001262 0875 0375 0000 0125 0625 1000 0000 %0594 M19
007757 001214 001138 0875 0375 0125 0125 0625 0875 0000 %0595 M20
007769 001314 000824 0875 0375 0250 0125 0625 0750 0000 %0596 M21
007782 001419 000487 0875 0375 0375 0125 0625 0625 0000 %0597 M22
007797 001547 000105 0875 0375 0500 0125 0625 0500 0000 %0598 M23
007815 001681 -00293 0875 0375 0625 0125 0625 0375 0000 %0599 M24
007836 001834 -00748 0875 0375 0750 0125 0625 0250 0000 %0600 M25
007866 002026 -01298 0875 0375 0875 0125 0625 0125 0000 %0601 M26
007949 002476 -02541 0875 0375 1000 0125 0625 0000 0000 %0602 M27
007931 000778 001536 0875 0500 0000 0125 0500 1000 0000 %0603 N19
007935 000820 001408 0875 0500 0125 0125 0500 0875 0000 %0604 N20
007947 000917 001098 0875 0500 0250 0125 0500 0750 0000 %0605 N21
007959 001026 000760 0875 0500 0375 0125 0500 0625 0000 %0606 N22
007973 001162 000370 0875 0500 0500 0125 0500 0500 0000 %0607 N23
007991 001281 -00022 0875 0500 0625 0125 0500 0375 0000 %0608 N24
008012 001436 -00472 0875 0500 0750 0125 0500 0250 0000 %0609 N25
008040 001625 -01023 0875 0500 0875 0125 0500 0125 0000 %0610 N26
008120 002081 -02266 0875 0500 1000 0125 0500 0000 0000 %0611 N27
008133 000345 001841 0875 0625 0000 0125 0375 1000 0000 %0612 O19
008137 000384 001716 0875 0625 0125 0125 0375 0875 0000 %0613 O20
008147 000487 001403 0875 0625 0250 0125 0375 0750 0000 %0614 O21
008160 000591 001068 0875 0625 0375 0125 0375 0625 0000 %0615 O22
008174 000713 000690 0875 0625 0500 0125 0375 0500 0000 %0616 O23
008190 000844 000287 0875 0625 0625 0125 0375 0375 0000 %0617 O24
008210 001001 -00162 0875 0625 0750 0125 0375 0250 0000 %0618 O25
008237 001192 -00716 0875 0625 0875 0125 0375 0125 0000 %0619 O26
008314 001637 -01955 0875 0625 1000 0125 0375 0000 0000 %0620 O27
008384 -00175 002223 0875 0750 0000 0125 0250 1000 0000 %0621 P19
008389 -00133 002100 0875 0750 0125 0125 0250 0875 0000 %0622 P20
008399 -00037 001789 0875 0750 0250 0125 0250 0750 0000 %0623 P21
008410 000069 001455 0875 0750 0375 0125 0250 0625 0000 %0624 P22
008424 000193 001073 0875 0750 0500 0125 0250 0500 0000 %0625 P23
008438 000321 000673 0875 0750 0625 0125 0250 0375 0000 %0626 P24
008457 000473 000225 0875 0750 0750 0125 0250 0250 0000 %0627 P25
008484 000660 -00327 0875 0750 0875 0125 0250 0125 0000 %0628 P26
008558 001107 -01568 0875 0750 1000 0125 0250 0000 0000 %0629 P27
008715 -00826 002728 0875 0875 0000 0125 0125 1000 0000 %0630 Q19
008720 -00784 002607 0875 0875 0125 0125 0125 0875 0000 %0631 Q20
008730 -00688 002296 0875 0875 0250 0125 0125 0750 0000 %0632 Q21
008739 -02216 001317 0875 0875 0375 0125 0125 0625 0000 %0633 Q22
008752 -00468 001583 0875 0875 0500 0125 0125 0500 0000 %0634 Q23
008767 -00337 001184 0875 0875 0625 0125 0125 0375 0000 %0635 Q24
008784 -00189 000734 0875 0875 0750 0125 0125 0250 0000 %0636 Q25
008809 -00001 000182 0875 0875 0875 0125 0125 0125 0000 %0637 Q26
008879 000438 -01055 0875 0875 1000 0125 0125 0000 0000 %0638 Q27
009258 -01825 003557 0875 1000 0000 0125 0000 1000 0000 %0639 R19
009262 -01786 003430 0875 1000 0125 0125 0000 0875 0000 %0640 R20
009270 -01694 003124 0875 1000 0250 0125 0000 0750 0000 %0641 R21
009280 -01597 002792 0875 1000 0375 0125 0000 0625 0000 %0642 R22
009291 -01481 002413 0875 1000 0500 0125 0000 0500 0000 %0643 R23
009305 -01355 002015 0875 1000 0625 0125 0000 0375 0000 %0644 R24
009321 -01210 001567 0875 1000 0750 0125 0000 0250 0000 %0645 R25
009343 -01030 001019 0875 1000 0875 0125 0000 0125 0000 %0646 R26
009406 -00605 -00211 0875 1000 1000 0125 0000 0000 0000 %0647 R27

007631 002591 001110 1000 0000 0000 0000 1000 1000 0000 %0648 S19
007635 002625 000982 1000 0000 0125 0000 1000 0875 0000 %0649 S20
007645 002714 000670 1000 0000 0250 0000 1000 0750 0000 %0650 S21
007658 002811 000333 1000 0000 0375 0000 1000 0625 0000 %0651 S22
007673 002919 -00045 1000 0000 0500 0000 1000 0500 0000 %0652 S23
007692 003048 -00449 1000 0000 0625 0000 1000 0375 0000 %0653 S24
007713 003184 -00897 1000 0000 0750 0000 1000 0250 0000 %0654 S25
007743 003361 -01454 1000 0000 0875 0000 1000 0125 0000 %0655 S26
007828 003773 -02719 1000 0000 1000 0000 1000 0000 0000 %0656 S27
007674 002488 001177 1000 0125 0000 0000 0875 1000 0000 %0657 T19
007678 002518 001050 1000 0125 0125 0000 0875 0875 0000 %0658 T20
007690 002606 000735 1000 0125 0250 0000 0875 0750 0000 %0659 T21
007702 002705 000397 1000 0125 0375 0000 0875 0625 0000 %0660 T22
007716 001253 000717 1000 0125 0500 0000 0875 0500 0000 %0661 T23
007735 002939 -00386 1000 0125 0625 0000 0875 0375 0000 %0662 T24
007756 003082 -00840 1000 0125 0750 0000 0875 0250 0000 %0663 T25
007786 003258 -01394 1000 0125 0875 0000 0875 0125 0000 %0664 T26
007870 003672 -02653 1000 0125 1000 0000 0875 0000 0000 %0665 T27
007790 002210 001353 1000 0250 0000 0000 0750 1000 0000 %0666 U19
007795 002248 001227 1000 0250 0125 0000 0750 0875 0000 %0667 U20
007805 002335 000911 1000 0250 0250 0000 0750 0750 0000 %0668 U21
007816 002433 000569 1000 0250 0375 0000 0750 0625 0000 %0669 U22
007831 002546 000188 1000 0250 0500 0000 0750 0500 0000 %0670 U23
007849 002669 -00213 1000 0250 0625 0000 0750 0375 0000 %0671 U24
007870 002809 -00665 1000 0250 0750 0000 0750 0250 0000 %0672 U25
007900 002988 -01221 1000 0250 0875 0000 0750 0125 0000 %0673 U26
007982 003402 -02476 1000 0250 1000 0000 0750 0000 0000 %0674 U27
007934 001876 001572 1000 0375 0000 0000 0625 1000 0000 %0675 V19
007939 001913 001445 1000 0375 0125 0000 0625 0875 0000 %0676 V20
007949 002001 001129 1000 0375 0250 0000 0625 0750 0000 %0677 V21
007961 002098 000789 1000 0375 0375 0000 0625 0625 0000 %0678 V22
007976 002210 000408 1000 0375 0500 0000 0625 0500 0000 %0679 V23
007992 002335 000002 1000 0375 0625 0000 0625 0375 0000 %0680 V24
008013 002474 -00449 1000 0375 0750 0000 0625 0250 0000 %0681 V25
008042 002651 -01004 1000 0375 0875 0000 0625 0125 0000 %0682 V26
008121 003069 -02257 1000 0375 1000 0000 0625 0000 0000 %0683 V27
008110 001485 001837 1000 0500 0000 0000 0500 1000 0000 %0684 W19
008114 001519 001709 1000 0500 0125 0000 0500 0875 0000 %0685 W20
008125 001606 001394 1000 0500 0250 0000 0500 0750 0000 %0686 W21
008136 001704 001053 1000 0500 0375 0000 0500 0625 0000 %0687 W22
008150 001818 000670 1000 0500 0500 0000 0500 0500 0000 %0688 W23
008166 001941 000267 1000 0500 0625 0000 0500 0375 0000 %0689 W24
008186 002079 -00183 1000 0500 0750 0000 0500 0250 0000 %0690 W25
008214 002259 -00737 1000 0500 0875 0000 0500 0125 0000 %0691 W26
008291 002667 -01984 1000 0500 1000 0000 0500 0000 0000 %0692 W27
008308 001052 002137 1000 0625 0000 0000 0375 1000 0000 %0693 X19
008313 001090 002009 1000 0625 0125 0000 0375 0875 0000 %0694 X20
008323 001173 001693 1000 0625 0250 0000 0375 0750 0000 %0695 X21
008334 001269 001354 1000 0625 0375 0000 0375 0625 0000 %0696 X22
008348 001387 000968 1000 0625 0500 0000 0375 0500 0000 %0697 X23
008363 001505 000567 1000 0625 0625 0000 0375 0375 0000 %0698 X24
008383 001647 000116 1000 0625 0750 0000 0375 0250 0000 %0699 X25
008409 001821 -00436 1000 0625 0875 0000 0375 0125 0000 %0700 X26
008483 002231 -01680 1000 0625 1000 0000 0375 0000 0000 %0701 X27
008555 000528 002510 1000 0750 0000 0000 0250 1000 0000 %0702 Y19
008560 000568 002382 1000 0750 0125 0000 0250 0875 0000 %0703 Y20
008569 000653 002066 1000 0750 0250 0000 0250 0750 0000 %0704 Y21
008580 000749 001726 1000 0750 0375 0000 0250 0625 0000 %0705 Y22
008594 000862 001343 1000 0750 0500 0000 0250 0500 0000 %0706 Y23
008608 000984 000939 1000 0750 0625 0000 0250 0375 0000 %0707 Y24
008626 001119 000490 1000 0750 0750 0000 0250 0250 0000 %0708 Y25
008651 001295 -00058 1000 0750 0875 0000 0250 0125 0000 %0709 Y26
008721 001705 -01301 1000 0750 1000 0000 0250 0000 0000 %0710 Y27
008879 -00123 003001 1000 0875 0000 0000 0125 1000 0000 %0711 Z19
008883 -00087 002874 1000 0875 0125 0000 0125 0875 0000 %0712 Z20
008891 000000 002555 1000 0875 0250 0000 0125 0750 0000 %0713 Z21
008901 000095 002216 1000 0875 0375 0000 0125 0625 0000 %0714 Z22
008913 000206 001835 1000 0875 0500 0000 0125 0500 0000 %0715 Z23
008928 000323 001431 1000 0875 0625 0000 0125 0375 0000 %0716 Z24
008945 000462 000985 1000 0875 0750 0000 0125 0250 0000 %0717 Z25
008968 000629 000433 1000 0875 0875 0000 0125 0125 0000 %0718 Z26
009034 001034 -00802 1000 0875 1000 0000 0125 0000 0000 %0719 Z27
009405 -01128 003798 1000 1000 0000 0000 0000 1000 0000 %0720 a19
009408 -01239 003775 1000 1000 0125 0000 0000 0875 0000 %0721 a20
009416 -01012 003357 1000 1000 0250 0000 0000 0750 0000 %0722 a21
009425 -00916 003019 1000 1000 0375 0000 0000 0625 0000 %0723 a22
009436 -00812 002637 1000 1000 0500 0000 0000 0500 0000 %0724 a23
009449 -00693 002235 1000 1000 0625 0000 0000 0375 0000 %0725 a24
009464 -00559 001786 1000 1000 0750 0000 0000 0250 0000 %0726 a25
009486 -00395 001241 1000 1000 0875 0000 0000 0125 0000 %0727 a26
009546 -00001 000014 1000 1000 1000 0000 0000 0000 0000 %0728 a27

%JE060-7A, Page 64 /66, LAB*la7; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
009560 000004 000025 1000 1000 1000 0000 0000 0000 0000 %0729 b01
009431 -00600 -00192 0875 1000 1000 0125 0000 0000 0000 %0730 b02
009348 -00992 -00329 0750 1000 1000 0250 0000 0000 0000 %0731 b03
009280 -01329 -00444 0625 1000 1000 0375 0000 0000 0000 %0732 b04
009227 -01596 -00534 0500 1000 1000 0500 0000 0000 0000 %0733 b05
009182 -01821 -00607 0375 1000 1000 0625 0000 0000 0000 %0734 b06
009148 -02001 -00663 0250 1000 1000 0750 0000 0000 0000 %0735 b07
009121 -02146 -00708 0125 1000 1000 0875 0000 0000 0000 %0736 b08
009110 -02202 -00726 0000 1000 1000 1000 0000 0000 0000 %0737 b09
008981 000635 000434 1000 0875 0875 0000 0125 0125 0000 %0738 c01
008833 000002 000186 0875 0875 0875 0125 0125 0125 0000 %0739 c02
008741 -00414 000028 0750 0875 0875 0250 0125 0125 0000 %0740 c03
008664 -00771 -00096 0625 0875 0875 0375 0125 0125 0000 %0741 c04
008604 -01060 -00196 0500 0875 0875 0500 0125 0125 0000 %0742 c05
008554 -01300 -00279 0375 0875 0875 0625 0125 0125 0000 %0743 c06
008514 -01491 -00345 0250 0875 0875 0750 0125 0125 0000 %0744 c07
008482 -01638 -00397 0125 0875 0875 0875 0125 0125 0000 %0745 c08
008466 -01698 -00422 0000 0875 0875 1000 0125 0125 0000 %0746 c09
008640 001124 000488 1000 0750 0750 0000 0250 0250 0000 %0747 d01
008482 000475 000222 0875 0750 0750 0125 0250 0250 0000 %0748 d02
008383 000044 000054 0750 0750 0750 0250 0250 0250 0000 %0749 d03
008300 -00318 -00082 0625 0750 0750 0375 0250 0250 0000 %0750 d04
008235 -00616 -00191 0500 0750 0750 0500 0250 0250 0000 %0751 d05
008182 -00868 -00276 0375 0750 0750 0625 0250 0250 0000 %0752 d06
008140 -01062 -00346 0250 0750 0750 0750 0250 0250 0000 %0753 d07
008105 -01221 -00404 0125 0750 0750 0875 0250 0250 0000 %0754 d08
008089 -01276 -00432 0000 0750 0750 1000 0250 0250 0000 %0755 d09
008377 001508 000560 1000 0625 0625 0000 0375 0375 0000 %0756 e01
008211 000850 000282 0875 0625 0625 0125 0375 0375 0000 %0757 e02
008106 000410 000105 0750 0625 0625 0250 0375 0375 0000 %0758 e03
008020 000035 -00035 0625 0625 0625 0375 0375 0375 0000 %0759 e04
007953 -00267 -00150 0500 0625 0625 0500 0375 0375 0000 %0760 e05
007895 -00522 -00244 0375 0625 0625 0625 0375 0375 0000 %0761 e06
007851 -00723 -00316 0250 0625 0625 0750 0375 0375 0000 %0762 e07
007814 -00883 -00376 0125 0625 0625 0875 0375 0375 0000 %0763 e08
007797 -00947 -00407 0000 0625 0625 1000 0375 0375 0000 %0764 e09
008164 001819 000665 1000 0500 0500 0000 0500 0500 0000 %0765 f01
007992 001155 000374 0875 0500 0500 0125 0500 0500 0000 %0766 f02
007882 000707 000191 0750 0500 0500 0250 0500 0500 0000 %0767 f03
007791 000327 000040 0625 0500 0500 0375 0500 0500 0000 %0768 f04
007720 000016 -00076 0500 0500 0500 0500 0500 0500 0000 %0769 f05
007661 -00242 -00174 0375 0500 0500 0625 0500 0500 0000 %0770 f06
007615 -00449 -00252 0250 0500 0500 0750 0500 0500 0000 %0771 f07
007578 -00614 -00314 0125 0500 0500 0875 0500 0500 0000 %0772 f08
007560 -00678 -00342 0000 0500 0500 1000 0500 0500 0000 %0773 f09
007973 002102 000784 1000 0375 0375 0000 0625 0625 0000 %0774 g01
007795 001411 000489 0875 0375 0375 0125 0625 0625 0000 %0775 g02
007681 000976 000292 0750 0375 0375 0250 0625 0625 0000 %0776 g03
007587 000591 000135 0625 0375 0375 0375 0625 0625 0000 %0777 g04
007513 000279 000011 0500 0375 0375 0500 0625 0625 0000 %0778 g05
007451 000011 -00088 0375 0375 0375 0625 0625 0625 0000 %0779 g06
007404 -00198 -00167 0250 0375 0375 0750 0625 0625 0000 %0780 g07
007366 -00365 -00230 0125 0375 0375 0875 0625 0625 0000 %0781 g08
007347 -00435 -00258 0000 0375 0375 1000 0625 0625 0000 %0782 g09
007815 002343 000909 1000 0250 0250 0000 0750 0750 0000 %0783 h01
007630 001661 000596 0875 0250 0250 0125 0750 0750 0000 %0784 h02
007513 001201 000401 0750 0250 0250 0250 0750 0750 0000 %0785 h03
007415 000813 000237 0625 0250 0250 0375 0750 0750 0000 %0786 h04
007338 000497 000111 0500 0250 0250 0500 0750 0750 0000 %0787 h05
007274 000223 000005 0375 0250 0250 0625 0750 0750 0000 %0788 h06
007226 000016 -00076 0250 0250 0250 0750 0750 0750 0000 %0789 h07
007185 -00154 -00141 0125 0250 0250 0875 0750 0750 0000 %0790 h08
007170 -00225 -00169 0000 0250 0250 1000 0750 0750 0000 %0791 h09
007685 002534 001054 1000 0125 0125 0000 0875 0875 0000 %0792 i01
007495 001841 000732 0875 0125 0125 0125 0875 0875 0000 %0793 i02
007373 001380 000528 0750 0125 0125 0250 0875 0875 0000 %0794 i03
007273 000990 000362 0625 0125 0125 0375 0875 0875 0000 %0795 i04
007195 000667 000232 0500 0125 0125 0500 0875 0875 0000 %0796 i05
007129 000391 000123 0375 0125 0125 0625 0875 0875 0000 %0797 i06
007080 000183 000040 0250 0125 0125 0750 0875 0875 0000 %0798 i07
007039 000010 -00026 0125 0125 0125 0875 0875 0875 0000 %0799 i08
007023 -00062 -00053 0000 0125 0125 1000 0875 0875 0000 %0800 i09
007635 002605 001117 1000 0000 0000 0000 1000 1000 0000 %0801 j01
007441 001907 000790 0875 0000 0000 0125 1000 1000 0000 %0802 j02
007318 001443 000584 0750 0000 0000 0250 1000 1000 0000 %0803 j03
007218 001044 000417 0625 0000 0000 0375 1000 1000 0000 %0804 j04
007139 000728 000285 0500 0000 0000 0500 1000 1000 0000 %0805 j05
007073 000459 000178 0375 0000 0000 0625 1000 1000 0000 %0806 j06
007022 000246 000093 0250 0000 0000 0750 1000 1000 0000 %0807 j07
006982 000072 000026 0125 0000 0000 0875 1000 1000 0000 %0808 j08
006966 000001 000000 0000 0000 0000 1000 1000 1000 0000 %0809 j09

009543 000000 000009 1000 1000 1000 0000 0000 0000 0000 %0810 b10
008887 000437 -01051 0875 0875 1000 0125 0125 0000 0000 %0811 b11
008470 000712 -01729 0750 0750 1000 0250 0250 0000 0000 %0812 b12
008139 000904 -02268 0625 0625 1000 0375 0375 0000 0000 %0813 b13
007867 001079 -02708 0500 0500 1000 0500 0500 0000 0000 %0814 b14
007625 001258 -03102 0375 0375 1000 0625 0625 0000 0000 %0815 b15
007423 001426 -03421 0250 0250 1000 0750 0750 0000 0000 %0816 b16
007259 001581 -03707 0125 0125 1000 0875 0875 0000 0000 %0817 b17
007194 001632 -03804 0000 0000 1000 1000 1000 0000 0000 %0818 b18
009483 -00395 001235 1000 1000 0875 0000 0000 0125 0000 %0819 c10
008818 000002 000180 0875 0875 0875 0125 0125 0125 0000 %0820 c11
008395 000241 -00497 0750 0750 0875 0250 0250 0125 0000 %0821 c12
008059 000413 -01036 0625 0625 0875 0375 0375 0125 0000 %0822 c13
007783 000563 -01474 0500 0500 0875 0500 0500 0125 0000 %0823 c14
007538 000727 -01869 0375 0375 0875 0625 0625 0125 0000 %0824 c15
007332 000887 -02200 0250 0250 0875 0750 0750 0125 0000 %0825 c16
007163 001012 -02457 0125 0125 0875 0875 0875 0125 0000 %0826 c17
007096 001063 -02555 0000 0000 0875 1000 1000 0125 0000 %0827 c18
009461 -00563 001785 1000 1000 0750 0000 0000 0250 0000 %0828 d10
008794 -00183 000726 0875 0875 0750 0125 0125 0250 0000 %0829 d11
008368 000042 000052 0750 0750 0750 0250 0250 0250 0000 %0830 d12
008030 000203 -00484 0625 0625 0750 0375 0375 0250 0000 %0831 d13
007753 000348 -00928 0500 0500 0750 0500 0500 0250 0000 %0832 d14
007506 000506 -01325 0375 0375 0750 0625 0625 0250 0000 %0833 d15
007298 000651 -01652 0250 0250 0750 0750 0750 0250 0000 %0834 d16
007130 000785 -01927 0125 0125 0750 0875 0875 0250 0000 %0835 d17
007062 000825 -02020 0000 0000 0750 1000 1000 0250 0000 %0836 d18
009446 -00697 002231 1000 1000 0625 0000 0000 0375 0000 %0837 e10
008775 -00336 001177 0875 0875 0625 0125 0125 0375 0000 %0838 e11
008349 -00116 000499 0750 0750 0625 0250 0250 0375 0000 %0839 e12
008009 000038 -00038 0625 0625 0625 0375 0375 0375 0000 %0840 e13
007731 000174 -00479 0500 0500 0625 0500 0500 0375 0000 %0841 e14
007483 000320 -00875 0375 0375 0625 0625 0625 0375 0000 %0842 e15
007274 000463 -01205 0250 0250 0625 0750 0750 0375 0000 %0843 e16
007104 000589 -01471 0125 0125 0625 0875 0875 0375 0000 %0844 e17
007037 000635 -01574 0000 0000 0625 1000 1000 0375 0000 %0845 e18
009432 -00811 002633 1000 1000 0500 0000 0000 0500 0000 %0846 f10
008759 -00464 001577 0875 0875 0500 0125 0125 0500 0000 %0847 f11
008333 -00253 000905 0750 0750 0500 0250 0250 0500 0000 %0848 f12
007992 -00108 000365 0625 0625 0500 0375 0375 0500 0000 %0849 f13
007713 000018 -00077 0500 0500 0500 0500 0500 0500 0000 %0850 f14
007464 000159 -00473 0375 0375 0500 0625 0625 0500 0000 %0851 f15
007255 000299 -00802 0250 0250 0500 0750 0750 0500 0000 %0852 f16
007084 000423 -01068 0125 0125 0500 0875 0875 0500 0000 %0853 f17
007017 000461 -01171 0000 0000 0500 1000 1000 0500 0000 %0854 f18
009421 -00920 003014 1000 1000 0375 0000 0000 0625 0000 %0855 g10
008748 -00586 001961 0875 0875 0375 0125 0125 0625 0000 %0856 g11
008319 -00386 001285 0750 0750 0375 0250 0250 0625 0000 %0857 g12
007977 -00250 000747 0625 0625 0375 0375 0375 0625 0000 %0858 g13
007697 -00124 000307 0500 0500 0375 0500 0500 0625 0000 %0859 g14
007446 000011 -00089 0375 0375 0375 0625 0625 0625 0000 %0860 g15
007237 000147 -00416 0250 0250 0375 0750 0750 0625 0000 %0861 g16
007065 000260 -00679 0125 0125 0375 0875 0875 0625 0000 %0862 g17
006999 000304 -00791 0000 0000 0375 1000 1000 0625 0000 %0863 g18
009412 -01016 003351 1000 1000 0250 0000 0000 0750 0000 %0864 h10
008737 -00686 002299 0875 0875 0250 0125 0125 0750 0000 %0865 h11
008307 -00492 001622 0750 0750 0250 0250 0250 0750 0000 %0866 h12
007964 -00363 001088 0625 0625 0250 0375 0375 0750 0000 %0867 h13
007684 -00249 000648 0500 0500 0250 0500 0500 0750 0000 %0868 h14
007433 -00118 000256 0375 0375 0250 0625 0625 0750 0000 %0869 h15
007223 000010 -00075 0250 0250 0250 0750 0750 0750 0000 %0870 h16
007052 000132 -00347 0125 0125 0250 0875 0875 0750 0000 %0871 h17
006984 000169 -00450 0000 0000 0250 1000 1000 0750 0000 %0872 h18
009405 -01098 003668 1000 1000 0125 0000 0000 0875 0000 %0873 i10
008728 -00788 002615 0875 0875 0125 0125 0125 0875 0000 %0874 i11
008297 -00601 001941 0750 0750 0125 0250 0250 0875 0000 %0875 i12
007954 -00472 001406 0625 0625 0125 0375 0375 0875 0000 %0876 i13
007672 -00363 000968 0500 0500 0125 0500 0500 0875 0000 %0877 i14
007420 -00235 000573 0375 0375 0125 0625 0625 0875 0000 %0878 i15
007211 -00106 000245 0250 0250 0125 0750 0750 0875 0000 %0879 i16
007039 000007 -00023 0125 0125 0125 0875 0875 0875 0000 %0880 i17
006971 000051 -00130 0000 0000 0125 1000 1000 0875 0000 %0881 i18
009401 -01130 003795 1000 1000 0000 0000 0000 1000 0000 %0882 j10
008723 -00828 002740 0875 0875 0000 0125 0125 1000 0000 %0883 j11
008291 -00643 002068 0750 0750 0000 0250 0250 1000 0000 %0884 j12
007948 -00519 001534 0625 0625 0000 0375 0375 1000 0000 %0885 j13
007667 -00408 001096 0500 0500 0000 0500 0500 1000 0000 %0886 j14
007415 -00284 000704 0375 0375 0000 0625 0625 1000 0000 %0887 j15
007205 -00156 000376 0250 0250 0000 0750 0750 1000 0000 %0888 j16
007033 -00040 000106 0125 0125 0000 0875 0875 1000 0000 %0889 j17
006965 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0890 j18

009542 -00002 000005 1000 1000 1000 0000 0000 0000 0000 %0891 b19
009030 001036 -00812 1000 0875 1000 0000 0125 0000 0000 %0892 b20
008718 001704 -01308 1000 0750 1000 0000 0250 0000 0000 %0893 b21
008483 002232 -01683 1000 0625 1000 0000 0375 0000 0000 %0894 b22
008293 002671 -01987 1000 0500 1000 0000 0500 0000 0000 %0895 b23
008126 003072 -02257 1000 0375 1000 0000 0625 0000 0000 %0896 b24
007986 003405 -02476 1000 0250 1000 0000 0750 0000 0000 %0897 b25
007874 003684 -02657 1000 0125 1000 0000 0875 0000 0000 %0898 b26
007831 003786 -02724 1000 0000 1000 0000 1000 0000 0000 %0899 b27
009350 -01023 001012 0875 1000 0875 0125 0000 0125 0000 %0900 c19
008817 000000 000179 0875 0875 0875 0125 0125 0125 0000 %0901 c20
008493 000663 -00333 0875 0750 0875 0125 0250 0125 0000 %0902 c21
008247 001196 -00720 0875 0625 0875 0125 0375 0125 0000 %0903 c22
008049 001629 -01030 0875 0500 0875 0125 0500 0125 0000 %0904 c23
007873 002030 -01305 0875 0375 0875 0125 0625 0125 0000 %0905 c24
007727 002376 -01536 0875 0250 0875 0125 0750 0125 0000 %0906 c25
007608 002654 -01714 0875 0125 0875 0125 0875 0125 0000 %0907 c26
007562 002761 -01779 0875 0000 0875 0125 1000 0125 0000 %0908 c27
009244 -01629 001421 0750 1000 0750 0250 0000 0250 0000 %0909 d19
008699 -00614 000571 0750 0875 0750 0250 0125 0250 0000 %0910 d20
008366 000045 000052 0750 0750 0750 0250 0250 0250 0000 %0911 d21
008113 000566 -00343 0750 0625 0750 0250 0375 0250 0000 %0912 d22
007912 001009 -00663 0750 0500 0750 0250 0500 0250 0000 %0913 d23
007730 001412 -00945 0750 0375 0750 0250 0625 0250 0000 %0914 d24
007579 001755 -01179 0750 0250 0750 0250 0750 0250 0000 %0915 d25
007457 002037 -01365 0750 0125 0750 0250 0875 0250 0000 %0916 d26
007410 002145 -01431 0750 0000 0750 0250 1000 0250 0000 %0917 d27
009159 -02139 001753 0625 1000 0625 0375 0000 0375 0000 %0918 e19
008604 -01137 000893 0625 0875 0625 0375 0125 0375 0000 %0919 e20
008265 -00486 000363 0625 0750 0625 0375 0250 0375 0000 %0920 e21
008007 000034 -00038 0625 0625 0625 0375 0375 0375 0000 %0921 e22
007800 000475 -00363 0625 0500 0625 0375 0500 0375 0000 %0922 e23
007615 000874 -00650 0625 0375 0625 0375 0625 0375 0000 %0923 e24
007461 001216 -00891 0625 0250 0625 0375 0750 0375 0000 %0924 e25
007336 001510 -01086 0625 0125 0625 0375 0875 0375 0000 %0925 e26
007287 001611 -01152 0625 0000 0625 0375 1000 0375 0000 %0926 e27
009092 -02565 002066 0500 1000 0500 0500 0000 0500 0000 %0927 f19
008529 -01581 001194 0500 0875 0500 0500 0125 0500 0000 %0928 f20
008186 -00935 000659 0500 0750 0500 0500 0250 0500 0000 %0929 f21
007923 -00416 000250 0500 0625 0500 0500 0375 0500 0000 %0930 f22
007712 000018 -00078 0500 0500 0500 0500 0500 0500 0000 %0931 f23
007524 000422 -00372 0500 0375 0500 0500 0625 0500 0000 %0932 f24
007366 000761 -00614 0500 0250 0500 0500 0750 0500 0000 %0933 f25
007238 001045 -00810 0500 0125 0500 0500 0875 0500 0000 %0934 f26
007188 001155 -00883 0500 0000 0500 0500 1000 0500 0000 %0935 f27
009037 -02945 002374 0375 1000 0375 0625 0000 0625 0000 %0936 g19
008466 -01972 001494 0375 0875 0375 0625 0125 0625 0000 %0937 g20
008118 -01337 000954 0375 0750 0375 0625 0250 0625 0000 %0938 g21
007852 -00820 000543 0375 0625 0375 0625 0375 0625 0000 %0939 g22
007638 -00386 000209 0375 0500 0375 0625 0500 0625 0000 %0940 g23
007446 000011 -00089 0375 0375 0375 0625 0625 0625 0000 %0941 g24
007286 000357 -00336 0375 0250 0375 0625 0750 0625 0000 %0942 g25
007156 000638 -00535 0375 0125 0375 0625 0875 0625 0000 %0943 g26
007106 000748 -00609 0375 0000 0375 0625 1000 0625 0000 %0944 g27
008993 -03258 002657 0250 1000 0250 0750 0000 0750 0000 %0945 h19
008417 -02296 001771 0250 0875 0250 0750 0125 0750 0000 %0946 h20
008064 -01665 001225 0250 0750 0250 0750 0250 0750 0000 %0947 h21
007796 -01156 000811 0250 0625 0250 0750 0375 0750 0000 %0948 h22
007579 -00724 000475 0250 0500 0250 0750 0500 0750 0000 %0949 h23
007385 -00328 000175 0250 0375 0250 0750 0625 0750 0000 %0950 h24
007222 000012 -00074 0250 0250 0250 0750 0750 0750 0000 %0951 h25
007092 000302 -00281 0250 0125 0250 0750 0875 0750 0000 %0952 h26
007041 000415 -00361 0250 0000 0250 0750 1000 0750 0000 %0953 h27
008959 -03527 002931 0125 1000 0125 0875 0000 0875 0000 %0954 i19
008375 -02568 002034 0125 0875 0125 0875 0125 0875 0000 %0955 i20
008020 -01946 001488 0125 0750 0125 0875 0250 0875 0000 %0956 i21
007749 -01434 001067 0125 0625 0125 0875 0375 0875 0000 %0957 i22
007530 -01014 000732 0125 0500 0125 0875 0500 0875 0000 %0958 i23
007335 -00620 000431 0125 0375 0125 0875 0625 0875 0000 %0959 i24
007172 -00279 000181 0125 0250 0125 0875 0750 0875 0000 %0960 i25
007039 000009 -00025 0125 0125 0125 0875 0875 0875 0000 %0961 i26
006987 000121 -00106 0125 0000 0125 0875 1000 0875 0000 %0962 i27
008944 -03625 003042 0000 1000 0000 1000 0000 1000 0000 %0963 j19
008356 -02675 002141 0000 0875 0000 1000 0125 1000 0000 %0964 j20
008000 -02054 001591 0000 0750 0000 1000 0250 1000 0000 %0965 j21
007728 -01550 001173 0000 0625 0000 1000 0375 1000 0000 %0966 j22
007509 -01128 000837 0000 0500 0000 1000 0500 1000 0000 %0967 j23
007314 -00736 000536 0000 0375 0000 1000 0625 1000 0000 %0968 j24
007150 -00396 000284 0000 0250 0000 1000 0750 1000 0000 %0969 j25
007017 -00110 000079 0000 0125 0000 1000 0875 1000 0000 %0970 j26
006966 000000 -00001 0000 0000 0000 1000 1000 1000 0000 %0971 j27

%JE060-7A, Page 65 /66, LAB*la7; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
%LAB*la7, D65, adapted, Y = 40.32 , L* = 69.69 
%100 x LAB*a          %#1000 x (r g b  c m y 0)            %nr.  pos
%z007631 002591 001110 %#1000 0000 0000 0000 1000 1000 0000 %0648 S19 %O1 0
%z009405 -01128 003798 %#1000 1000 0000 0000 0000 1000 0000 %0720 a19 %Y1 1
%z008949 -03632 003051 %#0000 1000 0000 1000 0000 1000 0000 %0072 I01 %L1 2
%z009102 -02206 -00720 %#0000 1000 1000 1000 0000 0000 0000 %0080 I09 %C1 3
%z007195 001623 -03798 %#0000 0000 1000 1000 1000 0000 0000 %0008 A09 %V1 4
%z007828 003773 -02719 %#1000 0000 1000 0000 1000 0000 0000 %0656 S27 %M1 5
%z006966 000001 000000 %#0000 0000 0000 1000 1000 1000 0000 %0000 A01 %N1 6
%z009546 -00001 000014 %#1000 1000 1000 0000 0000 0000 0000 %0728 a27 %W1 7
%$
%z007635 002605 001117 %#1000 0000 0000 0000 1000 1000 0000 %0801 j01 %O2 0
%z009401 -01130 003795 %#1000 1000 0000 0000 0000 1000 0000 %0882 j10 %Y2 1
%z008944 -03625 003042 %#0000 1000 0000 1000 0000 1000 0000 %0963 j19 %L2 2
%z009110 -02202 -00726 %#0000 1000 1000 1000 0000 0000 0000 %0737 b09 %C2 3
%z007194 001632 -03804 %#0000 0000 1000 1000 1000 0000 0000 %0818 b18 %V2 4
%z007831 003786 -02724 %#1000 0000 1000 0000 1000 0000 0000 %0899 b27 %M2 5
%z006966 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0809 j09 %N2 6
%z009548 000000 000013 %#1000 1000 1000 0000 0000 0000 0000 %0729 b01 %W2 7
%$

%JE060-7A, Page 66 /66, LAB*la7; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
%100 x LAB*          1000 x (r g b  c m y 0)            %nr.  pos
006966 -00004 000000 0000 0000 0000 1000 1000 1000 0000 %0972 k01
007039 000009 -00026 0125 0125 0125 0875 0875 0875 0000 %0973 k02
007222 000015 -00075 0250 0250 0250 0750 0750 0750 0000 %0974 k03
007445 000009 -00088 0375 0375 0375 0625 0625 0625 0000 %0975 k04
007711 000015 -00077 0500 0500 0500 0500 0500 0500 0000 %0976 k05
008007 000036 -00038 0625 0625 0625 0375 0375 0375 0000 %0977 k06
008366 000040 000050 0750 0750 0750 0250 0250 0250 0000 %0978 k07
008816 -00002 000176 0875 0875 0875 0125 0125 0125 0000 %0979 k08
009541 -00002 000002 1000 1000 1000 0000 0000 0000 0000 %0980 k09
006965 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0981 l01
007039 000007 -00025 0125 0125 0125 0875 0875 0875 0000 %0982 l02
007222 000015 -00075 0250 0250 0250 0750 0750 0750 0000 %0983 l03
007445 000011 -00089 0375 0375 0375 0625 0625 0625 0000 %0984 l04
007711 000017 -00078 0500 0500 0500 0500 0500 0500 0000 %0985 l05
008007 000038 -00041 0625 0625 0625 0375 0375 0375 0000 %0986 l06
008366 000040 000052 0750 0750 0750 0250 0250 0250 0000 %0987 l07
008816 -00004 000177 0875 0875 0875 0125 0125 0125 0000 %0988 l08
009540 -00002 000002 1000 1000 1000 0000 0000 0000 0000 %0989 l09
006966 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0990 m01
007038 000009 -00026 0125 0125 0125 0875 0875 0875 0000 %0991 m02
007222 000015 -00075 0250 0250 0250 0750 0750 0750 0000 %0992 m03
007445 000007 -00087 0375 0375 0375 0625 0625 0625 0000 %0993 m04
007711 000016 -00078 0500 0500 0500 0500 0500 0500 0000 %0994 m05
008007 000035 -00039 0625 0625 0625 0375 0375 0375 0000 %0995 m06
008366 000040 000052 0750 0750 0750 0250 0250 0250 0000 %0996 m07
008816 000000 000177 0875 0875 0875 0125 0125 0125 0000 %0997 m08
009540 -00005 000004 1000 1000 1000 0000 0000 0000 0000 %0998 m09
006966 000000 000000 0000 0000 0000 1000 1000 1000 0000 %0999 n01
007039 000009 -00023 0125 0125 0125 0875 0875 0875 0000 %1000 n02
007222 000015 -00075 0250 0250 0250 0750 0750 0750 0000 %1001 n03
007445 000008 -00088 0375 0375 0375 0625 0625 0625 0000 %1002 n04
007711 000014 -00079 0500 0500 0500 0500 0500 0500 0000 %1003 n05
008007 000035 -00039 0625 0625 0625 0375 0375 0375 0000 %1004 n06
008366 000042 000051 0750 0750 0750 0250 0250 0250 0000 %1005 n07
008816 -00002 000178 0875 0875 0875 0125 0125 0125 0000 %1006 n08
009540 -00005 000001 1000 1000 1000 0000 0000 0000 0000 %1007 n09
006965 000000 000000 0000 0000 0000 1000 1000 1000 0000 %1008 k10
006978 000003 -00001 0066 0066 0066 0933 0933 0933 0000 %1009 k11
007047 000011 -00031 0133 0133 0133 0866 0866 0866 0000 %1010 k12
007152 000011 -00068 0200 0200 0200 0800 0800 0800 0000 %1011 k13
007247 000014 -00065 0266 0266 0266 0333 0333 0333 0000 %1012 k14
007360 000024 -00086 0333 0333 0333 0666 0666 0666 0000 %1013 k15
007488 000015 -00088 0400 0400 0400 0600 0600 0600 0000 %1014 k16
007636 000011 -00083 0466 0466 0466 0533 0533 0533 0000 %1015 k17
007781 000029 -00088 0533 0533 0533 0466 0466 0466 0000 %1016 k18
007945 000038 -00060 0600 0600 0600 0400 0400 0400 0000 %1017 k19
008125 000037 -00026 0666 0666 0666 0333 0333 0333 0000 %1018 k20
008319 000040 000026 0734 0734 0734 0266 0266 0266 0000 %1019 k21
008542 000034 000098 0800 0800 0800 0200 0200 0200 0000 %1020 k22
008788 000015 000167 0866 0866 0866 0133 0133 0133 0000 %1021 k23
009091 -00017 000279 0933 0933 0933 0066 0066 0066 0000 %1022 k24
009541 -00002 000002 1000 1000 1000 0000 0000 0000 0000 %1023 k25
006966 000000 000000 0000 0000 0000 1000 1000 1000 0000 %1024 l10
006980 000004 -00001 0066 0066 0066 0933 0933 0933 0000 %1025 l11
007048 000013 -00030 0133 0133 0133 0866 0866 0866 0000 %1026 l12
007153 000008 -00066 0200 0200 0200 0800 0800 0800 0000 %1027 l13
007248 000017 -00068 0266 0266 0266 0333 0333 0333 0000 %1028 l14
007362 000018 -00086 0333 0333 0333 0666 0666 0666 0000 %1029 l15
007490 000016 -00089 0400 0400 0400 0600 0600 0600 0000 %1030 l16
007637 000013 -00080 0466 0466 0466 0533 0533 0533 0000 %1031 l17
007784 000030 -00085 0533 0533 0533 0466 0466 0466 0000 %1032 l18
007947 000034 -00058 0600 0600 0600 0400 0400 0400 0000 %1033 l19
008127 000035 -00025 0666 0666 0666 0333 0333 0333 0000 %1034 l20
008322 000044 000026 0734 0734 0734 0266 0266 0266 0000 %1035 l21
008545 000034 000098 0800 0800 0800 0200 0200 0200 0000 %1036 l22
008791 000013 000168 0866 0866 0866 0133 0133 0133 0000 %1037 l23
009092 -00017 000282 0933 0933 0933 0066 0066 0066 0000 %1038 l24
009542 -00002 000005 1000 1000 1000 0000 0000 0000 0000 %1039 l25
006966 000000 000000 0000 0000 0000 1000 1000 1000 0000 %1040 m10
006978 000003 -00001 0066 0066 0066 0933 0933 0933 0000 %1041 m11
007048 000011 -00031 0133 0133 0133 0866 0866 0866 0000 %1042 m12
007152 000008 -00067 0200 0200 0200 0800 0800 0800 0000 %1043 m13
007248 000012 -00066 0266 0266 0266 0333 0333 0333 0000 %1044 m14
007361 000018 -00086 0333 0333 0333 0666 0666 0666 0000 %1045 m15
007488 000015 -00089 0400 0400 0400 0600 0600 0600 0000 %1046 m16
007637 000015 -00082 0466 0466 0466 0533 0533 0533 0000 %1047 m17
007782 000033 -00088 0533 0533 0533 0466 0466 0466 0000 %1048 m18
007945 000035 -00059 0600 0600 0600 0400 0400 0400 0000 %1049 m19
008126 000032 -00024 0666 0666 0666 0333 0333 0333 0000 %1050 m20
008321 000039 000026 0734 0734 0734 0266 0266 0266 0000 %1051 m21
008544 000036 000096 0800 0800 0800 0200 0200 0200 0000 %1052 m22

008790 000015 000167 0866 0866 0866 0133 0133 0133 0000 %1053 m23
009092 -00017 000282 0933 0933 0933 0066 0066 0066 0000 %1054 m24
009542 -00002 000002 1000 1000 1000 0000 0000 0000 0000 %1055 m25
006966 000000 000000 0000 0000 0000 1000 1000 1000 0000 %1056 n10
006980 000004 -00002 0066 0066 0066 0933 0933 0933 0000 %1057 n11
007048 000010 -00032 0133 0133 0133 0866 0866 0866 0000 %1058 n12
007152 000006 -00066 0200 0200 0200 0800 0800 0800 0000 %1059 n13
007247 000018 -00068 0266 0266 0266 0333 0333 0333 0000 %1060 n14
007360 000021 -00087 0333 0333 0333 0666 0666 0666 0000 %1061 n15
007488 000018 -00089 0400 0400 0400 0600 0600 0600 0000 %1062 n16
007635 000014 -00083 0466 0466 0466 0533 0533 0533 0000 %1063 n17
007782 000018 -00079 0533 0533 0533 0466 0466 0466 0000 %1064 n18
007945 000035 -00059 0600 0600 0600 0400 0400 0400 0000 %1065 n19
008126 000035 -00025 0666 0666 0666 0333 0333 0333 0000 %1066 n20
008321 000042 000025 0734 0734 0734 0266 0266 0266 0000 %1067 n21
008543 000036 000096 0800 0800 0800 0200 0200 0200 0000 %1068 n22
008788 000017 000165 0866 0866 0866 0133 0133 0133 0000 %1069 n23
009092 -00017 000279 0933 0933 0933 0066 0066 0066 0000 %1070 n24
009541 -00005 000001 1000 1000 1000 0000 0000 0000 0000 %1071 n25
006966 000000 000000 0000 0000 0000 1000 1000 1000 0000 %1072 k26
009540 000000 000000 1000 1000 1000 0000 0000 0000 0000 %1073 k27
007634 002603 001114 1000 0000 0000 0000 1000 1000 0000 %1074 l26
009097 -02185 -00743 0000 1000 1000 1000 0000 0000 0000 %1075 l27
009400 -01130 003793 1000 1000 0000 0000 0000 1000 0000 %1076 m26
007195 001635 -03809 0000 0000 1000 1000 1000 0000 0000 %1077 m27
008951 -03639 003050 0000 1000 0000 1000 0000 1000 0000 %1078 n26
007831 003792 -02730 1000 0000 1000 0000 1000 0000 0000 %1079 n27
%$
%z007634 002603 001114 %#1000 0000 0000 0000 1000 1000 0000 %1074 l26 %O3 0
%z009400 -01130 003793 %#1000 1000 0000 0000 0000 1000 0000 %1076 m26 %Y3 1
%z008951 -03639 003050 %#0000 1000 0000 1000 0000 1000 0000 %1078 n26 %L3 2
%z009097 -02185 -00743 %#0000 1000 1000 1000 0000 0000 0000 %1075 l27 %C3 3
%z007195 001635 -03809 %#0000 0000 1000 1000 1000 0000 0000 %1077 m27 %V3 4
%z007831 003792 -02730 %#1000 0000 1000 0000 1000 0000 0000 %1079 n27 %M3 5
%z006966 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %1072 k26 %N3 6
%z009540 000000 000000 %#1000 1000 1000 0000 0000 0000 0000 %1073 k27 %W3 7
%$
%z006966 -00002 000000 %#0000 0000 0000 1000 1000 1000 0000 %0972 k01 %N4 6
%z009541 -00002 000002 %#1000 1000 1000 0000 0000 0000 0000 %0980 k09 %W4 7
%$
%z006966 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0981 l01 %N5 6
%z009541 -00002 000003 %#1000 1000 1000 0000 0000 0000 0000 %0989 l09 %W5 7
%$
%z006966 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0990 m01 %N6 6
%z009541 -00003 000003 %#1000 1000 1000 0000 0000 0000 0000 %0998 m09 %W6 7
%$
%z006966 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0999 n01 %N7 6
%z009541 -00005 000001 %#1000 1000 1000 0000 0000 0000 0000 %1007 n09 %W7 7
%$ la7_line 12595
] def

%****************************************************************************

/LAB*Fa0100 [
%JE060-7A, Page 65 /66, LAB*la7; cf1=1.00; nt=0.18; nx=1.0; LECD_08_95, adapted
%LAB*la7, D65, adapted, Y = 40.32 , L* = 69.69 
%100 x LAB*a          %#1000 x (r g b  c m y 0)            %nr.  pos
%z007631 002591 001110 %#1000 0000 0000 0000 1000 1000 0000 %0648 S19 %O1 0
%z009405 -01128 003798 %#1000 1000 0000 0000 0000 1000 0000 %0720 a19 %Y1 1
%z008949 -03632 003051 %#0000 1000 0000 1000 0000 1000 0000 %0072 I01 %L1 2
%z009102 -02206 -00720 %#0000 1000 1000 1000 0000 0000 0000 %0080 I09 %C1 3
%z007195 001623 -03798 %#0000 0000 1000 1000 1000 0000 0000 %0008 A09 %V1 4
%z007828 003773 -02719 %#1000 0000 1000 0000 1000 0000 0000 %0656 S27 %M1 5
%z006966 000001 000000 %#0000 0000 0000 1000 1000 1000 0000 %0000 A01 %N1 6
%z009546 -00001 000014 %#1000 1000 1000 0000 0000 0000 0000 %0728 a27 %W1 7
%$
007635 002605 001117 %#1000 0000 0000 0000 1000 1000 0000 %0801 j01 %O2 0
009401 -01130 003795 %#1000 1000 0000 0000 0000 1000 0000 %0882 j10 %Y2 1
008944 -03625 003042 %#0000 1000 0000 1000 0000 1000 0000 %0963 j19 %L2 2
009110 -02202 -00726 %#0000 1000 1000 1000 0000 0000 0000 %0737 b09 %C2 3
007194 001632 -03804 %#0000 0000 1000 1000 1000 0000 0000 %0818 b18 %V2 4
007831 003786 -02724 %#1000 0000 1000 0000 1000 0000 0000 %0899 b27 %M2 5
006966 000000 000000 %#0000 0000 0000 1000 1000 1000 0000 %0809 j09 %N2 6
009548 000000 000013 %#1000 1000 1000 0000 0000 0000 0000 %0729 b01 %W2 7
%$
] def
            } if %xcolor 7, LAB*la7

%*************************************************************************

0 1 23 {/i exch def
        LAB*FaG0100 i LAB*Fa0100 i get 100 div put
        LAB*FaG1100 i LAB*Fa0100 i get 100 div put %identical, no L-data
       } for

0 1 05 {/i exch def %i=0,5
        /A*Fa LAB*FaG0100 i 3 mul 1 add get def
        /B*Fa LAB*FaG0100 i 3 mul 2 add get def
        /H*Fa B*Fa A*Fa 0.0001 add atan def
        angle_olvG01 i H*Fa put
        i 0 eq {angle_olvG01 6 H*Fa 360 add put} if
        
        /A*Fa LAB*FaG1100 i 3 mul 1 add get def
        /B*Fa LAB*FaG1100 i 3 mul 2 add get def
        /H*Fa B*Fa A*Fa 0.0001 add atan def
        angle_olvG11 i H*Fa put
        i 0 eq {angle_olvG11 6 H*Fa 360 add put} if
       } for %i=0,5

0 1 5 {/i exch def /i1 i 1 add def %i=0,5       
       /angle_olvG01_dif angle_olvG01 i1 get angle_olvG01 i get sub def
       angle_olvG01i i angle_olvG01 i get put
       angle_olvG01i i 07 add angle_olvG01 i get angle_olvG01_dif 0.00 mul add put
       angle_olvG01i i 14 add angle_olvG01 i get angle_olvG01_dif 0.00 mul add put
       angle_olvG01i i 21 add angle_olvG01 i get angle_olvG01_dif 0.00 mul add put
       
       /angle_olvG11_dif angle_olvG11 i1 get angle_olvG11 i get sub def
       angle_olvG11i i angle_olvG11 i get put
       angle_olvG11i i 07 add angle_olvG11 i get angle_olvG11_dif 0.00 mul add put
       angle_olvG11i i 14 add angle_olvG11 i get angle_olvG11_dif 0.00 mul add put
       angle_olvG11i i 21 add angle_olvG11 i get angle_olvG11_dif 0.00 mul add put
      } for %i=0,5

/LAB*02 24 array def
/j0 0 def
729 1 971 {/jj exch def %jj=729,971
           /j jj j0 sub def
           %necessary in both cases
         jj 963 eq {%RGB*02 02 RGBCMY0*tx j get put %963 0-8-0 L 2
                   LAB*02 06 LUT j 10 mul 0 add get put
                   LAB*02 07 LUT j 10 mul 1 add get put
                   LAB*02 08 LUT j 10 mul 2 add get put} if
         jj 737 eq {%RGB*02 03 RGBCMY0*tx j get put %737 0-8-8 C 3
                   LAB*02 09 LUT j 10 mul 0 add get put
                   LAB*02 10 LUT j 10 mul 1 add get put
                   LAB*02 11 LUT j 10 mul 2 add get put} if
         jj 818 eq {%RGB*02 04 RGBCMY0*tx j get put %818 0-0-8 V 4
                   LAB*02 12 LUT j 10 mul 0 add get put
                   LAB*02 13 LUT j 10 mul 1 add get put
                   LAB*02 14 LUT j 10 mul 2 add get put} if
         jj 809 eq {%RGB*02 06 RGBCMY0*tx j get put %809 or 890 or 971 0-0-0 N 6
                   LAB*02 18 LUT j          10 mul 0 add get
                             LUT 890 j0 sub 10 mul 0 add get add
                             LUT 971 j0 sub 10 mul 0 add get add 3 div put
                   LAB*02 19 LUT j          10 mul 1 add get
                             LUT 890 j0 sub 10 mul 1 add get add
                             LUT 971 j0 sub 10 mul 1 add get add 3 div put
                   LAB*02 20 LUT j          10 mul 2 add get
                             LUT 890 j0 sub 10 mul 2 add get add
                             LUT 971 j0 sub 10 mul 2 add get add 3 div put} if
         jj 801 eq {%RGB*02 00 RGBCMY0*tx j get put %801 8-0-0 O 0
                   LAB*02 00 LUT j 10 mul 0 add get put
                   LAB*02 01 LUT j 10 mul 1 add get put
                   LAB*02 02 LUT j 10 mul 2 add get put} if
         jj 882 eq {%RGB*02 01 RGBCMY0*tx j get put %882 8-8-0 Y 1
                   LAB*02 03 LUT j 10 mul 0 add get put
                   LAB*02 04 LUT j 10 mul 1 add get put
                   LAB*02 05 LUT j 10 mul 2 add get put} if
         jj 899 eq {%RGB*02 05 RGBCMY0*tx j get put %899 8-0-8 M 5
                   LAB*02 15 LUT j 10 mul 0 add get put
                   LAB*02 16 LUT j 10 mul 1 add get put
                   LAB*02 17 LUT j 10 mul 2 add get put} if
         jj 729 eq {%RGB*02 07 RGBCMY0*tx j get put %729 or 810 or 891 8-8-8 W 7
                   LAB*02 21 LUT j          10 mul 0 add get
                             LUT 810 j0 sub 10 mul 0 add get add
                             LUT 891 j0 sub 10 mul 0 add get add 3 div put
                   LAB*02 22 LUT j          10 mul 1 add get
                             LUT 810 j0 sub 10 mul 1 add get add
                             LUT 891 j0 sub 10 mul 1 add get add 3 div put
                   LAB*02 23 LUT j          10 mul 2 add get
                             LUT 810 j0 sub 10 mul 2 add get add
                             LUT 891 j0 sub 10 mul 2 add get add 3 div put} if
        } for %jj=729,971


0 1 23 {/j exch def %j=0,23
        LAB*02 j LAB*02 j get 100 div put
       } for %j=0,23

/ISRL*ioL 0 def %standard colours
/ISIO*ioL 2 def %special for LAB*02 TLS70


LAB*ioLmod

0 1 1 {/ibild exch def %ibild=0,1

ibild 0 eq {%BEG ibild=0
0 1 05 {/ic exch def %ic=0,11
        S1 20 add yu2 yd ic mul sub moveto
        ( ) nshow
        N*olv ic ColNames ic get put
       } for %ic=0,11
0 1 05 {/i exch def %i=0,11
       /ya yu2 yd i mul sub def
       /L*Fa LAB*a i 3 mul get def
       /A*Fa LAB*a i 3 mul 1 add get def
       /B*Fa LAB*a i 3 mul 2 add get def
       /C*Fa A*Fa dup mul B*Fa dup mul add sqrt def
       /H*Fa B*Fa A*Fa 0.0001 add atan def
       L*olv i L*Fa put
       A*olv i A*Fa put
       B*olv i B*Fa put
       C*olv i C*Fa put
       H*olv i H*Fa put
       o*olv i o3Ma i get put
       l*olv i l3Ma i get put
       v*olv i v3Ma i get put
       i 5 eq {L*olv 6 L*olv 0 get put
               A*olv 6 A*olv 0 get put
               B*olv 6 B*olv 0 get put
               A*olv 6 A*olv 0 get put
               C*olv 6 C*olv 0 get put
               H*olv 6 H*olv 0 get put
               o*olv 6 o*olv 0 get put
               l*olv 6 l*olv 0 get put
               v*olv 6 v*olv 0 get put
              } if
       
       } for %i=0,11
        }%END ibild=0
        {%BEG ibild=1
12 2 27 {/ic exch def %ic=12,27
         N*rgb ic 12 sub 2 idiv ColNames ic get put
        } for %ic=12,27

%calculation of intermediate elementary colours
%/proc_LAB*Fae_LAB*MaeNTABl_olvi3*cmyn3*Ma*ioL {
%BEG procedure proc_LAB*Fae_LAB*MaeNTABl_olvi3*cmyn3*Ma*ioL
%only for calculation without hue tables

%input  LAB*Fae
%input  LAB*a (4 adapted colours RJGB, No. 8 to 11)
%input  nLAB*s0 (colour white N for calculation of lab*l)
%input  wLAB*s0 (colour white W for achromatic axis)

%output LAB*Mae
%output olvi3*Mae
%output cmyn3*Mae

0 1 3 {/j exch def %j=0,3
       /L*Fae0 LAB*a j 8 add 3 mul 0 add get def
       /A*Fae0 LAB*a j 8 add 3 mul 1 add get def
       /B*Fae0 LAB*a j 8 add 3 mul 2 add get def
       /H*Fae0 B*Fae0 A*Fae0 0.0001 add atan def
       j 2 le {/L*Fae1 LAB*a j 1 add 8 add 3 mul 0 add get def
               /A*Fae1 LAB*a j 1 add 8 add 3 mul 1 add get def
               /B*Fae1 LAB*a j 1 add 8 add 3 mul 2 add get def
               /H*Fae1 B*Fae1 A*Fae1 0.0001 add atan def
              }
              {/L*Fae1 LAB*a 0       8 add 3 mul 0 add get def
               /A*Fae1 LAB*a 0       8 add 3 mul 1 add get def
               /B*Fae1 LAB*a 0       8 add 3 mul 2 add get def
               /H*Fae1 B*Fae1 A*Fae1 0.0001 add atan 360 add def
              } ifelse
0 1 1 {/i exch def %i=0,3
       /n j 2 mul i add def
       /ya yu2 yd n mul sub 8000 add def
       /alph i 2 div def /beta 1 alph sub def
       /L*Fae L*Fae0 beta mul L*Fae1 alph mul add def
       /H*Fae H*Fae0 beta mul H*Fae1 alph mul add def
       /A*Fae 100 H*Fae cos mul def
       /B*Fae 100 H*Fae sin mul def
       
       proc_LAB*Fae_LAB*MaeNTABl_olvi3*cmyn3*Ma*ioL
       
         n 0 ge {/ineu n       def} if
         n 2 ge {/ineu n 1 sub def} if
         n 4 ge {/ineu n 2 sub def} if
         L*rgb ineu L*Mae put
         A*rgb ineu A*Mae put
         B*rgb ineu B*Mae put
         C*rgb ineu C*Mae put
         H*rgb ineu H*Mae put
         n 7 eq {/ineu 6 def %ineu=6
         L*rgb ineu L*rgb 0 get put
         A*rgb ineu A*rgb 0 get put
         B*rgb ineu B*rgb 0 get put
         C*rgb ineu C*rgb 0 get put
         H*rgb ineu H*rgb 0 get put
                 } if %ineu=6

      } for %i=0,1 
      
      } for %j=0,3 
        
        } ifelse %END ibild=1

} for %ibild=0,1

%00 1 15 {/xchart exch def %xchart=0,15

 /xchartl 2 def

200 /Times-ISOL1 FS
0 setgray
%100 -200 moveto (AG780-7A: ) show
%(Messung: ) showde
%(Measurement: ) showen
%FileData show
%lanind eq {FileDatade show} {FileDataen show} ifelse
%(, Page ) showen (, Seite ) showde
%xcolor 1 add cvishow (/8) show

20 setlinewidth
%0 0 25000 17100 1.0 1.0 1.0 colrecfi %area white grey

%0 0 25000 17100 0.0 0.0 0.0 colrecst %Rahmen Schwarz

%0 1 15 {/xchartl   exch def %xchartl=0,11

%special space for 'xm03'PROZ0.COM 2x before/after xchartl
%  xchartl   0 eq {  100 13000 translate} if
%  xchartl   1 eq { 6100 13000 translate} if
%  xchartl   2 eq {  100 08750 translate} if
%  xchartl   3 eq { 6100 08750 translate} if

%  xchartl   4 eq {  100  4500 translate} if
%  xchartl   5 eq { 6100  4500 translate} if
%  xchartl   6 eq {  100  0250 translate} if
%  xchartl   7 eq { 6100  0250 translate} if

%  xchartl   8 eq {13500 13000 translate} if
%  xchartl   9 eq {19500 13000 translate} if
%  xchartl   10 eq {13500 08750 translate} if
%  xchartl   11 eq {19500 08750 translate} if

%  xchartl   12 eq {13500  4500 translate} if
%  xchartl   13 eq {19500  4500 translate} if
%  xchartl   14 eq {13500  0250 translate} if
%  xchartl   15 eq {19500  0250 translate} if


/xwidth 5400 def
/ywidth 4000 def

0 0 xwidth ywidth 0.5 0.5 0.5 colrecfi %Rechteck Mittelgrau

20 setlinewidth

0 0 xwidth ywidth 0.0 0.0 0.0 colrecst %Rahmen Schwarz

150 /Times-ISOL1 FS
0 setgray /Param (; cf1=1.00; nt=0.18; nx=1.0, LECD_08_95) def

%xchartl=2
300 -150 moveto 
150 /Times-Roman FS
(AG780-8N) show

150 /Times-ISOL1 FS
2600 0300 translate


gsave
0.8 0.8 scale

1 setgray
-3200   4175   moveto
TBS (System: ) show
FileData show

/x400 400 def
/x700 550 def

0 1 5 {/i exch def /i1 i 1 add def %i=0,5
       /angle_olv_dif angle_olv i1 get angle_olv i get sub def
       angle_olvi i angle_olv i get put
       angle_olvi i 07 add angle_olv i get angle_olv_dif 0.00 mul add put
       angle_olvi i 14 add angle_olv i get angle_olv_dif 0.00 mul add put
       angle_olvi i 21 add angle_olv i get angle_olv_dif 0.00 mul add put

       /angle_rgb_dif angle_rgb i1 get angle_rgb i get sub def
       angle_rgbi i angle_rgb i get put
       angle_rgbi i 07 add angle_rgb i get angle_rgb_dif 0.00 mul add put
       angle_rgbi i 14 add angle_rgb i get angle_rgb_dif 0.00 mul add put
       angle_rgbi i 21 add angle_rgb i get angle_rgb_dif 0.00 mul add put
      } for %i=0,5

/angle6   7 array def
/angle6i 28 array def

/cfarb_olv_o 7 array def
/cfarb_olv_l 7 array def
/cfarb_olv_v 7 array def

/cfarb_rgb_r 7 array def
/cfarb_rgb_g 7 array def
/cfarb_rgb_b 7 array def

/cfarb_olv00_o 7 array def
/cfarb_olv00_l 7 array def
/cfarb_olv00_v 7 array def
/cfarb_olv25_o 7 array def
/cfarb_olv25_l 7 array def
/cfarb_olv25_v 7 array def
/cfarb_olv50_o 7 array def
/cfarb_olv50_l 7 array def
/cfarb_olv50_v 7 array def
/cfarb_olv75_o 7 array def
/cfarb_olv75_l 7 array def
/cfarb_olv75_v 7 array def

/cfarb_rgb00_r 7 array def
/cfarb_rgb00_g 7 array def
/cfarb_rgb00_b 7 array def
/cfarb_rgb25_r 7 array def
/cfarb_rgb25_g 7 array def
/cfarb_rgb25_b 7 array def
/cfarb_rgb50_r 7 array def
/cfarb_rgb50_g 7 array def
/cfarb_rgb50_b 7 array def
/cfarb_rgb75_r 7 array def
/cfarb_rgb75_g 7 array def
/cfarb_rgb75_b 7 array def

/cname_olv [(O) (Y) (L) (C) (V) (M) (O)] def
/cfarb_olv_o [1 1 0 0 0 1 1] def
/cfarb_olv_l [0 1 1 1 0 0 0] def
/cfarb_olv_v [0 0 0 1 1 1 0] def
/cname_rgb [(R) (J) (G) (G50B) (B) (B50R) (R)] def
/cfarb_rgb_r [1 1 0 0 0 1 1] def
/cfarb_rgb_g [0 1 1 1 0 0 0] def
/cfarb_rgb_g [0 0 0 1 1 1 0] def

/cname_olv00 [(O00Y) (Y00L) (L00C) (C00V) (V00M) (M00O) (O00Y)] def
/cfarb_olv00_o [1 1 0 0 0 1 1] def
/cfarb_olv00_l [0 1 1 1 0 0 0] def
/cfarb_olv00_v [0 0 0 1 1 1 0] def
/cname_olv25 [(O25Y) (Y25L) (L25C) (C25V) (V25M) (M25O) (O25Y)] def
/cfarb_olv25_o [1.00 0.75 0.00 0.00 0.25 1.00 1.00] def
/cfarb_olv25_l [0.25 1.00 1.00 0.75 0.00 0.00 0.25] def
/cfarb_olv25_v [0.00 0.00 0.25 1.00 1.00 0.75 0.00] def
/cname_olv50 [(O50Y) (Y50L) (L50C) (C50V) (V50M) (M50O) (O50Y)] def
/cfarb_olv50_o [1.00 0.50 0.00 0.00 0.50 1.00 1.00] def
/cfarb_olv50_l [0.50 1.00 1.00 0.50 0.00 0.00 0.50] def
/cfarb_olv50_v [0.00 0.00 0.50 1.00 1.00 0.50 0.00] def
/cname_olv75 [(O75Y) (Y75L) (L75C) (C75V) (V75M) (M75O) (O75Y)] def
/cfarb_olv75_o [1.00 0.25 0.00 0.00 0.75 1.00 1.00] def
/cfarb_olv75_l [0.75 1.00 1.00 0.25 0.00 0.00 0.75] def
/cfarb_olv75_v [0.00 0.00 0.75 1.00 1.00 0.25 0.00] def

/cname_rgb00 [(R00J) (J00G) (G00B) (G50B) (B00R) (B50R) (R00J)] def
/cfarb_rgb00_r [1 1 0 0 0 1 1] def
/cfarb_rgb00_g [0 1 1 1 0 0 0] def
/cfarb_rgb00_b [0 0 0 1 1 1 0] def
/cname_rgb25 [(R25J) (J25G) (G13B) (G62B) (B12R) (B63R) (R25J)] def
/cfarb_rgb25_r [1.00 0.75 0.00 0.00 0.25 1.00 1.00] def
/cfarb_rgb25_g [0.25 1.00 1.00 0.75 0.00 0.00 0.25] def
/cfarb_rgb25_b [0.00 0.00 0.25 1.00 1.00 0.75 0.00] def
/cname_rgb50 [(R50J) (J50G) (G25B) (G75B) (B25R) (B75R) (R50J)] def
/cfarb_rgb50_r [1.00 0.50 0.00 0.00 0.50 1.00 1.00] def
/cfarb_rgb50_g [0.50 1.00 1.00 0.50 0.00 0.00 0.50] def
/cfarb_rgb50_b [0.00 0.00 0.50 1.00 1.00 0.50 0.00] def
/cname_rgb75 [(R75J) (J75G) (G38B) (G88B) (B38R) (B88R) (R75J)] def
/cfarb_rgb75_r [1.00 0.25 0.00 0.00 0.75 1.00 1.00] def
/cfarb_rgb75_g [0.75 1.00 1.00 0.25 0.00 0.00 0.75] def
/cfarb_rgb75_b [0.00 0.00 0.75 1.00 1.00 0.25 0.00] def

/cname6 7 array def

/olvrgb 0 def


0 1 6 {/i exch def
       cname6 i
       olvrgb 0 eq {%olvrgb=0
                    xcolor 0 eq xcolor 1 eq or {cname_olv00 i get} if
                    xcolor 2 eq xcolor 3 eq or {cname_olv00 i get} if
                    xcolor 4 eq xcolor 5 eq or {cname_olv00 i get} if
                    xcolor 6 eq xcolor 7 eq or {cname_olv00 i get} if
                   } 
                   {%olvrgb=1
                    xcolor 0 eq xcolor 1 eq or {cname_rgb00 i get} if
                    xcolor 2 eq xcolor 3 eq or {cname_rgb00 i get} if
                    xcolor 4 eq xcolor 5 eq or {cname_rgb00 i get} if
                    xcolor 6 eq xcolor 7 eq or {cname_rgb00 i get} if
                   } ifelse
       put

       angle6 i
       olvrgb 0 eq {%olvrgb=0
                    xcolor 0 eq xcolor 1 eq or {angle_olvi i get} if
                    xcolor 2 eq xcolor 3 eq or {angle_olvi i get} if
                    xcolor 4 eq xcolor 5 eq or {angle_olvi i get} if
                    xcolor 6 eq xcolor 7 eq or {angle_olvi i get} if
                   }
                   {%olvrgb=1
                    xcolor 0 eq xcolor 1 eq or {angle_rgbi i get} if
                    xcolor 2 eq xcolor 3 eq or {angle_rgbi i get} if
                    xcolor 4 eq xcolor 5 eq or {angle_rgbi i get} if
                    xcolor 6 eq xcolor 7 eq or {angle_rgbi i get} if
                   } ifelse
       put
      } for             

xchartl 0 eq xchartl 4 eq or xchartl 8  eq or xchartl 12 eq or {/jbild 0 def} if
xchartl 1 eq xchartl 5 eq or xchartl 9  eq or xchartl 13 eq or {/jbild 1 def} if
xchartl 2 eq xchartl 6 eq or xchartl 10 eq or xchartl 14 eq or {/jbild 2 def} if
xchartl 3 eq xchartl 7 eq or xchartl 11 eq or xchartl 15 eq or {/jbild 3 def} if

jbild 3 ne {%jbild#3
-3200   3900   moveto
TBS 
(Buntton: ) showde
(Hue: ) showen
(Teinte: ) showfr

TBIS (h*) show
TBL 0 -50 rmoveto
jbild 0 eq {cname6 0 get show} if
jbild 1 eq {cname6 1 get show} if
jbild 2 eq {cname6 2 get show} if
0 50 rmoveto
TBS (=) show
jbild 0 eq {angle6 0 get cvishow} if
jbild 1 eq {angle6 1 get cvishow} if
jbild 2 eq {angle6 2 get cvishow} if
(/360; ) show
TBIS (h*) show
TBL 0 -50 rmoveto
jbild 0 eq {cname6 3 get show
            olvrgb 1 eq {0 -50 rmoveto (gb) show 0 50 rmoveto} if
           } if
jbild 1 eq {cname6 4 get show} if
jbild 2 eq {cname6 5 get show
            olvrgb 1 eq {0 -50 rmoveto (br) show 0 50 rmoveto} if
           } if
0 50 rmoveto
TBS (=) show
jbild 0 eq {angle6 3 get cvishow} if
jbild 1 eq {angle6 4 get cvishow} if
jbild 2 eq {angle6 5 get cvishow} if
(/360) show
         } if %jbild#3

xchartl 12 ge {%xchartl>=12
-3200  3625  xchartl 15 eq {300 add} if moveto
TBS
(Ergebnis: ) showde
(Result: ) showen
(Result: ) showfr

TBIS (c*) show
TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto
TBS (=) show
TBIS (c*) show
TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto
TBS (; ) show
TBIS (t*) show
TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto
TBS (=) show
TBIS (t*) show
TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto
             } if %xchartl>=12

xchartl   0 ge xchartl   3 le and {%0<=xchartl<=3
-3200 4400 moveto
TBS
(Beziehung ) showde
(Linear relation ) showen
(Linear relation ) showfr

TBS (CIELAB \050) show
TBIS (L*, a*, b*) show
TBS (\051) show
( und ) showde
( and ) showen
( et ) showfr

TBIS 
(adaptiertes (a) ) showde
(adapted (a) ) showen
(adapted (a) ) showfr


TBS (CIELAB \050) show
TBIS (C*) show
TBL 0 -50 rmoveto (ab,a) show 0 50 rmoveto
TBS (, ) show
TBIS (L*) show
TBS (\051) show

x400 4100 moveto
TBIS (l*) show
TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto
TBS (=\050 ) show 
TBIS (L*) show TBS ( - ) show  TBIS (L*) show
0 -50 rmoveto TBL (N) show 0 50 rmoveto
TBS ( \051 / \050) show TBIS (L*) show
0 -50 rmoveto TBL (W) show 0 50 rmoveto
( - ) show  TBIS (L*) show
0 -50 rmoveto TBL (N) show 0 50 rmoveto
TBS ( \051) show

x400 3800 moveto
TBIS (a*) show 
0 -50 rmoveto TBL (a) show 0 50 rmoveto
TBS (=) show 
TBIS (a*) show
TBS ( - ) show 
TBIS (a*) show
0 -50 rmoveto TBL (N) show 0 50 rmoveto
TBS ( - ) show 
TBIS (l*) show
TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto
TBS ( [ ) show
TBIS (a*) show
0 -50 rmoveto TBL (W) show 0 50 rmoveto
TBS ( - ) show
TBIS (a*) show
0 -50 rmoveto TBL (N) show 0 50 rmoveto
TBS ( ]) show

x400 3500 moveto
TBIS (b*) show 
0 -50 rmoveto TBL (a) show 0 50 rmoveto
TBS (=) show 
TBIS (b*) show
TBS ( - ) show 
TBIS (b*) show
0 -50 rmoveto TBL (N) show 0 50 rmoveto
TBS ( - ) show 
TBIS (l*) show
TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto
TBS ( [ ) show
TBIS (b*) show
0 -50 rmoveto TBL (W) show 0 50 rmoveto
TBS ( - ) show
TBIS (b*) show
0 -50 rmoveto TBL (N) show 0 50 rmoveto
TBS ( ]) show

x400 500 add 3200 moveto
TBIS (C*) show 
0 -50 rmoveto TBL (ab,a) show 0 50 rmoveto
TBS (=[ ) show 
TBIS (a*) show 
0 -50 rmoveto TBL (a) show 0  050 rmoveto
0 100 rmoveto TBL (2) show 0 -100 rmoveto

TBS ( + ) show 
TBIS (b*) show 
0 -50 rmoveto TBL (a) show 0  050 rmoveto
0 100 rmoveto TBL (2) show 0 -100 rmoveto
TBS ( ] ) show
0 100 rmoveto TBL (1/2) show 0 -100 rmoveto

                            } if %0<=xchartl<=3

xchartl   4 ge xchartl   7 le and {%4<=xchartl<=7
-3200 4400 moveto
TBIS 
(Adaptiertes (a) ) showde
(Adapted (a) ) showen
(Adapted (a) ) showfr

TBS (CIELAB \050) show
TBIS (C*) show
TBL 0 -50 rmoveto (ab,a) show 0 50 rmoveto
TBS (, ) show
TBIS (L*) show
TBS (\051) show
TBS
( und ) showde
( and ) showen
( et ) showfr

TBIS
(relatives ) showde
(relative ) showen
(relatif ) showfr

TBS (CIELAB \050) show
TBIS (c*) show
0 -50 rmoveto TBL (lab*) show 0 50 rmoveto
TBS (, ) show
TBIS (l*) show
0 -50 rmoveto TBL (lab*) show 0 50 rmoveto
TBS (\051) show

x700 4100 moveto
TBIS (l*) show 
0 -50 rmoveto TBL (lab*) show 0 50 rmoveto
TBS (=\050 ) show 
TBIS (L*) show TBS ( - ) show  TBIS (L*) show
0 -50 rmoveto TBL (N) show 0 50 rmoveto
TBS ( \051 / \050) show TBIS (L*) show
0 -50 rmoveto TBL (W) show 0 50 rmoveto
( - ) show  TBIS (L*) show
0 -50 rmoveto TBL (N) show 0 50 rmoveto
TBS ( \051) show

x700 3800 moveto
TBIS (c*) show
0 -50 rmoveto TBL (lab*) show 0 50 rmoveto
TBS (=) show 
TBIS (C*) show 0 -50 rmoveto TBL (ab,a) show 0 50 rmoveto
TBS ( / ) show
TBIS (C*) show 0 -50 rmoveto TBL (ab,a,M) show 0 50 rmoveto

x700 3500 moveto
TBIS (M) show
TBS
(=Maximalfarbe) showde
(=Maximum colour) showen
(=couleur maximale) showfr
                            } if %4<=xchartl<=7
                            
xchartl   8 ge xchartl  11 le and {%8<=xchartl<=11
-3200 4400 moveto
TBS
(Beziehung ) showde
(Linear relation ) showen
(Linear relation ) showfr

TBIS
(adaptiertes (a) ) showde
(adapted (a) ) showen
(adapted (a) ) showfr

TBS (CIELAB \050) show
TBIS (C*) show
TBL 0 -50 rmoveto (ab,a) show 0 50 rmoveto
TBS (, ) show
TBIS (L*) show
TBS (\051) show
TBS
( und ) showde
( and ) showen
( et ) showfr

TBIS
(relatives ) showde
(relative ) showen
(relatif ) showfr

TBS (CIELAB \050) show
TBIS (c*) show
TBS (, ) show
TBIS (t*) show
TBS (\051) show

x700 4100 moveto
TBIS (l*) show
0 -50 rmoveto TBL (M) show 0 50 rmoveto
TBS (=\050) show 
TBIS (L*) show 
0 -50 rmoveto TBL (M) show 0 50 rmoveto
TBS ( - ) show  TBIS (L*) show
0 -50 rmoveto TBL (N) show 0 50 rmoveto
TBS (\051 / \050) show TBIS (L*) show
0 -50 rmoveto TBL (W) show 0 50 rmoveto
( - ) show  TBIS (L*) show
0 -50 rmoveto TBL (N) show 0 50 rmoveto
TBS (\051) show

x700 3800 moveto
TBIS (t*) show 
TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto
TBS (=) show 
TBIS (l*) show
TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto
TBS ( - ) show  TBIS (c*) show
TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto
TBS ( [ ) show TBIS (l*) show
%TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto
0 -50 rmoveto TBL (M) show 0 50 rmoveto
TBS ( - 0,5 ]) show

x700 3500 moveto
TBIS (c*) show
TBL 0 -50 rmoveto (lab*) show 0 50 rmoveto
TBS (=) show 
TBIS (C*) show 0 -50 rmoveto TBL (ab,a) show 0 50 rmoveto
TBS ( / ) show
TBIS (C*) show 0 -50 rmoveto TBL (ab,a,M) show 0 50 rmoveto

 700 3200 moveto
TBIS (M) show
TBS
(=Maximalfarbe) showde
(=Maximum colour) showen
(=Couleur maximale) showfr
                            } if %8<=xchartl<=11
                            
xchartl   12 ge xchartl   15 le and {%12<=xchartl<=15
-3200 4400 moveto
TBS
(Beziehung ) showde
(Linear relation ) showen
(Linear relation ) showfr

TBIS olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show
TBS
( und ) showde
( and ) showen
( et ) showfr

TBIS (relative ) show
TBS
(Buntheit ) showde
(chroma ) showen
(chroma ) showfr

TBIS (c*) show
TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto

xchartl 03 ne
xchartl 07 ne and
xchartl 11 ne and
xchartl 15 ne and {%xchart #3,7,11,15 or =3,7,11,15
RBS
( und Dreiecks-Helligkeit ) showde
TBS
( and triangle lightness ) showen
( et triangle clart\351 ) showfr

TBIS (t*) show
TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto

        } %xchart #3,7,11,15
%*********************************************************************************
        { %xchart =3,7,11,15
TBS
( oder Buntheit ) showde
( or chroma ) showen
( ou chroma ) showfr

TBIS (a) show
xchartl 12 ge {(*) show} if
TBL 0 -50 rmoveto
xchartl  0 ge xchartl  3 le and {(rgb) show} if
xchartl  4 ge xchartl  7 le and {(olv) show} if
xchartl  8 ge xchartl 11 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if
xchartl 12 ge xchartl 15 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if
TBL 0 50 rmoveto

TBS (, ) show
TBIS (b) show
xchartl 12 ge {(*) show} if
TBL 0 -50 rmoveto
xchartl  0 ge xchartl  3 le and {(rgb) show} if
xchartl  4 ge xchartl  7 le and {(olv) show} if
xchartl  8 ge xchartl 11 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if
xchartl 12 ge xchartl 15 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if
TBL 0 50 rmoveto

        } ifelse %xchart #3,7,11,15 or =3,7,11,15

x700 4100 moveto
TBIS (c*) show
TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto
TBS (=max \050) show 
TBIS olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 
TBS (\051 - min \050) show 
TBIS olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show
TBS (\051) show

x700 3800 moveto
TBIS (n*) show
%TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto
TBS (=1 - max \050) show 
TBIS olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 
TBS (\051) show
TBS (= 1 - ) show
TBIS (i*) show
%TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto 

x700 3500 moveto
TBIS (w*) show
%TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto
TBS (=min \050) show 
TBIS olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 
TBS (\051) show
TBS (= 1 - ) show
TBIS (d*) show
%TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto

x700 3200 moveto
TBIS (t*) show
TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto
TBS (=) show 
TBIS (w*) show
%TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto
TBS ( + 0,5 ) show 
TBIS (c*) show
TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto

xchartl 14 le {
 700 2900 moveto
TBIS (M) show
TBS
(=Maximalfarbe) showde
(=Maximum colour) showen
(=Couleur maximale) showfr

             } if

                            } if %12<=xchartl<=15

xchartl   2 le {
1500   150   moveto
TBK 
(Buntheit) showde
(chroma) showen
(chroma) showfr

2500   150   moveto TBIK (C*) show 
TS 0 -50 rmoveto (ab,a) show

-1600 3100 moveto
TBK
(Helligkeit) showde
(lightness) showen
(clart\351) showfr

-350   3100   moveto TBIK (L*) show
            } if

grestore
gsave

xchart 3 le {0.75 dup scale} {0.80 dup scale} ifelse

xchartl 03 ne
xchartl 07 ne and
xchartl 11 ne and
xchartl 15 ne and {%xchart #3,7,11,15 or =3,7,11,15

xchartl 1 eq xcolor 2 eq xcolor 3 eq or and { 200 0 translate} if %special shift for J-B
xchartl 1 eq xcolor 4 eq xcolor 5 eq or and {-300 0 translate} if %special shift for J-B
xchartl 1 eq xcolor 6 eq xcolor 7 eq or and { 200 0 translate} if %special shift for J-B

/j729 0 def
xchartl   0 eq xchartl   4 eq or xchartl   8 eq or xchartl   12 eq or
{/j1 729 j729 sub         10 mul def} if %series O-C
xchartl   1 eq xchartl   5 eq or xchartl   9 eq or xchartl   13 eq or
{/j1 729 j729 sub 081 add 10 mul def} if %series Y-V
xchartl   2 eq xchartl   6 eq or xchartl  10 eq or xchartl   14 eq or
{/j1 729 j729 sub 162 add 10 mul def} if %series L-M

0 1 080 {/i exch def %i=0,080
         /i10 j1 i 10 mul add def
         LUTL* i LUT i10 0 add get  100 div put 
         LUTA* i LUT i10 1 add get  100 div put
         LUTB* i LUT i10 2 add get  100 div put
         LUTr* i LUT i10 3 add get 1000 div put
         LUTg* i LUT i10 4 add get 1000 div put
         LUTb* i LUT i10 5 add get 1000 div put
         C*ab  i LUTA* i get dup mul
                 LUTB* i get dup mul add 0.000001 add sqrt put
         L*    i LUTL* i get put
        } for %i=0,080
        
%       801 737 809 729  882 818 890 810  963 899 971 891
%       j01 b09 j09 b01  j10 b18 j18 b10  j19 b27 j27 b19
%       O   C   N1  W1   Y   V   N2  W2   L   M   N3  W3

       xchartl 0 eq xchartl   4 eq or xchartl   8 eq or xchartl  12 eq or
       {/index [801 737 809 729] def} if %O,C,N1,W1
       xchartl 1 eq xchartl   5 eq or xchartl   9 eq or xchartl  13 eq or
       {/index [882 818 890 810] def} if %Y,V,N2,W2
       xchartl 2 eq xchartl   6 eq or xchartl  10 eq or xchartl  14 eq or
       {/index [963 899 971 891] def} if %L,M,N1,W2

0 1 3 {/i exch def %i=0,3 %standard colours at the end
       /i10 index i get j729 sub 10 mul def
       /i81 81 i add def
       LUTL* i81 LUT i10 0 add get 100 div put
       LUTA* i81 LUT i10 1 add get 100 div put
       LUTB* i81 LUT i10 2 add get 100 div put
       LUTr* i81 LUT i10 3 add get 1000 div put
       LUTg* i81 LUT i10 4 add get 1000 div put
       LUTb* i81 LUT i10 5 add get 1000 div put
       C*ab  i81 LUTA* i81 get dup mul
                 LUTB* i81 get dup mul add 0.000001 add sqrt put
       L*    i81 LUTL* i81 get put
      } for %i=0,3

/L*WN LUTL* 84 get LUTL* 83 get sub def

0 1 084 {/i exch def %i=0,084
         LUTl*  i LUTL* i get LUTL* 83 get sub 
                  L*WN 0.000001 add div put
         LUTc1* i C*ab i get C*ab 81 get 0.000001 add div put
         LUTc2* i C*ab i get C*ab 82 get 0.000001 add div put
         LUTt1* i LUTl* i get LUTc1* i get 
                  L* 81 get L* 83 get sub L*WN
                  0.000001 add div 0.5 sub mul sub put
         LUTt2* i LUTl* i get LUTc2* i get
                  L* 82 get L* 83 get sub L*WN
                  0.000001 add div 0.5 sub mul sub put
                  LUTr* i get 0 lt {LUTr* i 0 put} if
         LUTg* i get 0 lt {LUTg* i 0 put} if
         LUTb* i get 0 lt {LUTb* i 0 put} if
         LUTr* i get 1 gt {LUTr* i 1 put} if
         LUTg* i get 1 gt {LUTg* i 1 put} if
         LUTb* i get 1 gt {LUTb* i 1 put} if
         %maximum
         /max LUTr* i get def %rgb brilliantness
         LUTg* i get max gt {/max LUTg* i get def} if
         LUTb* i get max gt {/max LUTb* i get def} if
         %minimum
         /min LUTr* i get def %rgb whiteness
         LUTg* i get min lt {/min LUTg* i get def} if
         LUTb* i get min lt {/min LUTb* i get def} if         
         LUTc*rgb i max min sub put %rgb chroma
         LUTt*rgb i min max min sub 0.5 mul add put %rgb triangle lightness
        } for %i=0,084
        
%axis and scales
1 setgray
-3000 0 moveto 6250  0 rlineto stroke
0 -080  moveto 0 3600  rlineto stroke
 3250 100 sub 50 moveto 100 -50 rlineto
                       -100 -50 rlineto closepath fill
0 50 sub 3600 100 sub moveto 50  100 rlineto
                             50 -100 rlineto closepath fill

0 setgray
TS
/xt001 9 array def
/xt001 [(-1,0) () (-0,5) ( ) (  0) () (  0,5) () () ] def %(  1,0)] def
/yt001 5 array def
/yt001 [( ) () (0,5) ( ) (1,0)] def

/xt100 9 array def
/xt100 [(-100) () ( -50) ( ) (     0) () (  50) () (100)] def
/yt100 5 array def
/yt100 [( ) () (50) ( ) (100)] def

0 1 8 {/i exch def %i=0,8
        -3000   i 750   mul add  -50 moveto 0 100 rlineto stroke
        -3200   i 750   mul add -250   moveto
        xchartl 3 le {xt100}{xt001} ifelse i get show
       } for %i=0,8

0 1 4 {/i exch def %i=0,4
       -75 0 i 750 mul    add moveto 150 0 rlineto stroke
        30 50 i 750 mul   add moveto
        xchartl 3 le {yt100}{yt001} ifelse i get show
      } for %i=0,4

xchartl   4 ge xchartl 7 le and {
1 setgray
-2800   3100   moveto TBIK 
(relative ) showde
(relative ) showen
(relatif ) showfr

TBK
(Helligkeit) showde
(lightness) showen
(clart\351) showfr

-600   3100   moveto TBIK (l*) show
xchartl 11 le {TS 0 -50 rmoveto (lab*) show 0 50 rmoveto} if
               } if

xchartl   8 ge {
1 setgray
-2800   3100   moveto
RBK
(Dreiecks-Helligkeit) showde
TBK
(triangle lightness) showen
(triangle clart\351) showfr

-600   3100   moveto TBIK (t*) show
xchartl 11 le {TS 0 -50 rmoveto (lab*) show 0 50 rmoveto} if
xchartl 12 ge {TS 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto} if
               } if

xchartl    4 ge {
1000   150   moveto TBIK (relative ) show
TBK
(Buntheit) showde
(chroma) showen
(chroma) showfr
2800   150   moveto TBIK (c*) show
xchartl 11 le {TS 0 -50 rmoveto (lab*) show 0 50 rmoveto} if
xchartl 12 ge {TS 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto} if
            } if

xchartl 12 ge {
1500 2350 moveto
TBIS (n*) show
%TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto
TBS (=0; ) show 
TBIS (i*) show
%TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto
TBS (=1) show

1500 0550 moveto
TBIS (w*) show
%TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto
TBS (=0; ) show 
TBIS (d*) show
%TBL 0 -50 rmoveto olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show 0 50 rmoveto
TBS (=1) show
            } if

/fakt  30 def
/fakt2 3000 def
100 /Times-ISOL1 FS
/j1 0 def
/k1 0 def
/k2 3 def

newpath

xchartl   0 ge xchartl   2 le and {%0<=xchartl  <=2
%**********************************************************************
100 /Times-ISOL1 FS

%**********************************************************************
/Vorz 1 def
k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 72 def} if %row j01 to j09: O-N
         k 1 eq {/j2 6 def /j0 64 def} if %row i02 to i08: O-N
         k 2 eq {/j2 4 def /j0 56 def} if %row h03 to h07: O-N
         k 3 eq {/j2 2 def /j0 48 def} if %row g04 to g06: O-N
       
j1 1 j2 {/j exch def %j=j1,j2 %lines
         /ja j0 j add def
         L*   j LUTL* ja get put
         C*ab j LUTA* ja get dup mul
                LUTB* ja get dup mul add sqrt Vorz mul put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         C*ab j get fakt mul
         L*   j get fakt mul
         050 0 360 arc fill
         j 1 ge {
                 C*ab j 1 sub get fakt mul
                 L*   j 1 sub get fakt mul moveto
                 C*ab j get fakt mul
                 L*   j get fakt mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         C*ab j get fakt mul
                         L*   j get fakt mul moveto
                         C*ab 0 get fakt mul
                         L*   0 get fakt mul lineto stroke
                        } if %k=0
                 } if
       } for %j=j1,j2
       
       } for %k=0,3

%**********************************************************************

/Vorz 1 def
%spalte e05 bis e05: W-O
0 1 0 {/j exch def %j=0,0 %lines
       /ja j 40 add def
       L*   j LUTL* ja get put
       C*ab j LUTA* ja get dup mul
              LUTB* ja get dup mul add sqrt Vorz mul put
       newpath
       LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
       C*ab j get fakt mul
       L*   j get fakt mul
       050 0 360 arc fill
       1 setgray
       10 setlinewidth
       C*ab j get fakt mul
       L*   j get fakt mul
       055 0 360 arc stroke
       20 setlinewidth
       newpath
      } for %j=0,0

k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 00 def} if %line b01 to j01: W-O
         k 1 eq {/j2 6 def /j0 10 def} if %line c02 to i02: W-O
         k 2 eq {/j2 4 def /j0 20 def} if %line d03 to h03: W-O
         k 3 eq {/j2 2 def /j0 30 def} if %line e04 to g04: W-O
         
j1 1 j2 {/j exch def %j=j1,j2 %lines
         /ja j0 j 9 mul add def
         L*   j LUTL* ja get put
         C*ab j LUTA* ja get dup mul
                LUTB* ja get dup mul add sqrt Vorz mul put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         C*ab j get fakt mul
         L*   j get fakt mul
         050 0 360 arc fill
         j 1 ge {C*ab j 1 sub get fakt mul
                 L*   j 1 sub get fakt mul moveto
                 C*ab j get fakt mul
                 L*   j get fakt mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         C*ab j get fakt mul
                         L*   j get fakt mul moveto
                         C*ab 0 get fakt mul
                         L*   0 get fakt mul lineto stroke
                         C*ab j get fakt mul
                         L*   j get fakt mul
                         070 0 360 arc stroke
                        } if %k=0
                 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
                 newpath 250 /TimesBI-ISOL1 FS
                 /xadd0 [-200 -200 -200] def /yadd0 [250 250 250] def
                 /xadd1 [-200 -200 -200] def /yadd1 [250 250 250] def
                 C*ab j get fakt mul olvrgb 0 eq {xadd0} {xadd1} ifelse xchartl get add
                 L*   j get fakt mul olvrgb 0 eq {yadd0} {yadd1} ifelse xchartl get add
                 moveto
                 cname6 xchartl get show
                 1 setgray
                 C*ab  j     get fakt mul 580 sub
                 L*  j       get fakt mul 700 sub moveto
                 TBS (\050) show TBIS (C*) show 
                 0 -50 rmoveto TBL (ab,a,M) show 0 50 rmoveto
                 TBIS (,) show
                 C*ab  j     get fakt mul 580 sub 
                 L*  j       get fakt mul 700 sub 300 sub moveto
                 TBIS ( L*) show
                 0 -50 rmoveto TBL (M) show 0 50 rmoveto
                 TBS (\051) show 
                 newpath
                } if
        } for %j=j1,j2

        } for %k=0,3

%**********************************************************************
/Vorz -1 def
k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 08 def} if %line b09 to j09: C-N
         k 1 eq {/j2 6 def /j0 16 def} if %line c08 to i08: C-N
         k 2 eq {/j2 4 def /j0 24 def} if %line d07 to h07: C-N
         k 3 eq {/j2 2 def /j0 32 def} if %line e06 to h06: C-N

j1 1 j2 {/j exch def %j=j1,j2 %lines
         /ja j0 j 9 mul add def
         L*   j LUTL* ja get put
         C*ab j LUTA* ja get dup mul
                LUTB* ja get dup mul add sqrt Vorz mul put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         C*ab j get fakt mul
         L*   j get fakt mul
         050 0 360 arc fill
         j 1 ge {C*ab j 1 sub get fakt mul
                 L*   j 1 sub get fakt mul moveto
                 C*ab j get fakt mul
                 L*   j get fakt mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         C*ab j get fakt mul
                         L*   j get fakt mul moveto
                         C*ab 0 get fakt mul
                         L*   0 get fakt mul lineto stroke
                        } if %k=0
                 } if
        } for %j=j1,j2
        
        } for %k=0,3

%**********************************************************************
/Vorz -1 def

%spalte e05 bis e05: W-C
0 1 0 {/j exch def %j=0,0 %lines
       /ja j 40 add def
       L*   j LUTL* ja get put
       C*ab j LUTA* ja get dup mul
              LUTB* ja get dup mul add sqrt Vorz mul put
       newpath
       LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
       C*ab j get fakt mul
       L*   j get fakt mul
       050 0 360 arc fill
       1 setgray
       10 setlinewidth
       C*ab j get fakt mul
       L*   j get fakt mul
       055 0 360 arc stroke
       20 setlinewidth
       newpath
      } for %j=0,0

k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 00 def} if %row b01 to b09: W-C
         k 1 eq {/j2 6 def /j0 10 def} if %row c02 to c08: W-C
         k 2 eq {/j2 4 def /j0 20 def} if %row d03 to d07: W-C
         k 3 eq {/j2 2 def /j0 30 def} if %row e04 to e06: W-C

j1 1 j2 {/j exch def %j=j1,j2 %rows
         /ja j0 j add def
         L*   j LUTL* ja get put
         C*ab j LUTA* ja get dup mul
                LUTB* ja get dup mul add sqrt Vorz mul put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         C*ab j get fakt mul
         L*   j get fakt mul
         050 0 360 arc fill
         j 1 ge {C*ab j 1 sub get fakt mul
                 L*   j 1 sub get fakt mul moveto
                 C*ab j get fakt mul
                 L*   j get fakt mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         C*ab j get fakt mul
                         L*   j get fakt mul moveto
                         C*ab 0 get fakt mul
                         L*   0 get fakt mul lineto stroke
                         C*ab j get fakt mul
                         L*   j get fakt mul
                         070 0 360 arc stroke
                        } if %k=0
                 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
                 newpath 250 /TimesBI-ISOL1 FS
                 /xadd0 [-400 -400 -400] def /yadd0 [-400 250 -400] def
                 /xadd1 [-400 -400 -400] def /yadd1 [-400 250 -400] def
                 C*ab j get fakt mul olvrgb 0 eq {xadd0} {xadd1} ifelse xchartl get add
                 L*   j get fakt mul olvrgb 0 eq {yadd0} {yadd1} ifelse xchartl get add
                 moveto
                 cname6 3 xchartl add get show
                 newpath
                } if
        } for %j=j1,j2
        
        } for %k=0,3
        
/fakt 30 def
icolor 1 eq {%icolor=1    
0 0 0 setrgbcolor
/i24 xcolor 2 idiv 24 mul def
/C*abW 0 def
/C*abN 0 def
/L*aN LAB*Fa0100 6 3 mul i24 add get def
/L*aW LAB*Fa0100 7 3 mul i24 add get def
/j xchartl def
/j30 j 3 mul i24 add def /j31 j30 1 add def /j32 j30 2 add def
/C*abM LAB*Fa0100 j31 get dup mul
       LAB*Fa0100 j32 get dup mul add 0.0001 add sqrt def
C*abN fakt mul L*aN fakt mul moveto
C*abM fakt mul LAB*Fa0100 j30 get fakt mul lineto
C*abW fakt mul L*aW fakt mul lineto
stroke
/j xchartl 3 add def
/j30 j 3 mul i24 add def /j31 j30 1 add def /j32 j30 2 add def
/C*abM LAB*Fa0100 j31 get dup mul
       LAB*Fa0100 j32 get dup mul add 0.0001 add sqrt def
C*abN fakt mul neg L*aN fakt mul moveto
C*abM fakt mul neg LAB*Fa0100 j30 get fakt mul lineto
C*abW fakt mul neg L*aW fakt mul lineto
stroke
} if %icolor=1

%**********************************************************************
} if %0<=xchartl  <=2

newpath

xchartl   4 ge xchartl   6 le and {%4<=xchartl  <=6
%**********************************************************************
100 /Times-ISOL1 FS

/Vorz 1 def
k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 72 def} if %row j01 to j09: O-N
         k 1 eq {/j2 6 def /j0 64 def} if %row i02 to i08: O-N
         k 2 eq {/j2 4 def /j0 56 def} if %row h03 to h07: O-N
         k 3 eq {/j2 2 def /j0 48 def} if %row g04 to g06: O-N
       
j1 1 j2 {/j exch def %j=j1,j2 %lines
         /ja j0 j add def
         l1* j LUTl*  ja get put
         c1* j LUTc1* ja get put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         c1* j get fakt2 mul Vorz mul
         l1* j get fakt2 mul
         050 0 360 arc fill
         j 1 ge {c1*  j 1 sub get fakt2 mul Vorz mul
                 l1*  j 1 sub get fakt2 mul moveto
                 c1*  j       get fakt2 mul Vorz mul
                 l1*  j       get fakt2 mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         c1* j get fakt2 mul Vorz mul
                         l1* j get fakt2 mul moveto
                         c1* 0 get fakt2 mul Vorz mul
                         l1* 0 get fakt2 mul lineto stroke
                        } if %k=0
                 } if
       } for %j=j1,j2
       
       } for %k=0,3

%**********************************************************************

/Vorz 1 def
%spalte e05 bis e05: W-O
0 1 0 {/j exch def %j=0,0 %lines
       /ja j 40 add def
       l1* j LUTl*  ja get put
       c1* j LUTc1* ja get put
       newpath
       LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
       c1* j get fakt2 mul Vorz mul
       l1* j get fakt2 mul
       050 0 360 arc fill
       1 setgray
       10 setlinewidth
       c1* j get fakt2 mul Vorz mul
       l1* j get fakt2 mul
       055 0 360 arc stroke
       20 setlinewidth
       newpath
      } for %j=0,0

k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 00 def} if %line b01 to j01: W-O
         k 1 eq {/j2 6 def /j0 10 def} if %line c02 to i02: W-O
         k 2 eq {/j2 4 def /j0 20 def} if %line d03 to h03: W-O
         k 3 eq {/j2 2 def /j0 30 def} if %line e04 to g04: W-O
         
j1 1 j2 {/j exch def %j=j1,j2 %lines
         /ja j0 j 9 mul add def
         l1* j LUTl*  ja get put
         c1* j LUTc1* ja get put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         c1* j get fakt2 mul Vorz mul
         l1* j get fakt2 mul
         050 0 360 arc fill
         j 1 ge {c1*  j 1 sub get fakt2 mul Vorz mul
                 l1*  j 1 sub get fakt2 mul moveto
                 c1*  j       get fakt2 mul Vorz mul
                 l1*  j       get fakt2 mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         c1* j get fakt2 mul Vorz mul
                         l1* j get fakt2 mul moveto
                         c1* 0 get fakt2 mul Vorz mul
                         l1* 0 get fakt2 mul lineto stroke
                         c1* j get fakt2 mul Vorz mul
                         l1* j get fakt2 mul
                         070 0 360 arc stroke
                        } if %k=0
                 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
                 newpath 250 /TimesBI-ISOL1 FS
                 /xadd0 [-200 -200 -200] def /yadd0 [250 250 250] def
                 /xadd1 [-200 -200 -200] def /yadd1 [250 250 250] def
                 c1*  j       get fakt2 mul Vorz mul olvrgb 0 eq {xadd0} {xadd1} ifelse xchartl 4 sub get add
                 l1*  j       get fakt2 mul          olvrgb 0 eq {yadd0} {yadd1} ifelse xchartl 4 sub get add
                 moveto
                 cname6 xchartl 4 sub get show
                 1 setgray
                 c1*  j       get fakt2 mul Vorz mul 580 sub
                 l1*  j       get fakt2 mul 600 sub moveto
                 TBS (\050) show TBIS (c*) show 
                 0 -50 rmoveto TBL (M) show 0 50 rmoveto
                 TBIS (, l*) show
                 0 -50 rmoveto TBL (M) show 0 50 rmoveto
                 TBS (\051) show 
                 newpath
                } if
        } for %j=j1,j2

        } for %k=0,3


%**********************************************************************

/Vorz -1 def
k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 08 def} if %line b09 to j09: C-N
         k 1 eq {/j2 6 def /j0 16 def} if %line c08 to i08: C-N
         k 2 eq {/j2 4 def /j0 24 def} if %line d07 to h07: C-N
         k 3 eq {/j2 2 def /j0 32 def} if %line e06 to h06: C-N

j1 1 j2 {/j exch def %j=j1,j2 %lines
         /ja j0 j 9 mul add def
         l2* j LUTl*  ja get put
         c2* j LUTc2* ja get put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         c2* j get fakt2 mul Vorz mul
         l2* j get fakt2 mul
         050 0 360 arc fill
         j 1 ge {c2*  j 1 sub get fakt2 mul Vorz mul
                 l2*  j 1 sub get fakt2 mul moveto
                 c2*  j       get fakt2 mul Vorz mul
                 l2*  j       get fakt2 mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         c2* j get fakt2 mul Vorz mul
                         l2* j get fakt2 mul moveto
                         c2* 0 get fakt2 mul Vorz mul
                         l2* 0 get fakt2 mul lineto stroke
                        } if %k=0
                 } if
        } for %j=j1,j2
        
        } for %k=0,3
%**********************************************************************

/Vorz -1 def
%spalte e05 bis e05: W-C
0 1 0 {/j exch def %j=0,0 %lines
       /ja j 40 add def
       l2* j LUTl*  ja get put
       c2* j LUTc1* ja get put
       newpath
       LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
       c2* j get fakt2 mul Vorz mul
       l2* j get fakt2 mul
       050 0 360 arc fill
       1 setgray
       10 setlinewidth
       c2* j get fakt2 mul Vorz mul
       l2* j get fakt2 mul
       055 0 360 arc stroke
       20 setlinewidth
       newpath
      } for %j=0,0

k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 00 def} if %row b01 to b09: W-C
         k 1 eq {/j2 6 def /j0 10 def} if %row c02 to c08: W-C
         k 2 eq {/j2 4 def /j0 20 def} if %row d03 to d07: W-C
         k 3 eq {/j2 2 def /j0 30 def} if %row e04 to e06: W-C

j1 1 j2 {/j exch def %j=j1,j2 %rows
         /ja j0 j add def
         l2* j LUTl*  ja get put
         c2* j LUTc2* ja get put

         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         c2* j get fakt2 mul Vorz mul
         l2* j get fakt2 mul
         050 0 360 arc fill
         j 1 ge {c2*  j 1 sub get fakt2 mul Vorz mul
                 l2*  j 1 sub get fakt2 mul moveto
                 c2*  j       get fakt2 mul Vorz mul
                 l2*  j       get fakt2 mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         c2* j get fakt2 mul Vorz mul
                         l2* j get fakt2 mul moveto
                         c2* 0 get fakt2 mul Vorz mul
                         l2* 0 get fakt2 mul lineto stroke
                         c2* j get fakt2 mul Vorz mul
                         l2* j get fakt2 mul
                         070 0 360 arc stroke
                        } if %k=0
                 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
                 newpath 250 /TimesBI-ISOL1 FS
                 /xadd0 [-000 -400 -400] def /yadd0 [-400 250 -400] def
                 /xadd1 [-000 -400 -400] def /yadd1 [-400 250 -400] def
                 c2*  j       get fakt2 mul Vorz mul olvrgb 0 eq {xadd0} {xadd1} ifelse xchartl 4 sub get add
                 l2*  j       get fakt2 mul          olvrgb 0 eq {yadd0} {yadd1} ifelse xchartl 4 sub get add
                 moveto
                 cname6 xchartl 4 sub 3 add get show
                 newpath
                } if
        } for %j=j1,j2
        
        } for %k=0,3
%**********************************************************************
} if %4<=xchartl  <=6

newpath

xchartl   8 ge xchartl  10 le and {%8<=xchartl  <=10
%**********************************************************************
100 /Times-ISOL1 FS

/Vorz 1 def
k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 72 def} if %row j01 to j09: O-N
         k 1 eq {/j2 6 def /j0 64 def} if %row i02 to i08: O-N
         k 2 eq {/j2 4 def /j0 56 def} if %row h03 to h07: O-N
         k 3 eq {/j2 2 def /j0 48 def} if %row g04 to g06: O-N
       
j1 1 j2 {/j exch def %j=j1,j2 %lines
         /ja j0 j add def
         t1* j LUTt1* ja get put
         c1* j LUTc1* ja get put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         c1* j get fakt2 mul Vorz mul
         t1* j get fakt2 mul
         050 0 360 arc fill
         j 1 ge {c1*  j 1 sub get fakt2 mul Vorz mul
                 t1*  j 1 sub get fakt2 mul moveto
                 c1*  j       get fakt2 mul Vorz mul
                 t1*  j       get fakt2 mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         c1* j get fakt2 mul Vorz mul
                         t1* j get fakt2 mul moveto
                         c1* 0 get fakt2 mul Vorz mul
                         t1* 0 get fakt2 mul lineto stroke
                        } if %k=0
                 } if
       } for %j=j1,j2
       
       } for %k=0,3

%**********************************************************************

/Vorz 1 def
%spalte e05 bis e05: W-O
0 1 0 {/j exch def %j=0,0 %lines
       /ja j 40 add def
       t1* j LUTt1* ja get put
       c1* j LUTc1* ja get put
       newpath
       LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
       c1* j get fakt2 mul Vorz mul
       t1* j get fakt2 mul
       050 0 360 arc fill
       1 setgray
       10 setlinewidth
       c1* j get fakt2 mul Vorz mul
       t1* j get fakt2 mul
       055 0 360 arc stroke
       20 setlinewidth
       newpath
      } for %j=0,0

k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 00 def} if %line b01 to j01: W-O
         k 1 eq {/j2 6 def /j0 10 def} if %line c02 to i02: W-O
         k 2 eq {/j2 4 def /j0 20 def} if %line d03 to h03: W-O
         k 3 eq {/j2 2 def /j0 30 def} if %line e04 to g04: W-O
         
j1 1 j2 {/j exch def %j=j1,j2 %lines
         /ja j0 j 9 mul add def
         t1* j LUTt1* ja get put
         c1* j LUTc1* ja get put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         c1* j get fakt2 mul Vorz mul
         t1* j get fakt2 mul
         050 0 360 arc fill
         j 1 ge {c1*  j 1 sub get fakt2 mul Vorz mul
                 t1*  j 1 sub get fakt2 mul moveto
                 c1*  j       get fakt2 mul Vorz mul
                 t1*  j       get fakt2 mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         c1* j get fakt2 mul Vorz mul
                         t1* j get fakt2 mul moveto
                         c1* 0 get fakt2 mul Vorz mul
                         t1* 0 get fakt2 mul lineto stroke
                         c1* j get fakt2 mul Vorz mul
                         t1* j get fakt2 mul
                         070 0 360 arc stroke
                        } if %k=0
                 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
                 newpath 250 /TimesBI-ISOL1 FS
                 /xadd0 [-200 -200 -200] def /yadd0 [250 250 250] def
                 /xadd1 [-200 -200 -200] def /yadd1 [250 250 250] def
                 c1*  j       get fakt2 mul Vorz mul olvrgb 0 eq {xadd0} {xadd1} ifelse xchartl 8 sub get add
                 t1*  j       get fakt2 mul          olvrgb 0 eq {yadd0} {yadd1} ifelse xchartl 8 sub get add
                 moveto
                 cname6 xchartl 8 sub get show
                 1 setgray
                 c1*  j       get fakt2 mul Vorz mul 580 sub
                 t1*  j       get fakt2 mul 600 sub moveto
                 TBS (\050) show TBIS (c*) show 
                 0 -50 rmoveto TBL (M) show 0 50 rmoveto
                 TBIS (, t*) show
                 0 -50 rmoveto TBL (M) show 0 50 rmoveto
                 TBS (\051) show 
                 newpath
                } if
        } for %j=j1,j2

        } for %k=0,3

%**********************************************************************
/Vorz -1 def

k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 08 def} if %line b09 to j09: C-N
         k 1 eq {/j2 6 def /j0 16 def} if %line c08 to i08: C-N
         k 2 eq {/j2 4 def /j0 24 def} if %line d07 to h07: C-N
         k 3 eq {/j2 2 def /j0 32 def} if %line e06 to h06: C-N

j1 1 j2 {/j exch def %j=j1,j2 %lines
         /ja j0 j 9 mul add def
         t2* j LUTt2* ja get put
         c2* j LUTc2* ja get put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         c2* j get fakt2 mul Vorz mul
         t2* j get fakt2 mul
         050 0 360 arc fill
         j 1 ge {c2*  j 1 sub get fakt2 mul Vorz mul
                 t2*  j 1 sub get fakt2 mul moveto
                 c2*  j       get fakt2 mul Vorz mul
                 t2*  j       get fakt2 mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         c2* j get fakt2 mul Vorz mul
                         t2* j get fakt2 mul moveto
                         c2* 0 get fakt2 mul Vorz mul
                         t2* 0 get fakt2 mul lineto stroke
                        } if %k=0
                 } if
        } for %j=j1,j2
        
        } for %k=0,3
%**********************************************************************
/Vorz -1 def
%spalte e05 bis e05: W-C
0 1 0 {/j exch def %j=0,0 %lines
       /ja j 40 add def
       t2* j LUTt1* ja get put
       c2* j LUTc1* ja get put
       newpath
       LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
       c2* j get fakt2 mul Vorz mul
       t2* j get fakt2 mul
       050 0 360 arc fill
       1 setgray
       10 setlinewidth
       c2* j get fakt2 mul Vorz mul
       t2* j get fakt2 mul
       055 0 360 arc stroke
       20 setlinewidth
       newpath
      } for %j=0,0

k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 00 def} if %row b01 to b09: W-C
         k 1 eq {/j2 6 def /j0 10 def} if %row c02 to c08: W-C
         k 2 eq {/j2 4 def /j0 20 def} if %row d03 to d07: W-C
         k 3 eq {/j2 2 def /j0 30 def} if %row e04 to e06: W-C

j1 1 j2 {/j exch def %j=j1,j2 %rows
         /ja j0 j add def
         t2* j LUTt2* ja get put
         c2* j LUTc2* ja get put

         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         c2* j get fakt2 mul Vorz mul
         t2* j get fakt2 mul
         050 0 360 arc fill
         j 1 ge {c2*  j 1 sub get fakt2 mul Vorz mul
                 t2*  j 1 sub get fakt2 mul moveto
                 c2*  j       get fakt2 mul Vorz mul
                 t2*  j       get fakt2 mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         c2* j get fakt2 mul Vorz mul
                         t2* j get fakt2 mul moveto
                         c2* 0 get fakt2 mul Vorz mul
                         t2* 0 get fakt2 mul lineto stroke
                         c2* j get fakt2 mul Vorz mul
                         t2* j get fakt2 mul
                         070 0 360 arc stroke
                        } if %k=0
                 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
                 newpath 250 /TimesBI-ISOL1 FS
                 /xadd0 [-000 -400 -400] def /yadd0 [-400 250 -400] def
                 /xadd1 [-000 -400 -400] def /yadd1 [-400 250 -400] def
                 c2*  j       get fakt2 mul Vorz mul olvrgb 0 eq {xadd0} {xadd1} ifelse xchartl 8 sub get add
                 t2*  j       get fakt2 mul          olvrgb 0 eq {yadd0} {yadd1} ifelse xchartl 8 sub get add
                 moveto
                 cname6 xchartl 8 sub 3 add get show
                 newpath
                } if
        } for %j=j1,j2
        
        } for %k=0,3

%**********************************************************************
} if %8<=xchartl  <=10

newpath

xchartl   12 ge xchartl   14 le and {%12<=xchartl  <=14
%**********************************************************************
100 /Times-ISOL1 FS

/Vorz 1 def
k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 72 def} if %row j01 to j09: O-N
         k 1 eq {/j2 6 def /j0 64 def} if %row i02 to i08: O-N
         k 2 eq {/j2 4 def /j0 56 def} if %row h03 to h07: O-N
         k 3 eq {/j2 2 def /j0 48 def} if %row g04 to g06: O-N
       
j1 1 j2 {/j exch def %j=j1,j2 %lines
         /ja j0 j add def
         t1*rgb j LUTt*rgb ja get put
         c1*rgb j LUTc*rgb ja get put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         c1*rgb j get fakt2 mul Vorz mul
         t1*rgb j get fakt2 mul
         050 0 360 arc fill
         j 1 ge {c1*rgb  j 1 sub get fakt2 mul Vorz mul
                 t1*rgb  j 1 sub get fakt2 mul moveto
                 c1*rgb  j       get fakt2 mul Vorz mul
                 t1*rgb  j       get fakt2 mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         c1*rgb j get fakt2 mul Vorz mul
                         t1*rgb j get fakt2 mul moveto
                         c1*rgb 0 get fakt2 mul Vorz mul
                         t1*rgb 0 get fakt2 mul lineto stroke
                        } if %k=0
                 } if
       } for %j=j1,j2
       
       } for %k=0,3

%**********************************************************************

/Vorz 1 def
%spalte e05 bis e05: W-O
0 1 0 {/j exch def %j=0,0 %lines
       /ja j 40 add def
       t1*rgb j LUTt*rgb ja get put
       c1*rgb j LUTc*rgb ja get put
       newpath
       LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
       c1*rgb j get fakt2 mul Vorz mul
       t1*rgb j get fakt2 mul
       050 0 360 arc fill
       1 setgray
       10 setlinewidth
       c1*rgb j get fakt2 mul Vorz mul
       t1*rgb j get fakt2 mul
       055 0 360 arc stroke
       20 setlinewidth
       newpath
      } for %j=0,0

k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 00 def} if %line b01 to j01: W-O
         k 1 eq {/j2 6 def /j0 10 def} if %line c02 to i02: W-O
         k 2 eq {/j2 4 def /j0 20 def} if %line d03 to h03: W-O
         k 3 eq {/j2 2 def /j0 30 def} if %line e04 to g04: W-O
         
j1 1 j2 {/j exch def %j=j1,j2 %lines
         /ja j0 j 9 mul add def
         t1*rgb j LUTt*rgb ja get put
         c1*rgb j LUTc*rgb ja get put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         c1*rgb j get fakt2 mul Vorz mul
         t1*rgb j get fakt2 mul
         050 0 360 arc fill
         j 1 ge {c1*rgb  j 1 sub get fakt2 mul Vorz mul
                 t1*rgb  j 1 sub get fakt2 mul moveto
                 c1*rgb  j       get fakt2 mul Vorz mul
                 t1*rgb  j       get fakt2 mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         c1*rgb j get fakt2 mul Vorz mul
                         t1*rgb j get fakt2 mul moveto
                         c1*rgb 0 get fakt2 mul Vorz mul
                         t1*rgb 0 get fakt2 mul lineto stroke
                         c1*rgb j get fakt2 mul Vorz mul
                         t1*rgb j get fakt2 mul
                         070 0 360 arc stroke
                        } if %k=0
                 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
                 newpath 250 /TimesBI-ISOL1 FS
                 /xadd0 [-200 -200 -200] def /yadd0 [250 250 250] def
                 /xadd1 [-200 -200 -200] def /yadd1 [250 250 250] def
                 c1*rgb  j       get fakt2 mul Vorz mul olvrgb 0 eq {xadd0} {xadd1} ifelse xchartl 12 sub get add
                 t1*rgb  j       get fakt2 mul          olvrgb 0 eq {yadd0} {yadd1} ifelse xchartl 12 sub get add
                 moveto
                 cname6 xchartl 12 sub get show
                 1 setgray
                 c1*rgb  j       get fakt2 mul Vorz mul 580 sub
                 t1*rgb  j       get fakt2 mul 600 sub moveto
                 TBS (\050) show TBIS (c*) show 
                 0 -50 rmoveto TBL (M) show 0 50 rmoveto
                 TBIS (, t*) show
                 0 -50 rmoveto TBL (M) show 0 50 rmoveto
                 TBS (\051) show 
                 newpath
                } if
        } for %j=j1,j2

        } for %k=0,3


%**********************************************************************
/Vorz -1 def
k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 08 def} if %line b09 to j09: C-N
         k 1 eq {/j2 6 def /j0 16 def} if %line c08 to i08: C-N
         k 2 eq {/j2 4 def /j0 24 def} if %line d07 to h07: C-N
         k 3 eq {/j2 2 def /j0 32 def} if %line e06 to h06: C-N

j1 1 j2 {/j exch def %j=j1,j2 %lines
         /ja j0 j 9 mul add def
         t2*rgb j LUTt*rgb ja get put
         c2*rgb j LUTc*rgb ja get put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         c2*rgb j get fakt2 mul Vorz mul
         t2*rgb j get fakt2 mul
         050 0 360 arc fill
         j 1 ge {c2*rgb  j 1 sub get fakt2 mul Vorz mul
                 t2*rgb  j 1 sub get fakt2 mul moveto
                 c2*rgb  j       get fakt2 mul Vorz mul
                 t2*rgb  j       get fakt2 mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         c2*rgb j get fakt2 mul Vorz mul
                         t2*rgb j get fakt2 mul moveto
                         c2*rgb 0 get fakt2 mul Vorz mul
                         t2*rgb 0 get fakt2 mul lineto stroke
                        } if %k=0
                 } if
        } for %j=j1,j2
        
        } for %k=0,3
%**********************************************************************
/Vorz -1 def
%spalte e05 bis e05: W-C
0 1 0 {/j exch def %j=0,0 %lines
       /ja j 40 add def
       t2*rgb j LUTt*rgb ja get put
       c2*rgb j LUTc*rgb ja get put
       newpath
       LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
       c2*rgb j get fakt2 mul Vorz mul
       t2*rgb j get fakt2 mul
       050 0 360 arc fill
       1 setgray
       10 setlinewidth
       c2*rgb j get fakt2 mul Vorz mul
       t2*rgb j get fakt2 mul
       055 0 360 arc stroke
       20 setlinewidth
       newpath
      } for %j=0,0

k1 1 k2 {/k exch def %k=0,3
         k 0 eq {/j2 8 def /j0 00 def} if %row b01 to b09: W-C
         k 1 eq {/j2 6 def /j0 10 def} if %row c02 to c08: W-C
         k 2 eq {/j2 4 def /j0 20 def} if %row d03 to d07: W-C
         k 3 eq {/j2 2 def /j0 30 def} if %row e04 to e06: W-C

j1 1 j2 {/j exch def %j=j1,j2 %rows
         /ja j0 j add def
         t2*rgb j LUTt*rgb ja get put
         c2*rgb j LUTc*rgb ja get put
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         c2*rgb j get fakt2 mul Vorz mul
         t2*rgb j get fakt2 mul
         050 0 360 arc fill
         j 1 ge {c2*rgb  j 1 sub get fakt2 mul Vorz mul
                 t2*rgb  j 1 sub get fakt2 mul moveto
                 c2*rgb  j       get fakt2 mul Vorz mul
                 t2*rgb  j       get fakt2 mul lineto stroke
                } if
         j 8 eq {k 0 eq {%k=0
                         icolor 0 eq {0 0 0} {1 0 0} ifelse setrgbcolor
                         c2*rgb j get fakt2 mul Vorz mul
                         t2*rgb j get fakt2 mul moveto
                         c2*rgb 0 get fakt2 mul Vorz mul
                         t2*rgb 0 get fakt2 mul lineto stroke
                         c2*rgb j get fakt2 mul Vorz mul
                         t2*rgb j get fakt2 mul
                         070 0 360 arc stroke
                        } if %k=0
                 LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
                 newpath 250 /TimesBI-ISOL1 FS
                 /xadd0 [-000 -400 -400] def /yadd0 [-400 250 -400] def
                 /xadd1 [-000 -400 -400] def /yadd1 [-400 250 -400] def
                 c2*rgb  j       get fakt2 mul Vorz mul olvrgb 0 eq {xadd0} {xadd1} ifelse xchartl 12 sub get add
                 t2*rgb  j       get fakt2 mul          olvrgb 0 eq {yadd0} {yadd1} ifelse xchartl 12 sub get add
                 moveto
                 cname6 xchartl 12 sub 3 add get show
                 newpath
                } if
        } for %j=j1,j2
        
        } for %k=0,3

%**********************************************************************
} if %12<=xchartl  <=14

xchartl 1 eq xcolor 2 eq xcolor 3 eq or and {-200 0 translate} if %special shift for J-B TLS00a
xchartl 1 eq xcolor 4 eq xcolor 5 eq or and { 300 0 translate} if %special shift for J-B FRS06a
xchartl 1 eq xcolor 6 eq xcolor 7 eq or and {-200 0 translate} if %special shift for J-B TLS18a

%**********************************************************************
        } %xchart #3,7,11,15
%*********************************************************************************
        { %xchart =3,7,11,15

1 setgray        
%xchartl 3 eq {
-3400  4175 moveto
TBS (CIELAB) show
RBS
(-Bunttonwinkel: ) showde
TBS
( hue angles: ) showen
( angle de teinte: ) showfr

%              } if

xchartl 11 le {
-3400 xchartl 7 ge {200 add} if 3900 moveto
TBIS (h) show
0 -50 rmoveto TBL (ab,d) show 0 50 rmoveto
TBS (=[) show
0 1 5 {/i exch def %i=0,5
       angle_olvG11i i get cvishow
       i 5 ne {(, ) show} if
      } for %i=0,5
(]) show

-3400 xchartl 7 ge {200 add} if 3625 moveto
TBIS (h) show
0 -50 rmoveto TBL (ab,dx) show 0 50 rmoveto
TBS (=[) show
0 1 5 {/i exch def %i=0,5
       H*olv i get cvishow
       i 5 ne {(, ) show} if
      } for %i=0,5
(]) show
} if %xchartl,<=11

olvrgb 1 eq {%olvrgb=1
-3400 xchartl 7 ge {200 add} if 3350 moveto
TBIS (h) show
0 -50 rmoveto TBL (ab,e) show 0 50 rmoveto
TBS (=[) show
0 1 5 {/i exch def %i=0,5
       angle_rgb i get cvishow
       i 5 ne {(, ) show} if
      } for %i=0,5
(]) show
           } if %olvrgb=1

1600 200 add 2900 moveto %xchartl 3 eq {200 sub} if 2900 moveto
TBIS (a*) show
TBL 0 -50 rmoveto
xchartl  0 ge xchartl  3 le and {(a) show} if
xchartl  4 ge xchartl  7 le and {(lab*) show} if
xchartl  8 ge xchartl 11 le and {(lab*) show} if
xchartl 12 ge xchartl 15 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if
TBL 0 50 rmoveto
TBS (=) show
xchartl 4 le {
              TBIS (C*) show
              TBL 0 -50 rmoveto (ab,a) show TBL 0 50 rmoveto
             }
             {
              TBIS (c*) show
              TBL 0 -50 rmoveto
              xchartl 4  ge xchartl  7 le and {(lab*) show} if
              xchartl 8  ge xchartl 11 le and {(lab*) show} if
              xchartl 12 ge xchartl 15 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if
              TBL 0 50 rmoveto
             } ifelse
TBIS ( cos h) show
0 -50 rmoveto TBL (ab) show 0 50 rmoveto
 

1600 200 add 2600 moveto %xchartl 3 eq {200 sub} if 2600 moveto
TBIS (b*) show
TBL 0 -50 rmoveto
xchartl  0 ge xchartl  3 le and {(a) show} if
xchartl  4 ge xchartl  7 le and {(lab*) show} if
xchartl  8 ge xchartl 11 le and {(lab*) show} if
xchartl 12 ge xchartl 15 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if
TBL 0 50 rmoveto
TBS (=) show
xchartl 4 le {
              TBIS (C*) show
              TBL 0 -50 rmoveto (ab,a) show TBL 0 50 rmoveto
             }
             {
              TBIS (c*) show
              TBL 0 -50 rmoveto
              xchartl 4  ge xchartl  7 le and {(lab*) show} if
              xchartl 8  ge xchartl 11 le and {(lab*) show} if
              xchartl 12 ge xchartl 15 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if
              TBL 0 50 rmoveto
             } ifelse
TBIS ( sin h) show
0 -50 rmoveto TBL (ab) show 0 50 rmoveto

-400 200 add 3800 moveto %xchartl 11 le {300 add} if 3500 moveto
TBIK (b*) show
TBS 0 -50 rmoveto
xchartl  0 ge xchartl  3 le and {(a) show} if
xchartl  4 ge xchartl  7 le and {(lab*) show} if
xchartl  8 ge xchartl 11 le and {(lab*) show} if
xchartl 12 ge xchartl 15 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if
TBS 0 50 rmoveto

1800 xchartl 3 le {700 add } if 1900 moveto
xchartl 4 ge {TBIK (relative ) show} if
TBK
(Buntheit ) showde
(chroma ) showen
(chroma ) showfr

2700 1650 moveto
TBIK (a*) show
TBS 0 -50 rmoveto
xchartl  0 ge xchartl  3 le and {(a) show} if
xchartl  4 ge xchartl  7 le and {(lab*) show} if
xchartl  8 ge xchartl 11 le and {(lab*) show} if
xchartl 12 ge xchartl 15 le and {olvrgb 0 eq {(olv*)}{(rgb*)} ifelse show} if
TBS 0 50 rmoveto

          
%new shift in middle
0 1500 translate

%axis and scales
1 setgray
-3000 0 moveto 6300  0 rlineto stroke
0 -1880  moveto 0 3600  rlineto stroke
3300 100 sub 50 moveto 100 -50 rlineto
                      -100 -50 rlineto closepath fill
0 50 sub 1800 100 sub moveto 50  100 rlineto
                             50 -100 rlineto closepath fill
0 setgray
TS
/xt001 9 array def
/xt001 [(-2,0) () (-1,0) ( ) (  ) () () () () ]def %(  1,0) () (  2,0)] def
/yt001 5 array def
/yt001 [(-1,0 ) () ( ) ( ) (1,0)] def

/xt100 9 array def
/xt100 [(-200) () (-100) ( ) (  ) () (  100) () (  200)] def
/yt100 5 array def
/yt100 [(-100 ) () ( ) ( ) (100)] def

2 1 6 {/i exch def %i=2,6
        -3000   i 750   mul add  -50 moveto 0 100 rlineto stroke
        -3650   i 850   mul add -200   moveto
        xchartl 3 le {xt100} {xt001} ifelse i get show
       } for %i=2,6
      
0 1 4 {/i exch def %i=0,4
       -75 -1500 i 750 mul    add moveto 150 0 rlineto stroke
       100 -1650 i 800 mul    add moveto
       xchartl 3 le {yt100} {yt001} ifelse i get show
       } for %i=0,4
newpath

%**********************************************************************

%For all xchartl=3,7,11,15
%Variable hue series O00Y-O83Y, Y00L-Y83L, L00C-L83C,
%                    C00V-C83V, C00V-C83V, C00V-C83V-O00Y
250 /TimesBI-ISOL1 FS
/fcolor1 1.10 def
/fcolor2 1.20 def

/j729 0 def
0 1 5 {/xtonj exch def %xton=0,5

0 1 7 {/j exch def %i=0,08
       xtonj 0 eq {/j10 648 j729 sub j 09 mul add 10 mul def} if %series O00Y-O83Y, -09
       xtonj 1 eq {/j10 720 j729 sub j 81 mul sub 10 mul def} if %series Y00L-Y83L, -81
       xtonj 2 eq {/j10 072 j729 sub j        add 10 mul def} if %series L00C-L83C, +01
       xtonj 3 eq {/j10 080 j729 sub j 09 mul sub 10 mul def} if %series C00V-C83V, -09
       xtonj 4 eq {/j10 008 j729 sub j 81 mul add 10 mul def} if %series C00V-C83V, -81
       xtonj 5 eq {/j10 656 j729 sub j        sub 10 mul def} if %series C00V-C83V, +01
       LUTL* j LUT j10 0 add get  100 div put 
       LUTA* j LUT j10 1 add get  100 div put
       LUTB* j LUT j10 2 add get  100 div put
       LUTr* j LUT j10 3 add get 1000 div put
       LUTg* j LUT j10 4 add get 1000 div put
       LUTb* j LUT j10 5 add get 1000 div put
       C*ab  j LUTA* j get dup mul
               LUTB* j get dup mul add 0.000001 add sqrt put
       L*    j LUTL* j get put
       LUTc*rgb j 1000 put
      } for %j=0,08

%**********************************************************************

/j0 0 def /j1 0 def /j2 8 def /k 0 def
/fakt  30 def
/fakt1  15 def
/fakt2 1500 def

 0 1 7  {/j exch def %j=0,8 %lines
         /ja j0 j add def
         c1*rgb j LUTc*rgb ja get put
         C*ab j LUTA* ja get dup mul
                LUTB* ja get dup mul add sqrt put
         /angleWO LUTB* ja get LUTA* ja get 0.0001 add atan def
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         xchartl 3 le {%xchart=3
                       newpath
                       C*ab j get fakt1 mul angleWO cos mul
                       C*ab j get fakt1 mul angleWO sin mul moveto
                       C*ab j get fakt1 mul angleWO cos mul
                       C*ab j get fakt1 mul angleWO sin mul
                       050 0 360 arc fill
                      }
                      {%xchart>=7
                       newpath
                       c1*rgb j get fakt2 mul angleWO cos mul
                       c1*rgb j get fakt2 mul angleWO sin mul moveto
                       c1*rgb j get fakt2 mul angleWO cos mul
                       c1*rgb j get fakt2 mul angleWO sin mul
                       050 0 360 arc fill
                      } ifelse %xchart=3,>=7
        } for %j=0,8

} for %xton=0,5

%END for all xchartl=3,7,11,15

%**********************************************************************

%For all xchartl=3,7,11,15
%Constant hue series
250 /TimesBI-ISOL1 FS
/fcolor1 1.10 def
/fcolor2 1.20 def

/j729 0 def
%xcolor 1 le {/j729 0 def}{/j729 729 def} ifelse

0 1 2 {/xtonj exch def %xton=0,2

       xtonj 0 eq {/j1 729 j729 sub         10 mul def} if %series O-C
       xtonj 1 eq {/j1 729 j729 sub 081 add 10 mul def} if %series Y-V
       xtonj 2 eq {/j1 729 j729 sub 162 add 10 mul def} if %series L-M

       0 1 080 {/i exch def %i=0,080
                /i10 j1 i 10 mul add def
                LUTL* i LUT i10 0 add get  100 div put 
                LUTA* i LUT i10 1 add get  100 div put
                LUTB* i LUT i10 2 add get  100 div put
                LUTr* i LUT i10 3 add get 1000 div put
                LUTg* i LUT i10 4 add get 1000 div put
                LUTb* i LUT i10 5 add get 1000 div put
                C*ab  i LUTA* i get dup mul
                        LUTB* i get dup mul add 0.000001 add sqrt put
                L*    i LUTL* i get put
               } for %i=0,080
        
          %       801 737 809 729  882 818 890 810  963 899 971 891
          %       j01 b09 j09 b01  j10 b18 j18 b10  j19 b27 j27 b19
          %       O   C   N1  W1   Y   V   N2  W2   L   M   N3  W3

          xtonj 0 eq {/index [801 737 809 729] def} if %O,C,N1,W1
          xtonj 1 eq {/index [882 818 890 810] def} if %Y,V,N2,W2
          xtonj 2 eq {/index [963 899 971 891] def} if %L,M,N1,W2

          0 1 3 {/i exch def %i=0,3 %standard colours at the end
                 /i10 index i get j729 sub 10 mul def
                 /i81 81 i add def
                 LUTL* i81 LUT i10 0 add get 100 div put
                 LUTA* i81 LUT i10 1 add get 100 div put
                 LUTB* i81 LUT i10 2 add get 100 div put
                 LUTr* i81 LUT i10 3 add get 1000 div put
                 LUTg* i81 LUT i10 4 add get 1000 div put
                 LUTb* i81 LUT i10 5 add get 1000 div put
                 C*ab  i81 LUTA* i81 get dup mul
                           LUTB* i81 get dup mul add 0.000001 add sqrt put
                 L*    i81 LUTL* i81 get put
                } for %i=0,3

          /L*WN LUTL* 84 get LUTL* 83 get sub def

          0 1 084 {/i exch def %i=0,084
                   LUTl*  i LUTL* i get LUTL* 83 get sub 
                            L*WN 0.000001 add div put
                   LUTc1* i C*ab i get C*ab 81 get 0.000001 add div put
                   LUTc2* i C*ab i get C*ab 82 get 0.000001 add div put
                   LUTt1* i LUTl* i get LUTc1* i get 
                            L* 81 get L* 83 get sub L*WN
                            0.000001 add div 0.5 sub mul sub put
                   LUTt2* i LUTl* i get LUTc2* i get
                            L* 82 get L* 83 get sub L*WN
                            0.000001 add div 0.5 sub mul sub put
                   LUTr* i get 0 lt {LUTr* i 0 put} if
                   LUTg* i get 0 lt {LUTg* i 0 put} if
                   LUTb* i get 0 lt {LUTb* i 0 put} if
                   LUTr* i get 1 gt {LUTr* i 1 put} if
                   LUTg* i get 1 gt {LUTg* i 1 put} if
                   LUTb* i get 1 gt {LUTb* i 1 put} if
                   %maximum
                   /max LUTr* i get def %rgb brilliantness
                   LUTg* i get max gt {/max LUTg* i get def} if
                   LUTb* i get max gt {/max LUTb* i get def} if
                   %minimum
                   /min LUTr* i get def %rgb whiteness
                   LUTg* i get min lt {/min LUTg* i get def} if
                   LUTb* i get min lt {/min LUTb* i get def} if         
                   LUTc*rgb i max min sub put %rgb chroma
                   LUTt*rgb i min max min sub 0.5 mul add put %rgb triangle lightness
                  } for %i=0,084

%**********************************************************************

/j0 0 def /j1 0 def /j2 8 def /k 0 def
/fakt  30 def
/fakt1  15 def
/fakt2 1500 def

 0 1 8  {/j exch def %j=0,8 %lines
         /ja j0 j 9 mul add def
         c1*rgb j LUTc*rgb ja get put
         C*ab j LUTA* ja get dup mul
                LUTB* ja get dup mul add sqrt put
         /angleWO LUTB* ja get LUTA* ja get 0.0001 add atan def
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         xchartl 3 le {%xchart=3
                       C*ab j get fakt1 mul angleWO cos mul
                       C*ab j get fakt1 mul angleWO sin mul
                       050 0 360 arc fill
                       j j2 eq {%j=j2
                                0 0 0 setrgbcolor
                                C*ab j get fakt1 mul angleWO cos mul
                                C*ab j get fakt1 mul angleWO sin mul
                                065 0 360 arc stroke
                                LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
                                /xadd0 [-100 -500 -500 -700 -200  000] def
                                /yadd0 [ 100 -000 -200 -100 -200  100] def
                                C*ab j get fakt1 mul fcolor2 mul angleWO cos mul 
                                xadd0 xtonj get add
                                C*ab j get fakt1 mul fcolor2 mul angleWO sin mul
                                yadd0 xtonj get add moveto
                                cname6 xtonj get show
                                icolor 1 eq {1 0 0 setrgbcolor
                                             0 0 moveto
                                             C*ab j get fakt1 mul angleWO cos mul
                                             C*ab j get fakt1 mul angleWO sin mul
                                             lineto stroke
                                            } if
                                } if %j=j2
                      }
                      {%xchart>=7
                       c1*rgb j get fakt2 mul angleWO cos mul
                       c1*rgb j get fakt2 mul angleWO sin mul
                       050 0 360 arc fill
                       j j2 eq {%j=j2
                                0 0 0 setrgbcolor
                                c1*rgb j get fakt2 mul angleWO cos mul
                                c1*rgb j get fakt2 mul angleWO sin mul
                                065 0 360 arc stroke
                                LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
                                /xadd0 [-100 -500 -500 -700 -200  000] def
                                /yadd0 [ 100 -000 -200 -100 -200  100] def
                                c1*rgb j get fakt2 mul fcolor2 mul angleWO cos mul
                                xadd0 xtonj get add
                                c1*rgb j get fakt2 mul fcolor2 mul angleWO sin mul
                                yadd0 xtonj get add moveto
                                cname6 xtonj get show
                                icolor 1 eq {1 0 0 setrgbcolor %icolor=1
                                             0 0 moveto
                                             c1*rgb j get fakt2 mul angleWO cos mul
                                             c1*rgb j get fakt2 mul angleWO sin mul
                                             lineto stroke
                                            } if %icolor=1
                               } if %j=j2
                      } ifelse %xchart=3,>=7
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         j 1 ge {xchartl 3 eq {olvrgb 0 eq {C*ab j 1 sub get fakt1 mul angleWO cos mul
                                            C*ab j 1 sub get fakt1 mul angleWO sin mul moveto
                                            C*ab j       get fakt1 mul angleWO cos mul
                                            C*ab j       get fakt1 mul angleWO sin mul lineto stroke
                                           } if
                              }
                              {c1*rgb  j 1 sub get fakt2 mul angleWO cos mul
                               c1*rgb  j 1 sub get fakt2 mul angleWO sin mul moveto
                               c1*rgb  j       get fakt2 mul angleWO cos mul
                               c1*rgb  j       get fakt2 mul angleWO sin mul lineto stroke
                              } ifelse
                } if
        } for %j=0,8

%**********************************************************************

 0 1 8  {/j exch def %j=0,8 %lines
         /ja j0 j add def
         c2*rgb j LUTc*rgb ja get put
         C*ab j LUTA* ja get dup mul
                LUTB* ja get dup mul add sqrt put
         /angleWO LUTB* ja get LUTA* ja get 0.0001 add atan def
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         xchartl 3 le {%xchart=3
                       C*ab j get fakt1 mul angleWO cos mul
                       C*ab j get fakt1 mul angleWO sin mul
                       050 0 360 arc fill
                       j j2 eq {%j=j2
                                0 0 0 setrgbcolor
                                C*ab j get fakt1 mul angleWO cos mul
                                C*ab j get fakt1 mul angleWO sin mul
                                065 0 360 arc stroke
                                LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
                                /xadd0 [-000 -100 -500 -700 -200  000] def
                                /yadd0 [ 100 -000  000 -100 -200  100] def
                                C*ab j get fakt1 mul fcolor2 mul angleWO cos mul
                                xadd0 xtonj 3 add get add
                                C*ab j get fakt1 mul fcolor2 mul angleWO sin mul
                                yadd0 xtonj 3 add get add moveto
                                cname6 xtonj 3 add get show
                                icolor 1 eq {1 0 0 setrgbcolor
                                             0 0 moveto
                                             C*ab j get fakt1 mul angleWO cos mul
                                             C*ab j get fakt1 mul angleWO sin mul
                                             lineto stroke
                                            } if
                               } if %j=j2
                      }
                      {%xchart=7
                       c2*rgb j get fakt2 mul angleWO cos mul
                       c2*rgb j get fakt2 mul angleWO sin mul
                       050 0 360 arc fill
                       j j2 eq {%j=j2
                                0 0 0 setrgbcolor
                                c2*rgb j get fakt2 mul angleWO cos mul
                                c2*rgb j get fakt2 mul angleWO sin mul
                                065 0 360 arc stroke
                                LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
                                /xadd0 [-000 -100 -500 -700 -200  000] def
                                /yadd0 [ 100 -000  000 -100 -200  100] def
                                c2*rgb j get fakt2 mul fcolor2 mul angleWO cos mul
                                xadd0 xtonj 3 add get add
                                c2*rgb j get fakt2 mul fcolor2 mul angleWO sin mul
                                yadd0 xtonj 3 add get add moveto
                                cname6 xtonj 3 add get show
                                icolor 1 eq {1 0 0 setrgbcolor %icolor=1
                                             0 0 moveto
                                             c2*rgb j get fakt2 mul angleWO cos mul
                                             c2*rgb j get fakt2 mul angleWO sin mul
                                             lineto stroke
                                            } if %icolor=1
                               } if %j=j2
                      } ifelse %xchart=3, %xchart>=7
         LUTr* ja get LUTg* ja get LUTb* ja get setrgbcolor
         j 1 ge {xchartl 3 le {C*ab j 1 sub get fakt1 mul angleWO cos mul
                               C*ab j 1 sub get fakt1 mul angleWO sin mul moveto
                               C*ab j       get fakt1 mul angleWO cos mul
                               C*ab j       get fakt1 mul angleWO sin mul lineto stroke
                              }
                              {c2*rgb  j 1 sub get fakt2 mul angleWO cos mul
                               c2*rgb  j 1 sub get fakt2 mul angleWO sin mul moveto
                               c2*rgb  j       get fakt2 mul angleWO cos mul
                               c2*rgb  j       get fakt2 mul angleWO sin mul lineto stroke
                              } ifelse
                } if
        } for %j=00,08

%xtonj=0 %series O-C
%xtonj=1 %series Y-V
%xtonj=2 %series L-M

} for %xton=0,2

%END for all xchartl=3,7,11,15

%**********************************************************************

xchartl 3 eq {%xchartl=3 only

%BEG Hexagon
%       801 737 809 729  882 818 890 810  963 899 971 891
%       j01 b09 j09 b01  j10 b18 j18 b10  j19 b27 j27 b19
%       O   C   N1  W1   Y   V   N2  W2   L   M   N3  W3

/fakt1  15 def
/indexX 7 array def
/indexX [801 882 963 737 818 899 801] def
/LUTL*X 7 array def
/LUTA*X 7 array def
/LUTB*X 7 array def

0 setgray
/fcolor1 1.10 def
/fcolor2 1.20 def
250 /TimesBI-ISOL1 FS

/j729 0 def
0 1 6 {/iX exch def %iX=0,6 %hexagon standard colours at the end
       /i10 indexX iX get j729 sub 10 mul def
                    LUTL*X iX LUT i10 0 add get 100 div put
                    LUTA*X iX LUT i10 1 add get 100 div put
                    LUTB*X iX LUT i10 2 add get 100 div put
                    LUTr* iX LUT i10 3 add get 1000 div put
                    LUTg* iX LUT i10 4 add get 1000 div put
                    LUTb* iX LUT i10 5 add get 1000 div put

       iX 5 le {0 0 0 setrgbcolor
                0 0 moveto
                LUTA*X iX get fakt1 mul fcolor1 mul cf1 div
                LUTB*X iX get fakt1 mul fcolor1 mul cf1 div lineto stroke
                
                /xadd0 [-000 -100 -500 -700 -200  000] def
                /yadd0 [ 100 -000  000 -100 -200  100] def
                LUTA*X iX get fakt1 mul fcolor2 mul cf1 div xadd0 iX get add
                LUTB*X iX get fakt1 mul fcolor2 mul cf1 div yadd0 iX get add moveto
%                xcolor 2 ge {%xcolor>=2
%                             0 0 0 setrgbcolor
%                             cname_olv00 iX get show
%                            } if %xcolor>=2
               } if
       iX 5 le icolor 1 eq and {xcolor 2 ge {0 0 0}{1 0 0} ifelse setrgbcolor
                                0 0 moveto
                                LUTA*X iX get fakt1 mul
                                LUTB*X iX get fakt1 mul lineto stroke
                               } if
                       
       iX 1 ge {0 0 0 setrgbcolor
                LUTA*X iX 1 sub get fakt1 mul cf1 div
                LUTB*X iX 1 sub get fakt1 mul cf1 div moveto
                LUTA*X iX get fakt1 mul cf1 div
                LUTB*X iX get fakt1 mul cf1 div lineto stroke
               } if
       iX 1 ge icolor 1 eq and {1 0 0 setrgbcolor
                                LUTA*X iX 1 sub get fakt1 mul
                                LUTB*X iX 1 sub get fakt1 mul moveto
                                LUTA*X iX get fakt1 mul
                                LUTB*X iX get fakt1 mul lineto stroke
                               } if
      } for  %iX=0,6 %hexagon
      
} if %xchartl=3

%**********************************************************************

xchartl 7 ge {%xchart>=7

%circle
icolor 0 eq {0 0 0 setrgbcolor} {1 0 0 setrgbcolor} ifelse
0 1500 moveto
newpath
0 0 1500  0 360 arc stroke

%BEG Hexagon
%       801 737 809 729  882 818 890 810  963 899 971 891
%       j01 b09 j09 b01  j10 b18 j18 b10  j19 b27 j27 b19
%       O   C   N1  W1   Y   V   N2  W2   L   M   N3  W3

/fakt1  15 def
/indexX 7 array def
/indexX [801 882 963 737 818 899 801] def
/LUTL*X 7 array def
/LUTA*X 7 array def
/LUTB*X 7 array def

0 setgray
/fcolor1 1.10 def
/fcolor2 1.20 def
/c1000 1 fakt2 mul def
250 /TimesBI-ISOL1 FS

/j729 0 def
0 1 6 {/iX exch def %iX=0,5 %hexagon standard colours at the end
       /i10 indexX iX get j729 sub 10 mul def
                    
       LUTL*X iX LUT i10 0 add get 100 div put
       LUTA*X iX LUT i10 1 add get 100 div put
       LUTB*X iX LUT i10 2 add get 100 div put
       LUTr* iX LUT i10 3 add get 1000 div put
       LUTg* iX LUT i10 4 add get 1000 div put
       LUTb* iX LUT i10 5 add get 1000 div put
       /angleOLV LUTB*X iX get LUTA*X iX get 0.0001 add atan def

       iX 5 le {0 0 0 setrgbcolor
                0 0 moveto
                c1000 angleOLV cos mul fcolor2 mul 
                c1000 angleOLV sin mul fcolor2 mul 
                lineto stroke
                /xadd0 [-200 -300 -300 -500 -400 -000] def
                /yadd0 [ 100 -000  000 -100 -200  100] def
                c1000 angleOLV cos mul fcolor2 mul xadd0 iX get add
                c1000 angleOLV sin mul fcolor2 mul yadd0 iX get add moveto
%                xcolor 2 ge {%xcolor>=2
%                             0 0 0 setrgbcolor
%                             cname_olv00 iX get show
%                            } if %xcolor>=2
               } if
       iX 5 le icolor 1 eq and {xcolor 2 ge {0 0 0}{1 0 0} ifelse setrgbcolor
                                0 0 moveto
                                c1000 angleOLV cos mul fcolor2 mul
                                c1000 angleOLV sin mul fcolor2 mul lineto stroke
                               } if
      } for  %iX=0,6 %hexagon

} if %xchartl>=7

%**********************************************************************
          
          0 1500 neg translate
        } ifelse %xchart #3,7,11,15 or =3,7,11,15

grestore

2600 neg 0300 neg translate

%special space for 'xm03'PROZ0.COM 2x before/after xchartl
%  xchartl    0 eq {  100 neg 13000 neg translate} if
%  xchartl    1 eq { 6100 neg 13000 neg translate} if
%  xchartl    2 eq {  100 neg 08750 neg translate} if
%  xchartl    3 eq { 6100 neg 08750 neg translate} if

%  xchartl    4 eq {  100 neg  4500 neg translate} if
%  xchartl    5 eq { 6100 neg  4500 neg translate} if
%  xchartl    6 eq {  100 neg  0250 neg translate} if
%  xchartl    7 eq { 6100 neg  0250 neg translate} if

%  xchartl    8 eq {13500 neg 13000 neg translate} if
%  xchartl    9 eq {19500 neg 13000 neg translate} if
%  xchartl   10 eq {13500 neg 08750 neg translate} if
%  xchartl   11 eq {19500 neg 08750 neg translate} if

%  xchartl   12 eq {13500 neg  4500 neg translate} if
%  xchartl   13 eq {19500 neg  4500 neg translate} if
%  xchartl   14 eq {13500 neg  0250 neg translate} if
%  xchartl   15 eq {19500 neg  0250 neg translate} if

%} for % xchartl=0,15

showpage

%} for %xchart=0,15

grestore

} for %xcolor=0,1

%%Trailer

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
161 MM 197 MM translate
  10 /Times-ISOL1 FS  1 1 scale  -77 -91 translate
%%BeginDocument: Bild 12

%line 419

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
161 MM 152 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 21

%line 429
%!PS-Adobe-3.0 EPSF-3.0 AG781-1,
%%BoundingBox: 70 90 226 206

/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
%%EndProlog
gsave

8 /Times-Roman FS
72 83 moveto
%!2     (AG781-1,) show

72 90 translate

%! 0.01 MM 0.01 MM scale
%! 15 setlinewidth
%! 0 0  moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto
%! closepath stroke

grestore

showpage
%%Trailer

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
219 MM 152 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 22

%line 439
%!PS-Adobe-3.0 EPSF-3.0 AG781-2,
%%BoundingBox: 70 90 226 206

/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
%%EndProlog
gsave

8 /Times-Roman FS
72 83 moveto
%!2     (AG781-2,) show

72 90 translate

%! 0.01 MM 0.01 MM scale
%! 15 setlinewidth
%! 0 0  moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto
%! closepath stroke

grestore

showpage
%%Trailer

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
161 MM 108 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 23

%line 449
%!PS-Adobe-3.0 EPSF-3.0 AG781-3N
%%BoundingBox: 70 83 392 335

%START PDFDE011.EPS
/pdfmark13 where {pop} {userdict /pdfmark13 /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://farbe.li.tu-berlin.de/AG78/AG78.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:2017050112000)
  /ModDate (D:20170501112000)
/DOCINFO pdfmark13
[ /View [ /FitB ]
/DOCVIEW pdfmark13
%END  PDFDE011

%SETCMYK_OLV.PS
/setcmyk_olvcolor %transfer cmyk to olv
{/ncolor exch def /ycolor exch def
 /mcolor exch def /ccolor exch def
 ncolor 0 eq {1 ccolor sub
              1 mcolor sub
              1 ycolor sub setrgbcolor
             }
             {ccolor 0 eq
              mcolor 0 eq and
              ycolor 0 eq and {%only black n
                               1 ncolor sub
                               dup
                               dup
                               setrgbcolor
                              }
                              {%cmy and black n
                               1 ccolor sub 1 ncolor sub mul
                               1 mcolor sub 1 ncolor sub mul
                               1 ycolor sub 1 ncolor sub mul
                               setrgbcolor
                              } ifelse
             } ifelse
} bind def

% !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

/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def /str {8 string } bind def

/TK {240 /Times-ISOL1 FS} bind def
/TM {290 /Times-ISOL1 FS} bind def
/TG {340 /Times-ISOL1 FS} bind def

/TIK {240 /TimesI-ISOL1 FS} bind def
/TIM {290 /TimesI-ISOL1 FS} bind def
/TIG {340 /TimesI-ISOL1 FS} bind def

/TBK {240 /TimesB-ISOL1 FS} bind def
/TBM {290 /TimesB-ISOL1 FS} bind def
/TBG {340 /TimesB-ISOL1 FS} bind def

/TBIK {240 /TimesBI-ISOL1 FS} bind def
/TBIM {290 /TimesBI-ISOL1 FS} bind def
/TBIG {340 /TimesBI-ISOL1 FS} bind def


/RK {240 /Times-Roman FS} bind def
/RM {290 /Times-Roman FS} bind def
/RG {340 /Times-Roman FS} bind def

/RIK {240 /Times-Italic FS} bind def
/RIM {290 /Times-Italic FS} bind def
/RIG {340 /Times-Italic FS} bind def

/RBK {240 /Times-Bold FS} bind def
/RBM {290 /Times-Bold FS} bind def
/RBG {340 /Times-Bold FS} bind def

/RBIK {240 /Times-BoldItalic FS} bind def
/RBIM {290 /Times-BoldItalic FS} bind def
/RBIG {340 /Times-BoldItalic FS} bind def

/SK {240 1 sub /Symbol FS} bind def
/SM {290 1 sub /Symbol FS} bind def
/SG {340 1 sub /Symbol FS} bind def

/ishowRM  {RK  -00 -60 rmoveto
           show 00  60 rmoveto RM} def
/jshowRM  {RBK -00 -60 rmoveto
           show 00  60 rmoveto RBM} def

/ishowTM  {TK  -00 -60 rmoveto
           show 00  60 rmoveto TM} def
/jshowTM  {TBK -00 -60 rmoveto
           show 00  60 rmoveto TBM} def

/ishowRG  {RM  -00 -70 rmoveto
           show 00  70 rmoveto RG} def
/jshowRG  {RBM -00 -70 rmoveto
           show 00  70 rmoveto RBG} def

/ishowTG  {TM  -00 -70 rmoveto
           show 00  70 rmoveto TG} def
/jshowTG  {TBM -00 -70 rmoveto
           show 00  70 rmoveto TBG} def

%XCHA01.PS BEG
/rec %x, y width heigth
  {/heigth exch def /width exch def
   moveto width 0 rlineto 0 heigth rlineto width neg 0 rlineto
   closepath } bind def

/colrecfi %x y width heigth c m y k
  {setcmyk_olvcolor rec fill} bind def

/colrecst %x y width heigth c m y k
  {setcmyk_olvcolor rec stroke} bind def

/rem %x, y width heigth
  {/heigth exch 0.5 mul def /width exch 0.5 mul def
   /yleftb exch heigth 0.5 mul add def
   /xleftb exch width  0.5 mul add def
   xleftb yleftb
   moveto width 0 rlineto 0 heigth rlineto width neg 0 rlineto
   closepath } bind def

/tzr {0.0 1.0 1.0 0.0} bind def %Reproduktionsfarben
/tzg {1.0 0.0 1.0 0.0} bind def
/tzb {1.0 1.0 0.0 0.0} bind def
/tzc {1.0 0.0 0.0 0.0} bind def
/tzm {0.0 1.0 0.0 0.0} bind def
/tzy {0.0 0.0 1.0 0.0} bind def

/tzn {0.0 0.0 0.0 1.00} bind def %Graureihe
/tzd {0.0 0.0 0.0 0.75} bind def
/tzz {0.0 0.0 0.0 0.50} bind def
/tzh {0.0 0.0 0.0 0.25} bind def
/tzw {0.0 0.0 0.0 0.00} bind def

/tfr {0.0 1.0 1.0 0.0 setcmyk_olvcolor} bind def %Reproduktionsfarben
/tfg {1.0 0.0 1.0 0.0 setcmyk_olvcolor} bind def
/tfb {1.0 1.0 0.0 0.0 setcmyk_olvcolor} bind def
/tfc {1.0 0.0 0.0 0.0 setcmyk_olvcolor} bind def
/tfm {0.0 1.0 0.0 0.0 setcmyk_olvcolor} bind def
/tfy {0.0 0.0 1.0 0.0 setcmyk_olvcolor} bind def

/tfrz {0.0 1.0 1.0 0.5 setcmyk_olvcolor} bind def %Reproduktionsfarben
/tfgz {1.0 0.0 1.0 0.5 setcmyk_olvcolor} bind def
/tfbz {1.0 1.0 0.0 0.5 setcmyk_olvcolor} bind def
/tfcz {1.0 0.0 0.0 0.5 setcmyk_olvcolor} bind def
/tfmz {0.0 1.0 0.0 0.5 setcmyk_olvcolor} bind def
/tfyz {0.0 0.0 1.0 0.5 setcmyk_olvcolor} bind def

/tfn {0.0 0.0 0.0 1.00 setcmyk_olvcolor} bind def %Graureihe
/tfd {0.0 0.0 0.0 0.75 setcmyk_olvcolor} bind def
/tfz {0.0 0.0 0.0 0.50 setcmyk_olvcolor} bind def
/tfh {0.0 0.0 0.0 0.25 setcmyk_olvcolor} bind def
/tfw {0.0 0.0 0.0 0.00 setcmyk_olvcolor} bind def

/cvishow {cvi 10 string cvs show} def
/cvsshow1 {10 mul cvi 0.1 mul 7 string cvs show} def
/cvsshow2 {100 mul cvi 0.01 mul 7 string cvs show} def
/cvsshow3 {1000 mul cvi 0.001 mul 7 string cvs show} def

%%EndProlog
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 {3 lanind eq {show} {pop} ifelse} bind def
/showfr {2 lanind eq {show} {pop} ifelse} bind def
/showit {4 lanind eq {show} {pop} ifelse} bind def
/showjp {5 lanind eq {show} {pop} ifelse} bind def
/showea {1 lanind le {show} {pop} ifelse} bind def

/lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def
                    /lanindd laninddf def}
               {/lanind1 0 def /lanind2 0 def} ifelse
/colormf where {pop /colorm1 colormf def /colorm2 colormf def
                    /colorMD colormdf def}
               {/colorm1 0 def} ifelse
/deintpf where {pop /deintp1 deintpf def /deintp2 deintpf def
                    /deintpd deintpdf def}
               {/deintp1 0 def} ifelse
/xcolorf where {pop /xcoloR1 xcolorf def /xcolor2 xcolorf def
                    /xcolord xcolordf def}
               {/xcoloR1 3 def} ifelse
/xchartf where {pop /xchart1 xchartf def /xchart2 xchartf def
                    /xchartd xchartdf def
                    /xchartm xchart2f xchart1f sub 1 add def}
               {/xchart1 0 def /xchartm 1 def} ifelse
/xchart3f where {pop /xchart3 xchart3f def}
                {/xchart3 0 def} ifelse
/xchart4f where {pop /xchart4 xchart4f def}
                {/xchart4 0 def} ifelse
/pchartf where {pop /pchart1 pchartf def /pchart2 pchartf def
                    /pchartd pchartdf def}
               {/pchart1 3 def} ifelse
/colsepf where {pop /colsep1 colsepf def /colsep2 colsepf def
                    /colsepd colsepdf def}
               {/colsep1 0 def} ifelse
/pmetamf where {pop /pmetam1 pmetamf def /pmetam2 pmetamf def
                    /pmetaMD pmetamdf def}
               {/pmetam1 0 def} ifelse

%either defaul values for xchart=0 or values for xchart=1
/lanind lanind1 def %
/colorm colorm1 def %
/deintp deintp1 def %
/xcolor xcoloR1 def %
/xchart xchart1 def %
/pchart pchart1 def %
/colsep colsep1 def %
/pmetam pmetam1 def %

colorm 0 eq deintp 0 eq and {/Txx (d) def /Fxx (d) def} if %colorm=0, deintp=0
colorm 0 eq deintp 1 eq and {/Txx (e) def /Fxx (e) def} if %colorm=0, deintp=1
colorm 1 eq deintp 0 eq and {/Txx (dd) def /Fxx (d) def} if %colorm=1, deintp=0
colorm 1 eq deintp 1 eq and {/Txx (de) def /Fxx (e) def} if %colorm=1, deintp=1
xchart 0 eq {/Txx (-) def /Fxx (-) def} if %always independent of intended output

5 /Times-ISOL1 FS
/cvishow {cvi 6 string cvs show} def
75 85 moveto
lanind cvishow (-) show
colorm cvishow
deintp cvishow
xcolor cvishow
xchart cvishow
pchart cvishow
colsep cvishow (-L) show pmetam cvishow

gsave
/xchart xchart1 def

340 85 moveto
5 /Times-Roman FS
(AG781-3N) show

72 90 translate

/yhoe 8500 def
0.01 MM dup scale

15 setlinewidth
0.0 0.0 1.0 0.0 setcmyk_olvcolor
0 0  moveto 11200 0 rlineto 0 yhoe rlineto -11200 0 rlineto
closepath fill
0.0 0.0 0.0 1.0 setcmyk_olvcolor
 0 0  moveto 11200 0 rlineto 0 yhoe rlineto -11200 0 rlineto
closepath stroke
 
/yd 0300 def %y0-line distance
/yz 0400 def %y1 line distance
/yx 0700 def %vertical table lines
 
/x0 0050 def %start
/x1 2300 def %R
/x2 3700 def %Y
/x3 5100 def %G
/x4 6550 def %B
/x5 8000 def %NOTES

/y0 yhoe  350 sub def
/y1 yhoe 1400 sub def
/y2 yhoe 2400 sub def
/y3 yhoe 3400 sub def
/y4 yhoe 4400 sub def

30 setlinewidth
0 yhoe 450 sub  moveto 11200 0 rlineto stroke

20 setlinewidth
0 y1 100 sub moveto 11200 0 rlineto stroke

0 y2 100 sub moveto 11200 0 rlineto stroke

0 y3 100 sub moveto 11200 0 rlineto stroke

30 setlinewidth
0 y4 100 sub moveto 11200 0 rlineto stroke

20 setlinewidth
x1 050 sub 0 moveto 0 yhoe yx sub rlineto stroke
x2 050 sub y4 100 sub moveto 0 3600 rlineto stroke
x3 050 sub y4 100 sub moveto 0 3600 rlineto stroke
x4 050 sub y4 100 sub moveto 0 3600 rlineto stroke
x5 050 sub 0 moveto 0 yhoe yx sub rlineto stroke

15 setlinewidth
0.0 0.0 1.0 0.0 setcmyk_olvcolor
50 y2 80 sub moveto 11100 0 rlineto 0 yd rlineto -11100 0 rlineto
closepath fill
15 setlinewidth
0.0 0.0 0.0 1.0 setcmyk_olvcolor

%Titeltext
 x0 yhoe yd sub moveto
TBG
(\334bereinstimmung ) showde
(Agreement ) showen
(El acuerdo ) showes
(Conformit\351 ) showfr
(L'accordo ) showit
(Avtelen ) showjp

TBIG
((Ja/Nein) ) showde
((Yes/No) ) showen
((Si/No) ) showes
((O/N) ) showfr
((Si/No) ) showit
((Ja/Nei) ) showjp

TBG
(CIELAB ) showde
(of CIELAB ) showen
(de CIELAB ) showes
(de ) showfr
(di CIELAB ) showit
(av CIELAB ) showjp

TBIG (h) show (ab) jshowTG

RBG
( mit IEC 61966-2-1 & DIN 33872-X) showde
( with IEC 61966-2-1 and DIN 33872-X) showen
( con IEC 61966-2-1 y DIN 33872-X) showes
( CIELAB avec l'IEC 61966-2-1 et la DIN 33872-X) showfr
( con IEC 61966-2-1 e DIN 33872-X) showit
( med IEC 61966-2-1 og DIN 33872-X) showjp

x1 y1 yd 2 mul add moveto
TBIG (h) show (ab)jshowTG
TBM ( ) show
(f\374 Referenz: Ger\344tefarben) showde
(for reference: device colours) showen
(para referencia: colores dei dispositivo) showes
(pour r\351f\351rence: couleurs de dispositifs) showfr
(per riferimanto: dispositivo colori) showit
(for referanse: enheten farger) showjp

x1 y1 yd 0.8 mul add moveto TBIG (R) show (d,sRGB) jshowTG
x2 y1 yd 0.8 mul add moveto TBIG (Y) show (d,sRGB) jshowTG
x3 y1 yd 0.8 mul add moveto TBIG (G) show (d,sRGB) jshowTG
x4 y1 yd 0.8 mul add moveto TBIG (B) show (d,sRGB) jshowTG

x5 y1 yd 2 mul add moveto
TBM
(Anmerkungen) showde
(NOTES) showen
(Notas) showes
(NOTES) showfr
(note) showit
(kommentarer) showjp

x5 y1 yd 1 mul add moveto
RBM
(Visuelle Standard-) showde
TBM
(visual standard) showen
(desviaci\363n) showes
(\351cart\255type) showfr
(visual deviatione) showit
(visuell) showjp


x5 y1 yd 0 mul add moveto
TBM
(Abweichung) showde
(deviation) showen
TBK
(est\341ndar visuel) showes
TBM
(visuel) showfr
(standard) showit
(standardavvik) showjp

TBIM
( v) show (SD) jshowTM

x0 y2 yd 2 mul add moveto
TBK
(Definition f\374r) showde
(definition for) showen
(definici\363n para) showes
(d\351finition pour ren\255) showfr
(definizione per) showit
(definisjion for) showjp

x0 y2 yd 1 mul add moveto
TBK
(Displayausgabe) showde
(display output) showen
(mostrar la salida) showes
(du de l'\351cran dans) showfr
(uscita monitor) showit
(monitor utgang) showjp

x0 y2 yd 0 mul add moveto
RBK
(in IEC 61966-2-1) showde
(in IEC 61966-2-1) showen
(en IEC 61966-2-1) showes
(l'IEC 61966-2-1) showfr
(in IEC 61966-2-1) showit
(i IEC 61966-2-1) showjp

TM
x1 y2 yd 2 mul add moveto (40 \261 4) show
x1 y2 yd 1 mul add moveto (40 \261 8) show

x2 y2 yd 2 mul add moveto (103 \261 4) show
x2 y2 yd 1 mul add moveto (103 \261 8) show

x3 y2 yd 2 mul add moveto (136 \261 4) show
x3 y2 yd 1 mul add moveto (136 \261 8) show

x4 y2 yd 2 mul add moveto (306 \261 8) show
x4 y2 yd 1 mul add moveto (306 \261 16) show

RM
x5 y2 yd 2 mul add moveto TM (1 x ) show TIM (v) show (SD) ishowTM
x5 y2 yd 1 mul add moveto TM (2 x ) show TIM (v) show (SD) ishowTM

x5 800 sub y2 yd 0 mul add moveto
TK
(siehe) showde
(see) showen
(v\351ase) showes
(voir) showfr
(vedere) showit
(se) showjp

TIM
lanind 2 ne {( h) show (ab) ishowTM} if

RK
(-Datentabelle) showde
TK
( data Table) showen
( datos Tab.) showes
( Tableau de donn\351es) showfr
( dati Tab.) showit
( data Tab.) showjp

TIM
lanind 2 eq {( h) show (ab) ishowTM} if

TK
( D.3) show

x0 y3 yd 2 mul add moveto
TBK
(Messung von) showde
(measurement of) showen
(medici\363n de la) showes
(mesure de donn\351es) showfr
(misura di output) showit
(m\345ling av) showjp

15 setlinewidth
0.0 0.0 1.0 0.0 setcmyk_olvcolor
50 y3 80 sub moveto 11100 0 rlineto 0 yd rlineto -11100 0 rlineto
closepath fill
15 setlinewidth
0.0 0.0 0.0 1.0 setcmyk_olvcolor

x0 y3 yd 1 mul add moveto
TBK
(Druckerausgabe) showde
(printer output) showen
(salida impresora) showes
(de sortie imprinante) showfr
(della stampante) showit
(skriverens utdata) showjp

x0 y3 yd 0 mul add moveto tfg TBIM (rgb) show tfn
TBK
( in Datei) showde
( in file) showen
( en archivo) showes
( dans le fichier) showfr
( nel file) showit
( i fil) showjp

x1 y3 yd 2 mul add moveto TM (34 ) show TBIM (N) show RM ((-2)) show
x1 y3 yd 1 mul add moveto TM (34 ) show TBIM (Y) show

x2 y3 yd 2 mul add moveto TM (100 ) show TBIM (Y) show
x2 y3 yd 1 mul add moveto TM (100 ) show TBIM (Y) show

x3 y3 yd 2 mul add moveto TM (146 ) show TBIM (N) show TM ((+8)) show
x3 y3 yd 1 mul add moveto TM (146 ) show TBIM (N) show TM ((+2)) show

x4 y3 yd 2 mul add moveto TM (264 ) show TBIM (N) show RM ((-34)) show
x4 y3 yd 1 mul add moveto TM (264 ) show TBIM (N) show RM ((-26)) show

x5 y3 yd 2 mul add moveto
TM (1 x ) show TIM (v) show (SD) ishowTM TM (; 1 x ) show TBIM (Y) show tfn %tfr
x5 y3 yd 1 mul add moveto
TBM (2 x ) show TBIM (v) show (SD) ishowTM TM (; 2 x ) show TBIM (Y) show
tfn

x5 1000 sub y3 yd 0 mul add moveto
TK
(Siehe Seite 9) showde
(see page 9 of) showen
(consulte p\341gina 9 de) showes
(voir page 9 de) showfr
(vedere pagina 9 di) showit
(se side 9 av) showjp

( ) show
(RG61/RG61L0NP.PDF) showde
(RE61/RE61L0NP.PDF) showen
(RS61/RS61L0NP.PDF) showes
(RF61/RF61L0NP.PDF) showfr
(RI61/RI61L0NP.PDF) showit
(RN61/RN61L0NP.PDF) showjp

x0 y4 yd 2 mul add moveto 
TBK
(Messung von) showde
(measurement of) showen
(medici\363n de la) showes
(mesure de donn\351es) showfr
(misura di output) showit
(m\345ling av) showjp

15 setlinewidth
0.0 0.0 1.0 0.0 setcmyk_olvcolor
50 y4 80 sub moveto 11100 0 rlineto 0 yd rlineto -11100 0 rlineto
closepath fill
15 setlinewidth
0.0 0.0 0.0 1.0 setcmyk_olvcolor

x0 y4 yd 1 mul add moveto
TBK
(Druckerausgabe) showde
(printer output) showen
(salida impresora) showes
(de sortie imprinante) showfr
(della stampante) showit
(skriverens utdata) showjp

x0 y4 yd 0 mul add moveto tfr TBIM (cmy0) show tfn
TBK
( in Datei) showde
( in file) showen
( en archivo) showes
( dans le fichier) showfr
( nel file) showit
( i fil) showjp

x1 y4 yd 2 mul add moveto TM (34 ) show TBIM (N) show RM ((-2)) show
x1 y4 yd 1 mul add moveto TM (34 ) show TBIM (Y) show

x2 y4 yd 2 mul add moveto TM (100 ) show TBIM (Y) show
x2 y4 yd 1 mul add moveto TM (100 ) show TBIM (Y) show

x3 y4 yd 2 mul add moveto TM (153 ) show TBIM (N) show TM ((+15)) show
x3 y4 yd 1 mul add moveto TM (153 ) show TBIM (N) show TM ((+9)) show

x4 y4 yd 2 mul add moveto TM (300 ) show TBIM (Y) show
x4 y4 yd 1 mul add moveto TM (300 ) show TBIM (Y) show

x5 y4 yd 2 mul add moveto
TM (1 x ) show TIM (v) show (SD) ishowTM TM (; 2 x ) show TBIM (Y) show
x5 y4 yd 1 mul add moveto
TM (2 x ) show TIM (v) show (SD) ishowTM TM (; 3 x ) show TBIM (Y) show
tfn

x5 1000 sub y4 yd 0 mul add moveto
TK
(Siehe Seite 9) showde
(see page 9 of) showen
(consulte p\341gina 9 de) showes
(voir page 9 de) showfr
(vedere pagina 9 di) showit
(se side 9 av) showjp

( ) show
(RG63/RG63L0NP.PDF) showde
(RE63/RE63L0NP.PDF) showen
(RS63/RS63L0NP.PDF) showes
(RF63/RF63L0NP.PDF) showfr
(RI63/RI63L0NP.PDF) showit
(RN63/RN63L0NP.PDF) showjp

/y1 yhoe 05400 sub def
/y2 yhoe 06400 sub def
/y3 yhoe 07400 sub def
/y4 yhoe 08400 sub def

0 y1 100 sub moveto 11200 0 rlineto stroke
0 y2 100 sub moveto 11200 0 rlineto stroke
0 y3 100 sub moveto 11200 0 rlineto stroke
0 y4 100 sub moveto 11200 0 rlineto stroke

x2 100 sub y4 100 sub moveto 0 3600 rlineto stroke
x3 100 sub y4 100 sub moveto 0 3600 rlineto stroke
x4 100 sub y4 100 sub moveto 0 3600 rlineto stroke

%**************************************************************************
15 setlinewidth
0.0 0.0 1.0 0.0 setcmyk_olvcolor
50 y2 80 sub moveto 11100 0 rlineto 0 yd rlineto -11100 0 rlineto
closepath fill
15 setlinewidth
0.0 0.0 0.0 1.0 setcmyk_olvcolor

x1 y1 yd 2 mul add moveto
TBIG (h) show (ab)jshowTG TBG
TBM ( ) show
(for referenz: Elementarfarben) showde
(f\374 reference: elementary colours) showen
(para referencia: colores elementales) showes
(pour r\351f\351rence: couleurs \351l\351mentaires) showfr
(per riferimanto: colori elementari) showit
(for referanse: element\346rfarger) showjp

x1 y1 yd 0.8 mul add moveto TBIG (R) show (e) jshowTG
x2 y1 yd 0.8 mul add moveto TBIG (Y) show (e) jshowTG
x3 y1 yd 0.8 mul add moveto TBIG (G) show (e) jshowTG
x4 y1 yd 0.8 mul add moveto TBIG (B) show (e) jshowTG

x5 y1 yd 2 mul add moveto
TBM
(Anmerkungen) showde
(NOTES) showen
(Notas) showes
(NOTES) showfr
(note) showit
(kommentarer) showjp

x5 y1 yd 1 mul add moveto
RBM
(Visuelle Standard-) showde
TBM
(visual standard) showen
(desviaci\363n) showes
(\351cart\255type) showfr
(visual deviatione) showit
(visuell) showjp


x5 y1 yd 0 mul add moveto
TBM
(Abweichung) showde
(deviation) showen
(est\341ndar visuel) showes
(visuel) showfr
(standard) showit
(standardavvik) showjp

TBIM ( v) show (SD) jshowTM

x0 y2 yd 2 mul add moveto
TBK
(Definition f\374r) showde
(definition for) showen
(definici\363n para) showes
(d\351finition pour) showfr
(definizione per) showit
(definisjion for) showjp

x0 y2 yd 1 mul add moveto
TBK
(jede Ausgabe) showde
(any output) showen
(cualqier salida) showes
(tout rendu dans) showfr
(ogni uscita) showit
(hver utgang) showjp

x0 y2 yd 0 mul add moveto
RBK
(in DIN 33872-X) showde
(in DIN 33872-X) showen
(en DIN 33872-X) showes
(la DIN 33872-X) showfr
(in DIN 33872-X) showit
(i DIN 33872-X) showjp

TM
x1 y2 yd 2 mul add moveto (26 \261 4) show
x1 y2 yd 1 mul add moveto (26 \261 8) show

x2 y2 yd 2 mul add moveto (92 \261 4) show
x2 y2 yd 1 mul add moveto (92 \261 8) show

x3 y2 yd 2 mul add moveto (162 \261 4) show
x3 y2 yd 1 mul add moveto (162 \261 8) show

x4 y2 yd 2 mul add moveto (272 \261 8) show
x4 y2 yd 1 mul add moveto (272 \261 16) show

RM
x5 y2 yd 2 mul add moveto (1 x ) show TIM (v) show (SD) ishowTM
x5 y2 yd 1 mul add moveto (2 x ) show TIM (v) show (SD) ishowTM
x5 800 sub y2 yd 0 mul add moveto 
TK
(siehe ) showde
(see ) showen
(v\351ase ) showes
(voir ) showfr
(vedere ) showit
(se ) showjp

TIM
lanind 2 ne {( h) show (ab) ishowTM} if

RK
(-Datentabelle) showde
TK
( data Table) showen
( datos Tab.) showes
( Tableau de donn\351es) showfr
( dati Tab.) showit
( data Tab.) showjp

TIM
lanind 2 eq {( h) show (ab) ishowTM} if

TK
( D.2) show

x0 y3 yd 2 mul add moveto
TBK
(Messung von) showde
(measurement of) showen
(medici\363n de la) showes
(mesure de donn\351es) showfr
(misura di output) showit
(m\345ling av) showjp

15 setlinewidth
0.0 0.0 1.0 0.0 setcmyk_olvcolor
50 y3 80 sub moveto 11100 0 rlineto 0 yd rlineto -11100 0 rlineto
closepath fill
15 setlinewidth
0.0 0.0 0.0 1.0 setcmyk_olvcolor

x0 y3 yd 1 mul add moveto
TBK
(Druckerausgabe) showde
(printer output) showen
(salida impresora) showes
(de sortie imprinante) showfr
(della stampante) showit
(skriverens utdata) showjp

x0 y3 yd 0 mul add moveto tfg TBIM (rgb) show tfn
TBK
( in Datei) showde
( in file) showen
( en archivo) showes
( dans fichier) showfr
( nel file) showit
( i fil) showjp

x1 y3 yd 2 mul add moveto TM (34 ) show TBIM (N) show TM ((+4)) show
x1 y3 yd 1 mul add moveto TM (34 ) show TBIM (Y) show

x2 y3 yd 2 mul add moveto TM (100 ) show TBIM (N) show TM ((+4)) show
x2 y3 yd 1 mul add moveto TM (100 ) show TBIM (Y) show

x3 y3 yd 2 mul add moveto TM (146 ) show TBIM (N) show RM ((-12)) show
x3 y3 yd 1 mul add moveto TM (146 ) show TBIM (N) show RM ((-8)) show

x4 y3 yd 2 mul add moveto TM (264 ) show TBIM (N) show RM ((-4)) show
x4 y3 yd 1 mul add moveto TM (264 ) show TBIM (Y) show

x5 y3 yd 2 mul add moveto
TM (1 x ) show TM (v) show (SD) ishowTM TM (; 0 x ) show TBIM (Y) show tfn %tfg
x5 y3 yd 1 mul add moveto
TBM (2 x ) show TBM (v) show (SD) ishowTM TBM (; 3 x ) show TBIM (Y) show
tfn

x5 1000 sub y3 yd 0 mul add moveto
TK
(Siehe Seite 9) showde
(see page 9 of) showen
(consulte p\341gina 9 de) showes
(voir page 9 de) showfr
(vedere pagina 9 di) showit
(se side 9 av) showjp

( ) show
(RG61/RG61L0NP.PDF) showde
(RE61/RE61L0NP.PDF) showen
(RS61/RS61L0NP.PDF) showes
(RF61/RF61L0NP.PDF) showfr
(RI61/RI61L0NP.PDF) showit
(RN61/RN61L0NP.PDF) showjp

x0 y4 yd 2 mul add moveto
TBK
(Messung von) showde
(measurement of) showen
(medici\363n de la) showes
(mesure de donn\351es) showfr
(misura di output) showit
(m\345ling av) showjp

15 setlinewidth
0.0 0.0 1.0 0.0 setcmyk_olvcolor
50 y4 80 sub moveto 11100 0 rlineto 0 yd rlineto -11100 0 rlineto
closepath fill
15 setlinewidth
0.0 0.0 0.0 1.0 setcmyk_olvcolor

x0 y4 yd 1 mul add moveto
TBK
(Druckerausgabe) showde
(printer output) showen
(salida impresora) showes
(de sortie imprinante) showfr
(della stampante) showit
(skriverens utdata) showjp

x0 y4 yd 0 mul add moveto tfr TBIM (cmy0) show tfn
TBK
( in Datei) showde
( in file) showen
( en archivo) showes
( dans fichier) showfr
( nel file) showit
( i fil) showjp

x1 y4 yd 2 mul add moveto TM (34 ) show TBIM (N) show TM ((+4)) show
x1 y4 yd 1 mul add moveto TM (34 ) show TBIM (Y) show

x2 y4 yd 2 mul add moveto TM (100 ) show TBIM (N) show TM ((+4)) show
x2 y4 yd 1 mul add moveto TM (100 ) show TBIM (Y) show

x3 y4 yd 2 mul add moveto TM (153 ) show TBIM (N) show RM ((-5)) show
x3 y4 yd 1 mul add moveto TM (153 ) show TBIM (N) show RM ((-1)) show

x4 y4 yd 2 mul add moveto TM (300 ) show TBIM (N) show TM ((+20)) show
x4 y4 yd 1 mul add moveto TM (300 ) show TBIM (N) show TM ((+12)) show

x5 y4 yd 2 mul add moveto
TM (1 x ) show TIM (v) show (SD) ishowTM TM (; 0 x ) show TBIM (Y) show
x5 y4 yd 1 mul add moveto
TM (2 x ) show TIM (v) show (SD) ishowTM TM (; 2 x ) show TBIM (Y) show

x5 1000 sub y4 yd 0 mul add moveto
TK
(Siehe Seite 9) showde
(see page 9 of) showen
(consulte p\341gina 9 de) showes
(voir page 9 de) showfr
(vedere pagina 9 di) showit
(se side 9 av) showjp

( ) show
(RG63/RG63L0NP.PDF) showde
(RE63/RE63L0NP.PDF) showen
(RS63/RS63L0NP.PDF) showes
(RF63/RF63L0NP.PDF) showfr
(RI63/RI63L0NP.PDF) showit
(RN63/RN63L0NP.PDF) showjp

showpage
grestore

%%Trailer

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
219 MM 108 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 24

%line 459
%!PS-Adobe-3.0 EPSF-3.0 AG781-4,
%%BoundingBox: 70 90 226 206

/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
%%EndProlog
gsave

8 /Times-Roman FS
72 83 moveto
%!2     (AG781-4,) show

72 90 translate

%! 0.01 MM 0.01 MM scale
%! 15 setlinewidth
%! 0 0  moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto
%! closepath stroke

grestore

showpage
%%Trailer

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
161 MM 064 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 25

%line 469
%!PS-Adobe-3.0 EPSF-3.0 AG781-5,
%%BoundingBox: 70 90 226 206

/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
%%EndProlog
gsave

8 /Times-Roman FS
72 83 moveto
%!2     (AG781-5,) show

72 90 translate

%! 0.01 MM 0.01 MM scale
%! 15 setlinewidth
%! 0 0  moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto
%! closepath stroke

grestore

showpage
%%Trailer

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
219 MM 064 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 26

%line 479
%!PS-Adobe-3.0 EPSF-3.0 AG781-6,
%%BoundingBox: 70 90 226 206

/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
%%EndProlog
gsave

8 /Times-Roman FS
72 83 moveto
%!2     (AG781-6,) show

72 90 translate

%! 0.01 MM 0.01 MM scale
%! 15 setlinewidth
%! 0 0  moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto
%! closepath stroke

grestore

showpage
%%Trailer

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
161 MM 020 MM translate
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 27

%line 489
%!PS-Adobe-3.0 EPSF-3.0 AG781-7N
%%BoundingBox: 70 83 392 335

%START PDFDE011.EPS
/pdfmark17 where {pop} {userdict /pdfmark17 /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://farbe.li.tu-berlin.de/AG78/AG78.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:2017050112000)
  /ModDate (D:20170501112000)
/DOCINFO pdfmark17
[ /View [ /FitB ]
/DOCVIEW pdfmark17
%END  PDFDE011

%SETCMYK_OLV.PS
/setcmyk_olvcolor %transfer cmyk to olv
{/ncolor exch def /ycolor exch def
 /mcolor exch def /ccolor exch def
 ncolor 0 eq {1 ccolor sub
              1 mcolor sub
              1 ycolor sub setrgbcolor
             }
             {ccolor 0 eq
              mcolor 0 eq and
              ycolor 0 eq and {%only black n
                               1 ncolor sub
                               dup
                               dup
                               setrgbcolor
                              }
                              {%cmy and black n
                               1 ccolor sub 1 ncolor sub mul
                               1 mcolor sub 1 ncolor sub mul
                               1 ycolor sub 1 ncolor sub mul
                               setrgbcolor
                              } ifelse
             } ifelse
} bind def

% !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

/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def /str {8 string } bind def

/TK {240 /Times-ISOL1 FS} bind def
/TM {290 /Times-ISOL1 FS} bind def
/TG {340 /Times-ISOL1 FS} bind def

/TIK {240 /TimesI-ISOL1 FS} bind def
/TIM {290 /TimesI-ISOL1 FS} bind def
/TIG {340 /TimesI-ISOL1 FS} bind def

/TBK {240 /TimesB-ISOL1 FS} bind def
/TBM {290 /TimesB-ISOL1 FS} bind def
/TBG {340 /TimesB-ISOL1 FS} bind def

/TBIK {240 /TimesBI-ISOL1 FS} bind def
/TBIM {290 /TimesBI-ISOL1 FS} bind def
/TBIG {340 /TimesBI-ISOL1 FS} bind def


/RK {240 /Times-Roman FS} bind def
/RM {290 /Times-Roman FS} bind def
/RG {340 /Times-Roman FS} bind def

/RIK {240 /Times-Italic FS} bind def
/RIM {290 /Times-Italic FS} bind def
/RIG {340 /Times-Italic FS} bind def

/RBK {240 /Times-Bold FS} bind def
/RBM {290 /Times-Bold FS} bind def
/RBG {340 /Times-Bold FS} bind def

/RBIK {240 /Times-BoldItalic FS} bind def
/RBIM {290 /Times-BoldItalic FS} bind def
/RBIG {340 /Times-BoldItalic FS} bind def

/SK {240 1 sub /Symbol FS} bind def
/SM {290 1 sub /Symbol FS} bind def
/SG {340 1 sub /Symbol FS} bind def

/ishowRM  {RK  -00 -60 rmoveto
           show 00  60 rmoveto RM} def
/jshowRM  {RBK -00 -60 rmoveto
           show 00  60 rmoveto RBM} def

/ishowTM  {TK  -00 -60 rmoveto
           show 00  60 rmoveto TM} def
/jshowTM  {TBK -00 -60 rmoveto
           show 00  60 rmoveto TBM} def

/ishowRG  {RM  -00 -70 rmoveto
           show 00  70 rmoveto RG} def
/jshowRG  {RBM -00 -70 rmoveto
           show 00  70 rmoveto RBG} def

/ishowTG  {TM  -00 -70 rmoveto
           show 00  70 rmoveto TG} def
/jshowTG  {TBM -00 -70 rmoveto
           show 00  70 rmoveto TBG} def

%XCHA01.PS BEG
/rec %x, y width heigth
  {/heigth exch def /width exch def
   moveto width 0 rlineto 0 heigth rlineto width neg 0 rlineto
   closepath } bind def

/colrecfi %x y width heigth c m y k
  {setcmyk_olvcolor rec fill} bind def

/colrecst %x y width heigth c m y k
  {setcmyk_olvcolor rec stroke} bind def

/rem %x, y width heigth
  {/heigth exch 0.5 mul def /width exch 0.5 mul def
   /yleftb exch heigth 0.5 mul add def
   /xleftb exch width  0.5 mul add def
   xleftb yleftb
   moveto width 0 rlineto 0 heigth rlineto width neg 0 rlineto
   closepath } bind def

/tzr {0.0 1.0 1.0 0.0} bind def %Reproduktionsfarben
/tzg {1.0 0.0 1.0 0.0} bind def
/tzb {1.0 1.0 0.0 0.0} bind def
/tzc {1.0 0.0 0.0 0.0} bind def
/tzm {0.0 1.0 0.0 0.0} bind def
/tzy {0.0 0.0 1.0 0.0} bind def

/tzn {0.0 0.0 0.0 1.00} bind def %Graureihe
/tzd {0.0 0.0 0.0 0.75} bind def
/tzz {0.0 0.0 0.0 0.50} bind def
/tzh {0.0 0.0 0.0 0.25} bind def
/tzw {0.0 0.0 0.0 0.00} bind def

/tfr {0.0 1.0 1.0 0.0 setcmyk_olvcolor} bind def %Reproduktionsfarben
/tfg {1.0 0.0 1.0 0.0 setcmyk_olvcolor} bind def
/tfb {1.0 1.0 0.0 0.0 setcmyk_olvcolor} bind def
/tfc {1.0 0.0 0.0 0.0 setcmyk_olvcolor} bind def
/tfm {0.0 1.0 0.0 0.0 setcmyk_olvcolor} bind def
/tfy {0.0 0.0 1.0 0.0 setcmyk_olvcolor} bind def

/tfrz {0.0 1.0 1.0 0.5 setcmyk_olvcolor} bind def %Reproduktionsfarben
/tfgz {1.0 0.0 1.0 0.5 setcmyk_olvcolor} bind def
/tfbz {1.0 1.0 0.0 0.5 setcmyk_olvcolor} bind def
/tfcz {1.0 0.0 0.0 0.5 setcmyk_olvcolor} bind def
/tfmz {0.0 1.0 0.0 0.5 setcmyk_olvcolor} bind def
/tfyz {0.0 0.0 1.0 0.5 setcmyk_olvcolor} bind def

/tfn {0.0 0.0 0.0 1.00 setcmyk_olvcolor} bind def %Graureihe
/tfd {0.0 0.0 0.0 0.75 setcmyk_olvcolor} bind def
/tfz {0.0 0.0 0.0 0.50 setcmyk_olvcolor} bind def
/tfh {0.0 0.0 0.0 0.25 setcmyk_olvcolor} bind def
/tfw {0.0 0.0 0.0 0.00 setcmyk_olvcolor} bind def

/cvishow {cvi 10 string cvs show} def
/cvsshow1 {10 mul cvi 0.1 mul 7 string cvs show} def
/cvsshow2 {100 mul cvi 0.01 mul 7 string cvs show} def
/cvsshow3 {1000 mul cvi 0.001 mul 7 string cvs show} def

%%EndProlog
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 {3 lanind eq {show} {pop} ifelse} bind def
/showfr {2 lanind eq {show} {pop} ifelse} bind def
/showit {4 lanind eq {show} {pop} ifelse} bind def
/showjp {5 lanind eq {show} {pop} ifelse} bind def
/showea {1 lanind le {show} {pop} ifelse} bind def

/lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def
                    /lanindd laninddf def}
               {/lanind1 0 def /lanind2 0 def} ifelse
/colormf where {pop /colorm1 colormf def /colorm2 colormf def
                    /colorMD colormdf def}
               {/colorm1 0 def} ifelse
/deintpf where {pop /deintp1 deintpf def /deintp2 deintpf def
                    /deintpd deintpdf def}
               {/deintp1 0 def} ifelse
/xcolorf where {pop /xcoloR1 xcolorf def /xcolor2 xcolorf def
                    /xcolord xcolordf def}
               {/xcoloR1 3 def} ifelse
/xchartf where {pop /xchart1 xchartf def /xchart2 xchartf def
                    /xchartd xchartdf def
                    /xchartm xchart2f xchart1f sub 1 add def}
               {/xchart1 0 def /xchartm 1 def} ifelse
/xchart3f where {pop /xchart3 xchart3f def}
                {/xchart3 0 def} ifelse
/xchart4f where {pop /xchart4 xchart4f def}
                {/xchart4 0 def} ifelse
/pchartf where {pop /pchart1 pchartf def /pchart2 pchartf def
                    /pchartd pchartdf def}
               {/pchart1 3 def} ifelse
/colsepf where {pop /colsep1 colsepf def /colsep2 colsepf def
                    /colsepd colsepdf def}
               {/colsep1 0 def} ifelse
/pmetamf where {pop /pmetam1 pmetamf def /pmetam2 pmetamf def
                    /pmetaMD pmetamdf def}
               {/pmetam1 0 def} ifelse

%either defaul values for xchart=0 or values for xchart=1
/lanind lanind1 def %
/colorm colorm1 def %
/deintp deintp1 def %
/xcolor xcoloR1 def %
/xchart xchart1 def %
/pchart pchart1 def %
/colsep colsep1 def %
/pmetam pmetam1 def %

colorm 0 eq deintp 0 eq and {/Txx (d) def /Fxx (d) def} if %colorm=0, deintp=0
colorm 0 eq deintp 1 eq and {/Txx (e) def /Fxx (e) def} if %colorm=0, deintp=1
colorm 1 eq deintp 0 eq and {/Txx (dd) def /Fxx (d) def} if %colorm=1, deintp=0
colorm 1 eq deintp 1 eq and {/Txx (de) def /Fxx (e) def} if %colorm=1, deintp=1
xchart 0 eq {/Txx (-) def /Fxx (-) def} if %always independent of intended output

5 /Times-ISOL1 FS
/cvishow {cvi 6 string cvs show} def
75 85 moveto
lanind cvishow (-) show
colorm cvishow
deintp cvishow
xcolor cvishow
xchart cvishow
pchart cvishow
colsep cvishow (-L) show pmetam cvishow

gsave
/xchart xchart1 def

340 85 moveto
5 /Times-Roman FS
(AG781-7N) show

72 90 translate

/yhoe 8500 def
0.01 MM dup scale

15 setlinewidth
0.0 0.0 1.0 0.0 setcmyk_olvcolor
0 0  moveto 11200 0 rlineto 0 yhoe rlineto -11200 0 rlineto
closepath fill
0.0 0.0 0.0 1.0 setcmyk_olvcolor
 0 0  moveto 11200 0 rlineto 0 yhoe rlineto -11200 0 rlineto
closepath stroke
 
/yd 0300 def %y0-line distance
/yz 0400 def %y1 line distance
/yx 0700 def %vertical table lines
 
/x0 0050 def %start
/x1 2300 def %R
/x2 3700 def %Y
/x3 5100 def %G
/x4 6550 def %B
/x5 8000 def %NOTES

/y0 yhoe  350 sub def
/y1 yhoe 1400 sub def
/y2 yhoe 2400 sub def
/y3 yhoe 3400 sub def
/y4 yhoe 4400 sub def

30 setlinewidth
0 yhoe 450 sub  moveto 11200 0 rlineto stroke

20 setlinewidth
0 y1 100 sub moveto 11200 0 rlineto stroke

0 y2 100 sub moveto 11200 0 rlineto stroke

0 y3 100 sub moveto 11200 0 rlineto stroke

30 setlinewidth
0 y4 100 sub moveto 11200 0 rlineto stroke

20 setlinewidth
x1 050 sub 0 moveto 0 yhoe yx sub rlineto stroke
x2 050 sub y4 100 sub moveto 0 3600 rlineto stroke
x3 050 sub y4 100 sub moveto 0 3600 rlineto stroke
x4 050 sub y4 100 sub moveto 0 3600 rlineto stroke
x5 050 sub 0 moveto 0 yhoe yx sub rlineto stroke

15 setlinewidth
0.0 0.0 1.0 0.0 setcmyk_olvcolor
50 y2 80 sub moveto 11100 0 rlineto 0 yd rlineto -11100 0 rlineto
closepath fill
15 setlinewidth
0.0 0.0 0.0 1.0 setcmyk_olvcolor

%Titeltext
 x0 yhoe yd sub moveto
TBG
(\334bereinstimmung ) showde
(Agreement ) showen
(El acuerdo ) showes
(Conformit\351 ) showfr
(L'accordo ) showit
(Avtelen ) showjp

TBIG
((Ja/Nein) ) showde
((Yes/No) ) showen
((Si/No) ) showes
((O/N) ) showfr
((Si/No) ) showit
((Ja/Nei) ) showjp

TBG
(CIELAB ) showde
(of CIELAB ) showen
(de CIELAB ) showes
(de ) showfr
(di CIELAB ) showit
(av CIELAB ) showjp

TBIG (h) show (ab) jshowTG

RBG
( mit IEC 61966-2-1 & DIN 33872-X) showde
( with IEC 61966-2-1 and DIN 33872-X) showen
( con IEC 61966-2-1 y DIN 33872-X) showes
( CIELAB avec l'IEC 61966-2-1 et la DIN 33872-X) showfr
( con IEC 61966-2-1 e DIN 33872-X) showit
( med IEC 61966-2-1 og DIN 33872-X) showjp

x1 y1 yd 2 mul add moveto
TBIG (h) show (ab)jshowTG TBG
TBG ( ) show
(f\374r Referenz: Ger\344tefarben) showde
(for reference: device colours) showen
(para referencia: colores del dispositivo) showes
TBM
(pour r\351f\351rence: couleurs de dispositifs) showfr
TBG
(per riferimanto: dispositivo colori) showit
(for referanse: enheten farger) showjp

x1 y1 yd 0.8 mul add moveto TBIG (R) show (d,sRGB) jshowTG
x2 y1 yd 0.8 mul add moveto TBIG (Y) show (d,sRGB) jshowTG
x3 y1 yd 0.8 mul add moveto TBIG (G) show (d,sRGB) jshowTG
x4 y1 yd 0.8 mul add moveto TBIG (B) show (d,sRGB) jshowTG

x5 y1 yd 2 mul add moveto
TBM
(Anmerkungen) showde
(NOTES) showen
(Notas) showes
(NOTES) showfr
(note) showit
(kommentarer) showjp

x5 y1 yd 1 mul add moveto
RBM
(Visuelle Standard-) showde
TBM
(visual standard) showen
(desviaci\363n) showes
(\351cart\255type) showfr
(visual deviatione) showit
(visuell) showjp


x5 y1 yd 0 mul add moveto
TBM
(Abweichung) showde
(deviation) showen
(est\341ndar visuel) showes
(visuel) showfr
(standard) showit
(standardavvik) showjp

TBIM
( v) show (SD) jshowTM

x0 y2 yd 2 mul add moveto
TBM
(Definition f\374r) showde
(definition for) showen
(definici\363n para) showes
TBK
(d\351finition pour ren\255) showfr
TBM
(definizione per) showit
(definisjion for) showjp

x0 y2 yd 1 mul add moveto
TBM
(Displayausgabe) showde
(display output) showen
(mostrar la salida) showes
TBK
(du de l'\351cran dans) showfr
TBM
(uscita monitor) showit
(monitor utgang) showjp

x0 y2 yd 0 mul add moveto
RBM
(in IEC 61966-2-1) showde
(in IEC 61966-2-1) showen
(en IEC 61966-2-1) showes
RBK
(l'IEC 61966-2-1) showfr
RBM
(in IEC 61966-2-1) showit
(i IEC 61966-2-1) showjp

TM
x1 y2 yd 2 mul add moveto (40 \261 4) show
x1 y2 yd 1 mul add moveto (40 \261 8) show

x2 y2 yd 2 mul add moveto (103 \261 4) show
x2 y2 yd 1 mul add moveto (103 \261 8) show

x3 y2 yd 2 mul add moveto (136 \261 4) show
x3 y2 yd 1 mul add moveto (136 \261 8) show

x4 y2 yd 2 mul add moveto (306 \261 8) show
x4 y2 yd 1 mul add moveto (306 \261 16) show

RM
x5 y2 yd 2 mul add moveto TM (1 x ) show TIM (v) show (SD) ishowTM
x5 y2 yd 1 mul add moveto TM (2 x ) show TIM (v) show (SD) ishowTM

x5 800 sub y2 yd 0 mul add moveto
TK
(siehe) showde
(see) showen
(v\351ase) showes
(voir) showfr
(vedere) showit
(se) showjp

TIM
lanind 2 ne {( h) show (ab) ishowTM} if

RK
(-Datentabelle) showde
TK
( data Table) showen
( datos Tab.) showes
( Tableau de donn\351es) showfr
( dati Tab.) showit
( data Tab.) showjp

TIM
lanind 2 eq {( h) show (ab) ishowTM} if

TK
( D.3) show

x0 y3 yd 2 mul add moveto
TBM
(Messung von) showde
(measurement of) showen
(medici\363n de la) showes
TBK
(mesure de donn\351es) showfr
TBM
(misura di output) showit
(m\345ling av) showjp

15 setlinewidth
0.0 0.0 1.0 0.0 setcmyk_olvcolor
50 y3 80 sub moveto 11100 0 rlineto 0 yd rlineto -11100 0 rlineto
closepath fill
15 setlinewidth
0.0 0.0 0.0 1.0 setcmyk_olvcolor

x0 y3 yd 1 mul add moveto
TBM
(Druckerausgabe) showde
(printer output) showen
(salida impresora) showes
TBK
(de sortie imprinante) showfr
TBM
(della stampante) showit
(skriverens utdata) showjp

x0 y3 yd 0 mul add moveto tfg TBIM (rgb) show tfn
TBM
( in Datei) showde
( in file) showen
( en archivo) showes
TBK
( dans le fichier) showfr
TBM
( nel file) showit
( i fil) showjp

RK ( ) show
(http://farbe.li.tu-berlin.de/RG61/RG61L0NP.PDF) showde
(http://farbe.li.tu-berlin.de/RE61/RE61L0NP.PDF) showen
(http://farbe.li.tu-berlin.de/RS61/RS61L0NP.PDF) showes
(http://farbe.li.tu-berlin.de/RF61/RF61L0NP.PDF) showfr
(http://farbe.li.tu-berlin.de/RI61/RI61L0NP.PDF) showit
(http://farbe.li.tu-berlin.de/RN61/RN61L0NP.PDF) showjp

TK ( ) show
(siehe Daten Seite 9/33) showde
(see data on page 9/33) showen
(ver datos en la p\341gina 9/33) showes
(voir donn\351es sur page 9/33) showfr
(vedere dati a pagina 9/33) showit
(se data p\345 side 9/33) showjp

x1 y3 yd 2 mul add moveto TM (34 ) show TBIM (N) show RM ((-2)) show
x1 y3 yd 1 mul add moveto TM (34 ) show TBIM (Y) show

x2 y3 yd 2 mul add moveto TM (100 ) show TBIM (Y) show
x2 y3 yd 1 mul add moveto TM (100 ) show TBIM (Y) show

x3 y3 yd 2 mul add moveto TM (146 ) show TBIM (N) show TM ((+8)) show
x3 y3 yd 1 mul add moveto TM (146 ) show TBIM (N) show TM ((+2)) show

x4 y3 yd 2 mul add moveto TM (264 ) show TBIM (N) show RM ((-34)) show
x4 y3 yd 1 mul add moveto TM (264 ) show TBIM (N) show RM ((-26)) show

x5 y3 yd 2 mul add moveto
TM (1 x ) show TIM (v) show (SD) ishowTM TM (; 1 x ) show TBIM (Y) show tfn %tfr
x5 y3 yd 1 mul add moveto
TBM (2 x ) show TBIM (v) show (SD) ishowTM TM (; 2 x ) show TBIM (Y) show
tfn

x0 y4 yd 2 mul add moveto 
TBM
(Messung von) showde
(measurement of) showen
(medici\363n de la) showes
TBK
(mesure de donn\351es) showfr
TBM
(misura di output) showit
(m\345ling av) showjp

15 setlinewidth
0.0 0.0 1.0 0.0 setcmyk_olvcolor
50 y4 80 sub moveto 11100 0 rlineto 0 yd rlineto -11100 0 rlineto
closepath fill
15 setlinewidth
0.0 0.0 0.0 1.0 setcmyk_olvcolor

x0 y4 yd 1 mul add moveto
TBM
(Druckerausgabe) showde
(printer output) showen
(salida impresora) showes
TBK
(de sortie imprinante) showfr
TBM
(della stampante) showit
(skriverens utdata) showjp

x0 y4 yd 0 mul add moveto tfr TBIM (cmy0) show tfn
TBM
( in Datei) showde
( in file) showen
( en archivo) showes
TBK
( dans le fichier) showfr
TBM
( nel file) showit
( i fil) showjp

RK ( ) show
(http://farbe.li.tu-berlin.de/RG63/RG63L0NP.PDF) showde
(http://farbe.li.tu-berlin.de/RE63/RE63L0NP.PDF) showen
(http://farbe.li.tu-berlin.de/RS63/RS63L0NP.PDF) showes
(http://farbe.li.tu-berlin.de/RF63/RF63L0NP.PDF) showfr
(http://farbe.li.tu-berlin.de/RI63/RI63L0NP.PDF) showit
(http://farbe.li.tu-berlin.de/RN63/RN63L0NP.PDF) showjp

TK ( ) show
(siehe Daten Seite 9/33) showde
(see data on page 9/33) showen
(ver datos en la p\341gina 9/33) showes
(voir donn\351es sur page 9/33) showfr
(vedere dati a pagina 9/33) showit
(se data p\345 side 9/33) showjp

x1 y4 yd 2 mul add moveto TM (34 ) show TBIM (N) show RM ((-2)) show
x1 y4 yd 1 mul add moveto TM (34 ) show TBIM (Y) show

x2 y4 yd 2 mul add moveto TM (100 ) show TBIM (Y) show
x2 y4 yd 1 mul add moveto TM (100 ) show TBIM (Y) show

x3 y4 yd 2 mul add moveto TM (153 ) show TBIM (N) show TM ((+15)) show
x3 y4 yd 1 mul add moveto TM (153 ) show TBIM (N) show TM ((+9)) show

x4 y4 yd 2 mul add moveto TM (300 ) show TBIM (Y) show
x4 y4 yd 1 mul add moveto TM (300 ) show TBIM (Y) show

x5 y4 yd 2 mul add moveto
TM (1 x ) show TIM (v) show (SD) ishowTM TM (; 2 x ) show TBIM (Y) show
x5 y4 yd 1 mul add moveto
TM (2 x ) show TIM (v) show (SD) ishowTM TM (; 3 x ) show TBIM (Y) show
tfn

/y1 yhoe 05400 sub def
/y2 yhoe 06400 sub def
/y3 yhoe 07400 sub def
/y4 yhoe 08400 sub def

0 y1 100 sub moveto 11200 0 rlineto stroke
0 y2 100 sub moveto 11200 0 rlineto stroke
0 y3 100 sub moveto 11200 0 rlineto stroke
0 y4 100 sub moveto 11200 0 rlineto stroke

x2 100 sub y4 100 sub moveto 0 3600 rlineto stroke
x3 100 sub y4 100 sub moveto 0 3600 rlineto stroke
x4 100 sub y4 100 sub moveto 0 3600 rlineto stroke

%**************************************************************************

15 setlinewidth
0.0 0.0 1.0 0.0 setcmyk_olvcolor
50 y2 80 sub moveto 11100 0 rlineto 0 yd rlineto -11100 0 rlineto
closepath fill
15 setlinewidth
0.0 0.0 0.0 1.0 setcmyk_olvcolor

x1 y1 yd 2 mul add moveto
TBIG (h) show (ab)jshowTG TBG
TBG ( ) show
(f\374r Referenz: Elementarfarben) showde
(for reference: elementary colours) showen
(para referencia: colores elementales) showes
TBM
(pour r\351f\351rence: couleurs \351l\351mentaires) showfr
TBG
(per riferimanto: colori elementari) showit
(for referanse: element\346rfarger) showjp

x1 y1 yd 0.8 mul add moveto TBIG (R) show (e) jshowTG
x2 y1 yd 0.8 mul add moveto TBIG (Y) show (e) jshowTG
x3 y1 yd 0.8 mul add moveto TBIG (G) show (e) jshowTG
x4 y1 yd 0.8 mul add moveto TBIG (B) show (e) jshowTG

x5 y1 yd 2 mul add moveto
TBM
(Anmerkungen) showde
(NOTES) showen
(Notas) showes
(NOTES) showfr
(note) showit
(kommentarer) showjp

x5 y1 yd 1 mul add moveto
RBM
(Visuelle Standard-) showde
TBM
(visual standard) showen
(desviaci\363n) showes
(\351cart\255type) showfr
(visual deviatione) showit
(visuell) showjp

x5 y1 yd 0 mul add moveto
TBM
(Abweichung) showde
(deviation) showen
(est\341ndar visuel) showes
(visuel) showfr
(standard) showit
(standardavvik) showjp

( v) show (SD) jshowTM

x0 y2 yd 2 mul add moveto
TBK
(Definition f\374r) showde
(definition for) showen
(definici\363n para) showes
(d\351finition pour) showfr
(definizione per) showit
(definisjion for) showjp

x0 y2 yd 1 mul add moveto
TBK
(jede Ausgabe) showde
(any output) showen
(cualqier salida) showes
(tout rendu dans) showfr
(ogni uscita) showit
(hver utgang) showjp

x0 y2 yd 0 mul add moveto
RBK
(in DIN 33872-X) showde
(in DIN 33872-X) showen
(en DIN 33872-X) showes
(la DIN 33872-X) showfr
(in DIN 33872-X) showit
(i DIN 33872-X) showjp

TM
x1 y2 yd 2 mul add moveto (26 \261 4) show
x1 y2 yd 1 mul add moveto (26 \261 8) show

x2 y2 yd 2 mul add moveto (92 \261 4) show
x2 y2 yd 1 mul add moveto (92 \261 8) show

x3 y2 yd 2 mul add moveto (162 \261 4) show
x3 y2 yd 1 mul add moveto (162 \261 8) show

x4 y2 yd 2 mul add moveto (272 \261 8) show
x4 y2 yd 1 mul add moveto (272 \261 16) show

RM
x5 y2 yd 2 mul add moveto (1 x ) show TIM (v) show (SD) ishowTM
x5 y2 yd 1 mul add moveto (2 x ) show TIM (v) show (SD) ishowTM

x5 800 sub y2 yd 0 mul add moveto 
TK
(siehe ) showde
(see ) showen
(v\351ase ) showes
(voir ) showfr
(vedere ) showit
(se ) showjp

TIM
lanind 2 ne {( h) show (ab) ishowTM} if

RK
(-Datentabelle) showde
TK
( data Table) showen
( datos Tab.) showes
( Tableau de donn\351es) showfr
( dati Tab.) showit
( data Tab.) showjp

TIM
lanind 2 eq {( h) show (ab) ishowTM} if

TK
( D.2) show

x0 y3 yd 2 mul add moveto
TBK
(Messung von) showde
(measurement of) showen
(medici\363n de la) showes
(mesure de donn\351es) showfr
(misura di output) showit
(m\345ling av) showjp

15 setlinewidth
0.0 0.0 1.0 0.0 setcmyk_olvcolor
50 y3 80 sub moveto 11100 0 rlineto 0 yd rlineto -11100 0 rlineto
closepath fill
15 setlinewidth
0.0 0.0 0.0 1.0 setcmyk_olvcolor

x0 y3 yd 1 mul add moveto
TBK
(Druckerausgabe) showde
(printer output) showen
(salida impresora) showes
(de sortie imprinante) showfr
(della stampante) showit
(skriverens utdata) showjp

x0 y3 yd 0 mul add moveto tfg TBIM (rgb) show tfn
TBK
( in Datei) showde
( in file) showen
( en archivo) showes
( dans fichier) showfr
( nel file) showit
( i fil) showjp

RK ( ) show
(http://farbe.li.tu-berlin.de/RG61/RG61L0NP.PDF) showde
(http://farbe.li.tu-berlin.de/RE61/RE61L0NP.PDF) showen
(http://farbe.li.tu-berlin.de/RS61/RS61L0NP.PDF) showes
(http://farbe.li.tu-berlin.de/RF61/RF61L0NP.PDF) showfr
(http://farbe.li.tu-berlin.de/RI61/RI61L0NP.PDF) showit
(http://farbe.li.tu-berlin.de/RN61/RN63L0NP.PDF) showjp

TK ( ) show
(siehe Daten Seite 9/33) showde
(see data on page 9/33) showen
(ver datos en la p\341gina 9/33) showes
(voir donn\351es sur page 9/33) showfr
(vedere dati a pagina 9/33) showit
(se data p\345 side 9/33) showjp

x1 y3 yd 2 mul add moveto TM (34 ) show TBIM (N) show TM ((+4)) show
x1 y3 yd 1 mul add moveto TM (34 ) show TBIM (Y) show

x2 y3 yd 2 mul add moveto TM (100 ) show TBIM (N) show TM ((+4)) show
x2 y3 yd 1 mul add moveto TM (100 ) show TBIM (Y) show

x3 y3 yd 2 mul add moveto TM (146 ) show TBIM (N) show RM ((-12)) show
x3 y3 yd 1 mul add moveto TM (146 ) show TBIM (N) show RM ((-8)) show

x4 y3 yd 2 mul add moveto TM (264 ) show TBIM (N) show RM ((-4)) show
x4 y3 yd 1 mul add moveto TM (264 ) show TBIM (Y) show

x5 y3 yd 2 mul add moveto
TM (1 x ) show TM (v) show (SD) ishowTM TM (; 0 x ) show TBIM (Y) show tfn %tfg
x5 y3 yd 1 mul add moveto
TBM (2 x ) show TBM (v) show (SD) ishowTM TBM (; 3 x ) show TBIM (Y) show
tfn

x0 y4 yd 2 mul add moveto
TBK
(Messung von) showde
(measurement of) showen
(medici\363n de la) showes
(mesure de donn\351es) showfr
(misura di output) showit
(m\345ling av) showjp

15 setlinewidth
0.0 0.0 1.0 0.0 setcmyk_olvcolor
50 y4 80 sub moveto 11100 0 rlineto 0 yd rlineto -11100 0 rlineto
closepath fill
15 setlinewidth
0.0 0.0 0.0 1.0 setcmyk_olvcolor

x0 y4 yd 1 mul add moveto
TBK
(Druckerausgabe) showde
(printer output) showen
(salida impresora) showes
(de sortie imprinante) showfr
(della stampante) showit
(skriverens utdata) showjp

x0 y4 yd 0 mul add moveto tfr TBIM (cmy0) show tfn
TBK
( in Datei) showde
( in file) showen
( en archivo) showes
( dans fichier) showfr
( nel file) showit
( i fil) showjp

RK ( ) show
(http://farbe.li.tu-berlin.de/RG63/RG63L0NP.PDF) showde
(http://farbe.li.tu-berlin.de/RE63/RE63L0NP.PDF) showen
(http://farbe.li.tu-berlin.de/RS63/RS63L0NP.PDF) showes
(http://farbe.li.tu-berlin.de/RF63/RF63L0NP.PDF) showfr
(http://farbe.li.tu-berlin.de/RI63/RI63L0NP.PDF) showit
(http://farbe.li.tu-berlin.de/RN63/RN63L0NP.PDF) showjp

TK ( ) show
(siehe Daten Seite 9/33) showde
(see data on page 9/33) showen
(ver datos en la p\341gina 9/33) showes
(voir donn\351es sur page 9/33) showfr
(vedere dati a pagina 9/33) showit
(se data p\345 side 9/33) showjp

x1 y4 yd 2 mul add moveto TM (34 ) show TBIM (N) show TM ((+4)) show
x1 y4 yd 1 mul add moveto TM (34 ) show TBIM (Y) show

x2 y4 yd 2 mul add moveto TM (100 ) show TBIM (N) show TM ((+4)) show
x2 y4 yd 1 mul add moveto TM (100 ) show TBIM (Y) show

x3 y4 yd 2 mul add moveto TM (153 ) show TBIM (N) show RM ((-5)) show
x3 y4 yd 1 mul add moveto TM (153 ) show TBIM (N) show RM ((-1)) show

x4 y4 yd 2 mul add moveto TM (300 ) show TBIM (N) show TM ((+20)) show
x4 y4 yd 1 mul add moveto TM (300 ) show TBIM (N) show TM ((+12)) show

x5 y4 yd 2 mul add moveto
TM (1 x ) show TIM (v) show (SD) ishowTM TM (; 0 x ) show TBIM (Y) show
x5 y4 yd 1 mul add moveto
TM (2 x ) show TIM (v) show (SD) ishowTM TM (; 2 x ) show TBIM (Y) show

showpage
grestore

%%Trailer

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
219 MM 020 MM translate 12 /Times-ISOL1 FS -9 MM -7 MM  moveto ( ) show
  10 /Times-ISOL1 FS  53 MM 1 MM moveto ( ) show 1 1 scale  -77 -91 translate
%%BeginDocument: Bild 28

%line 499
%!PS-Adobe-3.0 EPSF-3.0 AG781-8,
%%BoundingBox: 70 90 226 206

/FS {findfont exch scalefont setfont} bind def
/MM {72 25.4 div mul} def
%%EndProlog
gsave

8 /Times-Roman FS
72 83 moveto
%!2     (AG781-8,) show

72 90 translate

%! 0.01 MM 0.01 MM scale
%! 15 setlinewidth
%! 0 0  moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto
%! closepath stroke

grestore

showpage
%%Trailer

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
219 MM 080 MM add 008 MM translate %80 MM Breite von TestStreifen
  10 /Times-ISOL1 FS  53 MM 1 MM moveto () show 1 1 scale -77 21 MM sub -91 translate
%%BeginDocument: Bild 29 Teststreifen Ueberlaenge

%line 509

%%EndDocument
EndEPSF grestore gsave

BeginEPSF
-0.0 MM -0.0 MM translate %xy-Verschiebung Rechteckrahmen nach innen%

%%BeginDocument: Bild 30 %Rechteckrahmen

%line 519
%!PS-Adobe-3.0 EPSF-3.0 Frame arround with Internet text DG02 20070101
%%BoundingBox: 0 0 598 845

%%EndProlog
gsave

/lanind 1 def
/lantex [(G) (E) (S) (N) (I) (J) (M)] def
/showde {0 lanind eq {show} {pop} ifelse} bind def
/showen {1 lanind eq {show} {pop} ifelse} bind def
/showes {3 lanind eq {show} {pop} ifelse} bind def
/showfr {2 lanind eq {show} {pop} ifelse} bind def
/showit {4 lanind eq {show} {pop} ifelse} bind def
/showjp {5 lanind eq {show} {pop} ifelse} bind def
/showea {1 lanind le {show} {pop} ifelse} bind def

/lanind1 01 def /lanind2 01 def /lanindd 01 def
/colorm1 00 def /colorm2 00 def /colormd 01 def
/deintp1 00 def /deintp2 00 def /deintpd 01 def
/xcolor1 03 def /xcolor2 03 def /xcolord 01 def
/xchart1 00 def /xchart2 00 def /xchartd 01 def
/pchart1 00 def /pchart2 00 def /pchartd 01 def
/colsep1 00 def /colsep2 00 def /colsepd 01 def
/pmetam1 00 def /pmetam2 00 def /pmetamd 01 def

/lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def
                    /lanindd laninddf def} if
/colormf where {pop /colorm1 colormf def /colorm2 colormf def
                    /colormd colormdf def} if
/deintpf where {pop /deintp1 deintpf def /deintp2 deintpf def
                    /deintpd deintpdf def} if
/xcolorf where {pop /xcolor1 xcolorf def /xcolor2 xcolorf def
                    /xcolord xcolordf def} if
/xchartf where {pop /xchart1 xchartf def /xchart2 xchartf def
                    /xchartd xchartdf def
                    /xchartm xchart2f xchart1f sub 1 add def}
               {/xchartm 1 def} ifelse
/xchart3f where {pop /xchart3 xchart3f def}
                {/xchart3 1 def} ifelse
/xchart4f where {pop /xchart4 xchart4f def}
                {/xchart4 0 def} ifelse
/pchartf where {pop /pchart1 pchartf def /pchart2 pchartf def
                    /pchartd pchartdf def} if
/colsepf where {pop /colsep1 colsepf def /colsep2 colsepf def
                    /colsepd colsepdf def} if
/pmetamf where {pop /pmetam1 pmetamf def /pmetam2 pmetamf def
                    /pmetamd pmetamdf def} if

/lanind lanind1 def %
/colorm colorm1 def %
/deintp deintp1 def %
/xcolor xcolor1 def %
/xchart xchart1 def %
/pchart pchart1 def %
/colsep colsep1 def %
/pmetam pmetam1 def %

/GSS$ where {pop /LSS$ GSS$ def}
            {/LSS$ (1) def} ifelse
/GSC$ where {pop /LSC$ GSC$ def}
            {/LSC$ (N) def} ifelse
/GSX$ where {pop /LSX$ GSX$ def}
            {/LSX$ (0) def} ifelse
/GSY$ where {pop /LSY$ GSY$ def}
            {/LSY$ (0) def} ifelse
/GEX$ where {pop /LEX$ GEX$ def}
            {/LEX$ (P.PS./PDF) def} ifelse
/GEY$ where {pop /LEY$ GEY$ def}
            {/LEY$ (P.DAT) def} ifelse
/IMES 0 def
/i*ptrsc 0 def

gsave

0 setgray

1.0 1.0  scale

0.0 MM 0.0 MM translate

0.15 MM setlinewidth

/x 20 array def
/y 20 array def
/d 20 array def

/x [000 296 296 000  002 294 294 002  005 291 291 005 %speziell
    006 290 290 006  008 288 288 008 ] def
/y [000 000 210 210  002 002 208 208  005 005 205 205 %speziell
    006 006 204 204  008 008 202 202 ] def
/d [060 017 -60 -17  058 015 -58 -15  056 013 -56 -13
    054 011 -54 -11  052 009 -52 -09 ] def

colorm 0 eq deintp 0 eq and {/Txx (d) def  /Fxx (d) def} if %colorm=0, deintp=0
colorm 0 eq deintp 1 eq and {/Txx (e) def  /Fxx (e) def} if %colorm=0, deintp=1
colorm 1 eq deintp 0 eq and {/Txx (dd) def /Fxx (d) def} if %colorm=1, deintp=0
colorm 1 eq deintp 1 eq and {/Txx (de) def /Fxx (e) def} if %colorm=1, deintp=1
xchart 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://farbe.li.tu\255berlin.de/AG78/AG78) show
colorm cvishow deintp cvishow
colorm 0 eq {(N) show} {(F) show} ifelse (P.PDF  & ) show
(http://farbe.li.tu\255berlin.de/AG78/AG78) show
colorm cvishow deintp cvishow
colorm 0 eq {(N) show} {(F) show} ifelse (P.TXT  & ) show
(http://farbe.li.tu\255berlin.de/AG78/AG78.HTM) show

} %xt=0

{ %xt=1
/xlu 017 MM def /ylu 017 MM def
/xro 279 MM def /yro 193 MM def
/xlo 017 MM def /ylo 193 MM def
/xru 279 MM def /yru 017 MM def

xlu 8 MM sub ylu moveto  16 MM 0 rlineto stroke
xlu ylu 8 MM sub moveto 0  16 MM rlineto stroke
xro 8 MM add yro moveto -16 MM 0 rlineto stroke
xro yro 8 MM add moveto 0 -16 MM rlineto stroke

xru 8 MM sub yru moveto  16 MM 0 rlineto stroke
xru yru 8 MM sub moveto 0  16 MM rlineto stroke
xlo 8 MM add ylo moveto -16 MM 0 rlineto stroke
xlo ylo 8 MM add moveto 0 -16 MM rlineto stroke

1 2 7 {/i exch def %Zentrierkreise
xlu ylu i MM 0 360 arc stroke
xro yro i MM 0 360 arc stroke
xru yru i MM 0 360 arc stroke
xlo ylo i MM 0 360 arc stroke
      } for %i

12 4 16 {/i exch def /i0 i def %i=0,16
%0 4 16 {/i exch def /i0 i def %i=0,16
        /i1 i0 1 add def /i2 i0 2 add def /i3 i0 3 add def

i 16 eq {0.30 MM setlinewidth} {0.15 MM setlinewidth} ifelse

0 setgray
x i0 get MM y i0 get MM moveto x i1 get MM y i1 get MM lineto
x i2 get MM y i2 get MM lineto x i3 get MM y i3 get MM lineto
x i0 get MM y i0 get MM lineto stroke

i 16 eq {6 /Times-ISOL1 FS
         /x00 67 def /xdif 32 def /y0o 202.3 def /y0u 6.3 def
         /x0l 6.1 def /x0r 288 def /y00 22 def /ydif 32 def
         x00 xdif 0 mul add MM y0o MM moveto (V) show
         x00 xdif 0 mul add MM y0u MM moveto (C) show
         x00 xdif 1 mul add MM y0o MM moveto (L) show
         x00 xdif 1 mul add MM y0u MM moveto (M) show
         x00 xdif 2 mul add MM y0o MM moveto (O) show
         x00 xdif 2 mul add MM y0u MM moveto (Y) show
         x00 xdif 3 mul add MM y0o MM moveto (Y) show
         x00 xdif 3 mul add MM y0u MM moveto (O) show
         x00 xdif 4 mul add MM y0o MM moveto (M) show
         x00 xdif 4 mul add MM y0u MM moveto (L) show
         x00 xdif 5 mul add MM y0o MM moveto (C) show
         x00 xdif 5 mul add MM y0u MM moveto (V) show

         x0l MM y00 ydif 0 mul add MM moveto (V) show
         x0r MM y00 ydif 0 mul add MM moveto (C) show
         x0l MM y00 ydif 1 mul add MM moveto (L) show
         x0r MM y00 ydif 1 mul add MM moveto (M) show
         x0l MM y00 ydif 2 mul add MM moveto (O) show
         x0r MM y00 ydif 2 mul add MM moveto (Y) show
         x0l MM y00 ydif 3 mul add MM moveto (Y) show
         x0r MM y00 ydif 3 mul add MM moveto (O) show
         x0l MM y00 ydif 4 mul add MM moveto (M) show
         x0r MM y00 ydif 4 mul add MM moveto (L) show
         x0l MM y00 ydif 5 mul add MM moveto (C) show
         x0r MM y00 ydif 5 mul add MM moveto (V) show
        } if

       } for %i=0,16

0 1 10 {/j0 exch def /j1 j0 1 add def %j0

         j0 0 eq {tzccmy0* setcmykcolor} if
         j0 1 eq {0 setgray} if
         j0 2 eq {tzmcmy0* setcmykcolor} if
         j0 3 eq {0 setgray} if
         j0 4 eq {tzycmy0* setcmykcolor} if
         j0 5 eq {0 setgray} if
         j0 6 eq {tzocmy0* setcmykcolor} if
         j0 7 eq {0 setgray} if
         j0 8 eq {tzlcmy0* setcmykcolor} if
         j0 9 eq {0 setgray} if
         j0 10 eq {tzvcmy0* setcmykcolor} if

12 4 16 {/i exch def /i0 i def %i=0,16
%0 4 16 {/i exch def /i0 i def %i=0,16
        /i1 i0 1 add def /i2 i0 2 add def /i3 i0 3 add def

i 16 eq {0.30 MM setlinewidth} {0.15 MM setlinewidth} ifelse

x i0 get d i0 get add 16 j0 mul add MM y i0 get MM moveto
x i0 get d i0 get add 16 j1 mul add MM y i0 get MM lineto stroke

x i1 get MM y i1 get d i1 get add 16 j0 mul add MM moveto
x i1 get MM y i1 get d i1 get add 16 j1 mul add MM lineto stroke

x i2 get d i2 get add 16 j0 mul sub MM y i2 get MM moveto
x i2 get d i2 get add 16 j1 mul sub MM y i2 get MM lineto stroke

x i3 get MM y i3 get d i3 get add 16 j0 mul sub MM moveto
x i3 get MM y i3 get d i3 get add 16 j1 mul sub MM lineto stroke

       } for %i=0,16

       } for %j0

0.15 MM setlinewidth
/s 7 MM def /s1 8 MM def /s5 36 MM def
16 1 20 {/j exch def /j0 j 16 sub def %j=16,20
         /ix0 xlu  8 MM add j0 7 MM mul add def /iy0 ylu 8 MM sub def

0 1 3 {/ij exch def %ij=0,3

 ij 0 eq {/ix0 xlu  8 MM add j0 7 MM mul add def /iy0 ylu 8 MM sub def} if
 ij 1 eq {/ix0 xru 43 MM sub j0 7 MM mul add def /iy0 yru 8 MM sub def} if
 ij 2 eq {/ix0 xlo  8 MM add j0 7 MM mul add def /iy0 ylo 1 MM add def} if
 ij 3 eq {/ix0 xro 43 MM sub j0 7 MM mul add def /iy0 yro 1 MM add def} if

i*ptrsc 0 eq i*ptrsc 2 eq or {%i*ptrsc=0,2 cmy0* setcmykcolor
              j 16 eq {tzan j get dup dup 0 setcmykcolor
                       ix0 0.5 MM sub iy0 0.5 MM sub s5 s1 rec fill} if
              tzan j get dup dup 0 setcmykcolor
              ix0 iy0 s s  rec fill
             } if %i*ptrsc=0,2

i*ptrsc 1 eq i*ptrsc 3 eq or {%i*ptrsc=1,3 www* setrgbcolor
              j 16 eq {1 tzan j get 1 sub dup dup setrgbcolor %N
                       ix0 0.5 MM sub iy0 0.5 MM sub s5 s1 rec fill} if
              1 tzan j get sub dup dup setrgbcolor %N
              ix0 iy0 s s  rec fill
             } if %i*ptrsc=1,3

i*ptrsc 4 eq i*ptrsc 5 eq or {%i*ptrsc=4,5
  [/CIEBasedABC <<    %Farbraum und Grenzen fuer D65
  /RangeABC [0 100 -128 127 -128 127]
  /DecodeABC [{16 add 116 div} bind {500 div} bind {200 div} bind]
  /MatrixABC [1 1 1 1 0 0 0 0 -1]
  /DecodeLMN
    [{dup 6 29 div ge {dup dup mul mul}
     {4 29 div sub 108 841 div mul} ifelse 0.9505 mul} bind
     {dup 6 29 div ge {dup dup mul mul}
     {4 29 div sub 108 841 div mul} ifelse} bind
     {dup 6 29 div ge {dup dup mul mul}
     {4 29 div sub 108 841 div mul} ifelse 1.0890 mul} bind]
    /WhitePoint  [0.9505 1 1.089]                %CIEXYZ fuer D65
 >>] setcolorspace

 j 16 eq {tznLAB* 0 get tzwLAB* 0 get tznLAB* 0 get sub 0.25 j0 mul mul add
          tznLAB* 1 get tzwLAB* 1 get tznLAB* 1 get sub 0.25 j0 mul mul add
          tznLAB* 2 get tzwLAB* 2 get tznLAB* 2 get sub 0.25 j0 mul mul add
          setcolor %N
          ix0 0.5 MM sub iy0 0.5 MM sub s5 s1 rec fill} if
          tznLAB* 0 get tzwLAB* 0 get tznLAB* 0 get sub 0.25 j0 mul mul add
          tznLAB* 1 get tzwLAB* 1 get tznLAB* 1 get sub 0.25 j0 mul mul add
          tznLAB* 2 get tzwLAB* 2 get tznLAB* 2 get sub 0.25 j0 mul mul add
          setcolor %N
          ix0 iy0 s s  rec fill
             } if %i*ptrsc=4,5

i*ptrsc 6 eq {%i*ptrsc=6 000n* setcmykcolor
              j 16 eq {0 0 0 tzan j get setcmykcolor
                       ix0 0.5 MM sub iy0 0.5 MM sub s5 s1 rec fill} if
              0 0 0 tzan j get setcmykcolor
              ix0 iy0 s s  rec fill
             } if %i*ptrsc=6

i*ptrsc 7 eq {%i*ptrsc=7 w* setgray
              j 16 eq {1 tzan j get sub setgray
                       ix0 0.5 MM sub iy0 0.5 MM sub s5 s1 rec fill} if
              1 tzan j get sub setgray
              ix0 iy0 s s  rec fill
             } if %i*ptrsc=7

      } for %ij=0,3

        } for %j=16,20

0 setgray
018 MM 008.2 MM moveto 6 /Times-Roman FS (-8) show
018 MM 006.2 MM moveto 6 /Times-Roman FS (-6) show

276 MM 008.2 MM moveto 6 /Times-Roman FS (-8) show
276 MM 006.2 MM moveto 6 /Times-Roman FS (-6) show

018 MM 202.2 MM moveto 6 /Times-Roman FS (-8) show
018 MM 204.2 MM moveto 6 /Times-Roman FS (-6) show

276 MM 202.2 MM moveto 6 /Times-Roman FS (-8) show
276 MM 204.2 MM moveto 6 /Times-Roman FS (-6) show

0 setgray
12 /Times-ISOL1 FS
61 MM 13.5 MM  moveto
(TUB\255Pr\374fvorlage AG78; ) showde                           %0AG78X-Y 0000#
(TUB\255test chart AG78; ) showen                               %1AG78X-Y 0000#
(gr\341fico TUB\255AG78; ) showes                               %2AG78X-Y 0000#
(TUB\255test graphique AG78; ) showfr                           %3AG78X-Y 0000#
(grafico TUB\255AG78; ) showit                                  %4AG78X-Y 0000#
(TUB\255test chart AG78; ) showjp                               %5AG78X-Y 0000#

(Beispiele der Farbmetrik) showde                               %0AG78X-Y 0100#
(Examples of colour metric) showen                              %1AG78X-Y 0100#
(Ejemplos de las m\351tricas de colores) showes                 %2AG78X-Y 0100#
(Examples de la m\351trique de couleurs) showfr                 %3AG78X-Y 0100#
(Esempi di metriche di colori) showit                           %4AG78X-Y 0100#
(Eksempler p\345 n\370kkeltall i farger) showjp                 %5AG78X-Y 0100#

12 /TimesI-ISOL1 FS

61 MM 09.5 MM  moveto
12 /Times-ISOL1 FS
xchart4 0 eq {%xchart4=0
12 /Times-Roman FS
(CIE-Daten von Elementarfarben ) showde                         %0AG78X-Y 0200#
12 /Times-ISOL1 FS
(CIE data of elementary colours ) showen                        %1AG78X-Y 0200#
(CIE datos elementales y colores ) showes                       %2AG78X-Y 0200#
(Donn\351es CIE de couleurs elementaires ) showfr               %3AG78X-Y 0200#
(CIE dati di elementari colori ) showit                         %4AG78X-Y 0200#
(CIE data for element\346rfarge ) showjp                        %5AG78X-Y 0200#

12 /Times-ISOL1 FS
(und Ger\344teausgabe) showde                                   %0AG78X-Y 0200#
(and device output) showen                                      %1AG78X-Y 0200#
(en los dispositivos de salida) showes                          %2AG78X-Y 0200#
(et sortie de l'appareile) showfr                               %3AG78X-Y 0200#
(e di uscita sui dispositivi) showit                            %4AG78X-Y 0200#
(og utgang p\345 enheter) showjp                                %5AG78X-Y 0200#
             } if %xchart4=0

xchart4 1 eq {
12 /Times-ISOL1 FS
(Zapfen\255Empfindlichkeit und \255S\344ttigung ) showde        %0AG78X-Y 0300#
(cone sensitivity and saturation ) showea                       %1AG78X-Y 0300#
(f\374r Abstand )showde
(for distance ) showea
12 /Symbol FS
(Dl) show
12 /Times-ISOL1 FS
(=50) show
             } if %xchart4=1

xchart4 2 eq {
12 /Times-ISOL1 FS
12 /Times-ISOL1 FS
(Zapfen\255Empfindlichkeit und \255S\344ttigung ) showde        %0AG78X-Y 0400#
(cone sensitivity and saturation ) showea                       %1AG78X-Y 0400#
(f\374r Abstand )showde
(for distance ) showea
12 /Symbol FS
(Dl) show
12 /Times-ISOL1 FS
(=25) show
             } if %xchart4=2

xchart 9 ge {%xchart>=1
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>=1

12 /Times-ISOL1 FS
170 MM 13 MM moveto
(Eingabe: ) showde                                              %0AG78X-Y 0500#
(input: ) showen                                                %1AG78X-Y 0500#
(entrada: ) showes                                              %2AG78X-Y 0500#
(entr\351e: ) showfr                                            %3AG78X-Y 0500#
(immettere: ) showit                                            %4AG78X-Y 0500#
(input: ) showjp                                                %5AG78X-Y 0500#
12 /TimesI-ISOL1 FS
(w/rgb/cmyk -> ) show
xchart xchart3 lt {(w/rgb/cmyk) show
                  } if
xchart xchart3 ge {%xchart>=xchart3
                   (rgb) show
                  } if %xchart>=xchart3

10 /Times-ISOL1 FS
0 -2 rmoveto Txx show 0 2 rmoveto
12 /Times-ISOL1 FS

12 /Times-ISOL1 FS
170 MM 9 MM moveto
(Ausgabe: ) showde                                              %0AG78X-Y 0600#
(output: ) showen                                               %1AG78X-Y 0600#
(salida: ) showes                                               %2AG78X-Y 0600#
(sortie: ) showfr                                               %3AG78X-Y 0600#
(uscita: ) showit                                               %4AG78X-Y 0600#
(output: ) showjp                                               %5AG78X-Y 0600#

%colorm=0,1!
12 /Times-ISOL1 FS
xchart 8 le {%xchart=0,#0
             12 /Times-ISOL1 FS
(keine \304nderung) showde                                      %0AG78X-Y 0700#
(no change) showen                                              %1AG78X-Y 0700#
(ning\372n cambio) showes                                       %2AG78X-Y 0700#
(aucun changement) showfr                                       %3AG78X-Y 0700#
(nessun cambiamento) showit                                     %4AG78X-Y 0700#
(no change compared) showjp                                     %5AG78X-Y 0700#
            }%xchart=0

            {%xchart#0
             12 /Times-ISOL1 FS
             colorm 0 eq {%colorm=0
(Transfer nach ) showde                                         %0AG78X-Y 0800#
(transfer to ) showen                                           %1AG78X-Y 0800#
(transfiera a ) showes                                          %2AG78X-Y 0800#
(transf\351rer \340 ) showfr                                    %3AG78X-Y 0800#
(trasferire a ) showit                                          %4AG78X-Y 0800#
(transfer to ) showjp                                           %5AG78X-Y 0800#
                         }%colorm=0
                         {%colorm=1
(3D\255Linearisierung ) showde                                  %0AG78X-Y 0900#
(3D\255linearization to ) showen                                %1AG78X-Y 0900#
(3D\255linealizaci\363n a ) showes                              %2AG78X-Y 0900#
(linearisation 3D selon ) showfr                                %3AG78X-Y 0900#
(3D\255linearizzazione a ) showit                               %4AG78X-Y 0900#
(3D\255linearization to ) showjp                                %5AG78X-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://farbe.li.tu\255berlin.de/AG78/AG78L) show
(0) show
LSC$ show LEX$ show

%1 setgray %start white and unvisible
(; ) show
xchart 8 le {
(Start\255Ausgabe) showde                                       %0AG78X-Y 1000#
(start output) showen                                           %1AG78X-Y 1000#
(comience salida) showes                                        %2AG78X-Y 1000#
(sortie de production) showfr                                   %3AG78X-Y 1000#
(cominciare l'uscita) showit                                    %4AG78X-Y 1000#
(start output) showjp                                           %5AG78X-Y 1000#
           } if
LSC$ (C) eq {
(Start\255Ausgabe) showde                                       %0AG78X-Y 1100#
(start output) showen                                           %1AG78X-Y 1100#
(comience salida) showes                                        %2AG78X-Y 1100#
(sortie de production) showfr                                   %3AG78X-Y 1100#
(cominciare l'uscita) showit                                    %4AG78X-Y 1100#
(start output) showjp                                           %5AG78X-Y 1100#
           } if
xchart 9 ge {%xchart>=1
colorm 0 eq {%colorm=0,1
(Transfer Ausgabe) showde                                       %0AG78X-Y 1200#
(transfer output) showen                                        %1AG78X-Y 1200#
(salida de transferencia) showes                                %2AG78X-Y 1200#
(sortie de transfert) showfr                                    %3AG78X-Y 1200#
(uscita di trasferimento) showit                                %4AG78X-Y 1200#
(transfer output) showjp                                        %5AG78X-Y 1200#
            }%colorm=0
            {%colorm=1
(3D\255Linearisierung) showde                                   %0AG78X-Y 1300#
(3D\255linearization) showen                                    %1AG78X-Y 1300#
(3D\255linealizaci\363n) showes                                 %2AG78X-Y 1300#
(linearisation 3D) showfr                                       %3AG78X-Y 1300#
(3D\255linearizzzazione) showit                                 %4AG78X-Y 1300#
(3D\255linearization) showjp                                    %5AG78X-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                    %0AG78X-Y 1400#
(N: no 3D\255linearization (OL) ) showen                        %1AG78X-Y 1400#
(N: ninguna 3D\255linealizaci\363n (OL) ) showes                %2AG78X-Y 1400#
(N: aucun linearisation 3D (OL) ) showfr                        %3AG78X-Y 1400#
(N: nessun 3D\255linearizzazione (OL) ) showit                  %4AG78X-Y 1400#
(N: no 3D\255linearization (OL) ) showjp                        %5AG78X-Y 1400#

(in Datei (F) oder PS\255Startup (S)) showde                    %0AG78X-Y 1500#
(in file (F) or PS\255startup (S)) showen                       %1AG78X-Y 1500#
(en archivo (F) o PS\255startup (S)) showes                     %2AG78X-Y 1500#
(dans fichier (F) ou PS\255startup (S)) showfr                  %3AG78X-Y 1500#
(nel file (F) o PS\255startup (S)) showit                       %4AG78X-Y 1500#
(in file (F) or PS\255startup (S)) showjp                       %5AG78X-Y 1500#
           }
           {LSC$ show (: ) show
(3D\255Linearisierung) showde                                   %0AG78X-Y 1600#
(3D\255linearization) showen                                    %1AG78X-Y 1600#
(3D\255linealizaci\363n) showes                                 %2AG78X-Y 1600#
(linearisation 3D) showfr                                       %3AG78X-Y 1600#
(3D\255linearizzzazione) showit                                 %4AG78X-Y 1600#
(3D\255linearization) showjp                                    %5AG78X-Y 1600#
( AG78/AG78L) show
LSS$ show LSX$ show (0) show
LSC$ show LEY$ show
          } ifelse
LSC$ (F) eq {
( in Datei (F)) showde                                          %0AG78X-Y 1700#
( in file (F)) showen                                           %1AG78X-Y 1700#
( en archivo (F)) showes                                        %2AG78X-Y 1700#
( dans fichier (F)) showfr                                      %3AG78X-Y 1700#
( nel file (F)) showit                                          %4AG78X-Y 1700#
( in file (F)) showjp                                           %5AG78X-Y 1700#
           } if
LSC$ (S) eq {
( im Distiller Startup (S) Directory) showde                    %0AG78X-Y 1800#
( in Distiller Startup (S) Directory) showen                    %1AG78X-Y 1800#
( en el Distiller Startup (S) Directory) showes                 %2AG78X-Y 1800#
( dans le Distiller Startup (S) Directory) showfr               %3AG78X-Y 1800#
( nel Distiller Startup (S) Directory) showit                   %4AG78X-Y 1800#
( in Distiller Startup (S) Directory) showjp                    %5AG78X-Y 1800#
           } if
LSC$ (D) eq {
( in PS\255Device (D)) showde                                   %0AG78X-Y 1900#
( in PS\255device (D)) showen                                   %1AG78X-Y 1900#
( en el PS\255device (D)) showes                                %2AG78X-Y 1900#
( dans l'appareil PS (D)) showfr                                %3AG78X-Y 1900#
( nel PS\255dispositivo (D)) showit                             %4AG78X-Y 1900#
( in PS\255Device (D)) showjp                                   %5AG78X-Y 1900#
           } if
LSC$ (T) eq {
( im Distiller Startup (S) Directory) showde                    %0AG78X-Y 2000#
( in Distiller Startup (S) Directory) showen                    %1AG78X-Y 2000#
( en el Distiller Startup (S) Directory) showes                 %2AG78X-Y 2000#
( dans le Distiller Startup (S) Directory) showfr               %3AG78X-Y 2000#
( nel Distiller Startup (S) Directory) showit                   %4AG78X-Y 2000#
( in Distiller Startup (S) Directory) showjp                    %5AG78X-Y 2000#
           } if
LSC$ (E) eq {
( in PS\255Device (D)) showde                                   %0AG78X-Y 2100#
( in PS\255device (D)) showen                                   %1AG78X-Y 2100#
( en el PS\255device (D)) showes                                %2AG78X-Y 2100#
( dans appareil PS (D)) showfr                                  %3AG78X-Y 2100#
( nel PS\255dispositivo (D)) showit                             %4AG78X-Y 2100#
( in PS\255Device (D)) showjp                                   %5AG78X-Y 2100#
           } if
%0 setgray %end white and unvisible

(, Seite ) showde                                               %0AG78X-Y 2200#
(, page ) showen                                                %1AG78X-Y 2200#
(, p\341gina ) showes                                           %2AG78X-Y 2200#
(, page ) showfr                                                %3AG78X-Y 2200#
(, pagina ) showit                                              %4AG78X-Y 2200#
(, page ) showjp                                                %5AG78X-Y 2200#
xchart 1 add cvishow (/) show
xchartm cvishow

 16 MM 185 MM moveto
-90 rotate
(Siehe \344hnliche Dateien: ) showde                            %0AG78X-Y 2600#
(see similar files: ) showen                                    %1AG78X-Y 2600#
(vea archivos semejantes: ) showes                              %2AG78X-Y 2600#
(voir fichiers similaires: ) showfr                             %3AG78X-Y 2600#
(vedi file simili: ) showit                                     %4AG78X-Y 2600#
(se lignende filer: ) showjp                                    %5AG78X-Y 2600#
(http://farbe.li.tu\255berlin.de/AG78/AG78.HTM)  show
%(0) show
%LSC$ show LEX$ show
90 rotate

 12 MM 185 MM moveto
-90 rotate
(Technische Information: ) showde                               %0AG78X-Y 2700#
(technical information: ) showen                                %1AG78X-Y 2700#
(informaci\363n t\351cnica: ) showes                            %2AG78X-Y 2700#
(informations techniques: ) showfr                              %3AG78X-Y 2700#
(informazioni tecniche: ) showit                                %4AG78X-Y 2700#
(teknisk informasjon: ) showjp                                  %5AG78X-Y 2700#
(http://www.ps.bam.de) show
( oder ) showde                                                 %0AG78X-Y 2800#
( or ) showen                                                   %1AG78X-Y 2800#
( o ) showes                                                    %2AG78X-Y 2800#
( ou ) showfr                                                   %3AG78X-Y 2800#
( o ) showit                                                    %4AG78X-Y 2800#
( eller ) showjp                                                %5AG78X-Y 2800#
(http://130.149.60.45/~farbmetrik) show
 90 rotate

281 MM 185 MM moveto
-90 rotate
(TUB\255Registrierung: 20180401\255AG78/AG78L) showde           %0AG78X-Y 2900#
(TUB registration: 20180401\255AG78/AG78L) showen               %1AG78X-Y 2900#
(TUB matr\355cula: 20180401\255AG78/AG78L) showes               %2AG78X-Y 2900#
(TUB enregistrement: 20180401\255AG78/AG78L) showfr             %3AG78X-Y 2900#
(iscrizione TUB: 20180401\255AG78/AG78L) showit                 %4AG78X-Y 2900#
(TUB registrering: 20180401\255AG78/AG78L) showjp               %5AG78X-Y 2900#
(0) show
LSC$ show LEX$ show
90 rotate

281 MM 74 MM moveto
-90 rotate
(TUB\255Material: Code=rha4ta) showde                           %0AG78X-Y 3000#
(TUB material: code=rha4ta) showen                              %1AG78X-Y 3000#
(TUB material: code=rha4ta) showes                              %2AG78X-Y 3000#
(TUB mat\351riel: code=rha4ta) showfr                           %3AG78X-Y 3000#
(TUB materiale: code=rha4ta) showit                             %4AG78X-Y 3000#
(TUB\255materiell: code=rha4ta) showjp                          %5AG78X-Y 3000#
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                             %0AG78X-Y 2800#
( application for measurement ) showen                          %1AG78X-Y 2800#
( aplicaci\363n para la medida ) showes                         %2AG78X-Y 2800#
( application pour la mesure ) showfr                           %3AG78X-Y 2800#
( la domanda per la misura ) showit                             %4AG78X-Y 2800#
( application for measurement ) showjp                          %5AG78X-Y 2800#

xchart5f 0 eq {%xchart5f=0
(von Display-Ausgabe) showde                                    %0AG78X-Y 2900#
(of display output) showen                                      %1AG78X-Y 2900#
(de display output) showes                                      %2AG78X-Y 2900#
(de sortie sur \350cran) showfr                                 %3AG78X-Y 2900#
(di stampa di display) showit                                   %4AG78X-Y 2900#
(of display output) showjp                                      %5AG78X-Y 2900#
} if %xchart5f=0

xchart5f 1 eq xchart5f 2 eq or {%xchart5f=1,2
(von Offsetdruck\255Ausgabe) showde                             %0AG78X-Y 3000#
(of offset print output) showen                                 %1AG78X-Y 3000#
(salida en la impressi\363n offset) showes                      %2AG78X-Y 3000#
(des sorties sur offset) showfr                                 %3AG78X-Y 3000#
(uscita nella stampa di offset) showit                          %4AG78X-Y 3000#
(of offset print output) showjp                                 %5AG78X-Y 3000#
} if %xchart5f=1,2

xchart5f 3 eq {%xchart5f=3
(von Laserdrucker\255Ausgabe) showde                            %0AG78X-Y 3100#
(of laser printer output) showen                                %1AG78X-Y 3100#
(salida de impresora l\341ser) showes                           %2AG78X-Y 3100#
(des sorties sur imprimante laser) showfr                       %3AG78X-Y 3100#
(di uscita della stampante laser) showit                        %4AG78X-Y 3100#
(of laser printer output) showjp                                %5AG78X-Y 3100#
} if %xchart5f=3

xchart 1 ge {%xchart>=1
xchart5f 0 eq {%xchart5f=0
(, keine Separation) showde                                     %0AG78X-Y 3200#
(, no separation) showen                                        %1AG78X-Y 3200#
(, ninguna separaci\363n) showes                                %2AG78X-Y 3200#
(, aucune s\351paration) showfr                                 %3AG78X-Y 3200#
(, nessuna separazione) showit                                  %4AG78X-Y 3200#
(, no separation) showjp                                        %5AG78X-Y 3200#
} if %chart5f=0

xchart5f 1 ge {%xchart5f>=1
(, Separation) showde                                           %0AG78X-Y 3300#
(, separation) showen                                           %1AG78X-Y 3300#
(, separaci\363n) showes                                        %2AG78X-Y 3300#
(, s\351paration) showfr                                        %3AG78X-Y 3300#
(, separazione) showit                                          %4AG78X-Y 3300#
(, separation) showjp                                           %5AG78X-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

grestore
gsave

%**********************************************************

%%Trailer

%%EndDocument
EndEPSF grestore gsave

showpage
grestore

%} for %colsepf=0,1

%} for %pchartf=0,0

} for %xchartf=0,1

%} for %xcolorf=3,3

%} for %deintpf=0,1

%} for %colormf=0,1

%} for %lanindf=0,0

%%Trailer