%!PS-Adobe-3.0 EPSF-3.0 AGA21-4N %%BoundingBox: 70 85 238 240 %START PDFDE011.EPS /pdfmark14 where {pop} {userdict /pdfmark14 /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://farbe.li.tu-berlin.de/AGA2/AGA2.HTM) /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1) /Subject (goto: http://farbe.li.tu-berlin.de, http://130.149.60.45/~farbmetrik) /Keywords (image reproduction, colour devices, colour vision) /Creator (klaus.richter@mac.com) /CreationDate (D:2020030112000) /ModDate (D:2020030112000) /DOCINFO pdfmark14 [ /View [ /FitB ] /DOCVIEW pdfmark14 %END PDFDE011 /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 /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 {225 /TimesB-ISOL1 FS} bind def %special /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 /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 %%EndProlog gsave /nshow {TS show} bind def /kshow {TIS show} bind def /bshow {TBS show} bind def /jshow {TBIS show} bind def /ibshown {TBS -50 -50 rmoveto show 0 50 rmoveto TBS} bind def /ibshow0 {TBS -00 -50 rmoveto show 0 50 rmoveto TBS} bind def /ishown {TS -50 -50 rmoveto show 0 50 rmoveto TS } bind def /ishow0 {TS -00 -50 rmoveto show 0 50 rmoveto TS } bind def /lanind 0 def /showde {0 lanind eq {show} {pop} ifelse} bind def /showen {1 lanind le {show} {pop} ifelse} bind def /showes {2 lanind eq {show} {pop} ifelse} bind def /showfr {3 lanind le {show} {pop} ifelse} bind def /showit {4 lanind eq {show} {pop} ifelse} bind def /showjp {5 lanind le {show} {pop} ifelse} bind def /showea {lanind 1 ge {show} {pop} ifelse} bind def /lanindg where {pop /lanind1 lanindg def /lanind2 lanindg def} {/lanind1 0 def /lanind2 0 def} ifelse /colormg where {pop /colorm1 colormg def /colorm2 colormg def} {/colorm1 0 def /colorm2 0 def} ifelse /xcolorg where {pop /xcolor1 xcolorg def /xcolor2 xcolorg def} {/xcolor1 0 def /xcolor2 0 def} ifelse /xchartg where {pop /xchart1 xchartg def /xchart2 xchartg def} {/xchart1 0 def /xchart2 0 def} ifelse /lanind lanind1 def %lanind1 1 lanind2 {/lanind exch def %output showpage /colorm colorm1 def %colorm1 1 colorm2 {/colorm exch def %output showpage /xcolor xcolor1 def %xcolor1 1 xcolor2 {/xcolor exch def %output showpage /xchart xchart1 def %xchart1 1 xchart2 {/xchart exch def %output showpage /GSS$ where {pop /LSS$ GSS$ def} {/LSS$ (1) def} ifelse /GSC$ where {pop /LSC$ GSC$ def} {/LSC$ (N) def} ifelse /GSX$ where {pop /LSX$ GSX$ def} {/LSX$ (0) def} ifelse /GSY$ where {pop /LSY$ GSY$ def} {/LSY$ (0) def} ifelse /GEX$ where {pop /LEX$ GEX$ def} {/LEX$ (P.PS./PDF) def} ifelse /GEY$ where {pop /LEY$ GEY$ def} {/LEY$ (P.DAT) def} ifelse /IMES where {pop %/IMES IMES def } {/IMES 0 def} ifelse 3.5 /Times-ISOL1 FS 73 86 moveto (AGA21-4N) show 72 90 translate /ytit 400 def /yhoe 6300 def /yhoet yhoe ytit sub def /xwide 6600 def /ishow {-50 -100 rmoveto 200 /Times-ISOL1 FS show 0 100 rmoveto TM} bind def 0.0088 MM dup scale 15 setlinewidth 0.0 0.0 0.0 0.0 setcmykcolor 0 0 moveto xwide 0 rlineto 0 yhoet rlineto xwide neg 0 rlineto closepath fill 0.0 0.0 0.0 1.0 setcmykcolor 0 0 moveto xwide 0 rlineto 0 yhoet rlineto xwide neg 0 rlineto closepath stroke /yt 300 def %y-Zeilenabstand for text /yd 400 def %y-Zeilenabstand for formula %Spalten /S1 100 def /S2 1500 def /S3 2300 def /S4 5900 def /S5 7700 def /S6 8500 def /yz 400 def /yu5 7600 def /yu4 7100 def /yu3 5800 def /yu2 5800 def /yu1 5800 def /yhoey yhoet 550 sub def /yhoe2 yhoet 1250 sub def %Titeltext TBK S1 5670 moveto (ISO colour file AE49 and loop: file -> print -> scan -> file) showen (ISO\255Farbdatei AG49 und Schleife: Datei ->Druck ->Scan ->Datei) showde S1 5400 moveto TS (use 1080 colours of: ) showen (benutze 1080 Farben: ) showde 0 0 1 setrgbcolor RS (http://farbe.li.tu-berlin.de/AEA4/AEA40-7N.PDF ) showen (http://farbe.li.tu-berlin.de/AGA4/AGA40-7N.PDF ) showde 0 setgray TS (or) showen (oder) showde S1 5200 moveto 0 0 1 setrgbcolor RS (http://standards.iso.org/iso/9241/306/ed-2/AE49/AE490-7N.PDF ) showen (http://standards.iso.org/iso/9241/306/ed-2/AG49/AG490-7N.PDF ) showde 0 setgray TS (without 1MR.) showen (ohne 1MR.) showde 0 5600 moveto xwide 0 rlineto stroke %************************************************************************* /xt3 3500 def /yt3 3000 def xt3 yt3 translate /dx 050 def /dy 100 def /ydy 300 def 50 setlinewidth newpath 0 0 2000 0 360 arc stroke 0 0 1 setrgbcolor 0 0 2000 100 0 360 arc fill TBK -500 1700 moveto (ISO file) showen (ISO\255Datei) showde -1100 1400 moveto (with ) showen (mit ) showde TBIK (rgb*) show TBK ( colour data) showen (\255Farbdaten) showde 0 setgray 2000 045 cos mul 2000 045 sin mul moveto 140 -030 rlineto stroke 2000 045 cos mul 2000 045 sin mul moveto 030 -170 rlineto stroke 2000 045 cos mul -100 add 2000 045 sin mul 200 add moveto TBIM (rgb*) show 2000 135 cos mul 2000 135 sin mul moveto 140 030 rlineto stroke 2000 135 cos mul 2000 135 sin mul moveto 060 170 rlineto stroke 0 0 1 setrgbcolor 2000 135 cos mul -2000 add 2000 135 sin mul 500 add moveto TBK (ISO colour file, and ) showen (ISO\255Farbatei und) showde 2000 135 cos mul -2000 add 2000 135 sin mul 200 add moveto TBIK (OLM16) show TBK ( method for) showen (\255Methode f\374r) showde 2000 135 cos mul -2000 add 2000 135 sin mul 100 sub moveto TBK (device output) showen (Ger\344teausgabe\255) showde 2000 135 cos mul -2000 add 2000 135 sin mul 400 sub moveto TBK (linearization) showen (Linearisierung) showde 0 setgray 2000 225 cos mul 2000 225 sin mul moveto -140 030 rlineto stroke 2000 225 cos mul 2000 225 sin mul moveto -030 170 rlineto stroke 2000 225 cos mul -900 add 2000 225 sin mul 200 sub moveto TBIM (LCh*) show 1 0 0 setrgbcolor 2000 225 cos mul -2050 add 2000 225 sin mul 700 sub moveto TBK (visueller Test: ) showde (visual test: ) showea TK (gleiche) showde (equal) showea %2000 225 cos mul -2050 add 2000 225 sin mul 700 sub moveto %TK %(Elementarbuntton (J/N)?) showde %(elementary hue (Y/N)?) showea 2000 225 cos mul -2050 add 2000 225 sin mul 950 sub moveto TK (relative Stufung (J/N)?) showde (relative spacing (Y/N)?) showea 2000 225 cos mul -2050 add 2000 225 sin mul 1200 sub moveto TK (Benutze Farben in) showde (use colours in) showea 2000 225 cos mul -2050 add 2000 225 sin mul 1450 sub moveto TK (Spalte) showde TK (colum) showea TBIK ( b) show TK ( bis ) showde ( to ) showea TBIK (j) show TK 0 setgray 2000 315 cos mul 2000 315 sin mul moveto -140 -030 rlineto stroke 2000 315 cos mul 2000 315 sin mul moveto -060 -170 rlineto stroke 2000 315 cos mul -200 add 2000 315 sin mul -400 add moveto TBIM (rgb) show 0 0 1 setrgbcolor 2000 315 cos mul 400 add 2000 315 sin mul 250 add moveto TBK (Eingabeli\255) showde (input) showea 2000 315 cos mul 300 add 2000 315 sin mul 050 sub moveto TBK (nearisierung) showde (linearization) showea 2000 315 cos mul 300 add 2000 315 sin mul 300 sub moveto TBIK (rgb->rgb*) show 0 setgray 30 setlinewidth /xre -2950 def /yre -0950 def lanind 0 eq {/xyw1 2150 def} {/xyw1 1950 def} ifelse /xyw2 1850 def 1 setgray xre yre moveto xyw1 0 rlineto 0 xyw2 rlineto xyw1 neg 0 rlineto closepath fill 0 setgray xre yre moveto xyw1 0 rlineto 0 xyw2 rlineto xyw1 neg 0 rlineto closepath stroke xre dx add yre dy add moveto TBIK (rgb* -> LCh*) show xre dx add yre dy add ydy 1 mul add moveto TK (Drucker oder Offset) showde (printer or offset) showen xre dx add yre dy add ydy 2 mul add moveto TK (Ausgabe 100% UCR) showde (output 100% UCR) showen xre dx add yre dy add ydy 3 mul add moveto TBK (Hardware) showde (hardware) showen xre dx add yre dy add ydy 4 mul add moveto TK (digital -> analog) show xre dx add yre dy add ydy 5 mul add moveto TBK (Bildprozess) showde (image process) showen %************************************ /xre -0950 def /yre -2950 def /xyw 1850 def 1 setgray xre yre moveto xyw 0 rlineto 0 xyw rlineto xyw neg 0 rlineto closepath fill 0 setgray xre yre moveto xyw 0 rlineto 0 xyw rlineto xyw neg 0 rlineto closepath stroke xre dx add yre dy add moveto TBIK (LCh* -> rgb) show xre dx add yre dy add ydy 1 mul add moveto TK (Farbkamera) showde (colour camera) showen xre dx add yre dy add ydy 2 mul add moveto TK (Farbscanner,) showde (colour scanner,) showen xre dx add yre dy add ydy 3 mul add moveto TBK (Hardware) showde (hardware) showen xre dx add yre dy add ydy 4 mul add moveto TK (analog -> digital) show xre dx add yre dy add ydy 5 mul add moveto TBK (Bildprozess) showde (image process) showen %************************************* /xre 1050 def /yre -0900 def /xyw 1850 def 1 setgray xre yre moveto xyw 0 rlineto 0 xyw rlineto xyw neg 0 rlineto closepath fill 0 setgray xre yre moveto xyw 0 rlineto 0 xyw rlineto xyw neg 0 rlineto closepath stroke xre dx add yre dy add moveto TBIK (rgb -> rgb*) show xre dx add yre dy add ydy 1 mul add moveto TK (Tabelle / \344hnlich) showde (table or similar) showen xre dx add yre dy add ydy 2 mul add moveto TIK (ICC Look_Up) show xre dx add yre dy add ydy 3 mul add moveto TBK (Software) showde (software) showen xre dx add yre dy add ydy 4 mul add moveto TK (digital -> digital) show xre dx add yre dy add ydy 5 mul add moveto TBK (Bildprozess) showde (image process) showen xt3 neg yt3 neg translate %************************************************************************* showpage grestore %%Trailer