%!PS-Adobe-3.0 EPSF-3.0 geu90-3N %%BoundingBox: 70 85 246 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: farbe.li.tu-berlin.de/geu9/geu9.HTM) /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1) /Subject (goto: http://farbe.li.tu-berlin.de or http://color.li.tu-berlin.de) /Keywords (image reproduction, colour devices) /Creator (klaus.richter@mac.com) /CreationDate (D:2024080112000) /ModDate (D:2024080112000) /DOCINFO pdfmark03 [ /View [ /Fit ] /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 /FS {findfont exch scalefont setfont} bind def /MM {72 25.4 div mul} def /str {8 string } bind def /languagelevel where {pop languagelevel} {1} ifelse /PSL12 exch def /dictende {counttomark 2 idiv dup dict begin {def} repeat pop currentdict end} bind 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-Oblique findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /CourierI-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 /Courier-BoldOblique findfont dup length dict begin {1 index /FID ne {def} {pop pop} ifelse }forall /Encoding ISOLatin1Encoding def currentdict end /CourierBI-ISOL1 exch definefont pop /TG {350 /Times-ISOL1 FS} bind def /TM {280 /Times-ISOL1 FS} bind def /TK {240 /Times-ISOL1 FS} bind def /TS {200 /Times-ISOL1 FS} bind def /TL {160 /Times-ISOL1 FS} bind def /TV {110 /Times-ISOL1 FS} bind def /TW {080 /Times-ISOL1 FS} bind def /TIG {350 /TimesI-ISOL1 FS} bind def /TIM {280 /TimesI-ISOL1 FS} bind def /TIK {240 /TimesI-ISOL1 FS} bind def /TIS {200 /TimesI-ISOL1 FS} bind def /TIL {160 /TimesI-ISOL1 FS} bind def /TIV {110 /TimesI-ISOL1 FS} bind def /TIW {080 /TimesI-ISOL1 FS} bind def /TBG {350 /TimesB-ISOL1 FS} bind def /TBM {280 /TimesB-ISOL1 FS} bind def /TBK {240 /TimesB-ISOL1 FS} bind def /TBS {200 /TimesB-ISOL1 FS} bind def /TBL {160 /TimesB-ISOL1 FS} bind def /TBV {110 /TimesB-ISOL1 FS} bind def /TBW {080 /TimesB-ISOL1 FS} bind def /TBIG {350 /TimesBI-ISOL1 FS} bind def /TBIM {280 /TimesBI-ISOL1 FS} bind def /TBIK {240 /TimesBI-ISOL1 FS} bind def /TBIS {200 /TimesBI-ISOL1 FS} bind def /TBIL {160 /TimesBI-ISOL1 FS} bind def /TBIV {110 /TimesBI-ISOL1 FS} bind def /TBIW {080 /TimesBI-ISOL1 FS} bind def /SG {350 /Symbol FS} bind def /SM {280 /Symbol FS} bind def /SK {240 /Symbol FS} bind def /SS {200 /Symbol FS} bind def /SL {160 /Symbol FS} bind def /SV {110 /Symbol FS} bind def /SW {080 /Symbol FS} bind def %***************************************************************** %%EndProlog gsave %lanindL2.EPS 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 /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 0 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 % gsave /cvishow0 {cvi 6 string cvs show} def /kchartl 0 def %0:left page, 1:right page /pchartl 0 def %0:top page, 4:down page /lchartl 0 def %0:left page, 1:right page 72 90 translate 0.010 MM dup scale /xbtex0 1 def %xbtex=0 for files Y1(0/1)-(3/4/7/8)n.EPS xbtex0 1 eq {%xbtex0=1 40 setlinewidth /ymax1 08550 def /xmax1 06000 def 1.0 setgray 0 0 moveto xmax1 0 rlineto 0 ymax1 rlineto xmax1 neg 0 rlineto closepath fill 0 setgray 0 0 moveto xmax1 0 rlineto 0 ymax1 rlineto xmax1 neg 0 rlineto closepath stroke TK 0 setgray 150 /Times-ISOL1 FS 150 -140 moveto kchartl 0 eq {(geu90-) show} {(geu91-) show} ifelse pchartl 0 eq {lchartl 0 eq {(3n) show}{(4n) show} ifelse} {lchartl 0 eq {(7n) show}{(8n) show} ifelse} ifelse } if %xbtex0=1 100 /Courier FS /x0 100 def /y0 8400 def /yd 096 def /ytexi 100 array def /ytexi [ %64 lines (%**********************************************************) (%BEG special definitions of Global (G) gamma and xyreh_1024) (/gammaGi 21 array def) (/gammaGi %rel. gamma according to ISO 9241-306:2018) (%0 1 2 3 4 5 6 7) ([0.475 0.550 0.625 0.700 0.775 0.849 0.924 1.000) (%8 9 10 11 12 13 14 15) ( 1.000 1.081 1.176 1.290 1.428 1.600 1.818 2.105) (%16 17 18 19 20) ( 2.000 0.500 1.500 0.666 1.000] def) () (/indexGi 07 def) (/gamma gammaGi indexGi get def) (/xrehj 1024 array def /yrehj 1024 array def) (/xinhj 1024 array def /yinhj 1024 array def) () (%calculation of the table xyreh_1024 (h=hex) of real values (reh) with gamma) (0 1 1023 {/j exch def %j=0,1023) ( xrehj j j put) ( yrehj j j 1023 div gamma exp 1023 mul cvi put) ( } for %j=0,1023) (%END special definitions of Global (G) gamma and xyreh_1024 ) () (/1MR-0000G {%BEG 1MR-0000G special and standard definitions of Global (G) procedure) (%BEG special definitions of FF_LM_G) (/FF_LM_xchartg_gammaG {/yed exch def) ( /yeh yed 1023 mul cvi def) ( /xinh yrehj yeh get def) ( xinh 1023 div) ( } def) (%END special definitions of FF_LM_G) () (%BEG standard definitions of FF_LM_G ) (/FF_LM_setgrayG0 {setgray} bind def) (/FF_LM_setrgbcolorG0 {setrgbcolor} bind def) (/FF_LM_setcmykcolorG0 {setcmykcolor} bind def) (/FF_LM_transferG0 {settransfer} bind def) (/FF_LM_colortransferG0 {setcolortransfer} bind def) () (/setgray {%BEG procedure setgrayG) ( dup dup FF_LM_setrgbcolorG) ( } def %END procedure setgrayG) () (/setcmykcolor {%BEG procedure setcmykcolorF) ( /FF_LM_kG exch def /FF_LM_yG exch def) ( /FF_LM_mG exch def /FF_LM_cG exch def) ( FF_LM_kG 0 eq {1 FF_LM_cG sub 1 FF_LM_mG sub) ( 1 FF_LM_yG sub FF_LM_setrgbcolorG}) ( {1 FF_LM_kG sub dup dup) ( FF_LM_setrgbcolorG} ifelse) ( } def %END procedure setcmykcolorG) () (/setrgbcolor {%BEG procedure setrgbcolorG) ( /FF_LM_bG exch def /FF_LM_gG exch def) ( /FF_LM_rG exch def) ( FF_LM_rG FF_LM_gG FF_LM_bG) ( FF_LM_setrgbcolorG) ( } def %BEG procedure setrgbcolorG) () (/FF_LM_setrgbcolorG {%BEG FF_LM_setrgbcolorG) ( /FF_LM_b0G exch def /FF_LM_g0G exch def) ( /FF_LM_r0G exch def) ( FF_LM_r0G 0 le {/FF_LM_r0G 0.0001 def} if) ( FF_LM_g0G 0 le {/FF_LM_g0G 0.0001 def} if) ( FF_LM_b0G 0 le {/FF_LM_b0G 0.0001 def} if) ( /FF_LM_r1G FF_LM_r0G FF_LM_xchartg_gammaG def) ( /FF_LM_g1G FF_LM_g0G FF_LM_xchartg_gammaG def) ( /FF_LM_b1G FF_LM_b0G FF_LM_xchartg_gammaG def) ( FF_LM_r1G FF_LM_g1G FF_LM_b1G) ( FF_LM_setrgbcolorG0} def %END FF_LM_setrgbcolorG) () (/FF_LM_transferF {%BEG FF_LM_transferG) ( {FF_LM_xchartg_gammaG}) ( FF_LM_transferG0} def %END FF_LM_transferG) (/settransfer {FF_LM_transferG} def) () (/FF_LM_colortransferG {%BEG FF_LM_colortransferG) ( {FF_LM_xchartg_gammaG} {FF_LM_xchartg_gammaG}) ( {FF_LM_xchartg_gammaG}) ( FF_LM_colortransferG0} def) ( %END FF_LM_colortransferG) (/setcolortransfer {FF_LM_colortransferG} def) (%END standard definitions of FF_LM_G) (} def %END 1MR-0000G special and standard definitions of Global (G) procedure) () (/iproc1MR 1 def) (iproc1MR 1 eq {1MR-0000G} if) (%****************************************************************************) ] def 0 1 87 {/i exch def %i=0,87 0 setgray x0 y0 i yd mul sub moveto i 01 eq i 21 eq or i 24 eq or i 30 eq or i 32 eq or i 82 eq or {1 0 0 setrgbcolor} if i 23 eq i 83 eq or {0 0 1 setrgbcolor} if ytexi i get show } for %i=0,87 /x1 3500 def /x2 x1 200 add def /x3 x1 200 sub def 110 /Times-ISOL1 FS 1 0 0 setrgbcolor x2 y0 moveto (This is an example EPS code for EPS images, see) showen (Beispiel\255EPS\255Code f\374r EPS\255Bilder, vergleiche) showde 110 /Times-Roman FS 0 0 1 setrgbcolor x2 y0 yd 1.3 mul sub moveto (http://color.li.tu-berlin.de/fek9/fek9f1p0.txt) showen (http://farbe.li.tu-berlin.de/fgk9/fgk9f1p0.txt) showde x2 y0 yd 2.6 mul sub moveto (http://color.li.tu-berlin.de/fek9/fek9f1p0.pdf) showen (http://farbe.li.tu-berlin.de/fgk9/fgk9f1p0.pdf) showde 0 setgray 110 /Times-ISOL1 FS 1 0 0 setrgbcolor x2 y0 yd 4 mul sub moveto (External values of the Frame File (FF):) showen (Externe Werte der Rahmendatei (FF):) showde x2 y0 yd 5.3 mul sub moveto (xchart=0, 1, ..., 15) show x2 y0 yd 6.6 mul sub moveto (for the range 0,475 <= gammaG <=2,105) showen (f\374r den Bereich 0,475 <= gammaG <=2,105) showde x2 y0 yd 7.9 mul sub moveto (and inverse pairs 2-0,5, and 1,5-0,666.) showen (und inverse Paare 2-0,5 und 1,5-0,666.) showde x2 y0 yd 10.9 mul sub moveto (0 <= indexGi <= 20) show x2 y0 yd 12.2 mul sub moveto (definiton of gamma(indexGi).) showen (Definition von gamma(indexGi).) showde x2 y0 yd 18.8 mul sub moveto (Calculation of the table xyreh_1024) showen (Berechnung der Tabelle xyreh_1024) showde x2 y0 yd 20.1 mul sub moveto (for the value gamma=gammaGi(indexGi).) showen (f\374r den Wert gamma=gammaGi(indexGi).) showde x2 y0 yd 27.3 mul sub moveto (Application of the table xyreh_1024) showen (Anwendung der Tabelle xyreh_1024) showde x2 y0 yd 28.6 mul sub moveto (for the fast linearization method) showen (f\374r die schnelle Linearisierungsmethode) showde x2 y0 yd 29.9 mul sub moveto (of the inverse linearized output.) showen (der inversen linearisierten Ausgabe.) showde x2 y0 yd 34.0 mul sub moveto (The following standard definitions of the) showen (Die folgenden Normdefinitionen der) showde x2 y0 yd 35.3 mul sub moveto (Frame File Linearization method (FF_LM)) showen (Rahmendatei\255Linearisierungsmethode (FF_LM)) showde x2 y0 yd 36.6 mul sub moveto (serve for both vector and pixel graphic.) showen (dienen f\374r Vektor\255 und Pixelgrafik.) showde x2 y0 yd 37.9 mul sub moveto (These definitions are equal in most files.) showen (Die Definitionen sind in vielen Dateien gleich.) showde x3 y0 yd 41.0 mul sub moveto (Change setgray -> FF_LM_setrgbcolorG.) showen (\304nderung setgray -> FF_LM_setrgbcolorG.) showde x3 y0 yd 45.0 mul sub moveto (Change setcmykcolor -> FF_LM_setrgbcolorG.) showen (\304nderung setcmycolor -> FF_LM_setrgbcolorG.) showde x3 y0 yd 54.0 mul sub moveto (Change setrgbcolor -> FF_LM_setrgbcolorG.) showen (\304nderung setrgbcolor -> FF_LM_setrgbcolorG.) showde x3 y0 yd 61.0 mul sub moveto (Change FF_LM_setrgbcolorG -> FF_LM_setrgbcolorG0.) showen (\304nderung FF_LM_setrgbcolorG -> FF_LM_setrgbcolorG0.) showde x3 y0 yd 73.0 mul sub moveto (Change settransferG -> FF_LM_settransferG0.) showen (\304nderung settransferG -> FF_LM_settransferG0.) showde x3 y0 yd 78.0 mul sub moveto (Change setcolortransferG -> FF_LM_setcolortransferG0.) showen (\304nderung setcolortransferG -> FF_LM_setcolortransferG0.) showde 0 setgray showpage grestore %%Trailer