%!PS-Adobe-3.0 EPSF-3.0 UE380-3 %%BoundingBox: 70 83 392 335 %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://130.149.60.45/~farbmetrik/UE10/) /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:2014010112000) /ModDate (D:2014010112000) /DOCINFO pdfmark03 [ /View [ /FitB ] /DOCVIEW pdfmark03 %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 {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 {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 {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 {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 {200 /Symbol FS} bind def /SK {250 /Symbol FS} bind def /SM {290 /Symbol FS} bind def /SG {350 /Symbol FS} bind def /ns {350 /Times-ISOL1 FS show} bind def /ks {350 /TimesI-ISOL1 FS show} bind def /bs {350 /TimesB-ISOL1 FS show} bind def /js {350 /TimesBI-ISOL1 FS show} bind def /ss {350 /Symbol FS show} bind def /is {300 /Times-ISOL1 FS 0 -90 rmoveto show 0 90 rmoveto} bind def /es {300 /Times-ISOL1 FS 0 200 rmoveto show 0 -200 rmoveto} bind def /ib {300 /TimesB-ISOL1 FS 0 -90 rmoveto show 0 90 rmoveto} bind def /eb {300 /TimesB-ISOL1 FS 0 200 rmoveto show 0 -200 rmoveto} bind def /ip {300 /Times-ISOL1 FS 50 50 rmoveto (\267) show 50 -50 rmoveto} bind def %20% kleiner /ns2 {300 /Times-ISOL1 FS show TM} bind def /ks2 {300 /TimesI-ISOL1 FS show TM} bind def /bs2 {300 /TimesB-ISOL1 FS show TM} bind def /js2 {300 /TimesBI-ISOL1 FS show TM} bind def /ss2 {300 /Symbol FS show TM} bind def /is2 {250 /Times-ISOL1 FS 0 -70 rmoveto show 0 70 rmoveto TM} bind def /es2 {250 /Times-ISOL1 FS 0 160 rmoveto show 0 -160 rmoveto TM} bind def /ib2 {250 /TimesB-ISOL1 FS 0 -70 rmoveto show 0 70 rmoveto TM} bind def /eb2 {250 /TimesB-ISOL1 FS 0 160 rmoveto show 0 -160 rmoveto TM} bind def /ip2 {250 /Times-ISOL1 FS 40 40 rmoveto (\267) show 40 -40 rmoveto TM} bind def %40% kleiner /ns4 {250 /Times-ISOL1 FS show TK} bind def /ks4 {250 /TimesI-ISOL1 FS show TK} bind def /bs4 {250 /TimesB-ISOL1 FS show TK} bind def /js4 {250 /TimesBI-ISOL1 FS show TK} bind def /ss4 {250 /Symbol FS show TK} bind def /is4 {200 /Times-ISOL1 FS 0 -60 rmoveto show 0 60 rmoveto TK} bind def /es4 {200 /Times-ISOL1 FS 0 130 rmoveto show 0 -130 rmoveto TK} bind def /ib4 {200 /TimesB-ISOL1 FS 0 -60 rmoveto show 0 60 rmoveto TK} bind def /eb4 {200 /TimesB-ISOL1 FS 0 130 rmoveto show 0 -130 rmoveto TK} bind def /ip4 {200 /Times-ISOL1 FS 30 30 rmoveto (\267) show 30 -30 rmoveto TK} 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 /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 /cvsshow4 {10000 mul cvi 0.0001 mul 7 string cvs show} def %from N017 FORTRAN-PROGRAM RICHDA04.FOR 2013_12_15 /BDY_OR 44 array def /BDY_OR [%C BDY_00 JS=0 01 0.2498 0.2915 17.33 02 0.2686 0.3064 16.91 03 0.2878 0.3258 17.29 04 0.3012 0.3390 17.44 05 0.3142 0.3498 17.51 06 0.3232 0.3594 16.48 07 0.3611 0.3882 16.23 08 0.4047 0.4282 19.94 09 0.4336 0.4527 17.75 10 0.4624 0.4770 18.08 11 0.4838 0.4965 18.49 ] def /TDM_OR 44 array def /TDM_OR [%C TDM_00 JS=4 45 0.1204 0.3960 15.00 46 0.1819 0.3839 15.04 47 0.2425 0.3728 15.75 48 0.2787 0.3655 16.80 49 0.3042 0.3605 17.28 50 0.3211 0.3578 16.56 51 0.3808 0.3088 15.79 52 0.4325 0.2639 15.98 53 0.4596 0.2390 17.00 54 0.4761 0.2231 17.15 55 0.4848 0.2122 17.22 ] def /QPN_OR 88 array def /QPN_OR [%C QPN_00 JS=6 67 0.3987 0.4175 197.5 68 0.3943 0.4155 120.3 69 0.3919 0.4140 74.34 70 0.3914 0.4136 49.81 71 0.3926 0.4140 34.40 72 0.3945 0.4140 24.67 73 0.3973 0.4153 17.74 74 0.4008 0.4166 12.87 75 0.4052 0.4185 9.19 76 0.4102 0.4204 6.62 77 0.4158 0.4226 4.68 %C OPN_00 JS=7 78 0.3905 0.4137 5.12 79 0.3861 0.4114 3.17 80 0.3835 0.4094 1.94 81 0.3831 0.4090 1.28 82 0.3841 0.4096 0.88 83 0.3859 0.4107 0.63 84 0.3884 0.4123 0.46 85 0.3907 0.4143 0.30 86 0.3967 0.4144 0.24 87 0.4019 0.4167 0.17 88 0.4076 0.4192 0.12 ] def /BDY_BY 44 array def /BDY_BY [% BDY_BY JS=0 JD=0 01 -.0011 -.0010 0.00 02 -.0015 -.0013 0.00 03 -.0014 -.0012 0.00 04 -.0014 -.0012 0.00 05 -.0015 -.0013 0.00 06 -.0015 -.0013 0.00 07 -.0024 -.0020 0.00 08 -.0021 -.0018 0.00 09 -.0027 -.0024 0.00 10 -.0031 -.0027 0.00 11 -.0038 -.0033 0.01 ] def /TDM_BY 44 array def /TDM_BY [%C TDM_BY JS=4 JD=0 45 -.0012 -.0023 0.00 46 -.0015 -.0020 0.00 47 -.0014 -.0016 0.00 48 -.0015 -.0015 0.00 49 -.0016 -.0015 0.00 50 -.0016 -.0014 0.00 51 -.0020 -.0013 0.00 52 -.0023 -.0011 0.01 53 -.0023 -.0010 0.01 54 -.0025 -.0010 0.01 55 -.0027 -.0010 0.01 ] def /QPN_BY 88 array def /QPN_BY [%C QPN_BY JS=6 JD=0 67 -.0017 -.0015 0.04 68 -.0016 -.0013 0.02 69 -.0016 -.0014 0.02 70 -.0016 -.0014 0.01 71 -.0018 -.0016 0.01 72 -.0018 -.0016 0.01 73 -.0021 -.0018 0.00 74 -.0024 -.0021 0.00 75 -.0029 -.0025 0.00 76 -.0036 -.0030 0.00 77 -.0043 -.0036 0.00 %C OPN_BY JS=7 JD=0 78 -.0030 -.0026 0.00 79 -.0039 -.0034 0.00 80 -.0052 -.0045 0.00 81 -.0063 -.0054 0.00 82 -.0078 -.0067 0.00 83 -.0103 -.0089 0.00 84 -.0122 -.0105 0.00 85 -.0162 -.0140 0.00 86 -.0205 -.0175 0.00 87 -.0265 -.0226 0.00 88 -.0324 -.0275 0.00 ] def /BDY_TM 44 array def /BDY_TM [%C BDY_TM JS=0 JD=4 01 -.0019 0.0008 0.01 02 -.0017 0.0008 0.01 03 -.0017 0.0009 0.01 04 -.0017 0.0009 0.01 05 -.0017 0.0010 0.01 06 -.0016 0.0010 0.00 07 -.0019 0.0013 0.01 08 -.0020 0.0017 0.01 09 -.0020 0.0020 0.01 10 -.0022 0.0025 0.01 11 -.0021 0.0026 0.01 ] def /TDM_TM 44 array def /TDM_TM [%C TDM_TM JS=4 JD=4 45 -.0061 0.0030 0.01 46 -.0050 0.0026 0.01 47 -.0037 0.0021 0.01 48 -.0027 0.0015 0.01 49 -.0021 0.0013 0.01 50 -.0018 0.0011 0.01 51 -.0022 0.0013 0.01 52 -.0020 0.0011 0.01 53 -.0022 0.0011 0.01 54 -.0020 0.0010 0.01 55 -.0021 0.0010 0.02 ] def /QPN_TM 88 array def /QPN_TM [%C QPN_TM JS=6 JD=4 67 -.0012 0.0010 0.05 68 -.0011 0.0010 0.03 69 -.0013 0.0011 0.02 70 -.0013 0.0011 0.01 71 -.0014 0.0012 0.01 72 -.0014 0.0012 0.01 73 -.0017 0.0014 0.01 74 -.0016 0.0013 0.00 75 -.0018 0.0016 0.00 76 -.0024 0.0021 0.00 77 -.0024 0.0021 0.00 %C OPN_TM JS=7 JD=4 78 -.0022 0.0018 0.00 79 -.0028 0.0023 0.00 80 -.0038 0.0030 0.00 81 -.0047 0.0038 0.00 82 -.0057 0.0046 0.00 83 -.0075 0.0060 0.00 84 -.0092 0.0074 0.00 85 -.0136 0.0109 0.00 86 -.0171 0.0137 0.00 87 -.0203 0.0164 0.00 88 -.0288 0.0230 0.00 ] def /BDY_WN 44 array def /BDY_WN [%C BDY_WN JS=0 JD=5 01 0.0002 0.0002 0.07 02 0.0001 0.0001 0.04 03 0.0001 0.0001 0.06 04 0.0001 0.0001 0.06 05 0.0000 0.0000 0.06 06 0.0000 0.0000 0.06 07 -.0001 -.0001 0.04 08 -.0003 -.0002 0.05 09 -.0005 -.0004 0.06 10 -.0006 -.0005 0.06 11 -.0007 -.0006 0.06 ] def /TDM_WN 44 array def /TDM_WN [%C TDM_WN JS=4 JD=5 45 0.0011 -.0002 0.07 46 0.0004 -.0001 0.04 47 0.0004 -.0001 0.07 48 0.0002 0.0000 0.07 49 0.0001 0.0000 0.06 50 0.0000 0.0000 0.07 51 -.0001 0.0001 0.04 52 -.0003 0.0003 0.06 53 -.0004 0.0004 0.08 54 -.0005 0.0004 0.09 55 -.0005 0.0005 0.09 ] def /QPN_QN 88 array def /QPN_QN [%C QPN_QN JS=6 JD=6 67 0.0000 0.0000 1.16 68 0.0000 0.0000 0.69 69 0.0000 0.0000 0.41 70 0.0000 0.0000 0.28 71 0.0000 0.0000 0.18 72 0.0000 0.0000 0.15 73 0.0000 0.0000 0.10 74 0.0000 0.0000 0.10 75 -.0001 0.0000 0.08 76 -.0001 0.0000 0.06 77 -.0002 -.0001 0.05 %C OPN_ON JS=7 JD=7 78 0.0001 0.0001 0.07 79 0.0002 0.0001 0.05 80 0.0003 0.0001 0.04 81 0.0003 0.0002 0.03 82 0.0003 0.0002 0.02 83 0.0004 0.0002 0.02 84 0.0004 0.0002 0.02 85 0.0004 0.0002 0.02 86 0.0001 0.0002 0.02 87 -.0004 -.0001 0.02 88 -.0011 -.0001 0.02 ] 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 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 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 5 /Times-ISOL1 FS 340 85 moveto (UE380-3) 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 /yd 520 def %y-Zeilenabstand for font G /ydg 600 def %yd for equation lines /yd2 300 def %y-Zeilenabstand for font M %Spalten /S1 100 def /S2 200 def /S30 1400 def /S31 2300 def /S32 3300 def /S40 4300 def /S41 5300 def /S42 6500 def /S43 7700 def /S44 8900 def /S5 10100 def /yu0 8100 def /yu1 7600 def /yu2 6500 def /yu3 3000 def /yu4 1300 def 0 yu1 320 add moveto 11200 0 rlineto stroke 0 yu2 320 add moveto 11200 0 rlineto stroke 0 yu3 320 add moveto 11200 0 rlineto stroke 0 yu4 320 add moveto 11200 0 rlineto stroke %0 yu4 320 add moveto S5 130 sub 0 rlineto stroke %0 yu5 320 add moveto S5 130 sub 0 rlineto stroke S30 100 sub yhoe 500 sub moveto 0 yhoe 500 sub neg rlineto stroke S40 100 sub yhoe 500 sub moveto 0 yhoe 500 sub neg rlineto stroke S5 100 sub yhoe 500 sub moveto 0 yhoe 500 sub neg rlineto stroke S31 100 sub yhoe 1250 sub moveto 0 yhoe 1250 sub neg rlineto stroke S32 100 sub yhoe 1250 sub moveto 0 yhoe 1250 sub neg rlineto stroke S41 100 sub yhoe 1000 sub moveto 0 yhoe 1000 sub neg rlineto stroke S42 100 sub yhoe 1250 sub moveto 0 yhoe 1250 sub neg rlineto stroke S43 100 sub yhoe 1000 sub moveto 0 yhoe 1000 sub neg rlineto stroke S44 100 sub yhoe 1250 sub moveto 0 yhoe 1250 sub neg rlineto stroke %SERIES: %BDY_OR, _BY, _TM, _WN 44 array def %TDY_OR, _BY, _TM, _WN 44 array def %QPN_OR, _BY, _TM, _WN 88 array def %Titeltext TBG S1 yu0 yd 0 mul add moveto (Farbreize f\374r gerade unterscheibare Farb-Schwellen, ) showde (Colour stimuli of just noticable colour thresholds, ) showea TBIG (see Richter (1985)) show S1 yu1 yd2 0 mul sub moveto TBM (Farb\255) showde (Colour) showen S1 yu1 yd2 1 mul sub moveto (Serie) showde (series) showen S1 yu1 yd2 2 mul sub moveto (Nummer) showde (number) showen /yd3 300 def TM S1 yu2 yd3 0 mul sub moveto (WPN_01) show S1 yu2 yd3 1 mul sub moveto (WPN_02) show S1 yu2 yd3 2 mul sub moveto (WPN_03) show S1 yu2 yd3 3 mul sub moveto (WPN_04) show S1 yu2 yd3 4 mul sub moveto (WPN_05) show S1 yu2 yd3 5 mul sub moveto (WPN_06) show S1 yu2 yd3 6 mul sub moveto (WPN_07) show S1 yu2 yd3 7 mul sub moveto (WPN_08) show S1 yu2 yd3 8 mul sub moveto (WPN_09) show S1 yu2 yd3 9 mul sub moveto (WPN_10) show S1 yu2 yd3 10 mul sub moveto (WPN_11) show TM S1 yu3 yd3 0 mul sub moveto (TDM_01) show S1 yu3 yd3 1 mul sub moveto (TDM_02) show S1 yu3 yd3 2 mul sub moveto (TDM_03) show S1 yu3 yd3 3 mul sub moveto (TDM_04) show S1 yu3 yd3 4 mul sub moveto (TDM_05) show TM S1 yu4 yd3 0 mul sub moveto (BDY_01) show S1 yu4 yd3 1 mul sub moveto (BDY_02) show S1 yu4 yd3 2 mul sub moveto (BDY_03) show S1 yu4 yd3 3 mul sub moveto (BDY_04) show S1 yu4 yd3 4 mul sub moveto (BDY_05) show TBM S30 yu1 yd2 0 mul sub moveto (Farbreize) showde (Colour stimuli) showea S30 yu1 yd2 1 mul sub moveto (Normfarbwerte) showde (colour values) showea S30 yu1 yd2 2 mul sub moveto (Y) bs2 S31 yu1 yd2 2 mul sub moveto (x) bs2 S32 yu1 yd2 2 mul sub moveto (y) bs2 TBM S40 yu1 yd 0 mul sub moveto (Farbreiz\255Differenzen an der Schwelle) showde (Colour stimuli differences at threshold) showea S40 yu1 yd2 1 mul sub moveto (-WN) bs2 S40 yu1 yd2 2 mul sub moveto (D) ss2 (Y) js2 S41 200 add yu1 yd2 1 mul sub moveto (-RG) bs2 S41 yu1 yd2 2 mul sub moveto (D) ss2 (x) js2 S42 yu1 yd2 2 mul sub moveto (D) ss2 (y) js2 S43 yu1 yd2 1 mul sub moveto (-BY) bs2 S43 yu1 yd2 2 mul sub moveto (D) ss2 (x) js2 S44 yu1 yd2 2 mul sub moveto (D) ss2 (y) js2 TBM S5 yu1 yd2 0 mul sub moveto (Anmer\255) showde (notes) showen (notas) showes (remarque) showfr (note) showit (notes) showjp S5 yu1 yd2 1 mul sub moveto (kungen) showde TM 0 2 21 {/i exch def /i4 i 4 mul def S30 yu2 150 i mul sub moveto QPN_OR i4 3 add get dup dup 100 lt {( ) show } if dup 10 lt {( ) show } if cvsshow1 S31 yu2 150 i mul sub moveto QPN_OR i4 1 add get cvsshow4 S32 yu2 150 i mul sub moveto QPN_OR i4 2 add get cvsshow4 S40 yu2 150 i mul sub moveto QPN_QN i4 3 add get cvsshow4 S41 yu2 150 i mul sub moveto QPN_TM i4 1 add get cvsshow4 S42 yu2 150 i mul sub moveto QPN_TM i4 2 add get cvsshow4 S43 yu2 150 i mul sub moveto QPN_BY i4 1 add get cvsshow4 S44 yu2 150 i mul sub moveto QPN_BY i4 2 add get cvsshow4 } for %i=0,2,21 0 1 4 {/ii exch def %ii=0,4 ii 0 eq {/i 00 def} if ii 1 eq {/i 02 def} if ii 2 eq {/i 05 def} if ii 3 eq {/i 08 def} if ii 4 eq {/i 10 def} if /i4 i 4 mul def S30 yu3 300 ii mul sub moveto TDM_OR i4 3 add get dup dup 100 lt {( ) show } if dup 10 lt {( ) show } if cvsshow1 S31 yu3 300 ii mul sub moveto TDM_OR i4 1 add get cvsshow4 S32 yu3 300 ii mul sub moveto TDM_OR i4 2 add get cvsshow4 S40 yu3 300 ii mul sub moveto TDM_WN i4 3 add get cvsshow4 S41 yu3 300 ii mul sub moveto TDM_TM i4 1 add get cvsshow4 S42 yu3 300 ii mul sub moveto TDM_TM i4 2 add get cvsshow4 S43 yu3 300 ii mul sub moveto TDM_BY i4 1 add get cvsshow4 S44 yu3 300 ii mul sub moveto TDM_BY i4 2 add get cvsshow4 } for %ii=0,4 0 1 4 {/ii exch def %ii=0,4 ii 0 eq {/i 00 def} if ii 1 eq {/i 02 def} if ii 2 eq {/i 05 def} if ii 3 eq {/i 08 def} if ii 4 eq {/i 10 def} if /i4 i 4 mul def S30 yu4 300 ii mul sub moveto BDY_OR i4 3 add get dup dup 100 lt {( ) show } if dup 10 lt {( ) show } if cvsshow1 S31 yu4 300 ii mul sub moveto BDY_OR i4 1 add get cvsshow4 S32 yu4 300 ii mul sub moveto BDY_OR i4 2 add get cvsshow4 S40 yu4 300 ii mul sub moveto BDY_WN i4 3 add get cvsshow4 S41 yu4 300 ii mul sub moveto BDY_TM i4 1 add get cvsshow4 S42 yu4 300 ii mul sub moveto BDY_TM i4 2 add get cvsshow4 S43 yu4 300 ii mul sub moveto BDY_BY i4 1 add get cvsshow4 S44 yu4 300 ii mul sub moveto BDY_BY i4 2 add get cvsshow4 } for %%ii=0,4 %text TM S5 yu2 300 3 mul sub moveto (P40) show S5 yu3 300 2 mul sub moveto (D65) show S5 yu4 300 2 mul sub moveto (D65) show showpage grestore %%Trailer