research/transmission_spectroscopy/18-1-12/data_files2/processed/Plots/glass_transmission.plt.eps

   1 %!PS-Adobe-2.0
   2 %%Title: glass_transmission.plt.eps
   3 %%Creator: gnuplot 4.4 patchlevel 3
   4 %%CreationDate: Mon Oct 15 16:09:26 2012
   5 %%DocumentFonts: (atend)
   6 %%BoundingBox: 50 50 554 770
   7 %%Orientation: Landscape
   8 %%Pages: (atend)
   9 %%EndComments
  10 %%BeginProlog
  11 /gnudict 256 dict def
  12 gnudict begin
  13 %
  14 % The following true/false flags may be edited by hand if desired.
  15 % The unit line width and grayscale image gamma correction may also be changed.
  16 %
  17 /Color true def
  18 /Blacktext false def
  19 /Solid false def
  20 /Dashlength 1 def
  21 /Landscape true def
  22 /Level1 false def
  23 /Rounded false def
  24 /ClipToBoundingBox false def
  25 /TransparentPatterns false def
  26 /gnulinewidth 5.000 def
  27 /userlinewidth gnulinewidth def
  28 /Gamma 1.0 def
  29 %
  30 /vshift -46 def
  31 /dl1 {
  32   10.0 Dashlength mul mul
  33   Rounded { currentlinewidth 0.75 mul sub dup 0 le { pop 0.01 } if } if
  34 } def
  35 /dl2 {
  36   10.0 Dashlength mul mul
  37   Rounded { currentlinewidth 0.75 mul add } if
  38 } def
  39 /hpt_ 31.5 def
  40 /vpt_ 31.5 def
  41 /hpt hpt_ def
  42 /vpt vpt_ def
  43 Level1 {} {
  44 /SDict 10 dict def
  45 systemdict /pdfmark known not {
  46   userdict /pdfmark systemdict /cleartomark get put
  47 } if
  48 SDict begin [
  49   /Title (glass_transmission.plt.eps)
  50   /Subject (gnuplot plot)
  51   /Creator (gnuplot 4.4 patchlevel 3)
  52   /Author (sam)
  53 %  /Producer (gnuplot)
  54 %  /Keywords ()
  55   /CreationDate (Mon Oct 15 16:09:26 2012)
  56   /DOCINFO pdfmark
  57 end
  58 } ifelse
  59 /doclip {
  60   ClipToBoundingBox {
  61     newpath 50 50 moveto 554 50 lineto 554 770 lineto 50 770 lineto closepath
  62     clip
  63   } if
  64 } def
  65 %
  66 % Gnuplot Prolog Version 4.4 (August 2010)
  67 %
  68 %/SuppressPDFMark true def
  69 %
  70 /M {moveto} bind def
  71 /L {lineto} bind def
  72 /R {rmoveto} bind def
  73 /V {rlineto} bind def
  74 /N {newpath moveto} bind def
  75 /Z {closepath} bind def
  76 /C {setrgbcolor} bind def
  77 /f {rlineto fill} bind def
  78 /g {setgray} bind def
  79 /Gshow {show} def   % May be redefined later in the file to support UTF-8
  80 /vpt2 vpt 2 mul def
  81 /hpt2 hpt 2 mul def
  82 /Lshow {currentpoint stroke M 0 vshift R
  83         Blacktext {gsave 0 setgray show grestore} {show} ifelse} def
  84 /Rshow {currentpoint stroke M dup stringwidth pop neg vshift R
  85         Blacktext {gsave 0 setgray show grestore} {show} ifelse} def
  86 /Cshow {currentpoint stroke M dup stringwidth pop -2 div vshift R
  87         Blacktext {gsave 0 setgray show grestore} {show} ifelse} def
  88 /UP {dup vpt_ mul /vpt exch def hpt_ mul /hpt exch def
  89   /hpt2 hpt 2 mul def /vpt2 vpt 2 mul def} def
  90 /DL {Color {setrgbcolor Solid {pop []} if 0 setdash}
  91  {pop pop pop 0 setgray Solid {pop []} if 0 setdash} ifelse} def
  92 /BL {stroke userlinewidth 2 mul setlinewidth
  93         Rounded {1 setlinejoin 1 setlinecap} if} def
  94 /AL {stroke userlinewidth 2 div setlinewidth
  95         Rounded {1 setlinejoin 1 setlinecap} if} def
  96 /UL {dup gnulinewidth mul /userlinewidth exch def
  97         dup 1 lt {pop 1} if 10 mul /udl exch def} def
  98 /PL {stroke userlinewidth setlinewidth
  99         Rounded {1 setlinejoin 1 setlinecap} if} def
 100 3.8 setmiterlimit
 101 % Default Line colors
 102 /LCw {1 1 1} def
 103 /LCb {0 0 0} def
 104 /LCa {0 0 0} def
 105 /LC0 {1 0 0} def
 106 /LC1 {0 1 0} def
 107 /LC2 {0 0 1} def
 108 /LC3 {1 0 1} def
 109 /LC4 {0 1 1} def
 110 /LC5 {1 1 0} def
 111 /LC6 {0 0 0} def
 112 /LC7 {1 0.3 0} def
 113 /LC8 {0.5 0.5 0.5} def
 114 % Default Line Types
 115 /LTw {PL [] 1 setgray} def
 116 /LTb {BL [] LCb DL} def
 117 /LTa {AL [1 udl mul 2 udl mul] 0 setdash LCa setrgbcolor} def
 118 /LT0 {PL [] LC0 DL} def
 119 /LT1 {PL [4 dl1 2 dl2] LC1 DL} def
 120 /LT2 {PL [2 dl1 3 dl2] LC2 DL} def
 121 /LT3 {PL [1 dl1 1.5 dl2] LC3 DL} def
 122 /LT4 {PL [6 dl1 2 dl2 1 dl1 2 dl2] LC4 DL} def
 123 /LT5 {PL [3 dl1 3 dl2 1 dl1 3 dl2] LC5 DL} def
 124 /LT6 {PL [2 dl1 2 dl2 2 dl1 6 dl2] LC6 DL} def
 125 /LT7 {PL [1 dl1 2 dl2 6 dl1 2 dl2 1 dl1 2 dl2] LC7 DL} def
 126 /LT8 {PL [2 dl1 2 dl2 2 dl1 2 dl2 2 dl1 2 dl2 2 dl1 4 dl2] LC8 DL} def
 127 /Pnt {stroke [] 0 setdash gsave 1 setlinecap M 0 0 V stroke grestore} def
 128 /Dia {stroke [] 0 setdash 2 copy vpt add M
 129   hpt neg vpt neg V hpt vpt neg V
 130   hpt vpt V hpt neg vpt V closepath stroke
 131   Pnt} def
 132 /Pls {stroke [] 0 setdash vpt sub M 0 vpt2 V
 133   currentpoint stroke M
 134   hpt neg vpt neg R hpt2 0 V stroke
 135  } def
 136 /Box {stroke [] 0 setdash 2 copy exch hpt sub exch vpt add M
 137   0 vpt2 neg V hpt2 0 V 0 vpt2 V
 138   hpt2 neg 0 V closepath stroke
 139   Pnt} def
 140 /Crs {stroke [] 0 setdash exch hpt sub exch vpt add M
 141   hpt2 vpt2 neg V currentpoint stroke M
 142   hpt2 neg 0 R hpt2 vpt2 V stroke} def
 143 /TriU {stroke [] 0 setdash 2 copy vpt 1.12 mul add M
 144   hpt neg vpt -1.62 mul V
 145   hpt 2 mul 0 V
 146   hpt neg vpt 1.62 mul V closepath stroke
 147   Pnt} def
 148 /Star {2 copy Pls Crs} def
 149 /BoxF {stroke [] 0 setdash exch hpt sub exch vpt add M
 150   0 vpt2 neg V hpt2 0 V 0 vpt2 V
 151   hpt2 neg 0 V closepath fill} def
 152 /TriUF {stroke [] 0 setdash vpt 1.12 mul add M
 153   hpt neg vpt -1.62 mul V
 154   hpt 2 mul 0 V
 155   hpt neg vpt 1.62 mul V closepath fill} def
 156 /TriD {stroke [] 0 setdash 2 copy vpt 1.12 mul sub M
 157   hpt neg vpt 1.62 mul V
 158   hpt 2 mul 0 V
 159   hpt neg vpt -1.62 mul V closepath stroke
 160   Pnt} def
 161 /TriDF {stroke [] 0 setdash vpt 1.12 mul sub M
 162   hpt neg vpt 1.62 mul V
 163   hpt 2 mul 0 V
 164   hpt neg vpt -1.62 mul V closepath fill} def
 165 /DiaF {stroke [] 0 setdash vpt add M
 166   hpt neg vpt neg V hpt vpt neg V
 167   hpt vpt V hpt neg vpt V closepath fill} def
 168 /Pent {stroke [] 0 setdash 2 copy gsave
 169   translate 0 hpt M 4 {72 rotate 0 hpt L} repeat
 170   closepath stroke grestore Pnt} def
 171 /PentF {stroke [] 0 setdash gsave
 172   translate 0 hpt M 4 {72 rotate 0 hpt L} repeat
 173   closepath fill grestore} def
 174 /Circle {stroke [] 0 setdash 2 copy
 175   hpt 0 360 arc stroke Pnt} def
 176 /CircleF {stroke [] 0 setdash hpt 0 360 arc fill} def
 177 /C0 {BL [] 0 setdash 2 copy moveto vpt 90 450 arc} bind def
 178 /C1 {BL [] 0 setdash 2 copy moveto
 179         2 copy vpt 0 90 arc closepath fill
 180         vpt 0 360 arc closepath} bind def
 181 /C2 {BL [] 0 setdash 2 copy moveto
 182         2 copy vpt 90 180 arc closepath fill
 183         vpt 0 360 arc closepath} bind def
 184 /C3 {BL [] 0 setdash 2 copy moveto
 185         2 copy vpt 0 180 arc closepath fill
 186         vpt 0 360 arc closepath} bind def
 187 /C4 {BL [] 0 setdash 2 copy moveto
 188         2 copy vpt 180 270 arc closepath fill
 189         vpt 0 360 arc closepath} bind def
 190 /C5 {BL [] 0 setdash 2 copy moveto
 191         2 copy vpt 0 90 arc
 192         2 copy moveto
 193         2 copy vpt 180 270 arc closepath fill
 194         vpt 0 360 arc} bind def
 195 /C6 {BL [] 0 setdash 2 copy moveto
 196         2 copy vpt 90 270 arc closepath fill
 197         vpt 0 360 arc closepath} bind def
 198 /C7 {BL [] 0 setdash 2 copy moveto
 199         2 copy vpt 0 270 arc closepath fill
 200         vpt 0 360 arc closepath} bind def
 201 /C8 {BL [] 0 setdash 2 copy moveto
 202         2 copy vpt 270 360 arc closepath fill
 203         vpt 0 360 arc closepath} bind def
 204 /C9 {BL [] 0 setdash 2 copy moveto
 205         2 copy vpt 270 450 arc closepath fill
 206         vpt 0 360 arc closepath} bind def
 207 /C10 {BL [] 0 setdash 2 copy 2 copy moveto vpt 270 360 arc closepath fill
 208         2 copy moveto
 209         2 copy vpt 90 180 arc closepath fill
 210         vpt 0 360 arc closepath} bind def
 211 /C11 {BL [] 0 setdash 2 copy moveto
 212         2 copy vpt 0 180 arc closepath fill
 213         2 copy moveto
 214         2 copy vpt 270 360 arc closepath fill
 215         vpt 0 360 arc closepath} bind def
 216 /C12 {BL [] 0 setdash 2 copy moveto
 217         2 copy vpt 180 360 arc closepath fill
 218         vpt 0 360 arc closepath} bind def
 219 /C13 {BL [] 0 setdash 2 copy moveto
 220         2 copy vpt 0 90 arc closepath fill
 221         2 copy moveto
 222         2 copy vpt 180 360 arc closepath fill
 223         vpt 0 360 arc closepath} bind def
 224 /C14 {BL [] 0 setdash 2 copy moveto
 225         2 copy vpt 90 360 arc closepath fill
 226         vpt 0 360 arc} bind def
 227 /C15 {BL [] 0 setdash 2 copy vpt 0 360 arc closepath fill
 228         vpt 0 360 arc closepath} bind def
 229 /Rec {newpath 4 2 roll moveto 1 index 0 rlineto 0 exch rlineto
 230         neg 0 rlineto closepath} bind def
 231 /Square {dup Rec} bind def
 232 /Bsquare {vpt sub exch vpt sub exch vpt2 Square} bind def
 233 /S0 {BL [] 0 setdash 2 copy moveto 0 vpt rlineto BL Bsquare} bind def
 234 /S1 {BL [] 0 setdash 2 copy vpt Square fill Bsquare} bind def
 235 /S2 {BL [] 0 setdash 2 copy exch vpt sub exch vpt Square fill Bsquare} bind def
 236 /S3 {BL [] 0 setdash 2 copy exch vpt sub exch vpt2 vpt Rec fill Bsquare} bind def
 237 /S4 {BL [] 0 setdash 2 copy exch vpt sub exch vpt sub vpt Square fill Bsquare} bind def
 238 /S5 {BL [] 0 setdash 2 copy 2 copy vpt Square fill
 239         exch vpt sub exch vpt sub vpt Square fill Bsquare} bind def
 240 /S6 {BL [] 0 setdash 2 copy exch vpt sub exch vpt sub vpt vpt2 Rec fill Bsquare} bind def
 241 /S7 {BL [] 0 setdash 2 copy exch vpt sub exch vpt sub vpt vpt2 Rec fill
 242         2 copy vpt Square fill Bsquare} bind def
 243 /S8 {BL [] 0 setdash 2 copy vpt sub vpt Square fill Bsquare} bind def
 244 /S9 {BL [] 0 setdash 2 copy vpt sub vpt vpt2 Rec fill Bsquare} bind def
 245 /S10 {BL [] 0 setdash 2 copy vpt sub vpt Square fill 2 copy exch vpt sub exch vpt Square fill
 246         Bsquare} bind def
 247 /S11 {BL [] 0 setdash 2 copy vpt sub vpt Square fill 2 copy exch vpt sub exch vpt2 vpt Rec fill
 248         Bsquare} bind def
 249 /S12 {BL [] 0 setdash 2 copy exch vpt sub exch vpt sub vpt2 vpt Rec fill Bsquare} bind def
 250 /S13 {BL [] 0 setdash 2 copy exch vpt sub exch vpt sub vpt2 vpt Rec fill
 251         2 copy vpt Square fill Bsquare} bind def
 252 /S14 {BL [] 0 setdash 2 copy exch vpt sub exch vpt sub vpt2 vpt Rec fill
 253         2 copy exch vpt sub exch vpt Square fill Bsquare} bind def
 254 /S15 {BL [] 0 setdash 2 copy Bsquare fill Bsquare} bind def
 255 /D0 {gsave translate 45 rotate 0 0 S0 stroke grestore} bind def
 256 /D1 {gsave translate 45 rotate 0 0 S1 stroke grestore} bind def
 257 /D2 {gsave translate 45 rotate 0 0 S2 stroke grestore} bind def
 258 /D3 {gsave translate 45 rotate 0 0 S3 stroke grestore} bind def
 259 /D4 {gsave translate 45 rotate 0 0 S4 stroke grestore} bind def
 260 /D5 {gsave translate 45 rotate 0 0 S5 stroke grestore} bind def
 261 /D6 {gsave translate 45 rotate 0 0 S6 stroke grestore} bind def
 262 /D7 {gsave translate 45 rotate 0 0 S7 stroke grestore} bind def
 263 /D8 {gsave translate 45 rotate 0 0 S8 stroke grestore} bind def
 264 /D9 {gsave translate 45 rotate 0 0 S9 stroke grestore} bind def
 265 /D10 {gsave translate 45 rotate 0 0 S10 stroke grestore} bind def
 266 /D11 {gsave translate 45 rotate 0 0 S11 stroke grestore} bind def
 267 /D12 {gsave translate 45 rotate 0 0 S12 stroke grestore} bind def
 268 /D13 {gsave translate 45 rotate 0 0 S13 stroke grestore} bind def
 269 /D14 {gsave translate 45 rotate 0 0 S14 stroke grestore} bind def
 270 /D15 {gsave translate 45 rotate 0 0 S15 stroke grestore} bind def
 271 /DiaE {stroke [] 0 setdash vpt add M
 272   hpt neg vpt neg V hpt vpt neg V
 273   hpt vpt V hpt neg vpt V closepath stroke} def
 274 /BoxE {stroke [] 0 setdash exch hpt sub exch vpt add M
 275   0 vpt2 neg V hpt2 0 V 0 vpt2 V
 276   hpt2 neg 0 V closepath stroke} def
 277 /TriUE {stroke [] 0 setdash vpt 1.12 mul add M
 278   hpt neg vpt -1.62 mul V
 279   hpt 2 mul 0 V
 280   hpt neg vpt 1.62 mul V closepath stroke} def
 281 /TriDE {stroke [] 0 setdash vpt 1.12 mul sub M
 282   hpt neg vpt 1.62 mul V
 283   hpt 2 mul 0 V
 284   hpt neg vpt -1.62 mul V closepath stroke} def
 285 /PentE {stroke [] 0 setdash gsave
 286   translate 0 hpt M 4 {72 rotate 0 hpt L} repeat
 287   closepath stroke grestore} def
 288 /CircE {stroke [] 0 setdash
 289   hpt 0 360 arc stroke} def
 290 /Opaque {gsave closepath 1 setgray fill grestore 0 setgray closepath} def
 291 /DiaW {stroke [] 0 setdash vpt add M
 292   hpt neg vpt neg V hpt vpt neg V
 293   hpt vpt V hpt neg vpt V Opaque stroke} def
 294 /BoxW {stroke [] 0 setdash exch hpt sub exch vpt add M
 295   0 vpt2 neg V hpt2 0 V 0 vpt2 V
 296   hpt2 neg 0 V Opaque stroke} def
 297 /TriUW {stroke [] 0 setdash vpt 1.12 mul add M
 298   hpt neg vpt -1.62 mul V
 299   hpt 2 mul 0 V
 300   hpt neg vpt 1.62 mul V Opaque stroke} def
 301 /TriDW {stroke [] 0 setdash vpt 1.12 mul sub M
 302   hpt neg vpt 1.62 mul V
 303   hpt 2 mul 0 V
 304   hpt neg vpt -1.62 mul V Opaque stroke} def
 305 /PentW {stroke [] 0 setdash gsave
 306   translate 0 hpt M 4 {72 rotate 0 hpt L} repeat
 307   Opaque stroke grestore} def
 308 /CircW {stroke [] 0 setdash
 309   hpt 0 360 arc Opaque stroke} def
 310 /BoxFill {gsave Rec 1 setgray fill grestore} def
 311 /Density {
 312   /Fillden exch def
 313   currentrgbcolor
 314   /ColB exch def /ColG exch def /ColR exch def
 315   /ColR ColR Fillden mul Fillden sub 1 add def
 316   /ColG ColG Fillden mul Fillden sub 1 add def
 317   /ColB ColB Fillden mul Fillden sub 1 add def
 318   ColR ColG ColB setrgbcolor} def
 319 /BoxColFill {gsave Rec PolyFill} def
 320 /PolyFill {gsave Density fill grestore grestore} def
 321 /h {rlineto rlineto rlineto gsave closepath fill grestore} bind def
 322 %
 323 % PostScript Level 1 Pattern Fill routine for rectangles
 324 % Usage: x y w h s a XX PatternFill
 325 %       x,y = lower left corner of box to be filled
 326 %       w,h = width and height of box
 327 %         a = angle in degrees between lines and x-axis
 328 %        XX = 0/1 for no/yes cross-hatch
 329 %
 330 /PatternFill {gsave /PFa [ 9 2 roll ] def
 331   PFa 0 get PFa 2 get 2 div add PFa 1 get PFa 3 get 2 div add translate
 332   PFa 2 get -2 div PFa 3 get -2 div PFa 2 get PFa 3 get Rec
 333   gsave 1 setgray fill grestore clip
 334   currentlinewidth 0.5 mul setlinewidth
 335   /PFs PFa 2 get dup mul PFa 3 get dup mul add sqrt def
 336   0 0 M PFa 5 get rotate PFs -2 div dup translate
 337   0 1 PFs PFa 4 get div 1 add floor cvi
 338         {PFa 4 get mul 0 M 0 PFs V} for
 339   0 PFa 6 get ne {
 340         0 1 PFs PFa 4 get div 1 add floor cvi
 341         {PFa 4 get mul 0 2 1 roll M PFs 0 V} for
 342  } if
 343   stroke grestore} def
 344 %
 345 /languagelevel where
 346  {pop languagelevel} {1} ifelse
 347  2 lt
 348         {/InterpretLevel1 true def}
 349         {/InterpretLevel1 Level1 def}
 350  ifelse
 351 %
 352 % PostScript level 2 pattern fill definitions
 353 %
 354 /Level2PatternFill {
 355 /Tile8x8 {/PaintType 2 /PatternType 1 /TilingType 1 /BBox [0 0 8 8] /XStep 8 /YStep 8}
 356         bind def
 357 /KeepColor {currentrgbcolor [/Pattern /DeviceRGB] setcolorspace} bind def
 358 << Tile8x8
 359  /PaintProc {0.5 setlinewidth pop 0 0 M 8 8 L 0 8 M 8 0 L stroke}
 360 >> matrix makepattern
 361 /Pat1 exch def
 362 << Tile8x8
 363  /PaintProc {0.5 setlinewidth pop 0 0 M 8 8 L 0 8 M 8 0 L stroke
 364         0 4 M 4 8 L 8 4 L 4 0 L 0 4 L stroke}
 365 >> matrix makepattern
 366 /Pat2 exch def
 367 << Tile8x8
 368  /PaintProc {0.5 setlinewidth pop 0 0 M 0 8 L
 369         8 8 L 8 0 L 0 0 L fill}
 370 >> matrix makepattern
 371 /Pat3 exch def
 372 << Tile8x8
 373  /PaintProc {0.5 setlinewidth pop -4 8 M 8 -4 L
 374         0 12 M 12 0 L stroke}
 375 >> matrix makepattern
 376 /Pat4 exch def
 377 << Tile8x8
 378  /PaintProc {0.5 setlinewidth pop -4 0 M 8 12 L
 379         0 -4 M 12 8 L stroke}
 380 >> matrix makepattern
 381 /Pat5 exch def
 382 << Tile8x8
 383  /PaintProc {0.5 setlinewidth pop -2 8 M 4 -4 L
 384         0 12 M 8 -4 L 4 12 M 10 0 L stroke}
 385 >> matrix makepattern
 386 /Pat6 exch def
 387 << Tile8x8
 388  /PaintProc {0.5 setlinewidth pop -2 0 M 4 12 L
 389         0 -4 M 8 12 L 4 -4 M 10 8 L stroke}
 390 >> matrix makepattern
 391 /Pat7 exch def
 392 << Tile8x8
 393  /PaintProc {0.5 setlinewidth pop 8 -2 M -4 4 L
 394         12 0 M -4 8 L 12 4 M 0 10 L stroke}
 395 >> matrix makepattern
 396 /Pat8 exch def
 397 << Tile8x8
 398  /PaintProc {0.5 setlinewidth pop 0 -2 M 12 4 L
 399         -4 0 M 12 8 L -4 4 M 8 10 L stroke}
 400 >> matrix makepattern
 401 /Pat9 exch def
 402 /Pattern1 {PatternBgnd KeepColor Pat1 setpattern} bind def
 403 /Pattern2 {PatternBgnd KeepColor Pat2 setpattern} bind def
 404 /Pattern3 {PatternBgnd KeepColor Pat3 setpattern} bind def
 405 /Pattern4 {PatternBgnd KeepColor Landscape {Pat5} {Pat4} ifelse setpattern} bind def
 406 /Pattern5 {PatternBgnd KeepColor Landscape {Pat4} {Pat5} ifelse setpattern} bind def
 407 /Pattern6 {PatternBgnd KeepColor Landscape {Pat9} {Pat6} ifelse setpattern} bind def
 408 /Pattern7 {PatternBgnd KeepColor Landscape {Pat8} {Pat7} ifelse setpattern} bind def
 409 } def
 410 %
 411 %
 412 %End of PostScript Level 2 code
 413 %
 414 /PatternBgnd {
 415   TransparentPatterns {} {gsave 1 setgray fill grestore} ifelse
 416 } def
 417 %
 418 % Substitute for Level 2 pattern fill codes with
 419 % grayscale if Level 2 support is not selected.
 420 %
 421 /Level1PatternFill {
 422 /Pattern1 {0.250 Density} bind def
 423 /Pattern2 {0.500 Density} bind def
 424 /Pattern3 {0.750 Density} bind def
 425 /Pattern4 {0.125 Density} bind def
 426 /Pattern5 {0.375 Density} bind def
 427 /Pattern6 {0.625 Density} bind def
 428 /Pattern7 {0.875 Density} bind def
 429 } def
 430 %
 431 % Now test for support of Level 2 code
 432 %
 433 Level1 {Level1PatternFill} {Level2PatternFill} ifelse
 434 %
 435 /Symbol-Oblique /Symbol findfont [1 0 .167 1 0 0] makefont
 436 dup length dict begin {1 index /FID eq {pop pop} {def} ifelse} forall
 437 currentdict end definefont pop
 438 end
 439 %%EndProlog
 440 %%Page: 1 1
 441 gnudict begin
 442 gsave
 443 doclip
 444 50 50 translate
 445 0.100 0.100 scale
 446 90 rotate
 447 0 -5040 translate
 448 0 setgray
 449 newpath
 450 (Helvetica) findfont 140 scalefont setfont
 451 1.000 UL
 452 LTb
 453 770 448 M
 454 63 0 V
 455 6044 0 R
 456 -63 0 V
 457 686 448 M
 458 ( 0.9) Rshow
 459 1.000 UL
 460 LTb
 461 770 1080 M
 462 63 0 V
 463 6044 0 R
 464 -63 0 V
 465 -6128 0 R
 466 ( 0.92) Rshow
 467 1.000 UL
 468 LTb
 469 770 1712 M
 470 63 0 V
 471 6044 0 R
 472 -63 0 V
 473 -6128 0 R
 474 ( 0.94) Rshow
 475 1.000 UL
 476 LTb
 477 770 2344 M
 478 63 0 V
 479 6044 0 R
 480 -63 0 V
 481 -6128 0 R
 482 ( 0.96) Rshow
 483 1.000 UL
 484 LTb
 485 770 2975 M
 486 63 0 V
 487 6044 0 R
 488 -63 0 V
 489 -6128 0 R
 490 ( 0.98) Rshow
 491 1.000 UL
 492 LTb
 493 770 3607 M
 494 63 0 V
 495 6044 0 R
 496 -63 0 V
 497 -6128 0 R
 498 ( 1) Rshow
 499 1.000 UL
 500 LTb
 501 770 4239 M
 502 63 0 V
 503 6044 0 R
 504 -63 0 V
 505 -6128 0 R
 506 ( 1.02) Rshow
 507 1.000 UL
 508 LTb
 509 770 4871 M
 510 63 0 V
 511 6044 0 R
 512 -63 0 V
 513 -6128 0 R
 514 ( 1.04) Rshow
 515 1.000 UL
 516 LTb
 517 1279 448 M
 518 0 63 V
 519 0 4360 R
 520 0 -63 V
 521 0 -4500 R
 522 ( 400) Cshow
 523 1.000 UL
 524 LTb
 525 2297 448 M
 526 0 63 V
 527 0 4360 R
 528 0 -63 V
 529 0 -4500 R
 530 ( 500) Cshow
 531 1.000 UL
 532 LTb
 533 3315 448 M
 534 0 63 V
 535 0 4360 R
 536 0 -63 V
 537 0 -4500 R
 538 ( 600) Cshow
 539 1.000 UL
 540 LTb
 541 4332 448 M
 542 0 63 V
 543 0 4360 R
 544 0 -63 V
 545 0 -4500 R
 546 ( 700) Cshow
 547 1.000 UL
 548 LTb
 549 5350 448 M
 550 0 63 V
 551 0 4360 R
 552 0 -63 V
 553 0 -4500 R
 554 ( 800) Cshow
 555 1.000 UL
 556 LTb
 557 6368 448 M
 558 0 63 V
 559 0 4360 R
 560 0 -63 V
 561 0 -4500 R
 562 ( 900) Cshow
 563 1.000 UL
 564 LTb
 565 1.000 UL
 566 LTb
 567 770 4871 N
 568 770 448 L
 569 6107 0 V
 570 0 4423 V
 571 -6107 0 V
 572 Z stroke
 573 LCb setrgbcolor
 574 112 2659 M
 575 currentpoint gsave translate -270 rotate 0 0 M
 576 (Transmission) Cshow
 577 grestore
 578 LTb
 579 LCb setrgbcolor
 580 7016 2659 M
 581 currentpoint gsave translate -270 rotate 0 0 M
 582 () Cshow
 583 grestore
 584 LTb
 585 LCb setrgbcolor
 586 3823 98 M
 587 (Wavelength \(nm\)) Cshow
 588 LTb
 589 3823 4801 M
 590 () Cshow
 591 LCb setrgbcolor
 592 3823 4800 M
 593 () Cshow
 594 LTb
 595 182 70 M
 596 () Lshow
 597 1.000 UP
 598 1.000 UL
 599 LTb
 600 % Begin plot #1
 601 1.000 UL
 602 LT0
 603 LCb setrgbcolor
 604 6226 4738 M
 605 (Glass) Rshow
 606 LT0
 607 6310 4738 M
 608 399 0 V
 609 770 3860 M
 610 1 3 V
 611 8 -18 V
 612 8 -195 V
 613 8 -343 V
 614 8 267 V
 615 8 -290 V
 616 8 171 V
 617 8 86 V
 618 8 -30 V
 619 8 214 V
 620 9 -118 V
 621 8 13 V
 622 8 202 V
 623 8 37 V
 624 8 99 V
 625 8 28 V
 626 8 -38 V
 627 8 68 V
 628 8 -42 V
 629 8 59 V
 630 8 -63 V
 631 8 69 V
 632 8 77 V
 633 8 -107 V
 634 8 39 V
 635 8 27 V
 636 8 0 V
 637 9 -77 V
 638 8 -33 V
 639 8 -9 V
 640 8 -68 V
 641 8 -55 V
 642 8 4 V
 643 8 -9 V
 644 8 -13 V
 645 8 -54 V
 646 8 4 V
 647 8 -12 V
 648 8 -12 V
 649 8 48 V
 650 8 -2 V
 651 8 67 V
 652 8 34 V
 653 8 36 V
 654 8 87 V
 655 8 47 V
 656 8 62 V
 657 8 17 V
 658 8 84 V
 659 8 64 V
 660 8 -45 V
 661 8 65 V
 662 8 55 V
 663 8 13 V
 664 9 15 V
 665 8 42 V
 666 8 27 V
 667 8 19 V
 668 8 -36 V
 669 8 32 V
 670 8 39 V
 671 8 -24 V
 672 8 23 V
 673 8 -9 V
 674 8 36 V
 675 8 0 V
 676 8 -18 V
 677 8 30 V
 678 8 -50 V
 679 8 -6 V
 680 8 52 V
 681 8 -54 V
 682 8 28 V
 683 8 -25 V
 684 8 -11 V
 685 8 70 V
 686 8 -55 V
 687 8 9 V
 688 8 -12 V
 689 8 -11 V
 690 8 -8 V
 691 8 -25 V
 692 8 2 V
 693 8 5 V
 694 8 -1 V
 695 8 -13 V
 696 8 -19 V
 697 8 32 V
 698 8 -34 V
 699 8 -8 V
 700 8 -4 V
 701 8 15 V
 702 8 -14 V
 703 8 -11 V
 704 8 22 V
 705 8 -18 V
 706 8 6 V
 707 8 23 V
 708 8 -9 V
 709 8 -17 V
 710 8 13 V
 711 8 -19 V
 712 stroke 1582 4402 M
 713 8 21 V
 714 8 -16 V
 715 8 -15 V
 716 8 24 V
 717 8 -10 V
 718 8 -13 V
 719 8 10 V
 720 8 -12 V
 721 8 27 V
 722 8 -18 V
 723 8 -3 V
 724 8 -12 V
 725 8 8 V
 726 8 -15 V
 727 8 -2 V
 728 8 40 V
 729 8 -14 V
 730 8 41 V
 731 8 -13 V
 732 8 13 V
 733 8 8 V
 734 8 8 V
 735 8 17 V
 736 8 -27 V
 737 8 17 V
 738 8 9 V
 739 8 1 V
 740 8 -3 V
 741 8 1 V
 742 8 25 V
 743 7 3 V
 744 9 22 V
 745 7 -2 V
 746 8 1 V
 747 8 13 V
 748 8 9 V
 749 8 -5 V
 750 8 -1 V
 751 8 24 V
 752 8 -3 V
 753 8 -2 V
 754 8 5 V
 755 8 -2 V
 756 8 -15 V
 757 8 14 V
 758 8 -4 V
 759 8 -1 V
 760 8 -2 V
 761 8 -8 V
 762 8 7 V
 763 8 9 V
 764 8 -14 V
 765 8 17 V
 766 8 1 V
 767 8 -1 V
 768 7 -2 V
 769 8 11 V
 770 8 -16 V
 771 8 7 V
 772 8 0 V
 773 8 4 V
 774 8 8 V
 775 8 7 V
 776 8 0 V
 777 8 9 V
 778 8 -5 V
 779 8 -4 V
 780 8 -2 V
 781 8 -5 V
 782 8 13 V
 783 8 4 V
 784 8 -9 V
 785 8 -12 V
 786 7 23 V
 787 8 -17 V
 788 8 13 V
 789 8 -16 V
 790 8 -1 V
 791 8 0 V
 792 8 -17 V
 793 8 17 V
 794 8 -8 V
 795 8 -4 V
 796 8 -9 V
 797 8 14 V
 798 8 20 V
 799 8 -11 V
 800 8 -3 V
 801 7 -5 V
 802 8 -5 V
 803 8 22 V
 804 8 -12 V
 805 8 3 V
 806 8 -7 V
 807 8 15 V
 808 8 -8 V
 809 8 -17 V
 810 8 -18 V
 811 8 0 V
 812 8 11 V
 813 8 5 V
 814 7 13 V
 815 8 -11 V
 816 8 19 V
 817 stroke 2409 4578 M
 818 8 -18 V
 819 8 4 V
 820 8 -16 V
 821 8 -10 V
 822 8 13 V
 823 8 -16 V
 824 8 12 V
 825 8 13 V
 826 7 -7 V
 827 8 10 V
 828 8 -7 V
 829 8 -10 V
 830 8 4 V
 831 8 -2 V
 832 8 -2 V
 833 8 -13 V
 834 8 -4 V
 835 8 -3 V
 836 7 5 V
 837 8 5 V
 838 8 -2 V
 839 8 -15 V
 840 8 2 V
 841 8 -5 V
 842 8 -14 V
 843 8 -7 V
 844 8 -7 V
 845 7 5 V
 846 8 -27 V
 847 8 5 V
 848 8 -16 V
 849 8 21 V
 850 8 -18 V
 851 8 5 V
 852 8 2 V
 853 8 -1 V
 854 7 -16 V
 855 8 6 V
 856 8 0 V
 857 8 0 V
 858 8 -10 V
 859 8 -2 V
 860 8 3 V
 861 8 -4 V
 862 8 -14 V
 863 7 6 V
 864 8 -13 V
 865 8 4 V
 866 8 -13 V
 867 8 -2 V
 868 8 -8 V
 869 8 -10 V
 870 8 -12 V
 871 7 3 V
 872 8 0 V
 873 8 -9 V
 874 8 -13 V
 875 8 0 V
 876 8 12 V
 877 8 -7 V
 878 7 1 V
 879 8 -5 V
 880 8 -15 V
 881 8 15 V
 882 8 -4 V
 883 8 -8 V
 884 8 -5 V
 885 8 -10 V
 886 7 7 V
 887 8 -6 V
 888 8 6 V
 889 8 -9 V
 890 8 -12 V
 891 8 -4 V
 892 7 -6 V
 893 8 -20 V
 894 8 21 V
 895 8 -5 V
 896 8 -20 V
 897 8 4 V
 898 8 -2 V
 899 7 -29 V
 900 8 21 V
 901 8 -14 V
 902 8 -4 V
 903 8 0 V
 904 8 -1 V
 905 8 -36 V
 906 7 3 V
 907 8 -7 V
 908 8 -12 V
 909 8 -8 V
 910 8 -23 V
 911 8 7 V
 912 7 -9 V
 913 8 -8 V
 914 8 0 V
 915 8 -12 V
 916 8 8 V
 917 8 -20 V
 918 7 -2 V
 919 8 -10 V
 920 8 -10 V
 921 8 -2 V
 922 stroke 3228 4120 M
 923 8 17 V
 924 8 -25 V
 925 7 13 V
 926 8 -7 V
 927 8 -14 V
 928 8 2 V
 929 8 -19 V
 930 8 4 V
 931 7 -15 V
 932 8 0 V
 933 8 -11 V
 934 8 0 V
 935 8 -23 V
 936 7 2 V
 937 8 -11 V
 938 8 -15 V
 939 8 -1 V
 940 8 -13 V
 941 8 14 V
 942 7 -17 V
 943 8 1 V
 944 8 -24 V
 945 8 1 V
 946 8 0 V
 947 7 -25 V
 948 8 8 V
 949 8 3 V
 950 8 -14 V
 951 8 15 V
 952 8 -24 V
 953 7 3 V
 954 8 -11 V
 955 8 -11 V
 956 8 -18 V
 957 8 -13 V
 958 7 -12 V
 959 8 -26 V
 960 8 -14 V
 961 8 -5 V
 962 8 9 V
 963 7 3 V
 964 8 7 V
 965 8 -26 V
 966 8 -13 V
 967 8 24 V
 968 7 9 V
 969 8 -15 V
 970 8 -4 V
 971 8 -8 V
 972 8 0 V
 973 7 -17 V
 974 8 -15 V
 975 8 10 V
 976 8 -24 V
 977 7 -11 V
 978 8 -11 V
 979 8 -13 V
 980 8 -7 V
 981 8 -15 V
 982 7 5 V
 983 8 2 V
 984 8 -31 V
 985 8 -2 V
 986 8 -6 V
 987 7 -21 V
 988 8 -9 V
 989 8 -17 V
 990 8 -13 V
 991 8 -6 V
 992 7 3 V
 993 8 13 V
 994 8 11 V
 995 8 -9 V
 996 7 1 V
 997 8 -8 V
 998 8 -5 V
 999 8 4 V
1000 7 -41 V
1001 8 -7 V
1002 8 -9 V
1003 8 -6 V
1004 7 -3 V
1005 8 2 V
1006 8 1 V
1007 8 -19 V
1008 8 7 V
1009 7 -16 V
1010 8 -5 V
1011 8 -8 V
1012 8 -32 V
1013 7 -2 V
1014 8 22 V
1015 8 -3 V
1016 8 -37 V
1017 7 9 V
1018 8 21 V
1019 8 -33 V
1020 8 -9 V
1021 7 -5 V
1022 8 -15 V
1023 8 21 V
1024 8 -26 V
1025 7 -9 V
1026 8 -11 V
1027 stroke 4038 3417 M
1028 8 -11 V
1029 8 -22 V
1030 7 27 V
1031 8 -35 V
1032 8 -5 V
1033 8 4 V
1034 7 -9 V
1035 8 -18 V
1036 8 -7 V
1037 8 15 V
1038 7 -24 V
1039 8 -17 V
1040 8 1 V
1041 8 -5 V
1042 7 -16 V
1043 8 -15 V
1044 8 -24 V
1045 8 7 V
1046 7 -8 V
1047 8 -25 V
1048 8 4 V
1049 7 -25 V
1050 8 -4 V
1051 8 5 V
1052 8 -3 V
1053 7 15 V
1054 8 -14 V
1055 8 -10 V
1056 8 -10 V
1057 7 -34 V
1058 8 -15 V
1059 8 -25 V
1060 7 -17 V
1061 8 -11 V
1062 8 -2 V
1063 8 -28 V
1064 7 -11 V
1065 8 -4 V
1066 8 -1 V
1067 7 -13 V
1068 8 -4 V
1069 8 -4 V
1070 8 -38 V
1071 7 4 V
1072 8 -1 V
1073 8 -5 V
1074 8 6 V
1075 7 -16 V
1076 8 -6 V
1077 8 -28 V
1078 7 12 V
1079 8 -18 V
1080 8 1 V
1081 7 -10 V
1082 8 2 V
1083 8 -5 V
1084 8 9 V
1085 7 -3 V
1086 8 -3 V
1087 8 -11 V
1088 7 -21 V
1089 8 -33 V
1090 8 -17 V
1091 8 14 V
1092 7 -19 V
1093 8 6 V
1094 8 -23 V
1095 7 -13 V
1096 8 9 V
1097 8 -23 V
1098 7 -8 V
1099 8 -5 V
1100 8 -11 V
1101 7 -34 V
1102 8 -5 V
1103 8 -21 V
1104 7 -9 V
1105 8 -2 V
1106 8 -9 V
1107 8 -6 V
1108 7 4 V
1109 8 1 V
1110 8 -20 V
1111 7 -10 V
1112 8 -13 V
1113 8 -23 V
1114 7 -6 V
1115 8 -21 V
1116 8 8 V
1117 7 -11 V
1118 8 0 V
1119 8 -13 V
1120 7 -3 V
1121 8 3 V
1122 8 28 V
1123 7 -19 V
1124 8 -33 V
1125 8 -17 V
1126 7 -4 V
1127 8 -18 V
1128 8 -9 V
1129 7 -16 V
1130 8 -22 V
1131 8 -13 V
1132 stroke 4840 2452 M
1133 7 4 V
1134 8 -2 V
1135 8 -16 V
1136 7 -12 V
1137 8 -15 V
1138 8 22 V
1139 7 -18 V
1140 8 -14 V
1141 8 -11 V
1142 7 -7 V
1143 8 -38 V
1144 8 2 V
1145 7 0 V
1146 8 -49 V
1147 8 -15 V
1148 7 1 V
1149 8 -8 V
1150 8 2 V
1151 7 14 V
1152 8 -12 V
1153 8 10 V
1154 7 -6 V
1155 8 -39 V
1156 7 5 V
1157 8 -25 V
1158 8 -4 V
1159 7 22 V
1160 8 -26 V
1161 8 -11 V
1162 7 -10 V
1163 8 -8 V
1164 8 -18 V
1165 7 11 V
1166 8 -6 V
1167 7 -34 V
1168 8 4 V
1169 8 -35 V
1170 7 2 V
1171 8 27 V
1172 8 1 V
1173 7 16 V
1174 8 -14 V
1175 8 19 V
1176 7 -46 V
1177 8 -29 V
1178 7 12 V
1179 8 -6 V
1180 8 -58 V
1181 7 -4 V
1182 8 -8 V
1183 8 -26 V
1184 7 20 V
1185 8 -28 V
1186 7 0 V
1187 8 -3 V
1188 8 18 V
1189 7 -34 V
1190 8 -36 V
1191 8 -32 V
1192 7 20 V
1193 8 -30 V
1194 7 15 V
1195 8 -10 V
1196 8 -12 V
1197 7 -30 V
1198 8 -2 V
1199 7 -5 V
1200 8 8 V
1201 8 -20 V
1202 7 -19 V
1203 8 20 V
1204 8 -28 V
1205 7 28 V
1206 8 23 V
1207 7 2 V
1208 8 14 V
1209 8 8 V
1210 7 16 V
1211 8 -28 V
1212 7 -26 V
1213 8 31 V
1214 7 -37 V
1215 8 0 V
1216 8 -25 V
1217 7 -25 V
1218 8 -9 V
1219 8 -39 V
1220 7 23 V
1221 8 -15 V
1222 7 -50 V
1223 8 4 V
1224 8 -20 V
1225 7 0 V
1226 8 -45 V
1227 7 -22 V
1228 8 -1 V
1229 7 11 V
1230 8 -44 V
1231 8 -3 V
1232 7 25 V
1233 8 -23 V
1234 7 -28 V
1235 8 -2 V
1236 7 -3 V
1237 stroke 5632 1548 M
1238 8 1 V
1239 8 -36 V
1240 7 24 V
1241 8 22 V
1242 7 -4 V
1243 8 6 V
1244 8 -1 V
1245 7 -7 V
1246 8 20 V
1247 7 -17 V
1248 8 -11 V
1249 7 -9 V
1250 8 -9 V
1251 8 9 V
1252 7 -16 V
1253 8 10 V
1254 7 -10 V
1255 8 -9 V
1256 7 -2 V
1257 8 5 V
1258 7 -44 V
1259 8 -17 V
1260 8 -11 V
1261 7 14 V
1262 8 -9 V
1263 7 16 V
1264 8 -16 V
1265 7 -2 V
1266 8 -14 V
1267 7 -16 V
1268 8 -7 V
1269 8 21 V
1270 7 -27 V
1271 8 -38 V
1272 7 -17 V
1273 8 -27 V
1274 7 26 V
1275 8 22 V
1276 7 -7 V
1277 8 4 V
1278 8 7 V
1279 7 2 V
1280 8 -42 V
1281 7 -10 V
1282 8 -8 V
1283 7 13 V
1284 8 15 V
1285 7 -27 V
1286 8 20 V
1287 7 1 V
1288 8 -15 V
1289 7 -50 V
1290 8 -11 V
1291 8 5 V
1292 7 -18 V
1293 8 -11 V
1294 7 -3 V
1295 8 -2 V
1296 7 4 V
1297 8 37 V
1298 7 -9 V
1299 8 -1 V
1300 7 -2 V
1301 8 -10 V
1302 7 -39 V
1303 8 -6 V
1304 7 50 V
1305 8 -20 V
1306 8 7 V
1307 7 -16 V
1308 8 50 V
1309 7 15 V
1310 8 3 V
1311 7 -5 V
1312 8 -21 V
1313 7 -31 V
1314 8 -10 V
1315 7 -14 V
1316 8 -34 V
1317 7 -51 V
1318 8 -41 V
1319 7 34 V
1320 8 -17 V
1321 7 4 V
1322 8 13 V
1323 7 -22 V
1324 8 2 V
1325 7 -33 V
1326 8 -8 V
1327 7 -15 V
1328 8 1 V
1329 7 13 V
1330 8 2 V
1331 7 3 V
1332 8 8 V
1333 7 -2 V
1334 8 -5 V
1335 7 9 V
1336 8 18 V
1337 7 -3 V
1338 8 -1 V
1339 7 3 V
1340 8 25 V
1341 7 -34 V
1342 stroke 6416 1082 M
1343 8 -24 V
1344 7 7 V
1345 8 -7 V
1346 7 -24 V
1347 8 34 V
1348 7 27 V
1349 8 2 V
1350 7 -33 V
1351 8 -25 V
1352 7 26 V
1353 8 -13 V
1354 7 -15 V
1355 8 9 V
1356 7 -8 V
1357 8 -13 V
1358 7 1 V
1359 8 -18 V
1360 7 36 V
1361 8 12 V
1362 7 -9 V
1363 7 -3 V
1364 8 -28 V
1365 7 -16 V
1366 8 46 V
1367 7 -34 V
1368 8 -13 V
1369 7 -19 V
1370 8 -3 V
1371 7 -38 V
1372 8 11 V
1373 7 5 V
1374 8 -29 V
1375 7 -22 V
1376 8 7 V
1377 7 4 V
1378 7 11 V
1379 8 14 V
1380 7 -32 V
1381 8 -10 V
1382 7 -21 V
1383 8 17 V
1384 7 1 V
1385 8 -18 V
1386 7 13 V
1387 8 -5 V
1388 7 -2 V
1389 7 -8 V
1390 8 -8 V
1391 7 -26 V
1392 8 -5 V
1393 7 0 V
1394 8 12 V
1395 7 0 V
1396 8 -37 V
1397 7 -6 V
1398 8 -24 V
1399 7 -15 V
1400 7 20 V
1401 8 11 V
1402 7 -5 V
1403 8 39 V
1404 5 8 V
1405 % End plot #1
1406 stroke
1407 LTb
1408 770 4871 N
1409 770 448 L
1410 6107 0 V
1411 0 4423 V
1412 -6107 0 V
1413 Z stroke
1414 1.000 UP
1415 1.000 UL
1416 LTb
1417 stroke
1418 grestore
1419 end
1420 showpage
1421 %%Trailer
1422 %%DocumentFonts: Helvetica
1423 %%Pages: 1