%!PS-Adobe-3.0 EPSF-3.0 LG990-3N.EPS, De140-3N.EPS
%%BoundingBox: 70 82 420 330

%START PDFDE011.EPS
/pdfmark17 where {pop} {userdict /pdfmark17 /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: Image Technology)
  /Author (compare K. Richter "Computergrafik ...": ISBN 3-8007-1775-1)
  /Subject (goto: http://www.ps.bam.de or http://130.149.60.445/~farbmetrik)
  /Keywords (image reproduction, colour devices)
  /Creator (klaus.richter@mac.com)
  /CreationDate (D:2011030112000)
  /ModDate (D:2011030112000)
/DOCINFO pdfmark17
[ /View [ /FitB ]
/DOCVIEW pdfmark17
%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

/TK {250 /Times-ISOL1 FS} bind def
/TM {300 /Times-ISOL1 FS} bind def
/TG {350 /Times-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

/TBK {250 /TimesB-ISOL1 FS} bind def
/TBM {300 /TimesB-ISOL1 FS} bind def
/TBG {350 /TimesB-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

%***********************************************************

/nshow {300 /Times-ISOL1 FS  show} bind def
/kshow {300 /TimesI-ISOL1 FS  show} bind def
/bshow {300 /TimesB-ISOL1 FS  show} bind def
/jshow {300 /TimesBI-ISOL1 FS  show} bind def
/sshow {300 /Symbol FS  show} bind def
/ishow {220 /Times-ISOL1 FS -00 -50 rmoveto show 00 50 rmoveto} bind def
/eshow {220 /Times-ISOL1 FS 0 100 rmoveto show 0 -100 rmoveto} bind def


/cvishow {0.5 add cvi 6 string cvs show} def
/cvsshow1 {0.05 add 10 mul cvi 0.1 mul 7 string cvs show} def
/cvsshow2 {0.005 add 100 mul cvi 0.01 mul 7 string cvs show} def
/cvsshow3 {0.0005 add 1000 mul cvi 0.001 mul 7 string cvs show} def

%%EndProlog
gsave

/lanind 1 def
/lantex [(G) (E) (S) (N) (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
/showm {6 lanind eq {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
      
/xchartg where {pop /xchart   xchartg def} {/xchart   0 def} ifelse
/xcolorg where {pop /xcolor   xcolorg def} {/xcolor   0 def} ifelse

72 90 translate

0.01 MM dup scale

gsave

20 setlinewidth
1.0 setgray
0 0 moveto 12000 0 rlineto 0 8200 rlineto
          -12000 0 rlineto closepath fill

0.0 setgray
0 0 moveto 12000 0 rlineto 0 8200 rlineto
          -12000 0 rlineto closepath stroke

TM
00100 -240 moveto (Teil 3) showde (Part 3) showen
9000 -240 moveto (LG991-3, De140-3) show

/y0 7800 def
/yd 320 def
330 /TimesB-ISOL1 FS
100 y0 moveto
(Equality of 5 step colour series by two definitions (Yes/No decision)) showen
(Gleichheit von 5\255stufigen Farbreihen mit zwei Definitionen) showde
( (Ja/Nein\255Entscheidung)) showde

TM
400 y0 yd 1.1 mul sub moveto
(Layoutbeispiel: drei 5\255stufige Farbreihen) showde
(Layout example: three 5 step colour series) showen
TBM 1 0 0 setrgbcolor
( Any printer and application FF_CM) showen
( Jeder Drucker und Anwendung FF_CM) showde
TM 0 setgray

TM
6000 y0 yd 2.0 mul sub moveto
(There are 3 basic colours on each page:) showen
(Es gibt drei Grundfarben auf jeder Seite:) showde
TIM ( N, W, X.) show TM
6000 y0 yd 3.1 mul sub moveto
(Ten pages include 10 hue planes) showen
(Zehn Seiten enthalten 10 Bunttonebenen) showde
6000 y0 yd 4.1 mul sub moveto
(X = OYLCVM and RJGB.) showen
(X = OYLCVM und RJGB.) showde

6000 y0 yd 5.2 mul sub moveto
(Any colour is defined by two different) showen
(Jede Farbe ist definiert durch zwei ver\255) showde
6000 y0 yd 6.2 mul sub moveto
(PS\255operators in center and surround field.) showen
(schiedene PS\255Operatoren im In\255 und Umfeld.) showde

6000 y0 yd 7.3 mul sub moveto
TBM 1 0 0 setrgbcolor
(FF_CM with PS test chart 1) showen
(FF_CM mit PS\255Pr\374fvorlage 1) showde
TBIM ( \050rgb -> rgb) show
TBK 0 -30 rmoveto (d) show 0 30 rmoveto TBIM
(\051 ) show TBM

6000 y0 yd 8.3 mul sub moveto
(according to DIN 33872-4, file -> printer) showen
(nach DIN 33872-4, Datei -> Drucker) showde
TM 0 setgray



/xp  1800 def
/yp  7200 def
xp 1300 sub yp 200 sub moveto
(White W) showen
(Wei\337 W) showde
xp 2100 add yp 1100 sub moveto
(Chromatic X) showen
(Bunt X) showde
xp 1400 sub yp 2000 sub moveto
(    Black N) showen
(Schwarz N) showde

xp yp 2000 sub moveto 2000 1000 rlineto -2000 1000 rlineto closepath stroke
TM
xp 1000 add yp 0350 sub moveto (5 steps) showen 
                               (5 Stufen) showde
xp 1000 add yp 1850 sub moveto (5 steps) showen
                               (5 Stufen) showde
xp 1300 sub yp 1200 sub moveto (5 steps) showen (5 Stufen) showde

/xpN xp def
/ypN yp 2000 sub def
/xpW xp def
/ypW yp def
/xpC xp 2000 add def
/ypC yp 1000 sub def

newpath
/xm 2000 4 div def
1 setgray %White W
0 1 04 {/i exch def
       /xi xp def
       /yi ypN xm i mul add def
       xi yi 050 0 360 arc fill
       /xi xp xm i mul add def
       /yi ypN xm 0.5 mul i mul add def
       xi yi 050 0 360 arc fill
       /xi xpC xm i mul sub def
       /yi ypC xm 0.5 mul i mul add def
       xi yi 050 0 360 arc fill
      } for
0 setgray %Black N
0 1 04 {/i exch def
       /xi xp def
       /yi ypN xm i mul add def
       xi yi 050 0 360 arc stroke
       xi yi 010 0 360 arc fill
       /xi xp xm i mul add def
       /yi ypN xm 0.5 mul i mul add def
       xi yi 050 0 360 arc stroke
       xi yi 010 0 360 arc fill
       /xi xpC xm i mul sub def
       /yi ypC xm 0.5 mul i mul add def
       xi yi 050 0 360 arc stroke
       xi yi 010 0 360 arc fill
      } for

/yd0 04850 def
100 yd0 moveto
TBM (All) showen (Alle) showde
TM
( colours of the three series N-W, W-X and X-N should equal on) showen
( Farben der drei Serien N-W, W-X and X-N sollten auf) showde
TBM ( all) showen TM ( pages) showen
TBM ( allen) showde TM ( Seiten gleich sein) showde

/yt0 03800 def
/x00 00100 def
/x10 00900 def
/x01 10100 def
/x20 10900 def

TBM
50 setlinewidth
x00 yt0 yd 2.2 mul add moveto
(Are the center and surround field colours equal on all pages?) showen
(Sind die In\255 und Umfeldfarben auf allen Seiten gleich?) showde
TBM
x00 8900 add yt0 yd 2.2 mul add moveto
(underline:  Yes/No) showen
(unterstreiche: Ja/Nein) showde
%Yes/Ja
lanind 1 eq {1 0 0 setrgbcolor  -900 -60 rmoveto 450 0 rlineto stroke 0 setgray
            }
            {1 0 0 setrgbcolor  -950 -60 rmoveto 300 0 rlineto stroke 0 setgray
            } ifelse

%No/Nein
%lanind 1 eq {1 0 0 setrgbcolor -400 -60 rmoveto 400 0 rlineto stroke 0 setgray
%            }
%            {1 0 0 setrgbcolor -600 -60 rmoveto 600 0 rlineto stroke 0 setgray
%            } ifelse

TBM
x00 yt0 yd 1 mul add moveto
(only if No:) showen
(Nur falls Nein:) showde
TBM 1 0 0 setrgbcolor
( inapplicable) showen
( entf\344llt) showde
(, use: http://130.149.60.45/~farbmetrik/OE01/OE01LMNA.PDF) showen
(, benutze: http://130.149.60.45/~farbmetrik/OG01/OG01LMNA.PDF) showde
x00 6000 add yt0 yd 0 mul add moveto
((Application of FF_CM, pages 11-22)) showen
((Anwendung von FF_CM, Seiten 11-22)) showde
TM 0 setgray

TM
x10 yt0 yd 0 mul sub moveto
(How many of the 3x4=12 steps are equal?) showen
(Wieviel der 3x4=12 Stufen sind gleich?) showde

x10 yt0 yd 1 mul sub moveto
(Page   1: equal are out of 12 steps:) showen
( ......... steps of O = Orange red) showen
(Seite   1: gleich sind von 12 Stufen:) showde
( ......... Stufen von O = Orangerot) showde

x10 yt0 yd 2 mul sub moveto
(Page   2: equal are out of 12 steps:) showen
( ......... steps of Y = Yellow) showen
(Seite   2: gleich sind von 12 Stufen:) showde
( ......... Stufen von Y = Gelb) showde

x10 yt0 yd 3 mul sub moveto
(Page   3: equal are out of 12 steps:) showen
( ......... steps of L = Leaf green) showen
(Seite   3: gleich sind von 12 Stufen:) showde
( ......... Stufen von L = Laubgr\374n) showde

x10 yt0 yd 4 mul sub moveto
(Page   4: equal are out of 12 steps:) showen
( ......... steps of C = Cyan blue) showen
(Seite   4: gleich sind von 12 Stufen:) showde
( ......... Stufen von C = Cyanblau) showde

x10 yt0 yd 5 mul sub moveto
(Page   5: equal are out of 12 steps:) showen
( ......... steps of V = Violet blue) showen
(Seite   5: gleich sind von 12 Stufen:) showde
( ......... Stufen von V = Violettblau) showde

x10 yt0 yd 6 mul sub moveto
(Page   6: equal are out of 12 steps:) showen
( ......... steps of M = Magenta red) showen
(Seite   6: gleich sind von 12 Stufen:) showde
( ......... Stufen von M = Magentarot) showde

x10 yt0 yd 7 mul sub moveto
(Page   7: equal are out of 12 steps:) showen
( ......... steps of R = Elementary Red) showen
(Seite   7: gleich sind von 12 Stufen:) showde
( ......... Stufen von R = Elementarrot) showde

x10 yt0 yd 8 mul sub moveto
(Page   8: equal are out of 12 steps:) showen
( ......... steps of J = Elementary Yellow) showen
(Seite   8: gleich sind von 12 Stufen:) showde
( ......... Stufen von J = Elementargelb) showde

x10 yt0 yd 9 mul sub moveto
(Page   9: equal are out of 12 steps:) showen
( ......... steps of G = Elementary Green) showen
(Seite   9: gleich sind von 12 Stufen:) showde
( ......... Stufen von G = Elementargr\374n) showde

x10 yt0 yd 10 mul sub moveto
(Page 10: equal are out of 12 steps:) showen
( ......... steps of B = Elementary Blue) showen
(Seite 10: gleich sind von 12 Stufen:) showde
( ......... Stufen von B = Elementarblau) showde

x00 yt0 yd 10.6 mul sub moveto
(----------------------------------------------------) show

x00 yt0 yd 11.3 mul sub moveto
(Sum: Of the given 3x4x10=120 steps) showen
( ......... steps are equal) showen
(Summe: Von gegebenen 3x4x10=120 Stufen sind) showde
( ......... Stufen gleich) showde

showpage
grestore

%%Trailer