%!PS-Adobe-3.0 EPSF-3.0 JG691-3, VM151-1, B8830_7, E8241-1, B4_52_1, N=4_52_1 %%BoundingBox: 72 85 226 204 %! for061..76.dat aus (wrpos:flqa8830.for fuer B883(0/1)(1..8)*.eps) %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://130.149.60.45/~farbmetrik/JE47/) /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:2010010112000) /ModDate (D:2010010112000) /DOCINFO pdfmark13 [ /View [ /FitB ] /DOCVIEW pdfmark13 %END PDFDE011 % !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 {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 /nshow1 {TG show} bind def /kshow1 {TIG show} bind def /bshow1 {TBG show} bind def /bkshow1 {TBIG show} bind def /ishow1 {TM 0 -50 rmoveto show 0 50 rmoveto} bind def /eshow1 {TM 0 200 rmoveto show 0 -200 rmoveto} bind def /nshow2 {TM show} bind def /kshow2 {TIM show} bind def /bshow2 {TBM show} bind def /bkshow2 {TBIM show} bind def /ishow2 {TK 0 -50 rmoveto show 0 50 rmoveto} bind def /eshow2 {TK 0 200 rmoveto show 0 -200 rmoveto} bind def /tzo {0.0 1.0 1.0 0.0} bind def %Reproduktionsfarben /tzl {1.0 0.0 1.0 0.0} bind def /tzv {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 /tzr {0.0 1.0 0.5 0.0} bind def %Elementarfarben /tzg {1.0 0.0 0.5 0.0} bind def /tzb {1.0 0.5 0.0 0.0} bind def /tzj {0.0 0.0 1.0 0.0} bind def /tzrz {0.0 1.0 0.5 0.5} bind def %Elementarfarben vergraut /tzgz {1.0 0.0 0.5 0.5} bind def /tzbz {1.0 0.5 0.0 0.5} bind def /tzjz {0.0 0.0 1.0 0.5} bind def /tfo {tzo setcmykcolor} bind def /tfl {tzl setcmykcolor} bind def /tfv {tzv setcmykcolor} bind def /tfc {tzc setcmykcolor} bind def /tfm {tzm setcmykcolor} bind def /tfy {tzy setcmykcolor} bind def /tfn {tzn setcmykcolor} bind def /tfd {tzd setcmykcolor} bind def /tfz {tzz setcmykcolor} bind def /tfh {tzh setcmykcolor} bind def /tfw {tzw setcmykcolor} bind def /tfr {tzr setcmykcolor} bind def /tfg {tzg setcmykcolor} bind def /tfb {tzb setcmykcolor} bind def /tfj {tzj setcmykcolor} bind def /tfrz {tzrz setcmykcolor} bind def /tfgz {tzgz setcmykcolor} bind def /tfbz {tzbz setcmykcolor} bind def /tfjz {tzjz setcmykcolor} bind def %ANFA OUTLIN00 951204 /pixf 1.0 def /ueg 1 pixf mul def /uek 1 pixf mul def /ues 1 pixf mul def /pxd uek def /pyd uek def /pxwd ueg def /pywd ueg def /pss ues def /outxshowf {show} bind def /outxshow {show} bind def /outSK {250 /Symbol FS outxshow} bind def /outSM {300 /Symbol FS outxshow} bind def /outSG {350 /Symbol FS outxshow} bind def /outshowf {setcmykcolor show} bind def /outrecfi { %x y width heigth c m y k setcmykcolor rec fill} bind def /outrecfi4 { %x y width heigth c m y k outrecfi} bind def /outrecfi3 { %x y width heigth c m y k outrecfi} bind def /outrecfi2 { %x y width heigth c m y k outrecfi} bind def /outlinetos { %px py c m y k setcmykcolor lineto stroke} bind def /outstroke { %px1 py1 curveto ... curveto c m y k setcmykcolor stroke} bind def %%EndProlog gsave %LANINDL2 START 20000505 /lanind 0 def /lantex [(G) (E) (S) (F) (I) (J) (M)] def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind eq {show} {pop} ifelse} bind def /showes {2 lanind eq {show} {pop} ifelse} bind def /showfr {3 lanind eq {show} {pop} ifelse} bind def /showit {4 lanind eq {show} {pop} ifelse} bind def /showjp {5 lanind eq {show} {pop} ifelse} bind def /showm {6 lanind eq {show} {pop} ifelse} bind def /popde {0 lanind ne {pop} if} bind def /popen {1 lanind ne {pop} if} bind def /popes {2 lanind ne {pop} if} bind def /popfr {3 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 2 lanind ne {n {pop} repeat} if} bind def /popxfr {/n exch def 3 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 lanind1 1 lanind2 {/lanind exch def %output showpage gsave %LANINDL2 END 4 /Times-ISOL1 FS 72 86 moveto ( JG691-3) show %, VM151-1, B8830_7, E8241-1, B4_52_1, N=4_52_1) show 72 90 translate 0.01 MM dup scale %Farbauszug 1=C, 2=M, 3=Y, 7=N, 8=F 30 setlinewidth 0.0 0.0 0.0 0.5 setcmykcolor 0 0 moveto 5400 0 rlineto 0 4000 rlineto -5400 0 rlineto closepath fill 050 3700 moveto /TRGu {350 /Times-Roman FS (\271) show} def /TRGo {350 /Times-Roman FS (\272) show} def (F) TBIM tfw show (\050) TBM tfw show (x) TBIM tfw show 0 -50 rmoveto TBM (r) show 10 50 rmoveto (\051 ) TBM tfw show TRGu TBM tfw (Impulsrate = Impulse / s) showde %08241-1 1 (impulse rate = impulses / s) showen %18241-1 1 (Rata de impulso = Impulsos / s) showes %28241-1 1 (impulse rate = impulses / s) showfr %38241-1 1 (impulse rate = impulses / s) showit %48241-1 1 (impulse rate = impulses / s) showjp %58241-1 1 TRGo TBM tfw 1000 3400 moveto TBM tfw (c=0,4343) showde (c=0,4343) showen 2700 3400 moveto TBM tfw (Zunahme\255Proze\337 ) showde %08241-1 2 (Increment process ) showen %18241-1 2 (Aprox. al umbral ) showes %28241-1 2 (threshold process ) showfr %38241-1 2 (threshold process ) showit %48241-1 2 (threshold process ) showjp %58241-1 2 (I) TBIM tfw show 0700 2800 moveto TBM tfn (Abnahme\255Proze\337 ) showde %08241-1 3 (Decrement process ) showen %18241-1 3 (Aprox. al umbral ) showes %28241-1 3 (threshold process ) showfr %38241-1 3 (threshold process ) showit %48241-1 3 (threshold process ) showjp %58241-1 3 (D) TBIM tfn show tfw 550 400 translate 50 setlinewidth 0 0 moveto 340 12 mul 0 rlineto stroke 0 0 moveto 0 3000 rlineto stroke TBM /tx [(-2) (-1) ( 0) ( 1) ( 2) ( 3) ( 4) ( 5)] def /ty [(-3) (-2) (-1) ( 0) ( 1) ( 2) ( 3)] def %!x-Achse: 1 log-Einheiten = 500 Skalen-Einheiten 0 1 7 {/i exch def /ixt { -250 i 0500 mul add} def /ixl { 000 i 0500 mul add} def ixt -350 moveto tx i get exec show ixl 75 moveto 0 -150 rlineto stroke } for %!y-Achse: 1 log-Einheiten = 500 Skalen-Einheiten 0 1 6 {/i exch def /iyt {-100 i 0500 mul add} def /iyl { 000 i 0500 mul add} def -450 iyt moveto ty i get exec show -75 iyl moveto 150 0 rlineto stroke } for 3800 -300 moveto (x) TBIM tfw show 20 0 rmoveto (=) TBM tfw show 20 0 rmoveto (log) TBM tfw show 30 0 rmoveto TBIM (L) show 100 2100 moveto (Q) TBIM tfn show 30 0 rmoveto ([1,0c\050) TBM tfn show (x-b) TBIM tfn show (\051]) TBM tfn show 2800 2700 moveto (-2) TBM tfw show 30 0 rmoveto (Q) TBIM tfw show 30 0 rmoveto ([1,0c\050) TBM tfw show (x-b) TBIM tfw show (\051]) TBM tfw show 1850 200 moveto (L) TBIM tfw show TBK 20 -80 rmoveto (b) show 50 80 rmoveto 2850 0200 moveto (L) TBIM tfw show TBK 20 -80 rmoveto (b) show 50 80 rmoveto (= 100 cd) TBM tfw show 20 0 rmoveto (/) TBM tfw show 10 0 rmoveto (m) TBM tfw show TBK 20 100 rmoveto (2) show 0 -100 rmoveto 4250 900 moveto (D) TBIM tfn show 4250 1900 moveto (D) TBIM tfn show (+I) tfw show tfn 3400 1600 moveto (Stufung) popde %08241-1 4 (scaling) popen %18241-1 4 (Subiendo) popes %28241-1 4 (scaling) popfr %38241-1 4 (scaling) popit %48241-1 4 (scaling) popjp %58241-1 4 TBM tzo outshowf 4250 2300 moveto (I) TBIM tfw show /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 /DLL 9 array def /DLU 9 array def /DLL [0.01 0.1 1.0 10. 100. 1000. 10000. 100000. 1000000.] def /YFAK 4 array def /YFAK [ 1.0 1.8 3.2 5.6] def /DL 36 array def /DU 36 array def /XF 36 array def /R00KXU 36 array def /RLMKXU 36 array def /F0 36 array def /F1 36 array def /FS 36 array def /IORX 1000 def /IORY 1500 def /MULX 500 def /MULY 500 def 50 setlinewidth tfn 0 1500 moveto 4000 0 rlineto stroke 0 1 8 {/k exch def %k=0,8 DLU k DLL k get put 0 1 3 {/j exch def %j=0,3 /i k 4 mul j add def DL i DLL k get YFAK j get mul put DU i DL i get put } for %j=0,3 } for %k=0,8 /W2 2. sqrt def /XP 0 def 0 1 1 {/j exch def %j=0,1 j 0 eq {/XK 1.0 def /XL 1.0 def /XM 1.0 def /XU 2.0 def /XQ 1.0 def} if j 1 eq {/XK 1.0 def /XL 1.0 def /XM 1.0 def /XU 2.0 def /XQ -2.0 def} if %XC1=XK1/ln(10)=1.4/2.302585 = 0.434294 = 0.608011 %XC2=XK2/ln(10)=1.0/2.302585 = 0.434294 %e = 10**0.434294 = 2.71828182846 = e**1 /XC XK 10 ln div def 0 1 35 {/i exch def %i=0,35 XF i DL i get log put %F01= 10**[c(x-u+p)] /F01 10 XF i get XU sub XP add XC mul exp def %R00KXU=1+1/{1+W2*10**[c(x-u+p)]} R00KXU i 1. 1. W2 F01 mul add div 1. add put %RLMKUX=XQ*{XL/[log(w2)]*log[Q00KXU]-XM} RLMKXU i XL W2 log div R00KXU i get log mul XM sub XQ mul put j 0 eq {F0 i RLMKXU i get put} if j 1 eq {F1 i RLMKXU i get put} if j 1 eq {FS i F0 i get F1 i get add put} if } for %i=0,35 } for %j=0,1 50 setlinewidth 0 1 1 {/j exch def %j=0,1 j 0 eq {0 0 0 0 setcmykcolor [ ] 0 setdash} if %D j 1 eq {0 0 0 1 setcmykcolor [300 100] 0 setdash} if %D 0 3 32 {/i exch def %i=0,32 /x20 {IORX XF i get MULX mul add} bind def /y20 {IORY F0 i get MULY mul add} bind def /x21 {IORX XF i 1 add get MULX mul add} bind def /y21 {IORY F0 i 1 add get MULY mul add} bind def /x22 {IORX XF i 2 add get MULX mul add} bind def /y22 {IORY F0 i 2 add get MULY mul add} bind def i 0 eq {newpath x20 y20 moveto} if x20 y20 x21 y21 x22 y22 curveto } for %i=0,32 stroke } for %j=0,1 0 1 1 {/j exch def %j=0,1 j 0 eq {0 0 0 1 setcmykcolor [ ] 0 setdash} if %I j 1 eq {0 0 0 0 setcmykcolor [300 100] 0 setdash} if %I 0 3 32 {/i exch def %i=0,32 /x20 {IORX XF i get MULX mul add} bind def /y20 {IORY F1 i get MULY mul add} bind def /x21 {IORX XF i 1 add get MULX mul add} bind def /y21 {IORY F1 i 1 add get MULY mul add} bind def /x22 {IORX XF i 2 add get MULX mul add} bind def /y22 {IORY F1 i 2 add get MULY mul add} bind def i 0 eq {newpath x20 y20 moveto} if x20 y20 x21 y21 x22 y22 curveto } for %i=0,32 stroke } for %j=0,1 0 1 1 {/j exch def %j=0,1 j 0 eq {0 0 0 0 setcmykcolor [ ] 0 setdash} if %DI j 1 eq {0 0 0 1 setcmykcolor [200 200] 0 setdash} if %DI 0 3 32 {/i exch def %i=0,32 /x20 {IORX XF i get MULX mul add} bind def /y20 {IORY FS i get MULY mul add} bind def /x21 {IORX XF i 1 add get MULX mul add} bind def /y21 {IORY FS i 1 add get MULY mul add} bind def /x22 {IORX XF i 2 add get MULX mul add} bind def /y22 {IORY FS i 2 add get MULY mul add} bind def i 0 eq {newpath x20 y20 moveto} if x20 y20 x21 y21 x22 y22 curveto } for %i=0,32 stroke } for %j=0,1 showpage grestore } for %output with langind end %%Trailer