%!PS-Adobe-3.0 EPSF-3.0 CGT40-7N %%BoundingBox: 70 83 340 335 %START PDFDE011.EPS /pdfmark07 where {pop} {userdict /pdfmark07 /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/CGT4/CGT4.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, colour vision) /Creator (klaus.richter@mac.com) /CreationDate (D:2022060112000) /ModDate (D:2022060112000) /DOCINFO pdfmark07 [ /View [ /FitB ] /DOCVIEW pdfmark07 %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 /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 {160 /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 /RVV {120 /Times-Roman 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 %%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 1 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 5 /Times-ISOL1 FS 72 85 moveto (CGT40-7N) show 72 90 translate gsave 0.010 MM dup scale /yhoe 8500 def /xwidth 09400 def 15 setlinewidth 0.0 0.0 1.0 0.0 setcmyk_olvcolor 0 0 moveto xwidth 0 rlineto 0 yhoe rlineto xwidth neg 0 rlineto closepath fill 0.0 0.0 0.0 1.0 setcmyk_olvcolor 0 0 moveto xwidth 0 rlineto 0 yhoe rlineto xwidth neg 0 rlineto closepath stroke %line under title 0 yhoe 400 sub moveto xwidth 0 rlineto stroke grestore 0.014 MM dup scale /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 yhoe 550 sub def /yhoe2 yhoe 1250 sub def %Titeltext TBK S1 5670 175 add moveto (ISO colour file and loop: ) showen (file -> print -> scan -> file) showen (ISO\255Farbdatei und Schleife: ) showde (Datei ->Druck ->Scan ->Datei) showde /s9o16 0 def TS S1 5670 100 sub moveto s9o16 0 eq {%s9o16=0 (use ISO file with 729 (=9x9x9) colours, ) showea (and with 16 step grey scales:) showea (benutze ISO\255Datei mit 729(=9x9x9) Farben ) showde (und mit 16stufigen Grauskalen:) showde } {%s9o19=1 (use ISO file with 16 step colour scales: ) showea (W_R(O), W_G(L), W_B(V), W_N) showea (benutze ISO\255Datei mit 16stufigen ) showde (Farbreihen: W_R(O), W_G(L), W_B(V) W_N) showde } ifelse S1 5670 350 sub moveto RS 0 0 1 setrgbcolor s9o16 0 eq {%s9o16=0 (http://standards.iso.org/iso/9241/306/ed-2/AE49/AE49F0PX_CY8_1.PDF) showen (http://standards.iso.org/iso/9241/306/ed-2/AG49/AG49F0PX_CY8_1.PDF) showde } {%s9o19=1 (http://standards.iso.org/iso-iec/15775/ed-2/en/Test_Chart_4.PDF) showea (http://standards.iso.org/iso-iec/15775/ed-2/en/Test_Chart_4.PDF) showde } ifelse 0 setgray /y1h 5000 def /yshd 0250 def 0 0 1 setrgbcolor S1 y1h moveto TBK (ISO colour file, and ) showen (ISO\255Farbatei und) showde S1 y1h yshd sub moveto TBIK (OLM16) show TBK ( method for) showen (\255Methode f\374r) showde S1 y1h yshd 2 mul sub moveto TBK (device output) showen (Ger\344teausgabe\255) showde S1 y1h yshd 3 mul sub moveto TBK (linearization) showen (Linearisierung) showde 0 setgray /y2h 1000 def /yshd 0250 def 1 0 0 setrgbcolor S1 y2h moveto TBK (visueller Test: ) showde (visual test: ) showea TK (gleiche) showde (equal) showea %TK %(Elementarbuntton (J/N)?) showde %(elementary hue (Y/N)?) showea S1 y2h yshd sub moveto (relative Stufung (J/N)?) showde (relative spacing (Y/N)?) showea TK S1 y2h yshd 2 mul sub moveto s9o16 0 eq {%s9o16=0 (Benutze Farben in) showde (use colours in) showea } {%s9o19=1 (Benutze die 16stufigen) showde (use the 16 step colour) showea } ifelse S1 y2h yshd 3 mul sub moveto s9o16 0 eq {%s9o16=0 (Spalte) showde (colum) showea TBIK ( b) show TK ( bis ) showde ( to ) showea TBIK (j) show TK } {%s9o19=1 (Farbreihen in Bild D4) showde (series in Picture D4) showea } ifelse 0 setgray %************************************************************************* /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 067 cos mul -50 add 2000 067 sin mul 100 add moveto TBIM (rgb*) show /lwin 0130 def 2000 lwin cos mul 2000 lwin sin mul moveto 140 030 rlineto stroke 2000 lwin cos mul 2000 lwin sin mul moveto 060 170 rlineto stroke 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 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 (Farbdisplay) showde (colour display) 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 /iout 0 def iout 1 eq {%iout=1 /xpo4 5100 def /ypo4 5100 def xpo4 ypo4 moveto TV (Literatur f\374r Ein\255 und Ausgabelinearisierung) showde (Literature for input and output linearization) showen xpo4 ypo4 200 sub moveto TIV (Richter, K., ) show TV (Output Linearisation Method) show xpo4 ypo4 400 sub moveto TIV (OLM16 ) show TV (for Displays, Offset, and Printers) show (, siehe) showde (, see) showen xpo4 ypo4 600 sub moveto RV 0 0 1 setrgbcolor (http://color.li.tu-berlin.de/OUTLIN16_01.PDF) show 0 setgray TV xpo4 ypo4 800 sub moveto (similar to CIE R8\25509:2016 (for CIE members)) showen (\344hnlich CIE R8\25509:2016 (f\374r CIE\255Mitglieder)) showde /xpo5 4500 def /ypo5 0700 def xpo5 ypo5 moveto TV (ISO files with equally spaced color scales:) showen (ISO\255Dateien mit gleichabst\344ndige Farbskalen:) showde 0 0 1 setrgbcolor RV xpo5 ypo5 200 sub moveto (http://standards.iso.org/iso/9241/306/ed-2/index.html) show xpo5 ypo5 400 sub moveto (http://standards.iso.org/iso-iec/15775/ed-2/en/index.html) show 0 setgray } if %iout=1 %************************************************************************* showpage grestore %%Trailer