%!PS-Adobe-3.0 EPSF-3.0 DGE20-5N D4:[RR.B9F]B9160-5N.eps 12.11.98/210501 %%BoundingBox: 70 80 442 206 % compare K. Richter: Computergrafik und Farbmetrik: % Farbsysteme, PostScript, geraeteunabhaengige CIE-Farben % VDE-Verlag, Berlin, 1996, ISBN 3-8007-1775-1 mit CD-ROM, % Book with 500 figures in the formats PS and PDF on CD-ROM, % For free download with 288 pages, 2,6MB, A5, in German, see % http://color.li.tu-berlin.de/BUA4BF.PDF % or K. Richter: Colour, Colour Vision, and Elementary Colours % and Colour Information Technology, % in six languages: EN, GE ,FR ,ES, IT, NO, see 76 pages % http://standards.iso.org/iso/9241/306/ed-2/ES15.PDF /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def /str {8 string } bind def /A4querL {598 0 translate 90 rotate} def /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 /Courier findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /Courier-ISOL1 exch definefont pop /Courier-Bold findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /CourierB-ISOL1 exch definefont pop /TV {150 /Times-ISOL1 FS} bind def /TS {200 /Times-ISOL1 FS} bind def /TK {250 /Times-ISOL1 FS} bind def /TM {300 /Times-ISOL1 FS} bind def /TG {350 /Times-ISOL1 FS} bind def /TIV {150 /TimesI-ISOL1 FS} bind def /TIS {200 /TimesI-ISOL1 FS} bind def /TIK {250 /TimesI-ISOL1 FS} bind def /TIM {300 /TimesI-ISOL1 FS} bind def /TIG {350 /TimesI-ISOL1 FS} bind def /TBV {150 /TimesB-ISOL1 FS} bind def /TBS {200 /TimesB-ISOL1 FS} bind def /TBK {250 /TimesB-ISOL1 FS} bind def /TBM {300 /TimesB-ISOL1 FS} bind def /TBG {350 /TimesB-ISOL1 FS} bind def /TBIV {150 /TimesBI-ISOL1 FS} bind def /TBIS {200 /TimesBI-ISOL1 FS} bind def /TBIK {250 /TimesBI-ISOL1 FS} bind def /TBIM {300 /TimesBI-ISOL1 FS} bind def /TBIG {350 /TimesBI-ISOL1 FS} bind def /RV {150 /Times-Roman FS} bind def /RS {200 /Times-Roman FS} bind def /RK {250 /Times-Roman FS} bind def /RM {300 /Times-Roman FS} bind def /RG {350 /Times-Roman FS} bind def /RIV {150 /Times-Italic FS} bind def /RIS {200 /Times-Italic FS} bind def /RIK {250 /Times-Italic FS} bind def /RIM {300 /Times-Italic FS} bind def /RIG {350 /Times-Italic FS} bind def /RBV {150 /Times-Bold FS} bind def /RBS {200 /Times-Bold FS} bind def /RBK {250 /Times-Bold FS} bind def /RBM {300 /Times-Bold FS} bind def /RBG {350 /Times-Bold FS} bind def /RBIV {150 /Times-BoldItalic FS} bind def /RBIS {200 /Times-BoldItalic FS} bind def /RBIK {250 /Times-BoldItalic FS} bind def /RBIM {300 /Times-BoldItalic FS} bind def /RBIG {350 /Times-BoldItalic FS} bind def /SV {150 /Symbol FS} bind def /SS {200 /Symbol FS} bind def /SK {250 /Symbol FS} bind def /SM {300 /Symbol FS} bind def /SG {350 /Symbol FS} bind def /08RN {08 /Times-Roman FS} bind def /08RI {08 /Times-Italic FS} bind def /08RB {08 /Times-Bold FS} bind def /08RBI {08 /Times-BoldItalic FS} bind def /08TN {08 /Times-ISOL1 FS} bind def /08TI {08 /TimesI-ISOL1 FS} bind def /08TB {08 /TimesB-ISOL1 FS} bind def /08TBI {08 /TimesBI-ISOL1 FS} bind def /10RN {10 /Times-Roman FS} bind def /10RI {10 /Times-Italic FS} bind def /10RB {10 /Times-Bold FS} bind def /10RBI {10 /Times-BoldItalic FS} bind def /10TN {10 /Times-ISOL1 FS} bind def /10TI {10 /TimesI-ISOL1 FS} bind def /10TB {10 /TimesB-ISOL1 FS} bind def /10TBI {10 /TimesBI-ISOL1 FS} bind def /12RN {12 /Times-Roman FS} bind def /12RI {12 /Times-Italic FS} bind def /12RB {12 /Times-Bold FS} bind def /12RBI {12 /Times-BoldItalic FS} bind def /12TN {12 /Times-ISOL1 FS} bind def /12TI {12 /TimesI-ISOL1 FS} bind def /12TB {12 /TimesB-ISOL1 FS} bind def /12TBI {12 /TimesBI-ISOL1 FS} bind def /rec %x, y width heigth {/heigth exch def /width exch def moveto width 0 rlineto 0 heigth rlineto width neg 0 rlineto closepath } bind def /tyo {1.0 0.0 0.0} bind def %reproduction colours /tyl {0.0 1.0 0.0} bind def /tyv {0.0 0.0 1.0} bind def /tyc {0.0 1.0 1.0} bind def /tym {1.0 0.0 1.0} bind def /tyy {1.0 1.0 0.0} bind def /tyn {0.00} bind def %grey scale /tyd {0.25} bind def /tyz {0.50} bind def /tyh {0.75} bind def /tyw {1.00} bind def /tro {tyo setrgbcolor} bind def /trl {tyl setrgbcolor} bind def /trv {tyv setrgbcolor} bind def /trc {tyc setrgbcolor} bind def /trm {tym setrgbcolor} bind def /try {tyy setrgbcolor} bind def /twn {tyn setgray} bind def /twd {tyd setgray} bind def /twz {tyz setgray} bind def /twh {tyh setgray} bind def /tww {tyw setgray} bind def /twan [0.000 0.067 0.132 0.200 0.267 0.333 0.400 0.467 0.533 0.600 0.667 0.733 0.800 0.867 0.933 1.000 0.000 0.250 0.500 0.750 1.000] def /cvishow {cvi 6 string cvs show} def /cvsshow1 {10 mul cvi 0.1 mul 7 string cvs show} def /cvsshow2 {100 mul cvi 0.01 mul 7 string cvs show} def /cvsshow3 {1000 mul cvi 0.001 mul 7 string cvs show} def /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 /showfr {2 lanind eq {show} {pop} ifelse} bind def /showes {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 /showm {6 lanind eq {show} {pop} ifelse} bind def /lanind1 0 def /lanind2 0 def /lanindd 01 def /lanindm 01 def /lanindf where {pop /lanind1 lanindf def /lanind2 lanindf def /lanindd laninddf def /lanindm lanindmf def} if /lanind lanind1 def %no loops %******************************************************************* %%EndProlog gsave 8 /Times-ISOL1 FS 72 83 moveto (DGE20-5, ) show %!2 (wrpos:B9160-5N.eps) show (Bild ) showde (Picture ) showen (Fig. ) showes (Fig. ) showfr (Fig. ) showit (Figur ) showjp (B2: ) show 8 /Times-ISOL1 FS (Radialgitter (Siemenssterne)) showde (radial gratings (Siemens\255stars)) showen (\311toile de Siemens) showfr (rejillas radial (Siemens estrellas)) showes (reticoli radiali (Siemens stelle)) showit (radielt gitter (Siemens\255stjerner)) showjp 8 /TimesI-ISOL1 FS ( W-C, W-M, W-Y, W-N) show 8 /Times-ISOL1 FS ( und ) showde (, and ) showen ( y ) showes ( et ) showfr ( i ) showit ( og ) showjp 8 /TimesI-ISOL1 FS (W-Z) show 72 90 translate 0.01 MM dup scale 15 setlinewidth /iz 18 def 0.5 setgray twn 0 0 moveto 13000 0 rlineto 0 4000 rlineto -13000 0 rlineto closepath stroke -2250 0 translate %x-Verschiebung /xab 2500 def % 0 1 2 3 4 5 6 7 8 9 /tef [(W-C) (W-M) (W-Y) (W-N) (W-Z) (W-O) (W-L) (W-V) (W-N) (W-Z)] def /cola [{trc} {trm} {try} {twn} {twz} {tro} {trl} {trv} {twn} {twz}] def /colb [{tro} {trl} {trv} {tro} {tro} {trc} {trm} {try} {tro} {tro}] def 0 1 4 {/ncol exch def %=C,M,Y,N,Z,O,L,V,N,Z xab 0 translate %neuer Rastermittelpunkt und Nullpunkt fuer Rosette, Radius 1,0 cm 1250 2100 translate twn newpath 0 0 0500 0 360 arc closepath stroke newpath 0 0 1000 0 360 arc closepath stroke cola ncol get exec 0 10 350 {newpath 0 0 moveto 0 0 1200 4 -1 roll dup 5 add arc closepath fill} for colb ncol get exec newpath 0 0 0300 0 360 arc closepath stroke -1250 -2100 translate %Text Rosette (Siemensstern) twn TBK 200 0100 moveto (Radialgitter ) showde (radial gratings ) showen (grilles radiales ) showfr (rejillas radial ) showes (reticoli radiali ) showit (radielt gitter ) showjp TBIK tef ncol get show twz TBM 1250 500 add 2300 moveto (10) show 1250 1000 add 2300 moveto (20) show } for %ncol=0,1,2,3,4 C,M,Y,N,Z grestore showpage %%Trailer