%!PS-Adobe-3.0 EPSF-3.0 XG081-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://130.149.60.45/~farbmetrik/XG08/) /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1) /Subject (goto: http://farbe.li.tu-berlin.de or http://130.149.60.45/~farbmetrik) /Keywords (image reproduction, colour devices) /Creator (klaus.richter@me.com) /CreationDate (D:2015100112000) /ModDate (D:2015100112000) /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 /TS {190 /Times-ISOL1 FS} bind def /TK {240 /Times-ISOL1 FS} bind def /TM {290 /Times-ISOL1 FS} bind def /TG {340 /Times-ISOL1 FS} bind def /TIS {190 /TimesI-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 /TBS {190 /TimesB-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 /TBIS {190 /TimesBI-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 /SS {190 1 sub /Symbol 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 %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 /circ %x, y radius {dcirc 0 360 arc } 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 /colarcfi %x y c m y k {setcmyk_olvcolor circ fill} bind def /colarcst %x y width heigth c m y k {setcmyk_olvcolor circ 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 /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 {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 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 %0 1 2 {/xchart4 exch def %xchart4=0,2 5 /Times-ISOL1 FS 340 85 moveto (XG081-7N) show %xchart 0 eq {(N) show} % {deintp colorm 2 mul add cvishow} ifelse 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 0 yhoe 550 sub moveto 11200 0 rlineto stroke /ns {340 /Times-ISOL1 FS show TG} bind def /ks {340 /TimesI-ISOL1 FS show TG} bind def /bs {340 /TimesB-ISOL1 FS show TG} bind def /js {340 /TimesBI-ISOL1 FS show TG} bind def /ss {340 /Symbol FS show TG} bind def /is {240 /Times-ISOL1 FS 0 -90 rmoveto show 0 90 rmoveto TG} bind def /is0 {240 /Times-ISOL1 FS -30 -90 rmoveto show 0 90 rmoveto TG} bind def /es {240 /Times-ISOL1 FS 0 200 rmoveto show 0 -200 rmoveto TG} bind def %/ipoint {340 /Times-ISOL1 FS 50 50 rmoveto show 50 -50 rmoveto TG} bind def %/ip {(.) ipoint} bind def /ip {(\267) ns TG} bind def /ib {(\267) bs TG} bind def %20% kleiner /ns2 {290 /Times-ISOL1 FS show TM} bind def /ks2 {290 /TimesI-ISOL1 FS show TM} bind def /bs2 {290 /TimesB-ISOL1 FS show TM} bind def /js2 {290 /TimesBI-ISOL1 FS show TM} bind def /is2 {200 /Times-ISOL1 FS 0 -60 rmoveto show 0 60 rmoveto TM} bind def /is20 {200 /Times-ISOL1 FS -20 -60 rmoveto show 0 60 rmoveto TM} bind def /iks2 {200 /TimesI-ISOL1 FS 10 -40 rmoveto show -10 40 rmoveto TM} bind def /es2 {240 /Times-ISOL1 FS 0 160 rmoveto show 0 -160 rmoveto TM} bind def /ip2 {(\267) ns2 TM} bind def /ib2 {(\267) bs2 TM} bind def %40% kleiner /ns4 {240 /Times-ISOL1 FS show TK} bind def /ks4 {240 /TimesI-ISOL1 FS show TK} bind def /bs4 {240 /TimesB-ISOL1 FS show TK} bind def /js4 {240 /TimesBI-ISOL1 FS show TK} bind def /is4 {160 /Times-ISOL1 FS 8 -48 rmoveto show -8 48 rmoveto TK} bind def /iks4 {160 /TimesI-ISOL1 FS 8 -48 rmoveto show -8 48 rmoveto TK} bind def /es4 {200 /Times-ISOL1 FS 0 190 rmoveto show 0 -190 rmoveto TK} bind def /ip4 {(\267) ns4 TK} bind def /ib4 {(\267) bs4 TK} bind def /ydel 300 def %Titeltext 100 8100 moveto TBG (Relative & skalierte visuelle Differenz; ) showde %08561-7 1 (Relative and scaled visual differences; ) showea %18561-7 1 (Triplets & Paare; benachbarte Farbe) showde %08561-7 11 (triplets and pairs; adjacent colours) showea %18561-7 11 /ix1 0100 def /ix2 4000 def /ix20 ix2 250 sub def /ix3 6100 def /ix4 8100 def ix1 7650 moveto TG (relative visuelle) showde (relative visual) showea ix1 7300 moveto (Skala ) showde (scale ) showea SG (D) show -40 0 rmoveto TIG (V) show -40 0 rmoveto (3,i) is2 TM ( (i=0,1)) show ix1 6950 moveto TG (Bereich 0 bis 1) showde (range 0 to 1) showea ix1 100 moveto TG (2 Experimente von 30 Beobachtern) showde (2 experiments of 30 observers) showea ix3 800 sub 100 moveto TG (assumption: equal visual steps) showea (Annahme: visull gleiche Stufen) showde ix20 500 sub 7650 moveto TG (Paarvergleich) showde (pair comparison) showea TIG ( (P)) show TG ix20 500 sub 7300 moveto (Grau \255 Gr\374n) showde (to grey \255 turquoise) showea ix20 500 sub 6950 moveto SG (D) show TIG (P*) show (i) is0 TG ( : ) show SG (D) show TIG (V*) show (R) is0 TG (=10) show ix3 200 add 7650 moveto TG (relative visual) showea (relative visuelle) showde ix3 200 add 7300 moveto (scale between) showea (Skala zwischen) showde ix3 200 add 6950 moveto TIG xchart4 0 eq {(N-Z) show} if xchart4 1 eq {(G_Z) show} if xchart4 2 eq {(B-Z) show} if TG ( and ) showea ( und ) showde TIG xchart4 0 eq {(Z-W) show} if xchart4 1 eq {(Z_M) show} if xchart4 2 eq {(Z-Y) show} if /ix41 ix4 200 add def ix41 7650 moveto TG (skalierte Daten) showde (scaled visual data) showea ix41 7300 moveto SG (D) show -40 0 rmoveto TIG (V*) show (i) is TG (=) show SG (D) show -40 0 rmoveto TIG (V) show -40 0 rmoveto (5,i) is2 ip SG (D) show TIG (P*) show (i) is0 TM ((i=0,3)) show /ixj [200 600 1500 2200] def /ixi [200 800 1700 2400] def ix41 6950 moveto SK (D) show TIK (V) show (5,i) is2 ix41 ixj 1 get add 6950 moveto SK (D) show TIK (P*) show (i) is20 ix41 ixj 2 get add 6950 moveto SK (D) show TIK (V*) show (i) is20 ix41 ixj 3 get add 6950 moveto SK (D) show TIK (V*) show (ri) is20 /col3 [ %1 0.00 0.00 0.00 1.00 %N 0.00 0.00 0.00 0.50 %Z 0.00 0.00 0.00 0.00 %W %2 1.00 0.00 1.00 0.00 %G 0.00 0.00 0.00 0.50 %Z 0.00 1.00 0.00 0.00 %M %3 1.00 1.00 0.00 0.00 %B 0.00 0.00 0.00 0.50 %Z 0.00 0.00 1.00 0.00 %Y ] def /col6 [ %1 0.00 0.00 0.00 1.00 %N 0.00 0.00 0.00 0.50 %Z 0.00 0.00 0.00 0.50 %Z 0.00 0.00 0.00 0.00 %W %2 1.00 0.00 1.00 0.00 %G 0.00 0.00 0.00 0.50 %Z 0.00 0.00 0.00 0.50 %Z 0.00 1.00 0.00 0.00 %M %3 1.00 1.00 0.00 0.00 %B 0.00 0.00 0.00 0.50 %Z 0.00 0.00 0.00 0.50 %Z 0.00 0.00 1.00 0.00 %Y ] def /colall4 72 array def /colNZW4 72 array def /colNZW4 [ 0.00 0.00 0.00 1.000 %N 0.00 0.00 0.00 0.875 %N+0.125 0.00 0.00 0.00 0.500 %Z 0.00 0.00 0.00 1.000 %N 0.00 0.00 0.00 0.750 %N+0.250 0.00 0.00 0.00 0.500 %Z 0.00 0.00 0.00 1.000 %N 0.00 0.00 0.00 0.625 %N+0.375 0.00 0.00 0.00 0.500 %Z %0.00 0.00 0.00 0.50 %Z 0.00 0.00 0.00 0.500 %Z 0.00 0.00 0.00 0.375 %Z+0.125 0.00 0.00 0.00 0.00 %W 0.00 0.00 0.00 0.500 %Z 0.00 0.00 0.00 0.250 %Z+0.250 0.00 0.00 0.00 0.000 %W 0.00 0.00 0.00 0.500 %Z 0.00 0.00 0.00 0.125 %Z+0.125 0.00 0.00 0.00 0.000 %W ] def %colNZW4 /colGRZ4 72 array def /colGZR4 [ 1.000 0.000 1.000 0.000 %G 0.875 0.000 0.875 0.125 %G+0.125 0.000 0.000 0.000 0.500 %Z 1.000 0.000 1.000 0.000 %G 0.625 0.000 0.625 0.250 %N+0.250 0.000 0.000 0.000 0.500 %Z 1.000 0.000 1.000 0.000 %G 0.500 0.000 0.500 0.375 %N+0.375 0.000 0.000 0.000 0.500 %Z %0.000 0.000 0.000 0.50 %Z 0.000 0.000 0.000 0.500 %Z 0.000 0.250 0.000 0.375 %Z+0.125 0.000 1.000 0.000 0.000 %M 0.000 0.000 0.000 0.500 %Z 0.000 0.500 0.000 0.250 %Z+0.250 0.000 1.000 0.000 0.000 %M 0.000 0.000 0.000 0.500 %Z 0.000 0.750 0.000 0.125 %Z+0.375 0.000 1.000 0.000 0.000 %M ] def %colGZR4 /colBZY4 72 array def /colBZY4 [ 1.000 1.000 0.000 0.000 %B 0.750 0.750 0.000 0.125 %B+0.125 0.000 0.000 0.000 0.500 %Z 1.000 1.000 0.000 0.000 %B 0.500 0.500 0.000 0.250 %B+0.250 0.000 0.000 0.000 0.500 %Z 1.000 1.000 0.000 0.000 %B 0.250 0.250 0.000 0.375 %B+0.375 0.000 0.000 0.000 0.500 %Z %0.000 0.000 0.000 0.50 %Z 0.000 0.000 0.000 0.500 %Z 0.000 0.000 0.250 0.375 %Z+0.125 0.000 0.000 1.000 0.000 %Y 0.000 0.000 0.000 0.500 %Z 0.000 0.000 0.500 0.250 %Z+0.250 0.000 0.000 1.000 0.000 %Y 0.000 0.000 0.000 0.500 %Z 0.000 0.000 0.750 0.125 %Z+0.375 0.000 0.000 1.000 0.000 %Y ] def %colBZY4 /colall5 40 array def /colNZW5 40 array def /colNZW5 [ 0.00 0.00 0.00 1.000 %N 0.00 0.00 0.00 0.875 %N+0.125 0.00 0.00 0.00 0.750 %N+0.250 0.00 0.00 0.00 0.625 %N+0.375 0.00 0.00 0.00 0.500 %Z 0.00 0.00 0.00 0.500 %Z 0.00 0.00 0.00 0.375 %Z+0.125 0.00 0.00 0.00 0.250 %Z+0.250 0.00 0.00 0.00 0.125 %Z+0.125 0.00 0.00 0.00 0.000 %W ] def %colNZW5 /colGRZ5 40 array def /colGZR5 [ 1.000 0.000 1.000 0.000 %G 0.875 0.000 0.875 0.125 %G+0.125 0.625 0.000 0.625 0.250 %N+0.250 0.500 0.000 0.500 0.375 %N+0.375 0.000 0.000 0.000 0.500 %Z 0.000 0.000 0.000 0.500 %Z 0.000 0.250 0.000 0.375 %Z+0.125 0.000 0.500 0.000 0.250 %Z+0.250 0.000 0.750 0.000 0.125 %Z+0.375 0.000 1.000 0.000 0.000 %M ] def %colGZR5 /colBZY5 40 array def /colBZY5 [ 1.000 1.000 0.000 0.000 %B 0.750 0.750 0.000 0.125 %B+0.125 0.500 0.500 0.000 0.250 %B+0.250 0.250 0.250 0.000 0.375 %B+0.375 0.000 0.000 0.000 0.500 %Z 0.000 0.000 0.000 0.500 %Z 0.000 0.000 0.250 0.375 %Z+0.125 0.000 0.000 0.500 0.250 %Z+0.250 0.000 0.000 0.750 0.125 %Z+0.375 0.000 0.000 1.000 0.000 %Y ] def %colBZY5 %Reference colour /colTZ 96 array def /colTZ [ 1.00 0.00 0.50 0.00 %T 0.00 0.00 0.00 0.50 %Z ] def %colTZ /txt30 [( 0) (0,70) ( 1)] def %NDW /txt31 [( 0) (0,60) ( 1)] def %GDV /txt32 [( 0) (0,40) ( 1)] def %BDY %new /txt150 [( 0) (0,25) (0,50) (0,75) ( 1)] def %WDS /txt151 [( 0) (0,25) (0,50) (0,75) ( 1)] def %GDM /txt152 [( 0) (0,25) (0,50) (0,75) ( 1)] def %BDY /txt250 [( 0) (0,25) (0,50) (0,75) ( 1)] def %WDS /txt251 [( 0) (0,25) (0,50) (0,75) ( 1)] def %GDM /txt252 [( 0) (0,25) (0,50) (0,75) ( 1)] def %BDY /txx00n [(16,7) (R=10) ()] def %NZ /txx01n [( 5,0) (R=10) ()] def %ZW /txx10n [(14,3) (R=10) ()] def %GZ /txx11n [(11,3) (R=10) ()] def %ZM /txx20n [( 4,2) (R=10) ()] def %BZ /txx21n [(10,8) (R=10) ()] def %ZY /txx00x [(16,7) (5,0) (10,0)] def %NZW + Ref /txx01x [(14,3) (11,3) (10,0)] def %GZM + Ref /txx02x [(4,2) (10,8) (10,0)] def %BZY + Ref /txx00y [(15,2=0,7) (6,5=0,3)] def %NZW 0.7*21.7= 15.2 - 6.5 /txx01y [(15,4=0,6) (10,2=0,4)] def %GZM 0.6*25.6=15.4 - 10.2 /txx02y [(6,0=0,4) (9,0=0,6)] def %BZY 0.4*15.0= 6.0 - 9.0 /txx00y1 [(21,7) (21,7) (10,0)] def %NZW 0.7*21.7= 15.2 - 6.5 /txx01y1 [(25,6) (25,6) (10,0)] def %GZM 0.6*25.6=15.4 - 10.2 /txx02y1 [(15,0) (15,0) (10,0)] def %BZY 0.4*15.0= 6.0 - 9.0 /txx00 [(0) (a) (1)] def /txx30Vn [(0,70) (0,30)] def %NZW %visual /txx31Vn [(0,60) (0,40)] def %GZV /txx32Vn [(0,40) (0,60)] def %BZY /txr00 [(0,77=16,7/21,7=) (0,56=14,3/25,6=) (0,28=4,2/15,0=)] def /txr01 [(0,23=5,0/21,7=) (0,44=11,3/25,6=) (0,72=10,8/15,0=)] def /ix0 0100 def /iy0 0500 def /s 700 def ix0 iy0 8100 s 9 mul 0.0 0.0 0.0 0.47 colrecfi %grey surround /s 500 def /iy0 5900 def /ix0 0300 def /ix1 0050 def /ixl 0300 def /n 0 def 0 1 2 {/j exch def TBK /n12 xchart4 12 mul j 4 mul add def 1 1 1 setrgbcolor ix0 j 0.3 add 1.0 add s mul add % j 1 eq {s add} if % j 2 eq {s 1.5 mul add} if iy0 680 add moveto j 1 eq {TBIK} if txx00 j get show j 1 eq {(i) is2 TBK} if tfn ix0 j 1.0 add s mul add % j 1 eq {s add} if % j 2 eq {s 1.5 mul add} if iy0 s s col3 n12 0 add get col3 n12 1 add get col3 n12 2 add get col3 n12 3 add get colrecfi col3 n12 0 add get 0.00 eq col3 n12 1 add get 0.00 eq and col3 n12 2 add get 0.00 eq and col3 n12 3 add get 0.50 eq and {%eq Z ix0 j 1.0 add s mul add % j 1 eq {s add} if % j 2 eq {s 1.5 mul add} if iy0 s s 0 0 0 0 colrecst } if %eq Z tfn ix0 j 1.0 add s mul add % j 1 eq {s add} if % j 2 eq {s 1.5 mul add} if iy0 300 sub moveto xchart4 0 eq {txt30 j get show} if xchart4 1 eq {txt31 j get show} if xchart4 2 eq {txt32 j get show} if j 1 le {%j<=1 ix0 j 0.9 add 0.5 add s mul add 100 add % j 1 eq {s add} if % j 2 eq {s 1.5 mul add} if iy0 600 sub moveto xchart4 0 eq {txx30Vn j get show} if xchart4 1 eq {txx31Vn j get show} if xchart4 2 eq {txx32Vn j get show} if } if %j<=1 j 0 eq {tfn ix0 j 0.4 add s mul sub 020 add iy0 600 sub moveto SK (D) show TBIK (V) show (3,i) is2 tfn } if } for %j TBK tfw ix0 1.1 0.5 add s mul add iy0 0900 sub moveto txr00 xchart4 get show SK (D) show TBK (P*) show (0) is20 TBK ( / ) show SK (D) show TBK (S*) show j 1 le {%j<=1 ix0 j 0.9 add 0.5 sub s mul add 100 add j 1 eq {s add} if xchart4 0 eq {txx30Vn j get show} if xchart4 1 eq {txx31Vn j get show} if xchart4 2 eq {txx32Vn j get show} if } if %j<=1 ix0 1.1 0.5 sub s mul add s 2 mul add iy0 1200 sub moveto txr01 xchart4 get show SK (D) show TBK (P*) show (1) is20 TBK ( / ) show SK (D) show TBK (S*) show ix0 1.1 s mul add iy0 1500 sub moveto (\050pair comparison, ) showea (\050Paarvergleich, ) showde SK (D) show TBIK (S*) show TBK ( = ) show SK (D) show TBK (P*) show (0) is20 TBK (+) show SK (D) show TBK (P*) show (1) is20 TBK ( \051) show TBK tfn /s 500 def /ydef0 700 def /ydef 900 def /iy0 5900 def /ix0 ix2 def /ixl 0300 def 0 1 1 {/n exch def 0 1 1 {/j exch def TBK /n16 xchart4 16 mul n 8 mul add j 4 mul add def /iyn ydef0 3.6 mul n mul def j 0 eq {1 1 1 setrgbcolor ix0 0.5 s mul add iy0 650 add iyn sub moveto SK (D) show TBIK (P*) show n 0 eq {(0)}{(1)} ifelse is20 TBK (=) show xchart4 0 eq {txx00x n get show} if xchart4 1 eq {txx01x n get show} if xchart4 2 eq {txx02x n get show} if tfn ix0 0.3 s mul sub iy0 650 add s 1.8 mul sub iyn sub moveto SK (D) show TBIK (V*) show n 0 eq {(0)}{(1)} ifelse is20 TBK (=) show xchart4 0 eq {txx00y n get show ib4 TBK txx00y1 n get show} if xchart4 1 eq {txx01y n get show ib4 TBK txx01y1 n get show} if xchart4 2 eq {txx02y n get show ib4 TBK txx02y1 n get show} if ix0 0.3 s mul sub iy0 650 add s 2.4 mul sub iyn sub moveto TBK (=) show SK (D) show TBK (V) show n 0 eq {(3,0)}{(3,1)} ifelse is2 ip2 SK (D) show TBK (S*) show tfn } if %j=0 ix0 j 0.5 add s mul add % j 1 eq {s add} if iy0 n ydef0 mul 3.6 mul sub s s col6 n16 0 add get col6 n16 1 add get col6 n16 2 add get col6 n16 3 add get colrecfi col6 n16 0 add get 0.00 eq col6 n16 1 add get 0.00 eq and col6 n16 2 add get 0.00 eq and col6 n16 3 add get 0.50 eq and {%eq Z ix0 j 0.5 add s mul add % j 1 eq {s add} if iy0 n ydef0 mul 3.6 mul sub s s 0 0 0 0 colrecst } if %eq Z tfn } for %j TBIK n 0 eq {tfw ix0 000 sub iy0 200 add iyn sub moveto xchart4 0 eq {(N) show} if xchart4 1 eq {(G) show} if xchart4 2 eq {(B) show} if ix0 1.3 s mul add 650 add iy0 200 add iyn sub moveto (Z) show } if n 1 eq {tfw ix0 000 sub iy0 200 add iyn sub moveto (Z) show ix0 1.3 s mul add 650 add iy0 200 add iyn sub moveto xchart4 0 eq {(W) show} if xchart4 1 eq {(M) show} if xchart4 2 eq {(Y) show} if } if TBK } for %n %referenz colours T-Z TBK /j 0 def /n 1 def /iyn ydef0 3.6 mul 2.0 mul def 1 1 1 setrgbcolor ix0 0.5 s mul add iy0 650 add iyn sub moveto SK (D) show TBIK (V*) show (R) is20 TBK (=10,0) show ix0 0.2 s mul add iy0 650 add iyn sub 1.8 s mul sub moveto (reference pair) showea (Referenzpaar) showde tfn /j 0 def /n 2 def ix0 j 0.5 add s mul add iy0 n ydef0 mul 3.6 mul sub s s 0 0 0 0 colrecst /j 1 def ix0 j 0.5 add s mul add iy0 n ydef0 mul 3.6 mul sub s s 1 0 0.50 0 colrecfi tfw TBIK ix0 000 sub iy0 200 add iyn sub moveto (Z) show ix0 1.3 s mul add 650 add iy0 200 add iyn sub moveto (T) show TBK /gstep0 9 array def /gstep0 [( 0) ( 1) ( 4) ( 0) ( 2) ( 4) ( 0) ( 3) ( 4)] def /gstep1 9 array def /gstep1 [( 0) ( 1) ( 4) ( 0) ( 2) ( 4) ( 0) ( 3) ( 4) ] def 0 1 71 {/i exch def %i=0,71 xchart4 0 eq {colall4 i colNZW4 i get put} if xchart4 1 eq {colall4 i colGZR4 i get put} if xchart4 2 eq {colall4 i colBZY4 i get put} if } for %i=0,71 /SV*06 [16.7 05.0 14.3 11.3 04.2 10.8] def /DVall 36 array def /DVall [0.00 0.25 0.50 0.75 1.00 1.00 0.00 0.20 0.40 0.60 1.00 1.00 0.00 0.25 0.50 0.75 1.00 1.00 0.00 0.25 0.50 0.75 1.00 1.00 0.00 0.25 0.50 0.75 1.00 1.00 0.00 0.25 0.50 0.75 1.00 1.00 ] def /SV*t06 [(16,7) (5,0) (14,3) (11,3) (4,2) (10,8)] def /DVt05 [(0,00) (0,25) (0,50) (0,75) (1,00)] def /SV*t04 [(16,7) (16,7) (16,7) (5,0) (5,0) (5,0)] def /SV*t14 [(14,3) (14,3) (14,3) (11,3) (11,3) (11,3)] def /SV*t24 [( 4,2) ( 4,2) ( 4,2) (10,8) (10,8) (10,8)] def /DVt04 [(0,25) (0,50) (0,75) (0,25) (0,50) (0,75)] def /DVt14 [(0,25) (0,50) (0,75) (0,25) (0,50) (0,75)] def /DVt24 [(0,25) (0,50) (0,75) (0,25) (0,50) (0,75)] def /s 500 def /iy0 5900 def /ix0 ix2 0600 add s 2 mul add def /ixl 0300 def 0 1 1 {/k exch def 0 1 3 {/n exch def 0 1 2 {/j exch def /j4 j 4 mul n 12 mul add k 36 mul add def n 0 eq k 0 eq and {%n=0, k=0 1 1 1 setrgbcolor TBIK ix0 j 2.0 add s mul add 0.2 s mul sub iy0 650 add moveto j 0 eq {xchart4 0 eq {( N) show} if xchart4 1 eq {( G) show} if xchart4 2 eq {( B) show} if } if j 1 eq {xchart4 0 eq {( grey) show} if xchart4 1 eq n 2 le and {(greenish) show} if xchart4 2 eq n 2 le and {(blueish) show} if } if j 2 eq {( Z) show} if } if %n=0, k=0 n 3 eq k 1 eq and {%n=3 1 1 1 setrgbcolor TBIK ix0 j 2.0 add s mul add 0.2 s mul sub iy0 650 add ydef 3.6 mul sub moveto j 0 eq {( Z) show} if j 1 eq {xchart4 0 eq {(grey) show} if xchart4 1 eq n 3 ge and {(redish) show} if xchart4 2 eq n 3 ge and {(yellowish) show} if } if j 2 eq {xchart4 0 eq {( W) show} if xchart4 1 eq {( R) show} if xchart4 2 eq {( Y) show} if } if } if %n=3, k=1 TBK tfw n 2 le {%n<=2 /nn n k 1 eq {3.6 add} if def /n3 n 3 mul j add def ix0 j 1.4 add s 0.6 mul mul add 0.6 s mul sub iy0 nn ydef mul sub 0.3 s mul add moveto k 0 eq {gstep0 n3 get show} if k 1 eq {gstep1 n3 get show} if j 1 le {(:) show} if % n 2 le {%n<=2 /nn n k 1 eq {3.6 add} if def ix0 j 2.0 add s mul add iy0 nn ydef mul sub s s colall4 j4 0 add get colall4 j4 1 add get colall4 j4 2 add get colall4 j4 3 add get colrecfi colall4 j4 0 add get 0.00 eq colall4 j4 1 add get 0.00 eq and colall4 j4 2 add get 0.00 eq and colall4 j4 3 add get 0.50 eq and {%eq Z ix0 j 2.0 add s mul add iy0 nn ydef mul sub s s 0 0 0 0 colrecst } if %eq Z % } if %n<=2 tfn TBK ix0 j 2.4 add s mul add j 1 eq {0.3 s mul sub} if iy0 nn ydef mul sub 0.5 s mul sub moveto j 0 eq {%j=0 (0) show } if %j=0 j 1 eq {%j=1 % DVall n 1 add k 5 mul add get cvsshow2 xchart4 0 eq {DVt04 n k 3 mul add get show} if xchart4 1 eq {DVt14 n k 3 mul add get show} if xchart4 2 eq {DVt24 n k 3 mul add get show} if } if %j=1 j 2 eq {%j=2 (1) show } if %j=2 } if %n<=2 tfn } for %j } for %n } for %k /ix0 ix4 def /iy0 5900 def /iy01 iy0 200 add def TK 1 1 4 {/n exch def %n=0,4 /DVSVD0 0.1 def /DVSVD1 0.1 def 0 1 1 {/k exch def %k=0,1 k 0 eq {%k=0 xchart4 0 eq {/DVSV0 DVall n get SV*06 0 k add get mul def} if xchart4 1 eq {/DVSV0 DVall n get SV*06 2 k add get mul def} if xchart4 2 eq {/DVSV0 DVall n get SV*06 4 k add get mul def} if } if %k=0 k 1 eq {%k=1 xchart4 0 eq {/DVSV1 DVall n get SV*06 0 k add get mul def} if xchart4 1 eq {/DVSV1 DVall n get SV*06 2 k add get mul def} if xchart4 2 eq {/DVSV1 DVall n get SV*06 4 k add get mul def} if } if %k=1 n 1 ge {%n>=1 k 0 eq {%k=0 xchart4 0 eq {/DVSV0M DVall n 1 sub get SV*06 0 k add get mul def} if xchart4 1 eq {/DVSV0M DVall n 1 sub get SV*06 2 k add get mul def} if xchart4 2 eq {/DVSV0M DVall n 1 sub get SV*06 4 k add get mul def} if /DVSVD0 DVSV0 DVSV0M sub def } if %k=0 k 1 eq {%k=1 xchart4 0 eq {/DVSV1M DVall n 1 sub get SV*06 0 k add get mul def} if xchart4 1 eq {/DVSV1M DVall n 1 sub get SV*06 2 k add get mul def} if xchart4 2 eq {/DVSV1M DVall n 1 sub get SV*06 4 k add get mul def} if /DVSVD1 DVSV1 DVSV1M sub def } if %k=1 } if %n>=1 xchart4 0 eq {/SV*t0 SV*t06 0 k add get def} if xchart4 1 eq {/SV*t0 SV*t06 2 k add get def} if xchart4 2 eq {/SV*t0 SV*t06 4 k add get def} if 0 1 3 {/j exch def %j=0,3 n 1 ge n 3 le and {%1<=n<=3 k 0 eq {/nn n def} if k 1 eq {/nn n 3.6 add def} if ix0 ixi 0 get add iy01 nn ydef mul sub ydef add moveto DVt05 n get show ix0 ixi 1 get add iy01 nn ydef mul sub ydef add moveto SV*t0 show } if %1<=n<=3 %/SV*06 [16.7 05.0 14.3 11.3 04.2 10.8] def n 1 ge n 3 le and {%1<=n<3 ix0 ixi 2 get add iy01 nn ydef mul sub ydef add moveto k 0 eq {DVSV0 cvsshow2} if k 1 eq {DVSV1 cvsshow2} if } if %1<=n<5 j 3 eq {%j=3 k 0 eq {/nk n def} if k 1 eq {/nk n 3.6 add def} if /nk ix0 ixi 3 get add iy01 nk ydef mul sub ydef add 350 add moveto k 0 eq {DVSVD0 cvsshow2} if k 1 eq {DVSVD1 cvsshow2} if } if %j=3 } for %j=0,3 } for %k=0,1 } for %n=0,5 15 setlinewidth /xwidth 3600 def /ywidth 3100 def /xwidtz xwidth 400 sub def /ywidtz ywidth 400 sub def /xr0 200 def /yr0 600 def /xr1 xr0 200 add def /yr1 yr0 200 add def /xr2 xr0 800 add def /yr2 yr0 400 add def 0.0 0.0 0.0 0.0 setcmyk_olvcolor %W xr0 yr0 moveto xwidth 0 rlineto 0 ywidth rlineto xwidth neg 0 rlineto closepath fill 0.0 0.0 0.0 0.5 setcmyk_olvcolor %Z xr1 yr1 moveto xwidtz 0 rlineto 0 ywidtz rlineto xwidtz neg 0 rlineto closepath fill 0.0 0.0 0.0 1.0 setcmyk_olvcolor %N xr0 yr0 moveto xwidth 0 rlineto 0 ywidth rlineto xwidth neg 0 rlineto closepath stroke TBG 0.0 0.0 0.0 1.0 setcmyk_olvcolor %N xr0 yr0 ywidth add 100 add moveto ( viewing situations) showen (Beobachtungssituationen) showde 0 1 39 {/i exch def %i=0,39 xchart4 0 eq {colall5 i colNZW5 i get put} if xchart4 1 eq {colall5 i colGZR5 i get put} if xchart4 2 eq {colall5 i colBZY5 i get put} if } for %i=0,39 0 1 2 {/n exch def %n=0,2 /xn xr2 n 1 add s mul add def /yn 2800 def 0.0 0.0 0.0 1.0 setcmyk_olvcolor %N n 0 eq {%n=0 xr1 20 add yn 200 add moveto xchart4 0 eq {TBIK (N-W) show} if xchart4 1 eq {TBIK (G-M) show} if xchart4 2 eq {TBIK (B-Y) show} if } if %n=0 /n03 xchart4 12 mul n 4 mul add def xn yn s s col3 n03 00 add get col3 n03 01 add get col3 n03 02 add get col3 n03 03 add get colrecfi n 1 eq {%n=1 xn yn s s 0.0 0.0 0.0 0.0 %W colrecst } if %n=0,2 0.0 0.0 0.0 1.0 setcmyk_olvcolor %N xn yn 250 sub moveto TBK xchart4 0 eq {txt30 n get show} if xchart4 1 eq {txt31 n get show} if xchart4 2 eq {txt32 n get show} if } for %n=0,2 0 1 4 {/n exch def %n=0,4 /xn xr2 n s mul add def /yn 1950 def 0.0 0.0 0.0 1.0 setcmyk_olvcolor %N n 0 eq {%n=0 xr1 20 add yn 200 add moveto xchart4 0 eq {TBIK (N-Z) show} if xchart4 1 eq {TBIK (G-Z) show} if xchart4 2 eq {TBIK (B-Z) show} if } if %n=0 /n04 n 4 mul def xn yn s s colall5 n04 0 add get colall5 n04 1 add get colall5 n04 2 add get colall5 n04 3 add get colrecfi n 4 eq {%n=4 xn yn s s 0.0 0.0 0.0 0.0 %W colrecst } if %n=4 0.0 0.0 0.0 1.0 setcmyk_olvcolor %N xn yn 250 sub moveto TBK xchart4 0 eq {txt150 n get show} if xchart4 1 eq {txt151 n get show} if xchart4 2 eq {txt152 n get show} if } for %n=0,4 0 1 4 {/n exch def %n=0,4 /xn xr2 n s mul add def /yn 1100 def 0.0 0.0 0.0 1.0 setcmyk_olvcolor %N n 0 eq {%n=0 xr1 20 add yn 200 add moveto xchart4 0 eq {TBIK (Z-W) show} if xchart4 1 eq {TBIK (Z-M) show} if xchart4 2 eq {TBIK (Z-G) show} if } if %n=0 /n59 n 5 add 4 mul def xn yn s s colall5 n59 0 add get colall5 n59 1 add get colall5 n59 2 add get colall5 n59 3 add get colrecfi n 0 eq {%n=0 xn yn s s 0.0 0.0 0.0 0.0 %W colrecst } if %n=0 0.0 0.0 0.0 1.0 setcmyk_olvcolor %N xn yn 250 sub moveto TBK xchart4 0 eq {txt250 n get show} if xchart4 1 eq {txt251 n get show} if xchart4 2 eq {txt252 n get show} if } for %n=0,4 showpage grestore %} for %xchart4=0,2 %%Trailer