%!PS-Adobe-3.0 EPSF-3.0 YE161-3N %%BoundingBox: 70 82 405 337 %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/YE16/YE16.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:2016100112000) /ModDate (D:20161001112000) /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 /TS {160 /Times-ISOL1 FS} bind def /TL {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 /TIS {160 /TimesI-ISOL1 FS} bind def /TIL {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 /TBS {160 /TimesB-ISOL1 FS} bind def /TBL {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 /TBIS {160 /TimesBI-ISOL1 FS} bind def /TBIL {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 /SS {160 /Symbol FS} bind def /SL {200 1 sub /Symbol FS} bind def /SK {250 1 sub /Symbol FS} bind def /SM {300 1 sub /Symbol FS} bind def /SG {350 1 sub /Symbol FS} bind def /CS {160 /Courier-ISOL1 FS} bind def /CL {200 /Courier-ISOL1 FS} bind def /CK {250 /Courier-ISOL1 FS} bind def /CM {300 /Courier-ISOL1 FS} bind def /CG {350 /Courier-ISOL1 FS} bind def /CBS {160 /CourierB-ISOL1 FS} bind def /CBL {200 /CourierB-ISOL1 FS} bind def /CBK {250 /CourierB-ISOL1 FS} bind def /CBM {300 /CourierB-ISOL1 FS} bind def /CBG {350 /CourierB-ISOL1 FS} bind def /nGs {350 /Times-ISOL1 FS show} bind def /kGs {350 /TimesI-ISOL1 FS show} bind def /bGs {350 /TimesB-ISOL1 FS show} bind def /jGs {350 /TimesBI-ISOL1 FS show} bind def /sGs {350 /Symbol FS show} bind def /iGs {300 /Times-ISOL1 FS 0 -90 rmoveto show 0 90 rmoveto} bind def /eGs {300 /Times-ISOL1 FS 0 200 rmoveto show 0 -200 rmoveto} bind def /ibGb {300 /TimesB-ISOL1 FS 0 -90 rmoveto show 0 90 rmoveto} bind def /ebGb {300 /TimesB-ISOL1 FS 0 200 rmoveto show 0 -200 rmoveto} bind def /ipG {300 /Times-ISOL1 FS 50 50 rmoveto (\267) show 50 -50 rmoveto} bind def %20% kleiner /nMs {300 /Times-ISOL1 FS show TM} bind def /kM2 {300 /TimesI-ISOL1 FS show TM} bind def /bM2 {300 /TimesB-ISOL1 FS show TM} bind def /jM2 {300 /TimesBI-ISOL1 FS show TM} bind def /sMs {300 /Symbol FS show TM} bind def /iMs {250 /Times-ISOL1 FS 0 -70 rmoveto show 0 70 rmoveto TM} bind def /eMs {250 /Times-ISOL1 FS 0 160 rmoveto show 0 -160 rmoveto TM} bind def /ibMs {250 /TimesB-ISOL1 FS 0 -70 rmoveto show 0 70 rmoveto TM} bind def /ebMs {250 /TimesB-ISOL1 FS 0 160 rmoveto show 0 -160 rmoveto TM} bind def /ipM {250 /Times-ISOL1 FS 40 40 rmoveto (\267) show 40 -40 rmoveto TM} bind def %40% kleiner /nKs {250 /Times-ISOL1 FS show TK} bind def /kKs {250 /TimesI-ISOL1 FS show TK} bind def /bKs {250 /TimesB-ISOL1 FS show TK} bind def /jKs {250 /TimesBI-ISOL1 FS show TK} bind def /sKs {250 /Symbol FS show TK} bind def /iKs {200 /Times-ISOL1 FS 0 -60 rmoveto show 0 60 rmoveto TK} bind def /eKs {200 /Times-ISOL1 FS 0 130 rmoveto show 0 -130 rmoveto TK} bind def /ibKs {200 /TimesB-ISOL1 FS 0 -60 rmoveto show 0 60 rmoveto TK} bind def /ebKs {200 /TimesB-ISOL1 FS 0 130 rmoveto show 0 -130 rmoveto TK} bind def /ipK {200 /Times-ISOL1 FS 30 30 rmoveto (\267) show 30 -30 rmoveto TK} bind def %60% kleiner /nLs {200 /Times-ISOL1 FS show TS} bind def /kLs {200 /TimesI-ISOL1 FS show TS} bind def /bLs {200 /TimesB-ISOL1 FS show TS} bind def /jLs {200 /TimesBI-ISOL1 FS show TS} bind def /sLs {200 /Symbol FS show TS} bind def /iLs {160 /Times-ISOL1 FS 0 -50 rmoveto show 0 50 rmoveto TS} bind def /eLs {160 /Times-ISOL1 FS 0 110 rmoveto show 0 -110 rmoveto TS} bind def /ibLs {160 /TimesB-ISOL1 FS 0 -50 rmoveto show 0 50 rmoveto TS} bind def /ebLs {160 /TimesB-ISOL1 FS 0 110 rmoveto show 0 -110 rmoveto TS} bind def /ipL {160 /Times-ISOL1 FS 25 25 rmoveto (\267) show 25 -25 rmoveto TS} bind 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 /colremfi %x y width heigth c m y k {setcmykcolor rem fill} bind def /colremst %x y width heigth c m y k {setcmykcolor rem stroke} 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 /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 /xywidth 200 def /squares {xywidth 0 rlineto 0 xywidth rlineto xywidth neg 0 rlineto closepath stroke} def /squaref {xywidth 0 rlineto 0 xywidth rlineto xywidth neg 0 rlineto closepath fill} def /xydel xywidth 0.5 mul def /xy1 xywidth xydel sub def /squarps {-100 -100 rmoveto xywidth 0 rlineto 0 xywidth rlineto xywidth neg 0 rlineto closepath stroke} def /squarpf {-100 -100 rmoveto xywidth 0 rlineto 0 xywidth rlineto xywidth neg 0 rlineto closepath fill} def /circle {xywidth 0 0 360 arc fill} def /Dataset32 1000 array def %max 10x20x5, real 9x11x5 /Dataset32 [%BEG Dataset %1-00303 YE320-7N_1 %\Delta E*ab \Delta E*CM \Delta E*94 \Delta E*00 \Delta E*85 %0x099 %00 01 02 03 04 05 06 07 08 09 10 %exper. no. range min max ave. E*ab E*CM E*94 E*00 E*85 (VA_EW098) (0098) (0 to <199) 12.4 121.0 41.1 53.3 52.1 52.3 53.0 51.4 (KA_EW098) (0098) (0 to <199) 12.4 121.0 41.1 54.0 52.0 52.2 52.8 51.2 (KS_EW098) (0098) (0 to <199) 12.4 121.0 41.1 53.6 51.7 52.0 52.7 51.2 (MA_EW098) (0098) (0 to <199) 12.4 121.0 41.1 53.1 52.2 52.5 52.7 52.4 (VA_EV098) (0098) (0 to <199) 12.4 121.0 41.1 53.3 52.1 52.3 53.0 51.4 (KA_EV098) (0098) (0 to <199) 12.4 121.0 41.1 54.0 51.9 52.2 52.8 51.2 (KS_EV098) (0098) (0 to <199) 12.4 121.0 41.1 53.6 51.7 52.0 52.7 51.2 (MA_EV098) (0098) (0 to <199) 12.4 121.0 41.1 53.1 52.2 52.5 52.7 52.4 (RS_ER160) (0160) (0 to <199) 1.3 36.5 10.0 43.0 60.0 53.1 47.4 51.3 %01x099 (VA_EW098) (0000) (0 to <5) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (KA_EW098) (0000) (0 to <5) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (KS_EW098) (0000) (0 to <5) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (MA_EW098) (0000) (0 to <5) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (VA_EV098) (0000) (0 to <5) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (KA_EV098) (0000) (0 to <5) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (KS_EV098) (0000) (0 to <5) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (MA_EV098) (0000) (0 to <5) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (RS_ER160) (0036) (0 to <5) 1.3 4.9 3.2 30.1 33.6 29.4 27.3 36.1 %2x099 (VA_EW098) (0098) (5 to <199) 12.4 121.0 41.1 53.3 52.1 52.3 53.0 51.4 (KA_EW098) (0098) (5 to <199) 12.4 121.0 41.1 54.0 52.0 52.2 52.8 51.2 (KS_EW098) (0098) (5 to <199) 12.4 121.0 41.1 53.6 51.7 52.0 52.7 51.2 (MA_EW098) (0098) (5 to <199) 12.4 121.0 41.1 53.1 52.2 52.5 52.7 52.4 (VA_EV098) (0098) (5 to <199) 12.4 121.0 41.1 53.3 52.1 52.3 53.0 51.4 (KA_EV098) (0098) (5 to <199) 12.4 121.0 41.1 54.0 51.9 52.2 52.8 51.2 (KS_EV098) (0098) (5 to <199) 12.4 121.0 41.1 53.6 51.7 52.0 52.7 51.2 (MA_EV098) (0098) (5 to <199) 12.4 121.0 41.1 53.1 52.2 52.5 52.7 52.4 (RS_ER160) (0124) (5 to <199) 5.1 36.5 12.0 42.4 60.4 53.7 48.1 51.9 %3x099 (VA_EW098) (0043) (5 to <25) 12.4 24.9 20.0 18.4 28.9 30.2 33.4 35.5 (KA_EW098) (0043) (5 to <25) 12.4 24.9 20.0 18.8 28.6 30.2 32.5 35.5 (KS_EW098) (0043) (5 to <25) 12.4 24.9 20.0 20.5 29.6 30.4 33.7 34.8 (MA_EW098) (0043) (5 to <25) 12.4 24.9 20.0 17.9 28.5 30.1 32.8 36.5 (VA_EV098) (0043) (5 to <25) 12.4 24.9 20.0 18.4 28.9 30.2 33.4 35.5 (KA_EV098) (0043) (5 to <25) 12.4 24.9 20.0 18.8 28.6 30.2 32.5 35.5 (KS_EV098) (0043) (5 to <25) 12.4 24.9 20.0 20.5 29.6 30.4 33.7 34.8 (MA_EV098) (0043) (5 to <25) 12.4 24.9 20.0 17.9 28.5 30.1 32.8 36.5 (RS_ER160) (0122) (5 to <25) 5.1 24.2 11.6 41.0 48.0 47.3 46.3 52.7 %4x099 (VA_EW098) (0055) (25 to <199) 25.9 121.0 57.6 38.0 39.2 38.1 39.1 36.2 (KA_EW098) (0055) (25 to <199) 25.9 121.0 57.6 40.0 39.5 38.4 39.5 36.5 (KS_EW098) (0055) (25 to <199) 25.9 121.0 57.6 39.0 38.8 38.1 39.0 36.8 (MA_EW098) (0055) (25 to <199) 25.9 121.0 57.6 37.7 39.5 38.5 38.7 38.2 (VA_EV098) (0055) (25 to <199) 25.9 121.0 57.6 38.0 39.2 38.1 39.1 36.2 (KA_EV098) (0055) (25 to <199) 25.9 121.0 57.6 40.0 39.5 38.4 39.5 36.5 (KS_EV098) (0055) (25 to <199) 25.9 121.0 57.6 39.0 38.8 38.1 39.0 36.8 (MA_EV098) (0055) (25 to <199) 25.9 121.0 57.6 37.7 39.5 38.5 38.7 38.2 (RS_ER160) (0002) (25 to <199) 36.5 36.5 36.5 2.9 2.9 2.9 2.9 2.9 ] def %END Dataset32 %************************************************* /Dataset33 500 array def %max 10x10x5, real 9x9x5 /Dataset33 [%BEG Dataset %1-00303 YE330-7N_1 %\Delta E*ab_PF \Delta E*CM_PF\Delta E*94_PF \Delta E*00_PF \Delta E*85_PF %0x099 %00 01 02 03 04 05 06 07 08 09 10 %exper. no. range min max ave. E*ab E*CM E*94 E*00 E*85 %0x099 (VA_EW098) (0098) (0 to <199) 12.4 121.0 41.1 33.4 37.1 39.8 40.6 23.0 (KA_EW098) (0098) (0 to <199) 12.4 121.0 41.1 35.0 37.6 40.1 40.8 24.9 (KS_EW098) (0098) (0 to <199) 12.4 121.0 41.1 34.3 37.1 39.8 40.5 24.1 (MA_EW098) (0098) (0 to <199) 12.4 121.0 41.1 32.9 36.9 39.7 40.1 23.3 (VA_EV098) (0098) (0 to <199) 12.4 121.0 41.1 33.4 37.1 39.8 40.6 23.0 (KA_EV098) (0098) (0 to <199) 12.4 121.0 41.1 35.0 37.6 40.1 40.8 24.9 (KS_EV098) (0098) (0 to <199) 12.4 121.0 41.1 34.3 37.1 39.8 40.5 24.1 (MA_EV098) (0098) (0 to <199) 12.4 121.0 41.1 32.9 36.9 39.7 40.1 23.3 (RS_ER160) (0160) (0 to <199) 1.3 36.5 10.0 32.0 42.8 40.6 39.4 35.4 %1x099 (VA_EW098) (0000) (0 to <5) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (KA_EW098) (0000) (0 to <5) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (KS_EW098) (0000) (0 to <5) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (MA_EW098) (0000) (0 to <5) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (VA_EV098) (0000) (0 to <5) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (KA_EV098) (0000) (0 to <5) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (KS_EV098) (0000) (0 to <5) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (MA_EV098) (0000) (0 to <5) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (RS_ER160) (0036) (0 to <5) 1.3 4.9 3.2 21.1 23.4 21.8 20.8 15.8 %2x099 (VA_EW098) (0098) (5 to <199) 12.4 121.0 41.1 33.4 37.1 39.8 40.6 23.0 (KA_EW098) (0098) (5 to <199) 12.4 121.0 41.1 35.0 37.6 40.1 40.8 24.9 (KS_EW098) (0098) (5 to <199) 12.4 121.0 41.1 34.3 37.1 39.8 40.5 24.1 (MA_EW098) (0098) (5 to <199) 12.4 121.0 41.1 32.9 36.9 39.7 40.1 23.3 (VA_EV098) (0098) (5 to <199) 12.4 121.0 41.1 33.4 37.1 39.8 40.6 23.0 (KA_EV098) (0098) (5 to <199) 12.4 121.0 41.1 35.0 37.6 40.1 40.8 24.9 (KS_EV098) (0098) (5 to <199) 12.4 121.0 41.1 34.3 37.1 39.8 40.5 24.1 (MA_EV098) (0098) (5 to <199) 12.4 121.0 41.1 32.9 36.9 39.7 40.1 23.3 (RS_ER160) (0124) (5 to <199) 5.1 36.5 12.0 32.4 43.6 41.3 40.1 30.6 %3x099 (VA_EW098) (0043) (5 to <25) 12.4 24.9 20.0 14.2 21.5 23.3 25.5 17.3 (KA_EW098) (0043) (5 to <25) 12.4 24.9 20.0 14.6 21.3 23.4 24.7 17.3 (KS_EW098) (0043) (5 to <25) 12.4 24.9 20.0 16.9 22.6 24.0 26.1 17.5 (MA_EW098) (0043) (5 to <25) 12.4 24.9 20.0 13.2 20.9 23.0 24.7 17.0 (VA_EV098) (0043) (5 to <25) 12.4 24.9 20.0 14.2 21.5 23.3 25.5 17.3 (KA_EV098) (0043) (5 to <25) 12.4 24.9 20.0 14.6 21.3 23.4 24.7 17.3 (KS_EV098) (0043) (5 to <25) 12.4 24.9 20.0 16.9 22.6 24.0 26.1 17.5 (MA_EV098) (0043) (5 to <25) 12.4 24.9 20.0 13.2 20.9 23.0 24.7 17.0 (RS_ER160) (0122) (5 to <25) 5.1 24.2 11.6 32.9 40.2 39.2 40.0 30.9 %4x099 (VA_EW098) (0055) (25 to <199) 25.9 121.0 57.6 23.8 27.0 28.3 29.4 16.8 (KA_EW098) (0055) (25 to <199) 25.9 121.0 57.6 27.6 28.9 29.9 30.9 21.3 (KS_EW098) (0055) (25 to <199) 25.9 121.0 57.6 25.7 27.5 29.0 29.9 19.6 (MA_EW098) (0055) (25 to <199) 25.9 121.0 57.6 23.2 27.1 28.6 28.8 17.7 (VA_EV098) (0055) (25 to <199) 25.9 121.0 57.6 23.8 27.0 28.3 29.4 16.8 (KA_EV098) (0055) (25 to <199) 25.9 121.0 57.6 27.6 28.9 29.9 30.9 21.3 (KS_EV098) (0055) (25 to <199) 25.9 121.0 57.6 25.7 27.5 29.0 29.9 19.6 (MA_EV098) (0055) (25 to <199) 25.9 121.0 57.6 23.2 27.1 28.6 28.8 17.7 (RS_ER160) (0002) (25 to <199) 36.5 36.5 36.5 2.9 2.9 2.9 2.9 2.9 ] def %END Dataset33 %************************************************* /Dataset36 500 array def %max 10x10x5, real 9x9x5 /Dataset36 [%BEG Dataset %1-00303 YE360-7N_1 %\Delta E*ab \Delta E*CM \Delta E*94 \Delta E*00 \Delta E*85 %0x099 %00 01 02 03 04 05 06 07 08 09 10 %exper. no. range min max ave. E*ab E*CM E*94 E*00 E*85 %0x099 (OS_L0128) (0128) (0 to <199) 7.3 21.6 14.3 24.5 27.2 21.6 22.1 44.2 (MS_L0844) (0844) (0 to <199) 4.1 22.5 10.0 17.2 33.0 31.3 29.9 54.8 (PA_L1308) (1308) (0 to <199) 0.8 26.1 8.9 29.6 38.2 30.6 34.0 40.0 (GA_L0292) (0292) (0 to <199) 4.7 20.8 11.4 24.9 24.7 18.8 19.3 42.6 (ZA_L0144) (0144) (0 to <199) 4.8 19.7 9.9 26.3 47.0 34.5 31.0 36.7 (BA_L0238) (0238) (0 to <199) 4.1 35.7 11.7 30.6 24.4 20.1 18.9 39.6 (WA_EW060) (0060) (0 to <199) 22.2 107.7 50.2 20.8 23.7 25.1 19.2 25.7 (VA_EV098) (0098) (0 to <199) 12.1 117.5 40.6 35.2 51.2 41.2 37.1 32.5 (RS_ER032) (0032) (0 to <199) 11.7 94.5 50.0 28.2 55.1 44.6 28.9 41.4 %1x099 (OS_L0128) (0000) (0 to <5) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (MS_L0844) (0017) (0 to <5) 4.1 4.9 4.6 4.6 14.1 5.9 17.6 21.8 (PA_L1308) (0268) (0 to <5) 0.8 4.9 3.3 26.8 35.3 27.2 31.1 40.4 (GA_L0292) (0001) (0 to <5) 4.7 4.7 4.7 0.1 0.1 0.1 0.1 0.1 (ZA_L0144) (0003) (0 to <5) 4.8 4.9 4.9 0.5 9.0 0.5 5.3 28.3 (BA_L0238) (0008) (0 to <5) 4.1 4.9 4.6 19.9 13.1 23.8 16.7 38.5 (WA_EW060) (0000) (0 to <5) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (VA_EV098) (0000) (0 to <5) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (RS_ER032) (0000) (0 to <5) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 %2x099 (OS_L0128) (0128) (5 to <199) 7.3 21.6 14.3 24.5 27.2 21.6 22.1 44.2 (MS_L0844) (0827) (5 to <199) 5.0 22.5 10.1 17.0 33.1 31.3 29.9 54.7 (PA_L1308) (1040) (5 to <199) 5.0 26.1 10.3 29.1 37.8 30.2 33.6 39.9 (GA_L0292) (0291) (5 to <199) 5.3 20.8 11.4 24.9 24.7 18.8 19.3 42.6 (ZA_L0144) (0141) (5 to <199) 5.0 19.7 10.0 26.3 47.0 34.6 31.1 36.7 (BA_L0238) (0230) (5 to <199) 5.0 35.7 11.9 30.5 24.5 20.1 18.8 39.4 (WA_EW060) (0060) (5 to <199) 22.2 107.7 50.2 20.8 23.7 25.1 19.2 25.7 (VA_EV098) (0098) (5 to <199) 12.1 117.5 40.6 35.2 51.2 41.2 37.1 32.5 (RS_ER032) (0032) (5 to <199) 11.7 94.5 50.0 28.2 55.1 44.6 28.9 41.4 %3x099 (OS_L0128) (0128) (5 to <25) 7.3 21.6 14.3 24.5 27.2 21.6 22.1 44.2 (MS_L0844) (0827) (5 to <25) 5.0 22.5 10.1 17.0 33.1 31.3 29.9 54.7 (PA_L1308) (1037) (5 to <25) 5.0 24.2 10.2 28.9 37.5 30.0 33.4 39.8 (GA_L0292) (0291) (5 to <25) 5.3 20.8 11.4 24.9 24.7 18.8 19.3 42.6 (ZA_L0144) (0141) (5 to <25) 5.0 19.7 10.0 26.3 47.0 34.6 31.1 36.7 (BA_L0238) (0228) (5 to <25) 5.0 24.4 11.8 28.6 24.6 20.0 18.5 39.5 (WA_EW060) (0002) (5 to <25) 22.2 24.6 23.4 29.2 27.6 27.9 0.1 22.9 (VA_EV098) (0045) (5 to <25) 12.1 24.4 19.9 33.1 47.7 45.5 46.1 37.4 (RS_ER032) (0008) (5 to <25) 11.7 23.1 17.3 26.0 26.2 24.4 20.3 29.1 %4x099 (OS_L0128) (0000) (25 to <199) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (MS_L0844) (0000) (25 to <199) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (PA_L1308) (0003) (25 to <199) 25.4 26.1 25.8 16.8 8.0 13.9 9.4 6.3 (GA_L0292) (0000) (25 to <199) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (ZA_L0144) (0000) (25 to <199) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (BA_L0238) (0002) (25 to <199) 29.2 35.7 32.5 5.6 12.3 22.2 23.4 30.9 (WA_EW060) (0058) (25 to <199) 26.7 107.7 51.2 20.7 23.7 25.1 19.2 25.7 (VA_EV098) (0053) (25 to <199) 25.9 117.5 58.1 27.6 46.0 33.3 28.8 25.1 (RS_ER032) (0024) (25 to <199) 38.2 94.5 60.9 27.2 55.1 45.0 29.2 40.5 ] def %END Dataset36 %************************************************* /Dataset37 500 array def %max 10x10x5, real 9x9x5f /Dataset37 [%BEG Dataset %1-00303 YE370-7N_1 %\Delta E*ab_PF \Delta E*CM_PF\Delta E*94_PF \Delta E*00_PF \Delta E*85_PF %0x099 %00 01 02 03 04 05 06 07 08 09 10 %exper. no. range min max ave. E*ab E*CM E*94 E*00 E*85 %0x099 (OS_L0128) (0128) (0 to <199) 7.3 21.6 14.3 21.7 22.2 18.5 19.0 19.1 (MS_L0844) (0844) (0 to <199) 4.1 22.5 10.0 12.7 24.3 24.6 23.7 25.9 (PA_L1308) (1308) (0 to <199) 0.8 26.1 8.9 26.4 30.0 25.9 28.0 30.8 (GA_L0292) (0292) (0 to <199) 4.7 20.8 11.4 21.1 18.9 14.4 14.7 16.7 (ZA_L0144) (0144) (0 to <199) 4.8 19.7 9.9 20.6 29.8 22.5 21.2 18.3 (BA_L0238) (0238) (0 to <199) 4.1 35.7 11.7 27.3 22.0 19.2 17.9 23.4 (WA_EW060) (0060) (0 to <199) 22.2 107.7 50.2 22.2 21.0 22.5 19.3 25.8 (VA_EV098) (0098) (0 to <199) 12.1 117.5 40.6 23.5 35.4 30.4 27.9 21.6 (RS_ER032) (0032) (0 to <199) 11.7 94.5 50.0 26.4 43.4 37.3 29.0 33.5 %1x099 (OS_L0128) (0000) (0 to <5) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (MS_L0844) (0017) (0 to <5) 4.1 4.9 4.6 2.5 9.3 4.1 12.0 8.6 (PA_L1308) (0268) (0 to <5) 0.8 4.9 3.3 25.3 28.4 24.1 25.8 27.5 (GA_L0292) (0001) (0 to <5) 4.7 4.7 4.7 0.1 0.1 0.1 0.1 0.1 (ZA_L0144) (0003) (0 to <5) 4.8 4.9 4.9 0.8 6.3 0.7 4.0 10.7 (BA_L0238) (0008) (0 to <5) 4.1 4.9 4.6 21.2 13.6 23.3 18.4 27.4 (WA_EW060) (0000) (0 to <5) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (VA_EV098) (0000) (0 to <5) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (RS_ER032) (0000) (0 to <5) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 %2x099 (OS_L0128) (0128) (5 to <199) 7.3 21.6 14.3 21.7 22.2 18.5 19.0 19.1 (MS_L0844) (0827) (5 to <199) 5.0 22.5 10.1 12.8 24.4 24.6 23.8 26.0 (PA_L1308) (1040) (5 to <199) 5.0 26.1 10.3 26.1 30.0 26.0 28.1 28.6 (GA_L0292) (0291) (5 to <199) 5.3 20.8 11.4 21.1 18.9 14.4 14.7 16.5 (ZA_L0144) (0141) (5 to <199) 5.0 19.7 10.0 20.6 29.9 22.6 21.2 18.1 (BA_L0238) (0230) (5 to <199) 5.0 35.7 11.9 27.4 21.9 19.0 17.9 22.1 (WA_EW060) (0060) (5 to <199) 22.2 107.7 50.2 22.2 21.0 22.5 19.3 25.8 (VA_EV098) (0098) (5 to <199) 12.1 117.5 40.6 23.5 35.4 30.4 27.9 21.6 (RS_ER032) (0032) (5 to <199) 11.7 94.5 50.0 26.4 43.4 37.3 29.0 33.5 %3x099 (OS_L0128) (0128) (5 to <25) 7.3 21.6 14.3 21.7 22.2 18.5 19.0 19.1 (MS_L0844) (0827) (5 to <25) 5.0 22.5 10.1 12.8 24.4 24.6 23.8 26.0 (PA_L1308) (1037) (5 to <25) 5.0 24.2 10.2 26.2 30.0 26.0 28.1 28.6 (GA_L0292) (0291) (5 to <25) 5.3 20.8 11.4 21.1 18.9 14.4 14.7 16.5 (ZA_L0144) (0141) (5 to <25) 5.0 19.7 10.0 20.6 29.9 22.6 21.2 18.1 (BA_L0238) (0228) (5 to <25) 5.0 24.4 11.8 27.4 22.1 19.1 18.0 22.1 (WA_EW060) (0002) (5 to <25) 22.2 24.6 23.4 27.0 26.5 26.8 7.1 23.8 (VA_EV098) (0045) (5 to <25) 12.1 24.4 19.9 31.5 39.9 39.9 39.9 28.2 (RS_ER032) (0008) (5 to <25) 11.7 23.1 17.3 19.7 18.3 17.1 16.3 13.2 %4x099 (OS_L0128) (0000) (25 to <199) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (MS_L0844) (0000) (25 to <199) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (PA_L1308) (0003) (25 to <199) 25.4 26.1 25.8 16.9 10.9 14.9 11.6 12.2 (GA_L0292) (0000) (25 to <199) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (ZA_L0144) (0000) (25 to <199) 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 (BA_L0238) (0002) (25 to <199) 29.2 35.7 32.5 10.0 3.4 12.4 13.4 3.5 (WA_EW060) (0058) (25 to <199) 26.7 107.7 51.2 21.6 20.6 22.3 19.1 24.7 (VA_EV098) (0053) (25 to <199) 25.9 117.5 58.1 20.1 32.2 24.8 21.8 17.0 (RS_ER032) (0024) (25 to <199) 38.2 94.5 60.9 26.5 44.3 38.1 28.2 25.8 ] def %END Dataset37 %%EndProlog gsave /lanind 1 def /lantex [(G) (E) (S) (F) (I) (J) (M)] def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind eq {show} {pop} ifelse} bind def /showes {2 lanind eq {show} {pop} ifelse} bind def /showfr {3 lanind eq {show} {pop} ifelse} bind def /showit {4 lanind eq {show} {pop} ifelse} bind def /showjp {5 lanind eq {show} {pop} ifelse} bind def /showea {1 lanind le {show} {pop} ifelse} bind def /lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def /lanindd laninddf def} {/lanind1 1 def /lanind2 1 def} ifelse /colormf where {pop /colorm1 colormf def /colorm2 colormf def /colormd colormdf def} {/colorm1 0 def} ifelse /deintpf where {pop /deintp1 deintpf def /deintp2 deintpf def /deintpd deintpdf def} {/deintp1 0 def} ifelse /xcolorf where {pop /xcolor1 xcolorf def /xcolor2 xcolorf def /xcolord xcolordf def} {/xcolor1 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 gsave %XCHA01.PS END 5 /Times-ISOL1 FS 175 85 moveto (YE161-3N) show %xchart 0 eq {(R) show} % {deintp colorm 2 mul add cvishow} ifelse 72 90 translate 0.01 MM dup scale 50 setlinewidth %40 setlinewidth 20 setlinewidth %16 figures %0 0 25000 17100 0.0 0.0 0.0 0.0 colrecfi %area white grey %0 0 25000 17100 0.0 0.0 0.0 1.0 colrecst %Rahmen Schwarz %06 figures %0 0 11600 12900 0.0 0.0 0.0 0.0 colrecfi %area white grey %0 0 11600 12900 0.0 0.0 0.0 1.0 colrecst %Rahmen Schwarz %04 figures 0 0 11600 08600 0.0 0.0 0.0 0.0 colrecfi %area white grey 0 0 11600 08600 0.0 0.0 0.0 1.0 colrecst %Rahmen Schwarz %02 figures %0 0 11600 04350 0.0 0.0 0.0 0.0 colrecfi %area white grey %0 0 11600 04350 0.0 0.0 0.0 1.0 colrecst %Rahmen Schwarz /xchartl xchart def /xchart0 4 def 4 1 07 {/xchartl exch def %xchartl=0,15 xchartl 4 eq {/xchartm 09 def} if xchartl 5 eq {/xchartm 10 def} if xchartl 6 eq {/xchartm 11 def} if xchartl 7 eq {/xchartm 12 def} if gsave 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 150 /Times-ISOL1 FS 0 setgray 300 -150 moveto xchartl 7 le {(YE160-) show} {(YE161-) show} ifelse xchartm 0 ge xchartm 7 le and {xchartl 1 add cvishow} if xchartm 8 ge xchartm 15 le and {xchartl 7 sub cvishow} if (A) show %A (_) show xchartm 1 add cvishow /xwidth 5400 def /ywidth 4000 def 0.0 0.0 0.0 0.0 setcmykcolor 0 0 moveto xwidth 0 rlineto 0 ywidth rlineto xwidth neg 0 rlineto closepath fill %0 setlinewidth %0 0 moveto xwidth 0 rlineto 0 ywidth rlineto % xwidth neg 0 rlineto closepath clip %20 setlinewidth 0 0 xwidth ywidth 0.0 0.0 0.0 1.0 colrecst %frame black tfn %tfw /xtr0 0800 def /ytr0 0700 def xtr0 ytr0 translate /cvishow {cvi 10 string cvs show} def /cvsshow1 {10 mul cvi 0.1 mul 10 string cvs show} def /cvsshow2 {100 mul cvi 0.01 mul 10 string cvs show} def /cvsshow3 {1000 mul cvi 0.001 mul 10 string cvs show} def %********************************************************************* 50 setlinewidth %50 setlinewidth %40 setlinewidth tfn 0 0 moveto 4000 150 add 0 rlineto stroke 0 0 moveto 0 2700 rlineto stroke 4000 250 add 0 moveto -100 50 rlineto 0 -100 rlineto closepath fill 0 2800 moveto -50 -100 rlineto 100 0 rlineto closepath fill TM /tx [() (1) (2) (3) (4) (5)] def %!x-Achse: 100 Einheiten = 0600 Skalen-Einheiten 0 1 5 {/i exch def /ixt {-060 i 800 mul add} def ixt -330 moveto tx i get exec show /ixt {0 i 800 mul add} def ixt -70 moveto 0 140 rlineto stroke } for TM /ty [( 0)(10) (20) (30) (40) (50) (60)] def 0 1 6 {/j exch def /jyt {-120 j 400 mul add} def -400 jyt moveto ty j get show /iyt {0 j 400 mul add} def -70 iyt moveto 140 0 rlineto stroke } for -600 3050 moveto TBIM (f) show TBK 0 -100 rmoveto (STRESS) show TBM 1500 -600 moveto (Formula No) showen (Formel Nr.) showde -700 -600 moveto xchartl xchart0 sub 0 eq {(A) show} if xchartl xchart0 sub 1 eq {(B) show} if xchartl xchart0 sub 2 eq {(C) show} if xchartl xchart0 sub 3 eq {(D) show} if xchartl xchart0 sub 4 eq {(E) show} if xchartl xchart0 sub 5 eq {(F) show} if xchartl xchart0 sub 6 eq {(G) show} if xchartl xchart0 sub 7 eq {(H) show} if %****************************************************** 20 setlinewidth tfn 900 3050 moveto /LCD {(LCD \050) show ( 5 < ) show SK (D) show TK (E*) show TL 0 -50 rmoveto (ab) show 0 50 rmoveto TK ( <= 25 \051) show } bind def /ELCD1 {(ELCD RS \050) show ( 25 < ) show SK (D) show TK (E*) show TL 0 -50 rmoveto (ab) show 0 50 rmoveto TK ( < 199 \051) show } bind def /ELCD2 {(ELCD IS&RS \050) show ( 0 < ) show SK (D) show TK (E*) show TL 0 -50 rmoveto (ab) show 0 50 rmoveto TK ( < 25 \051) show } bind def TK xchartm 00 ge xchartm 05 le and {%00<=xchartm<=05 LCD } if xchartm 06 ge xchartm 08 le and {%06<=xchartm<=08 ELCD1 } if xchartm 09 ge xchartm 17 le and {%09<=xchartm<=17 ELCD2 } if /xs0 0900 def /ys0 2750 def /ys1 2450 def /xt0 1200 def /yt0 2750 def /yt1 2450 def xs0 ys0 moveto squares xs0 ys1 moveto squaref 20 setlinewidth xchartm 0 ge xchartm 5 le and {/xchartx 3 99 mul xchartm 11 mul add 0 add def xt0 yt0 moveto TK Dataset36 xchartx get show ( ) show Dataset36 xchartx 1 add get show xt0 yt1 moveto Dataset37 xchartx get show (_PF) show /ytsum 0 def 0 1 4 {/j exch def /xchartn 3 99 mul xchartm 11 mul add 6 add j add def /xt 800 j 800 mul add def /yt Dataset36 xchartn get 40 mul def xt yt moveto squarps /ytsum ytsum Dataset36 xchartn get add def j 4 eq {%j=4 /ytsum ytsum 5 div def 400 ytsum 40 mul moveto 4000 0 rlineto stroke 4200 ytsum 40 mul 100 add moveto ytsum 0.49 add cvishow } if %j=4 } for /ytsum 0 def 0 1 4 {/j exch def /xchartn 3 99 mul xchartm 11 mul add 6 add j add def /xt 800 j 800 mul add def /yt Dataset37 xchartn get 40 mul def xt yt moveto squarpf /ytsum ytsum Dataset37 xchartn get add def j 4 eq {%j=4 50 setlinewidth /ytsum ytsum 5 div def 400 ytsum 40 mul moveto 4000 0 rlineto stroke 4200 ytsum 40 mul 300 sub moveto ytsum 0.49 add cvishow 20 setlinewidth } if %j=4 } for } if xchartm 6 ge xchartm 8 le and {/xchartx 4 99 mul xchartm 11 mul add 0 add def xt0 yt0 moveto TK Dataset36 xchartx get show ( ) show Dataset36 xchartx 1 add get show xt0 yt1 moveto Dataset37 xchartx get show (_PF) show /ytsum 0 def 0 1 4 {/j exch def /xchartn 4 99 mul xchartm 11 mul add 6 add j add def /xt 800 j 800 mul add def /yt Dataset36 xchartn get 40 mul def xt yt moveto squarps /ytsum ytsum Dataset36 xchartn get add def j 4 eq {%j=4 /ytsum ytsum 5 div def 400 ytsum 40 mul moveto 4000 0 rlineto stroke 4200 ytsum 40 mul 100 add moveto ytsum 0.49 add cvishow } if %j=4 } for /ytsum 0 def 0 1 4 {/j exch def /xchartn 4 99 mul xchartm 11 mul add 6 add j add def /xt 800 j 800 mul add def /yt Dataset37 xchartn get 40 mul def xt yt moveto squarpf /ytsum ytsum Dataset37 xchartn get add def j 4 eq {%j=4 50 setlinewidth /ytsum ytsum 5 div def 400 ytsum 40 mul moveto 4000 0 rlineto stroke 4200 ytsum 40 mul 300 sub moveto ytsum 0.49 add cvishow 20 setlinewidth } if %j=4 } for } if xchartm 09 ge xchartm 17 le and {/xchartx 3 99 mul xchartm 9 sub 11 mul add 0 add def xt0 yt0 moveto TK Dataset32 xchartx get show ( ) show Dataset32 xchartx 1 add get show xt0 yt1 moveto Dataset33 xchartx get show (_PF) show /ytsum 0 def 0 1 4 {/j exch def /xchartn 3 99 mul xchartm 9 sub 11 mul add 6 add j add def /xt 800 j 800 mul add def /yt Dataset32 xchartn get 40 mul def xt yt moveto squarps /ytsum ytsum Dataset32 xchartn get add def j 4 eq {%j=4 /ytsum ytsum 5 div def 400 ytsum 40 mul moveto 4000 0 rlineto stroke 4200 ytsum 40 mul 100 add moveto ytsum 0.49 add cvishow } if %j=4 } for /ytsum 0 def 0 1 4 {/j exch def /xchartn 3 99 mul xchartm 9 sub 11 mul add 6 add j add def /xt 800 j 800 mul add def /yt Dataset33 xchartn get 40 mul def xt yt moveto squarpf /ytsum ytsum Dataset33 xchartn get add def j 4 eq {%j=4 50 setlinewidth /ytsum ytsum 5 div def 400 ytsum 40 mul moveto 4000 0 rlineto stroke 4200 ytsum 40 mul 300 sub moveto ytsum 0.49 add cvishow 20 setlinewidth } if %j=4 } for } if xtr0 neg ytr0 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 grestore } for %xchartl=0,07 showpage grestore %%Trailer