%!PS-Adobe-3.0 EPSF-3.0 http://farbe.li.tu-berlin.de/EE00/EE000-6A 20230801 %%BoundingBox: 70 85 226 206 %START PDFDE011.EPS /pdfmark05 where {pop} {userdict /pdfmark05 /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/EE00/EE00.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:2023080112000) /ModDate (D:20230801112000) /DOCINFO pdfmark05 [ /View [ /Fit ] /DOCVIEW pdfmark05 %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 % 40mm = 80*72/25.4 = 232; 232+90+13 = 335 % !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 /TV {120 /Times-ISOL1 FS} bind def /TL {160 /Times-ISOL1 FS} bind def /TS {200 /Times-ISOL1 FS} bind def /TK {240 /Times-ISOL1 FS} bind def /TM {280 /Times-ISOL1 FS} bind def /TG {320 /Times-ISOL1 FS} bind def /TIV {120 /TimesI-ISOL1 FS} bind def /TIL {160 /TimesI-ISOL1 FS} bind def /TIS {200 /TimesI-ISOL1 FS} bind def /TIK {240 /TimesI-ISOL1 FS} bind def /TIM {280 /TimesI-ISOL1 FS} bind def /TIG {320 /TimesI-ISOL1 FS} bind def /TBV {120 /TimesB-ISOL1 FS} bind def /TBL {160 /TimesB-ISOL1 FS} bind def /TBS {200 /TimesB-ISOL1 FS} bind def /TBK {240 /TimesB-ISOL1 FS} bind def /TBM {280 /TimesB-ISOL1 FS} bind def /TBG {320 /TimesB-ISOL1 FS} bind def /TBIV {120 /TimesBI-ISOL1 FS} bind def /TBIL {160 /TimesBI-ISOL1 FS} bind def /TBIS {200 /TimesBI-ISOL1 FS} bind def /TBIK {240 /TimesBI-ISOL1 FS} bind def /TBIM {280 /TimesBI-ISOL1 FS} bind def /TBIG {320 /TimesBI-ISOL1 FS} bind def /SV {120 /Symbol FS} bind def /SL {160 /Symbol FS} bind def /SS {200 /Symbol FS} bind def /SK {240 /Symbol FS} bind def /SM {280 /Symbol FS} bind def /SG {320 /Symbol FS} bind def /RV {120 /Times-Roman FS} bind def /RL {160 /Times-Roman FS} bind def /RS {200 /Times-Roman FS} bind def /RK {240 /Times-Roman FS} bind def /RM {280 /Times-Roman FS} bind def /RG {320 /Times-Roman FS} bind def /RIV {120 /Times-Italic FS} bind def /RIL {160 /Times-Italic FS} bind def /RIS {200 /Times-Italic FS} bind def /RIK {240 /Times-Italic FS} bind def /RIM {280 /Times-Italic FS} bind def /RIG {320 /Times-Italic FS} bind def /RBV {120 /Times-Bold FS} bind def /RBL {160 /Times-Bold FS} bind def /RBS {200 /Times-Bold FS} bind def /RBK {240 /Times-Bold FS} bind def /RBM {280 /Times-Bold FS} bind def /RBG {320 /Times-Bold FS} bind def /RBIV {120 /Times-BoldItalic FS} bind def /RBIL {160 /Times-BoldItalic FS} bind def /RBIS {200 /Times-BoldItalic FS} bind def /RBIK {240 /Times-BoldItalic FS} bind def /RBIM {280 /Times-BoldItalic FS} bind def /RBIG {320 /Times-BoldItalic 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 /colrecfi %x y width heigth c m y k {setcmykcolor rec fill} bind def /colrecst %x y width heigth c m y k {setcmykcolor rec stroke} bind def /cvishow {dup 0 ge {0.5 add} {0.5 sub} ifelse cvi 6 string cvs show} def %%EndProlog gsave %lanindL2 START 20000505 /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 {3 lanind eq {show} {pop} ifelse} bind def /showfr {2 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 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 % 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 gsave 72 90 translate 0.01 MM dup scale 20 setlinewidth %0 0 11600 08550 0.0 0.0 0.0 0.0 colrecfi %area white grey %0 0 11600 08550 0.0 0.0 0.0 1.0 colrecst %Rahmen Schwarz 0 setgray /xbtex0 0 def xbtex0 1 eq {%xbtex0=1 TL 100 -150 moveto (EE000-6A) show } if %xbtex0=1 %/xchartl 3 def 5 1 5 {/xchartl exch def %xchartl=4,7 20 setlinewidth % xchartl 0 eq { 100 4500 translate} if % xchartl 1 eq { 6100 4500 translate} if % xchartl 2 eq { 100 0250 translate} if % xchartl 3 eq { 6100 0250 translate} if % xchartl 4 eq { 100 4500 translate} if % xchartl 5 eq { 6100 4500 translate} if % xchartl 6 eq { 100 0250 translate} if % xchartl 7 eq { 6100 0250 translate} if 0 setgray TV 100 -120 moveto (EE000-) show xchartl 1 add cvishow (A) show %A 30 setlinewidth [ ] 0 setdash /yhoe 4000 def /xwidth 5400 def 1 setgray 0 0 moveto xwidth 0 rlineto 0 yhoe rlineto xwidth neg 0 rlineto closepath fill 0 setgray 0 0 moveto xwidth 0 rlineto 0 yhoe rlineto xwidth neg 0 rlineto closepath stroke gsave %start because of clip %**************************************************** %ALL: 4,5,6,7 0 setgray /ix0 30 def ix0 yhoe 150 sub moveto TBL (Zugriff von ISO\255TC42\255Mitgliedern auf Arbeitsdokumente von ) showde (Access of ISO\255TC42 members to working documents of ) showea (CIE Division 1) showde (CIE Division 1) showea 20 setlinewidth 0 yhoe 0220 sub moveto xwidth 0 rlineto stroke /iyd 150 def /iy0 yhoe 370 sub def %3630 TL ix0 iy0 iyd 0 mul sub moveto (CIE D1 ) show TIL (Vision and Colour ) show TL (erzeugt 3 weitere Dokumentarten verglichen mit ISO:) showde (produces 3 more document types compared to ISO:) showea ix0 iy0 iyd 1 mul sub moveto TL (CIE\255D1\255Berichte: ) showde (CIE D1 Reports: ) showea TBL (Anual (AR), Meeting (MR)) show TL ( und ) showde (, and ) showea TBL (Reportership (RR).) show ix0 iy0 iyd 2.1 mul sub moveto TL (Es gibt Anforderungen von ISO\255Gremien an die CIE ) showde (There were requests of ISO committes to the CIE ) showea (f\374r eine farbmetrische Hilfe.)showde (for a colorimetric support.) showea ix0 iy0 iyd 3.1 mul sub moveto TL (In some cases a CIE TC was created to solve this ISO problem ) showea (In einigen F\344llen wurde ein TC gegr\374ndet um das ) showde (with a document) showea (ISO\255Problem mit einem) showde ix0 iy0 iyd 4.1 mul sub moveto (exchanche until the final publication. ) showea (Domumentaustausch zu l\366sen. ) showde (An example is CIE 184 (indoor daylight).) showea (Ein Beispiel ist CIE 184 (indoor daylight).) showde ix0 iy0 iyd 5.2 mul sub moveto TL (In other cases the CIE nominates a Reportership Reporter to ) showea (In anderen F\344llen hat die CIE einen Reportership\255Reporter ) showde (write a (public) RR. ) showea (f\374r einen RR nominiert. ) showde ix0 iy0 iyd 6.2 mul sub moveto (Many Reporters liked this job because the copyright remained by the ) showea (author.) showea (Viele Reporter liebten diesen Job weil das Copyright beim Autor ) showde (blieb.) showde /ty00i [(CIE document) (until) (since) (copy\255) (public access to)] def /ty01i [(created) (2017) (2018) (rigth) (CIE documents)] def /iy00i [0 0 0 0 0] def /iy01i [0 0 0 0 0] def % 0 1 2 3 4 /ixi [0030 1600 2700 3700 4200 5400]def % 0 1 2 3 4 /ty02i [(CIE D1 Anual Meeting) (public) (internal) (CIE) (until 2017, see)] def /ty03i [(Report D1MR) (CIE Website)(D1 members)() (WBM archive [1])] def /iy02i [0 2 3 0 2] def /iy03i [0 2 3 0 2] def /ty04i [(CIE D1 Anual Activity)(public) (internal) (CIE) (until 2017, see)] def /ty05i [(Report D1AR) (CIE Website)(D1 members)() (WBM archive [1])] def /iy04i [0 2 3 0 2]def /iy05i [0 2 3 0 2]def /ty06i [(CIE D1 Reportership) (public) (internal) (Author) (until 2017, see)] def /ty07i [(Report D1RR) (CIE Website)(D1 members)() (WBM archive [1])] def /iy06i [0 2 3 0 2] def /iy07i [0 2 3 0 2] def /ty08i [(CIE D1 WD/CD/ED/AD) (internal TC/)(internal TC/) (CIE) (until 2015, limi\255)] def /ty09i [(WD/CD TC internal) (D1 members) (D1 members) () (ted TC42 access)] def /iy08i [0 3 3 0 1] def /iy09i [3 3 3 0 1] def /ty10i [(CIE D1 TR or IS) (public, see) (public, see) (CIE) (TC42 members:)] def /ty11i [(D1TR, D1IS) (CIE shop) (CIE shop) () (buy in CIE shop)] def /iy10i [0 2 2 0 2] def /iy11i [0 2 2 0 2] def /dy00i [(CIE\255Dokumente) (bis) (seit) (Copy\255) (\366ffentlich zu)] def /dy01i [(erzeugt) (2017) (2018) (rigth) (CIE\255Dokumente)] def %************************************************************************ % 0 1 2 3 4 /dy02i [(CIE D1 Anual Meeting) (\366ffentlich) (intern) (CIE) (bis 2017, siehe)] def /dy03i [(Report D1MR) (CIE\255Webseite)(D1\255Mitglieder)() (WBM\255Archive [1])] def /dy04i [(CIE D1 Anual Actividy)(\366ffentlich) (intern) (CIE) (bis 2017, siehe)] def /dy05i [(Report D1AR) (CIE\255Webseite)(D1\255Mitglieder)() (WBM\255Archive [1])] def /dy06i [(CIE D1 Reportership) (\366ffentlich) (intern) (Autor) (bis 2017, siehe)] def /dy07i [(Report D1RR) (CIE\255Webseite)(D1\255Mitglieder)() (WBM\255Archive [1])] def /dy08i [(CIE D1 WD/CD/ED/AD) (intern TC/)(intern TC/) (CIE) (bis 2015, Teil\255)] def /dy09i [(WD/CD TC intern) (D1\255Mitglieder) (D1\255Mitglieder) () (TC42\255Zugriff)] def /dy10i [(CIE D1 TR oder IS) (\366ffentlich) (\366ffentlich) (CIE) (TC42\255Mitglieder:)] def /dy11i [(D1TR, D1IS) (CIE\255Laden) (CIE\255Laden) () (CIE\255Laden\255Kauf)] def /iyd 170 def /ixs 030 def /iyi 22 array def 0 1 7 {/i exch def %i=0,7 iyi i 2 mul 0 add 2350 i 380 mul sub put iyi i 2 mul 1 add iyi i 2 mul get iyd sub put } for %i=0,7 /yhoe 2500 def 0 setgray ix0 yhoe 050 add moveto %2600 TBL (Table 1: ) showea (Tabelle 1: ) showde (Access of TC42 members to CIE Liaison documents?) showea (Zugriff von TC42\255Mitgliedern auf CIE\255Liaison\255Dokumente?) showde 0 1 4 {/i exch def iy00i i get 0 eq {1 1 1 setrgbcolor} if iy00i i get 1 eq {1 1 0 setrgbcolor} if iy00i i get 2 eq {0 1 0 setrgbcolor} if iy00i i get 3 eq {1 0 0 setrgbcolor} if ixi i get ixs sub iyi 00 get ixs sub moveto /ixd ixi i 1 add get ixi i get sub def ixd 0 rlineto 0 iyd rlineto ixd neg 0 rlineto closepath fill } for 0 1 4 {/i exch def iy01i i get 0 eq {1 1 1 setrgbcolor} if iy01i i get 1 eq {1 1 0 setrgbcolor} if iy01i i get 2 eq {0 1 0 setrgbcolor} if iy01i i get 3 eq {1 0 0 setrgbcolor} if ixi i get ixs sub iyi 01 get ixs sub moveto /ixd ixi i 1 add get ixi i get sub def ixd 0 rlineto 0 iyd rlineto ixd neg 0 rlineto closepath fill } for 0 setgray TBL ixi 0 get iyi 00 get moveto ty00i 0 get showea ixi 1 get iyi 00 get moveto ty00i 1 get showea ixi 2 get iyi 00 get moveto ty00i 2 get showea ixi 3 get iyi 00 get moveto ty00i 3 get showea ixi 4 get iyi 00 get moveto ty00i 4 get showea ixi 0 get iyi 01 get moveto ty01i 0 get showea ixi 1 get iyi 01 get moveto ty01i 1 get showea ixi 2 get iyi 01 get moveto ty01i 2 get showea ixi 3 get iyi 01 get moveto ty01i 3 get showea ixi 4 get iyi 01 get moveto ty01i 4 get showea ixi 0 get iyi 00 get moveto dy00i 0 get showde ixi 1 get iyi 00 get moveto dy00i 1 get showde ixi 2 get iyi 00 get moveto dy00i 2 get showde ixi 3 get iyi 00 get moveto dy00i 3 get showde ixi 4 get iyi 00 get moveto dy00i 4 get showde ixi 0 get iyi 01 get moveto dy01i 0 get showde ixi 1 get iyi 01 get moveto dy01i 1 get showde ixi 2 get iyi 01 get moveto dy01i 2 get showde ixi 3 get iyi 01 get moveto dy01i 3 get showde ixi 4 get iyi 01 get moveto dy01i 4 get showde 0 1 4 {/i exch def iy02i i get 0 eq {1 1 1 setrgbcolor} if iy02i i get 1 eq {1 1 0 setrgbcolor} if iy02i i get 2 eq {0 1 0 setrgbcolor} if iy02i i get 3 eq {1 0 0 setrgbcolor} if ixi i get ixs sub iyi 02 get ixs sub moveto /ixd ixi i 1 add get ixi i get sub def ixd 0 rlineto 0 iyd rlineto ixd neg 0 rlineto closepath fill } for 0 1 4 {/i exch def iy03i i get 0 eq {1 1 1 setrgbcolor} if iy03i i get 1 eq {1 1 0 setrgbcolor} if iy03i i get 2 eq {0 1 0 setrgbcolor} if iy03i i get 3 eq {1 0 0 setrgbcolor} if ixi i get ixs sub iyi 03 get ixs sub moveto /ixd ixi i 1 add get ixi i get sub def ixd 0 rlineto 0 iyd rlineto ixd neg 0 rlineto closepath fill } for 0 setgray TL ixi 0 get iyi 02 get moveto ty02i 0 get showea ixi 1 get iyi 02 get moveto ty02i 1 get showea ixi 2 get iyi 02 get moveto ty02i 2 get showea ixi 3 get iyi 02 get moveto ty02i 3 get showea ixi 4 get iyi 02 get moveto ty02i 4 get showea ixi 0 get iyi 03 get moveto ty03i 0 get showea ixi 1 get iyi 03 get moveto ty03i 1 get showea ixi 2 get iyi 03 get moveto ty03i 2 get showea ixi 3 get iyi 03 get moveto ty03i 3 get showea ixi 4 get iyi 03 get moveto ty03i 4 get showea ixi 0 get iyi 02 get moveto dy02i 0 get showde ixi 1 get iyi 02 get moveto dy02i 1 get showde ixi 2 get iyi 02 get moveto dy02i 2 get showde ixi 3 get iyi 02 get moveto dy02i 3 get showde ixi 4 get iyi 02 get moveto dy02i 4 get showde ixi 0 get iyi 03 get moveto dy03i 0 get showde ixi 1 get iyi 03 get moveto dy03i 1 get showde ixi 2 get iyi 03 get moveto dy03i 2 get showde ixi 3 get iyi 03 get moveto dy03i 3 get showde ixi 4 get iyi 03 get moveto dy03i 4 get showde 0 1 4 {/i exch def iy04i i get 0 eq {1 1 1 setrgbcolor} if iy04i i get 1 eq {1 1 0 setrgbcolor} if iy04i i get 2 eq {0 1 0 setrgbcolor} if iy04i i get 3 eq {1 0 0 setrgbcolor} if ixi i get ixs sub iyi 04 get ixs sub moveto /ixd ixi i 1 add get ixi i get sub def ixd 0 rlineto 0 iyd rlineto ixd neg 0 rlineto closepath fill } for 0 1 4 {/i exch def iy05i i get 0 eq {1 1 1 setrgbcolor} if iy05i i get 1 eq {1 1 0 setrgbcolor} if iy05i i get 2 eq {0 1 0 setrgbcolor} if iy05i i get 3 eq {1 0 0 setrgbcolor} if ixi i get ixs sub iyi 05 get ixs sub moveto /ixd ixi i 1 add get ixi i get sub def ixd 0 rlineto 0 iyd rlineto ixd neg 0 rlineto closepath fill } for 0 setgray TL ixi 0 get iyi 04 get moveto ty04i 0 get showea ixi 1 get iyi 04 get moveto ty04i 1 get showea ixi 2 get iyi 04 get moveto ty04i 2 get showea ixi 3 get iyi 04 get moveto ty04i 3 get showea ixi 4 get iyi 04 get moveto ty04i 4 get showea ixi 0 get iyi 05 get moveto ty05i 0 get showea ixi 1 get iyi 05 get moveto ty05i 1 get showea ixi 2 get iyi 05 get moveto ty05i 2 get showea ixi 3 get iyi 05 get moveto ty05i 3 get showea ixi 4 get iyi 05 get moveto ty05i 4 get showea ixi 0 get iyi 04 get moveto dy04i 0 get showde ixi 1 get iyi 04 get moveto dy04i 1 get showde ixi 2 get iyi 04 get moveto dy04i 2 get showde ixi 3 get iyi 04 get moveto dy04i 3 get showde ixi 4 get iyi 04 get moveto dy04i 4 get showde ixi 0 get iyi 05 get moveto dy05i 0 get showde ixi 1 get iyi 05 get moveto dy05i 1 get showde ixi 2 get iyi 05 get moveto dy05i 2 get showde ixi 3 get iyi 05 get moveto dy05i 3 get showde ixi 4 get iyi 05 get moveto dy05i 4 get showde 0 1 4 {/i exch def iy06i i get 0 eq {1 1 1 setrgbcolor} if iy06i i get 1 eq {1 1 0 setrgbcolor} if iy06i i get 2 eq {0 1 0 setrgbcolor} if iy06i i get 3 eq {1 0 0 setrgbcolor} if ixi i get ixs sub iyi 06 get ixs sub moveto /ixd ixi i 1 add get ixi i get sub def ixd 0 rlineto 0 iyd rlineto ixd neg 0 rlineto closepath fill } for 0 1 4 {/i exch def iy07i i get 0 eq {1 1 1 setrgbcolor} if iy07i i get 1 eq {1 1 0 setrgbcolor} if iy07i i get 2 eq {0 1 0 setrgbcolor} if iy07i i get 3 eq {1 0 0 setrgbcolor} if ixi i get ixs sub iyi 07 get ixs sub moveto /ixd ixi i 1 add get ixi i get sub def ixd 0 rlineto 0 iyd rlineto ixd neg 0 rlineto closepath fill } for 0 setgray TL ixi 0 get iyi 06 get moveto ty06i 0 get showea ixi 1 get iyi 06 get moveto ty06i 1 get showea ixi 2 get iyi 06 get moveto ty06i 2 get showea ixi 3 get iyi 06 get moveto ty06i 3 get showea ixi 4 get iyi 06 get moveto ty06i 4 get showea ixi 0 get iyi 07 get moveto ty07i 0 get showea ixi 1 get iyi 07 get moveto ty07i 1 get showea ixi 2 get iyi 07 get moveto ty07i 2 get showea ixi 3 get iyi 07 get moveto ty07i 3 get showea ixi 4 get iyi 07 get moveto ty07i 4 get showea ixi 0 get iyi 06 get moveto dy06i 0 get showde ixi 1 get iyi 06 get moveto dy06i 1 get showde ixi 2 get iyi 06 get moveto dy06i 2 get showde ixi 3 get iyi 06 get moveto dy06i 3 get showde ixi 4 get iyi 06 get moveto dy06i 4 get showde ixi 0 get iyi 07 get moveto dy07i 0 get showde ixi 1 get iyi 07 get moveto dy07i 1 get showde ixi 2 get iyi 07 get moveto dy07i 2 get showde ixi 3 get iyi 07 get moveto dy07i 3 get showde ixi 4 get iyi 07 get moveto dy07i 4 get showde 0 1 4 {/i exch def iy08i i get 0 eq {1 1 1 setrgbcolor} if iy08i i get 1 eq {1 1 0 setrgbcolor} if iy08i i get 2 eq {0 1 0 setrgbcolor} if iy08i i get 3 eq {1 0 0 setrgbcolor} if ixi i get ixs sub iyi 08 get ixs sub moveto /ixd ixi i 1 add get ixi i get sub def ixd 0 rlineto 0 iyd rlineto ixd neg 0 rlineto closepath fill } for 0 1 4 {/i exch def iy09i i get 0 eq {1 1 1 setrgbcolor} if iy09i i get 1 eq {1 1 0 setrgbcolor} if iy09i i get 2 eq {0 1 0 setrgbcolor} if iy09i i get 3 eq {1 0 0 setrgbcolor} if ixi i get ixs sub iyi 09 get ixs sub moveto /ixd ixi i 1 add get ixi i get sub def ixd 0 rlineto 0 iyd rlineto ixd neg 0 rlineto closepath fill } for 0 setgray TL ixi 0 get iyi 08 get moveto ty08i 0 get showea ixi 1 get iyi 08 get moveto ty08i 1 get showea ixi 2 get iyi 08 get moveto ty08i 2 get showea ixi 3 get iyi 08 get moveto ty08i 3 get showea ixi 4 get iyi 08 get moveto ty08i 4 get showea ixi 0 get iyi 09 get moveto ty09i 0 get showea ixi 1 get iyi 09 get moveto ty09i 1 get showea ixi 2 get iyi 09 get moveto ty09i 2 get showea ixi 3 get iyi 09 get moveto ty09i 3 get showea ixi 4 get iyi 09 get moveto ty09i 4 get showea ixi 0 get iyi 08 get moveto dy08i 0 get showde ixi 1 get iyi 08 get moveto dy08i 1 get showde ixi 2 get iyi 08 get moveto dy08i 2 get showde ixi 3 get iyi 08 get moveto dy08i 3 get showde ixi 4 get iyi 08 get moveto dy08i 4 get showde ixi 0 get iyi 09 get moveto dy09i 0 get showde ixi 1 get iyi 09 get moveto dy09i 1 get showde ixi 2 get iyi 09 get moveto dy09i 2 get showde ixi 3 get iyi 09 get moveto dy09i 3 get showde ixi 4 get iyi 09 get moveto dy09i 4 get showde 0 1 4 {/i exch def iy10i i get 0 eq {1 1 1 setrgbcolor} if iy10i i get 1 eq {1 1 0 setrgbcolor} if iy10i i get 2 eq {0 1 0 setrgbcolor} if iy10i i get 3 eq {1 0 0 setrgbcolor} if ixi i get ixs sub iyi 10 get ixs sub moveto /ixd ixi i 1 add get ixi i get sub def ixd 0 rlineto 0 iyd rlineto ixd neg 0 rlineto closepath fill } for 0 1 4 {/i exch def iy11i i get 0 eq {1 1 1 setrgbcolor} if iy11i i get 1 eq {1 1 0 setrgbcolor} if iy11i i get 2 eq {0 1 0 setrgbcolor} if iy11i i get 3 eq {1 0 0 setrgbcolor} if ixi i get ixs sub iyi 11 get ixs sub moveto /ixd ixi i 1 add get ixi i get sub def ixd 0 rlineto 0 iyd rlineto ixd neg 0 rlineto closepath fill } for 0 setgray TL ixi 0 get iyi 10 get moveto ty10i 0 get showea ixi 1 get iyi 10 get moveto ty10i 1 get showea ixi 2 get iyi 10 get moveto ty10i 2 get showea ixi 3 get iyi 10 get moveto ty10i 3 get showea ixi 4 get iyi 10 get moveto ty10i 4 get showea ixi 0 get iyi 11 get moveto ty11i 0 get showea ixi 1 get iyi 11 get moveto ty11i 1 get showea ixi 2 get iyi 11 get moveto ty11i 2 get showea ixi 3 get iyi 11 get moveto ty11i 3 get showea ixi 4 get iyi 11 get moveto ty11i 4 get showea ixi 0 get iyi 10 get moveto dy10i 0 get showde ixi 1 get iyi 10 get moveto dy10i 1 get showde ixi 2 get iyi 10 get moveto dy10i 2 get showde ixi 3 get iyi 10 get moveto dy10i 3 get showde ixi 4 get iyi 10 get moveto dy10i 4 get showde ixi 0 get iyi 11 get moveto dy11i 0 get showde ixi 1 get iyi 11 get moveto dy11i 1 get showde ixi 2 get iyi 11 get moveto dy11i 2 get showde ixi 3 get iyi 11 get moveto dy11i 3 get showde ixi 4 get iyi 11 get moveto dy11i 4 get showde 20 setlinewidth /lupt 2500 def /llot 0250 def /ldit lupt llot sub def 0 lupt moveto 5400 0 rlineto stroke %line upper table %0 llot moveto 5400 0 rlineto stroke %line lower table 1 1 4 {/i exch def %i=1,4 ixi i get ixs sub llot moveto 0 ldit rlineto stroke } for %i=1,4 %horizontal lines 1 2 11 {/i exch def %i=1,11,2 0 iyi i get 40 sub moveto 5400 0 rlineto stroke } for %i=1,11,2 %/iyix iyi 15 get 700 sub def /yhoe 4000 def /xwidth 5400 def 30 setlinewidth 0 setgray 0 0 moveto xwidth 0 rlineto 0 yhoe rlineto xwidth neg 0 rlineto closepath stroke %ALL 4,5,6,7 %***************************************************************** xchartl 4 eq {%xchartl=4 /ioutr 0 def } if %xchartl=4 %***************************************************************** xchartl 5 eq {%xchartl=5 /ioutr 1 def } if %xchartl=5 %***************************************************************** xchartl 6 eq {%xchartl=6 /ioutr 2 def } if %xchartl=6 %***************************************************************** xchartl 7 eq {%xchartl=7 /ioutr 3 def } if %xchartl=7 ioutr 0 eq {%ioutr=0 /iyix 050 def /ixd 350 def /ix00 ixi 0 get def /ix01 ix00 ixd add def ix00 iyix moveto 0 1 0 setrgbcolor 300 0 rlineto 0 150 rlineto 300 neg 0 rlineto closepath fill 0 setgray ix00 iyix moveto 300 0 rlineto 0 150 rlineto 300 neg 0 rlineto closepath stroke ix01 iyix moveto ( seen by public (to buy)) showea ( \366ffentlich (zu kaufen)) showde /ix00 2000 def /ix01 ix00 ixd add def ix00 iyix moveto 1 1 0 setrgbcolor 300 0 rlineto 0 150 rlineto 300 neg 0 rlineto closepath fill 0 setgray ix00 iyix moveto 300 0 rlineto 0 150 rlineto 300 neg 0 rlineto closepath stroke ix00 300 add iyix moveto 1 0 0 setrgbcolor 300 0 rlineto 0 150 rlineto 300 neg 0 rlineto closepath fill 0 setgray ix00 300 add iyix moveto 300 0 rlineto 0 150 rlineto 300 neg 0 rlineto closepath stroke ix01 300 add iyix moveto ( limited or no access for TC42 members ) showea ( begrenzter oder kein Zugriff f\374r TC42 ) showde } if %ioutr=0 ioutr 1 eq { %ioutr=1 /iyix 050 def /ix00 ixi 0 get def ix00 iyix moveto /iyix 50 def 0 setgray TL ([1] see >300 documents: ) showea ([1] siehe >300 Dokumente: ) showde 0 0 1 setrgbcolor RL (http://web.archive.org/web/*/http://files.cie.co.at/*) show 0 setgray TL } if %ioutr=1 ioutr 2 eq { %ioutr=2 /iyix 050 def /ix00 ixi 0 get def ix00 iyix moveto /iyix 50 def 0 setgray RV ([1] navigate for ) showea ([1] navigieren f\374r ) showde (MR, AR, RR: ) show 0 0 1 setrgbcolor (http://web.archive.org/web/20160406200138/http://div1.cie.co.at/?i_ca_id=544) show 0 setgray TL } if %ioutr=2 ioutr 3 eq { %ioutr=3 /iyix 050 def /ix00 ixi 0 get def ix00 iyix moveto /iyix 50 def 0 setgray RV ([1] navigate for ) showea ([1] navigieren f\374r ) showde (MR, AR: ) show 0 0 1 setrgbcolor (http://web.archive.org/web/20170624033105/http://div1.cie.co.at/?i_ca_id=544) show 0 setgray TL } if %ioutr=3 /yhoe 4000 def /xwidth 5400 def 30 setlinewidth 0 setgray 0 0 moveto xwidth 0 rlineto 0 yhoe rlineto xwidth neg 0 rlineto closepath stroke %***************************************************************** grestore %end because of clip % xchartl 0 eq { 100 neg 4500 neg translate} if % xchartl 1 eq { 6100 neg 4500 neg translate} if % xchartl 2 eq { 100 neg 0250 neg translate} if % xchartl 3 eq { 6100 neg 0250 neg translate} if % xchartl 4 eq { 100 neg 4500 neg translate} if % xchartl 5 eq { 6100 neg 4500 neg translate} if % xchartl 6 eq { 100 neg 0250 neg translate} if % xchartl 7 eq { 6100 neg 0250 neg translate} if } for %xchartl=4,7 showpage grestore %} for %output with langind end %%Trailer