Warning, /pkg/atm_phys/old_doc/diffusivity.tech.ps is written in an unsupported language. File is not indexed.
view on githubraw file Latest commit 672ec4d5 on 2016-12-01 17:05:48 UTC
672ec4d5cf Jean*0001 %!PS-Adobe-3.0
0002 %%BoundingBox: (atend)
0003 %%Pages: (atend)
0004 %%PageOrder: (atend)
0005 %%DocumentFonts: (atend)
0006 %%Creator: Frame 5.1
0007 %%DocumentData: Clean7Bit
0008 %%EndComments
0009 %%BeginProlog
0010 %-
0011 %- Frame ps_prolog 5.0, for use with Frame 5.0 products
0012 %- This ps_prolog file is Copyright (c) 1986-1996 Adobe Systems, Incoporated.
0013 %- All rights reserved. This ps_prolog file may be freely copied and
0014 %- distributed in conjunction with documents created using FrameMaker,
0015 %- FrameMaker/SGML FrameReader and FrameViewer as long as this
0016 %- copyright notice is preserved.
0017 %-
0018 %- FrameMaker users specify the proper paper size for each print job in the
0019 %- "Print" dialog's "Printer Paper Size" "Width" and "Height~ fields. If the
0020 %- printer that the PS file is sent to does not support the requested paper
0021 %- size, or if there is no paper tray of the proper size currently installed,
0022 %- then the job will not be printed. The following flag, if set to true, will
0023 %- cause the job to print on the default paper in such cases.
0024 /FMAllowPaperSizeMismatch false def
0025 %-
0026 %- Frame products normally print colors as their true color on a color printer
0027 %- or as shades of gray, based on luminance, on a black-and white printer. The
0028 %- following flag, if set to true, forces all non-white colors to print as pure
0029 %- black. This has no effect on bitmap images.
0030 /FMPrintAllColorsAsBlack false def
0031 %-
0032 %- Frame products can either set their own line screens or use a printer's
0033 %- default settings. Three flags below control this separately for no
0034 %- separations, spot separations and process separations. If a flag
0035 %- is true, then the default printer settings will not be changed. If it is
0036 %- false, Frame products will use their own settings from a table based on
0037 %- the printer's resolution.
0038 /FMUseDefaultNoSeparationScreen true def
0039 /FMUseDefaultSpotSeparationScreen true def
0040 /FMUseDefaultProcessSeparationScreen false def
0041 %-
0042 %- For any given PostScript printer resolution, Frame products have two sets of
0043 %- screen angles and frequencies for printing process separations, which are
0044 %- recomended by Adobe. The following variable chooses the higher frequencies
0045 %- when set to true or the lower frequencies when set to false. This is only
0046 %- effective if the appropriate FMUseDefault...SeparationScreen flag is false.
0047 /FMUseHighFrequencyScreens true def
0048 %-
0049 %- The following is a set of predefined optimal frequencies and angles for various
0050 %- common dpi settings. This is taken from "Advances in Color Separation Using
0051 %- PostScript Software Technology," from Adobe Systems (3/13/89 P.N. LPS 0043)
0052 %- and corrolated with information which is in various PPD (4.0) files.
0053 %-
0054 %- The "dpiranges" figure is the minimum dots per inch device resolution which
0055 %- can support this setting. The "low" and "high" values are controlled by the
0056 %- setting of the FMUseHighFrequencyScreens flag above. The "TDot" flags control
0057 %- the use of the "Yellow Triple Dot" feature whereby the frequency id divided by
0058 %- three, but the dot function is "trippled" giving a block of 3x3 dots per cell.
0059 %-
0060 %- PatFreq is a compromise pattern frequency for ps Level 2 printers which is close
0061 %- to the ideal WYSIWYG pattern frequency of 9 repetitions/inch but does not beat
0062 %- (too badly) against the screen frequencies of any separations for that DPI.
0063 % This is computed by taking dpi/9 as the ideal pixels per repetition, and then
0064 % computing a tiling size in printer pixels for each of the four separations as
0065 % (dpi/screenFreq)*(cos(screenAngle)+sin(screenAngle)) Actually, this is the same
0066 % for Cyan and Magenta). Then, we take a "nice" LCM of the tile sizes close to
0067 % the desired pattern tile where the beat factor is not more than 2 or 3.
0068 %
0069 /dpiranges [ 2540 2400 1693 1270 1200 635 600 0 ] def
0070 /CMLowFreqs [ 100.402 94.8683 89.2289 100.402 94.8683 66.9349 63.2456 47.4342 ] def
0071 /YLowFreqs [ 95.25 90.0 84.65 95.25 90.0 70.5556 66.6667 50.0 ] def
0072 /KLowFreqs [ 89.8026 84.8528 79.8088 89.8026 84.8528 74.8355 70.7107 53.033 ] def
0073 /CLowAngles [ 71.5651 71.5651 71.5651 71.5651 71.5651 71.5651 71.5651 71.5651 ] def
0074 /MLowAngles [ 18.4349 18.4349 18.4349 18.4349 18.4349 18.4349 18.4349 18.4349 ] def
0075 /YLowTDot [ true true false true true false false false ] def
0076
0077 /CMHighFreqs [ 133.87 126.491 133.843 108.503 102.523 100.402 94.8683 63.2456 ] def
0078 /YHighFreqs [ 127.0 120.0 126.975 115.455 109.091 95.25 90.0 60.0 ] def
0079 /KHighFreqs [ 119.737 113.137 119.713 128.289 121.218 89.8026 84.8528 63.6395 ] def
0080 /CHighAngles [ 71.5651 71.5651 71.5651 70.0169 70.0169 71.5651 71.5651 71.5651 ] def
0081 /MHighAngles [ 18.4349 18.4349 18.4349 19.9831 19.9831 18.4349 18.4349 18.4349 ] def
0082 /YHighTDot [ false false true false false true true false ] def
0083
0084 /PatFreq [ 10.5833 10.0 9.4055 10.5833 10.0 10.5833 10.0 9.375 ] def
0085 %-
0086 %- PostScript Level 2 printers contain an "Accurate Screens" feature which can
0087 %- improve process separation rendering at the expense of compute time. This
0088 %- flag is ignored by PostScript Level 1 printers.
0089 /FMUseAcccurateScreens true def
0090 %-
0091 %- The following PostScript procedure defines the spot function that Frame
0092 %- products will use for process separations. You may un-comment-out one of
0093 %- the alternative functions below, or use your own.
0094 %-
0095 %- Dot function
0096 /FMSpotFunction {abs exch abs 2 copy add 1 gt
0097 {1 sub dup mul exch 1 sub dup mul add 1 sub }
0098 {dup mul exch dup mul add 1 exch sub }ifelse } def
0099 %-
0100 %- Line function
0101 %- /FMSpotFunction { pop } def
0102 %-
0103 %- Elipse function
0104 %- /FMSpotFunction { dup 5 mul 8 div mul exch dup mul exch add
0105 %- sqrt 1 exch sub } def
0106 %-
0107 %-
0108
0109 /FMversion (5.0) def % matches PS_VERSION in fmprintdriver
0110
0111 % PostScript Level 1 = true, 2 = false
0112 /fMLevel1 /languagelevel where {pop languagelevel} {1} ifelse 2 lt def
0113
0114 % Set up Color vs. Black-and-White
0115 /FMPColor
0116 fMLevel1 {
0117 false
0118 /colorimage where {pop pop true} if
0119 } {
0120 % statusdict /processcolors known {
0121 % statusdict /processcolors get exec
0122 % } {1} ifelse
0123 % 1 gt
0124 true
0125 } ifelse
0126 def
0127
0128 /FrameDict 400 dict def % should check this value each time changes made
0129
0130 %
0131 % For NeWS we add a fake errordict, so we can psh files
0132 %
0133 systemdict /errordict known not {/errordict 10 dict def
0134 errordict /rangecheck {stop} put} if
0135
0136 %- The readline in PS 23.0 doesn't recognize cr's as nl's on AppleTalk
0137 FrameDict /tmprangecheck errordict /rangecheck get put % save old rangecheck
0138 errordict /rangecheck {FrameDict /bug true put} put % will flag bug found
0139 FrameDict /bug false put % flag bug not found
0140 mark % since we're not sure what will happen next
0141 %- Some PS machines read past the CR, so keep the following 3 lines together!
0142 currentfile 5 string readline
0143 00
0144 0000000000
0145 cleartomark % junk from readline and rangecheck
0146 errordict /rangecheck FrameDict /tmprangecheck get put % restore rangecheck
0147 FrameDict /bug get { % redefine readline if last one got a rangecheck
0148 /readline {
0149 /gstring exch def
0150 /gfile exch def
0151 /gindex 0 def
0152 {
0153 gfile read pop % get a char
0154 dup 10 eq {exit} if % exit if LF
0155 dup 13 eq {exit} if % exit if CR
0156 gstring exch gindex exch put % store it away
0157 /gindex gindex 1 add def % bump index
0158 } loop
0159 pop % eol character
0160 gstring 0 gindex getinterval true % simulate real readline
0161 } bind def
0162 } if
0163
0164 % outer-world defs
0165
0166 /FMshowpage /showpage load def
0167 /FMquit /quit load def
0168
0169 /FMFAILURE { % enter with two error strings on the stack
0170 dup = flush % send a copy of the message to the console
0171 FMshowpage % msg on a page by itself, so it can't be, say, black on black
0172 /Helvetica findfont 12 scalefont setfont
0173 72 200 moveto show
0174 72 220 moveto show
0175 FMshowpage % we might be in the middle of some EPS, where "showpage"
0176 FMquit % and "quit" are redefined
0177 } def % only used once at most, so no bind
0178
0179 /FMVERSION {
0180 FMversion ne {
0181 (Adobe Frame product version does not match ps_prolog! Check installation;)
0182 (also check ~/fminit and ./fminit for old versions) FMFAILURE
0183 } if
0184 } def % only used at startup, so no bind
0185
0186 /FMBADEPSF { % Call with bad operator name on stack (as a string)
0187 (Adobe's PostScript Language Reference Manual, 2nd Edition, section H.2.4)
0188 (says your EPS file is not valid, as it calls X )
0189 dup dup (X) search pop exch pop exch pop length % parmstr errstr errstr indx
0190 5 -1 roll % errstr errstr index parmstr
0191 putinterval % errstr
0192 FMFAILURE
0193 } def
0194
0195 % standard concatprocs routine
0196 /fmConcatProcs
0197 {
0198 /proc2 exch cvlit def/proc1 exch cvlit def/newproc proc1 length proc2 length add array def
0199 newproc 0 proc1 putinterval newproc proc1 length proc2 putinterval newproc cvx
0200 }def
0201
0202 % Put all local variables here in alphabetical order.
0203 FrameDict begin [
0204 /ALDsave
0205 /FMdicttop
0206 /FMoptop
0207 /FMpointsize
0208 /FMsaveobject
0209 /b
0210 /bitmapsave
0211 /blut
0212 /bpside
0213 /bs
0214 /bstring
0215 /bwidth
0216 /c
0217 /cf
0218 /cs
0219 /cynu
0220 /depth
0221 /edown
0222 /fh
0223 /fillvals
0224 /fw
0225 /fx
0226 /fy
0227 /g
0228 /gfile
0229 /gindex
0230 /grnt
0231 /gryt
0232 /gstring
0233 /height
0234 /hh
0235 /i
0236 /im
0237 /indx
0238 /is
0239 /k
0240 /kk
0241 /landscape
0242 /lb
0243 /len
0244 /llx
0245 /lly
0246 /m
0247 /magu
0248 /manualfeed
0249 /n
0250 /offbits
0251 /onbits
0252 /organgle
0253 /orgbangle
0254 /orgbfreq
0255 /orgbproc
0256 /orgbxfer
0257 /orgfreq
0258 /orggangle
0259 /orggfreq
0260 /orggproc
0261 /orggxfer
0262 /orgmatrix
0263 /orgproc
0264 /orgrangle
0265 /orgrfreq
0266 /orgrproc
0267 /orgrxfer
0268 /orgxfer
0269 /pagesave
0270 /paperheight
0271 /papersizedict
0272 /paperwidth
0273 /pos
0274 /pwid
0275 /r
0276 /rad
0277 /redt
0278 /sl
0279 /str
0280 /tran
0281 /u
0282 /urx
0283 /ury
0284 /val
0285 /width
0286 /width
0287 /ws
0288 /ww
0289 /x
0290 /x1
0291 /x2
0292 /xindex
0293 /xpoint
0294 /xscale
0295 /xx
0296 /y
0297 /y1
0298 /y2
0299 /yelu
0300 /yindex
0301 /ypoint
0302 /yscale
0303 /yy
0304 ] { 0 def } forall
0305
0306 % Start of PDF/Acrobat support
0307
0308 % Bind def
0309 /FmBD {bind def} bind def
0310
0311 systemdict /pdfmark known {
0312 /fMAcrobat true def
0313
0314 % FmPD is a conditional PDFMark
0315 /FmPD /pdfmark load def
0316
0317 % FmPT is a show text operator which only show up when distiller is active
0318 /FmPT /show load def
0319
0320 % FmPD2 and FmPA are Acrobat 2.0-specific
0321 currentdistillerparams /CoreDistVersion get 2000 ge {
0322
0323 % FmPD2 is like FmPD but for Acrobat 2.0-specific PDF
0324 /FmPD2 /pdfmark load def
0325
0326 % x y/name FmPA
0327 % is equivalent to
0328 % [/Dest/name/View[/FitH x y FmDC exch pop]/DEST FmPD
0329 % It is a shortcut for pagragraph Uinique ID designators whic occurr commonly.
0330 /FmPA { mark exch /Dest exch 5 3 roll
0331 /View [ /XYZ null 6 -2 roll FmDC exch pop null] /DEST FmPD
0332 }FmBD
0333 } {
0334 % These are No-Ops for Distiller 1.0
0335 /FmPD2 /cleartomark load def
0336 /FmPA {pop pop pop}FmBD
0337 } ifelse
0338 } {
0339 % these are the No-Ops for regular PostScript
0340 /fMAcrobat false def
0341 /FmPD /cleartomark load def
0342 /FmPD2 /cleartomark load def
0343 /FmPT /pop load def
0344 /FmPA {pop pop pop}FmBD
0345 } ifelse
0346
0347 % This convert a set of X Y coordinates from the current user space to the default
0348 % PostScript coordinates needed by some pdfmark variants. We also convert to
0349 % integer because the distiller doesn't always like floats!
0350 /FmDC {
0351 transform fMDefaultMatrix itransform cvi exch cvi exch
0352 }FmBD
0353
0354 % This converts four numbers into a bounding box making sure the first two are maller than the last two
0355 /FmBx {
0356 dup 3 index lt {3 1 roll exch} if
0357 1 index 4 index lt {4 -1 roll 3 1 roll exch 4 1 roll} if
0358 }FmBD
0359
0360 % End of PDF/Acrobat support
0361
0362 %
0363 % Color separation code
0364 %
0365
0366 % Constants.
0367
0368 /FMnone 0 def
0369 /FMcyan 1 def
0370 /FMmagenta 2 def
0371 /FMyellow 3 def
0372 /FMblack 4 def
0373 /FMcustom 5 def
0374
0375 /fMNegative false def % we are inverting the page
0376
0377 % Variables.
0378
0379 /FrameSepIs FMnone def % separation we are printing
0380 % If FrameSepIs is FMcustom, this is the custom color
0381 /FrameSepBlack 0 def
0382 /FrameSepYellow 0 def
0383 /FrameSepMagenta 0 def
0384 /FrameSepCyan 0 def
0385 /FrameSepRed 1 def
0386 /FrameSepGreen 1 def
0387 /FrameSepBlue 1 def
0388 /FrameCurGray 1 def
0389 /FrameCurPat null def
0390
0391 /FrameCurColors [ 0 0 0 1 0 0 0 ] def % c m y k r g b
0392
0393 % Utility routines
0394
0395 /FrameColorEpsilon .001 def % epsilon by which values can differ and sill be equal
0396 /eqepsilon { % v1 v2 eqeps bool
0397 sub dup 0 lt {neg} if
0398 FrameColorEpsilon le
0399 } bind def
0400
0401 % are the cmyk and cmykrgb arrays on the stack the same color?
0402 /FrameCmpColorsCMYK { % [ c1 m1 y1 k1 ] [ c2 m2 y2 k2 r2 g2 b2] -> bool
0403 2 copy 0 get exch 0 get eqepsilon {
0404 2 copy 1 get exch 1 get eqepsilon {
0405 2 copy 2 get exch 2 get eqepsilon {
0406 3 get exch 3 get eqepsilon
0407 } {pop pop false} ifelse
0408 }{pop pop false} ifelse
0409 } {pop pop false} ifelse
0410 } bind def
0411 % are the rgb and cmykrgb arrays on the stack the same color?
0412 /FrameCmpColorsRGB { % [ r1 g1 b1 ] [ c2 m2 y2 k2 r2 g2 b2] -> bool
0413 2 copy 4 get exch 0 get eqepsilon {
0414 2 copy 5 get exch 1 get eqepsilon {
0415 6 get exch 2 get eqepsilon
0416 }{pop pop false} ifelse
0417 } {pop pop false} ifelse
0418 } bind def
0419
0420 % convert r g b to c m y k
0421 /RGBtoCMYK { % r g b
0422 1 exch sub % r g y
0423 3 1 roll % y r g
0424 1 exch sub % y r m
0425 3 1 roll % m y r
0426 1 exch sub % m y c
0427 3 1 roll % c m y
0428 3 copy % c m y c m y
0429 2 copy % c m y c m y m y
0430 le { pop } { exch pop } ifelse % c m y c min(m,y)
0431 2 copy % c m y c min(m,y) c min(m,y)
0432 le { pop } { exch pop } ifelse % c m y min(c, min(m,y))
0433 dup dup dup % c m y k k k k
0434 6 1 roll % c k m y k k k
0435 4 1 roll % c k m k y k k
0436 7 1 roll % k c k m k y k
0437 sub % k c k m k y
0438 6 1 roll % y k c k m k
0439 sub % y k c k m
0440 5 1 roll % m y k c k
0441 sub % m y k c
0442 4 1 roll % c m y k
0443 } bind def
0444 /CMYKtoRGB { % c m y k CMYKtoRGB r g b
0445 dup dup 4 -1 roll add % c m k k y+k
0446 5 1 roll 3 -1 roll add % y+k c k m+k
0447 4 1 roll add % m+k y+k c+k
0448 1 exch sub dup 0 lt {pop 0} if 3 1 roll % r m+k y+k
0449 1 exch sub dup 0 lt {pop 0} if exch % r b m+k
0450 1 exch sub dup 0 lt {pop 0} if exch % r g b
0451 } bind def
0452
0453 % Public routines
0454
0455
0456 % Happens at the top of each page that is a separation
0457 /FrameSepInit {
0458 1.0 RealSetgray
0459 } bind def
0460 % Tell the separation code that this separation is for a custom color
0461 /FrameSetSepColor { % c m y k r g b
0462 /FrameSepBlue exch def
0463 /FrameSepGreen exch def
0464 /FrameSepRed exch def
0465 /FrameSepBlack exch def
0466 /FrameSepYellow exch def
0467 /FrameSepMagenta exch def
0468 /FrameSepCyan exch def
0469 /FrameSepIs FMcustom def
0470 setCurrentScreen
0471 } bind def
0472 % Tell the separation code that this separation is Cyan
0473 /FrameSetCyan {
0474 /FrameSepBlue 1.0 def
0475 /FrameSepGreen 1.0 def
0476 /FrameSepRed 0.0 def
0477 /FrameSepBlack 0.0 def
0478 /FrameSepYellow 0.0 def
0479 /FrameSepMagenta 0.0 def
0480 /FrameSepCyan 1.0 def
0481 /FrameSepIs FMcyan def
0482 setCurrentScreen
0483 } bind def
0484
0485 % Tell the separation code that this separation is Magenta
0486 /FrameSetMagenta {
0487 /FrameSepBlue 1.0 def
0488 /FrameSepGreen 0.0 def
0489 /FrameSepRed 1.0 def
0490 /FrameSepBlack 0.0 def
0491 /FrameSepYellow 0.0 def
0492 /FrameSepMagenta 1.0 def
0493 /FrameSepCyan 0.0 def
0494 /FrameSepIs FMmagenta def
0495 setCurrentScreen
0496 } bind def
0497
0498 % Tell the separation code that this separation is Yellow
0499 /FrameSetYellow {
0500 /FrameSepBlue 0.0 def
0501 /FrameSepGreen 1.0 def
0502 /FrameSepRed 1.0 def
0503 /FrameSepBlack 0.0 def
0504 /FrameSepYellow 1.0 def
0505 /FrameSepMagenta 0.0 def
0506 /FrameSepCyan 0.0 def
0507 /FrameSepIs FMyellow def
0508 setCurrentScreen
0509 } bind def
0510
0511 % Tell the separation code that this separation is Black
0512 /FrameSetBlack {
0513 /FrameSepBlue 0.0 def
0514 /FrameSepGreen 0.0 def
0515 /FrameSepRed 0.0 def
0516 /FrameSepBlack 1.0 def
0517 /FrameSepYellow 0.0 def
0518 /FrameSepMagenta 0.0 def
0519 /FrameSepCyan 0.0 def
0520 /FrameSepIs FMblack def
0521 setCurrentScreen
0522 } bind def
0523
0524 % Tell the separation code we are not doing a separation
0525 /FrameNoSep { %
0526 /FrameSepIs FMnone def
0527 setCurrentScreen
0528 } bind def
0529
0530 % Initialize the separation code with all the custom colors we are
0531 % separating (not process colors)
0532 /FrameSetSepColors { % list of arrays of [c m y k r g b] count
0533 FrameDict begin
0534 [ exch 1 add 1 roll ]
0535 /FrameSepColors % array of arrays of colors we are separating
0536 exch def end
0537 } bind def
0538
0539 % is this color array in the array of custom color separations?
0540 /FrameColorInSepListCMYK { % [ c m y k ] -> bool
0541 FrameSepColors { % color elem-of-array
0542 exch dup 3 -1 roll % color color elem
0543 FrameCmpColorsCMYK % color bool
0544 { pop true exit } if
0545 } forall % exits with either [color] or true
0546 dup true ne {pop false} if
0547 } bind def
0548 /FrameColorInSepListRGB { % [ r g b ] -> bool
0549 FrameSepColors { % color elem-of-array
0550 exch dup 3 -1 roll % color color elem
0551 FrameCmpColorsRGB % color bool
0552 { pop true exit } if
0553 } forall % exits with either [color] or true
0554 dup true ne {pop false} if
0555 } bind def
0556
0557 % Level 1 color operators saved and redefined
0558 /RealSetgray /setgray load def
0559 /RealSetrgbcolor /setrgbcolor load def
0560 /RealSethsbcolor /sethsbcolor load def
0561 end
0562
0563 % Setgray patch
0564 /setgray { % num
0565 FrameDict begin
0566 FrameSepIs FMnone eq
0567 { RealSetgray }
0568 { % go to white unless the current sep color is black
0569 FrameSepIs FMblack eq
0570 { RealSetgray }
0571 { FrameSepIs FMcustom eq
0572 FrameSepRed 0 eq and
0573 FrameSepGreen 0 eq and
0574 FrameSepBlue 0 eq and {
0575 RealSetgray
0576 } {
0577 1 RealSetgray pop
0578 } ifelse
0579 } ifelse
0580 } ifelse
0581 end
0582 } bind def
0583 /setrgbcolor { % r g b
0584 FrameDict begin
0585 FrameSepIs FMnone eq
0586 { RealSetrgbcolor }
0587 {
0588 3 copy [ 4 1 roll ] % r g b [ r g b ]
0589 FrameColorInSepListRGB
0590 {
0591 FrameSepBlue eq exch
0592 FrameSepGreen eq and exch
0593 FrameSepRed eq and
0594 { 0 } { 1 } ifelse
0595 }
0596 {
0597 FMPColor {
0598 RealSetrgbcolor
0599 currentcmykcolor
0600 } {
0601 RGBtoCMYK
0602 } ifelse
0603 FrameSepIs FMblack eq
0604 {1.0 exch sub 4 1 roll pop pop pop} {
0605 FrameSepIs FMyellow eq
0606 {pop 1.0 exch sub 3 1 roll pop pop} {
0607 FrameSepIs FMmagenta eq
0608 {pop pop 1.0 exch sub exch pop } {
0609 FrameSepIs FMcyan eq
0610 {pop pop pop 1.0 exch sub }
0611 {pop pop pop pop 1} ifelse } ifelse } ifelse } ifelse
0612 } ifelse
0613 RealSetgray
0614 }
0615 ifelse
0616 end
0617 } bind def
0618 /sethsbcolor {
0619 FrameDict begin
0620 FrameSepIs FMnone eq
0621 { RealSethsbcolor }
0622 {
0623 RealSethsbcolor % safe since we will overwrite the color state
0624 currentrgbcolor % r g b - Let PostsCript to the conversion.
0625 setrgbcolor % call our version
0626 }
0627 ifelse
0628 end
0629 } bind def
0630 FrameDict begin
0631
0632 /setcmykcolor where {
0633 pop /RealSetcmykcolor /setcmykcolor load def
0634 } {
0635 /RealSetcmykcolor {
0636 4 1 roll
0637 3 { 3 index add 0 max 1 min 1 exch sub 3 1 roll} repeat
0638 RealSetrgbcolor pop
0639 } bind def
0640 } ifelse
0641 userdict /setcmykcolor { % c m y k
0642 FrameDict begin
0643 FrameSepIs FMnone eq
0644 { RealSetcmykcolor }
0645 {
0646 4 copy [ 5 1 roll ]
0647 FrameColorInSepListCMYK
0648 {
0649 FrameSepBlack eq exch
0650 FrameSepYellow eq and exch
0651 FrameSepMagenta eq and exch
0652 FrameSepCyan eq and
0653 { 0 } { 1 } ifelse
0654 }
0655 {
0656 FrameSepIs FMblack eq
0657 {1.0 exch sub 4 1 roll pop pop pop} {
0658 FrameSepIs FMyellow eq
0659 {pop 1.0 exch sub 3 1 roll pop pop} {
0660 FrameSepIs FMmagenta eq
0661 {pop pop 1.0 exch sub exch pop } {
0662 FrameSepIs FMcyan eq
0663 {pop pop pop 1.0 exch sub }
0664 {pop pop pop pop 1} ifelse } ifelse } ifelse } ifelse
0665 } ifelse
0666 RealSetgray
0667 }
0668 ifelse
0669 end
0670 } bind put
0671
0672 % Set up a prototype pattern for PostScript Level 2
0673 fMLevel1 {
0674 % set up screen functions for the patterns in PS level 1
0675 % each entry contains an angle, spot function, flipped spot function,
0676 % gray level and frequency multiplier.
0677 /patScreenDict 7 dict dup begin
0678 <0f1e3c78f0e1c387> [ 45 { pop } {exch pop} .5 2 sqrt] FmBD
0679 <0f87c3e1f0783c1e> [ 135 { pop } {exch pop} .5 2 sqrt] FmBD
0680 <cccccccccccccccc> [ 0 { pop } dup .5 2 ] FmBD
0681 <ffff0000ffff0000> [ 90 { pop } dup .5 2 ] FmBD
0682 <8142241818244281> [ 45 { 2 copy lt {exch} if pop} dup .75 2 sqrt] FmBD
0683 <03060c183060c081> [ 45 { pop } {exch pop} .875 2 sqrt] FmBD
0684 <8040201008040201> [ 135 { pop } {exch pop} .875 2 sqrt] FmBD
0685 end def
0686 } { % prototype level 2 pattern dictionary
0687 % define some PostScript procedures for known jaggy patterns.
0688 /patProcDict 5 dict dup begin
0689 <0f1e3c78f0e1c387> { 3 setlinewidth -1 -1 moveto 9 9 lineto stroke
0690 4 -4 moveto 12 4 lineto stroke
0691 -4 4 moveto 4 12 lineto stroke} bind def
0692 <0f87c3e1f0783c1e> { 3 setlinewidth -1 9 moveto 9 -1 lineto stroke
0693 -4 4 moveto 4 -4 lineto stroke
0694 4 12 moveto 12 4 lineto stroke} bind def
0695 <8142241818244281> { 1 setlinewidth -1 9 moveto 9 -1 lineto stroke
0696 -1 -1 moveto 9 9 lineto stroke } bind def
0697 <03060c183060c081> { 1 setlinewidth -1 -1 moveto 9 9 lineto stroke
0698 4 -4 moveto 12 4 lineto stroke
0699 -4 4 moveto 4 12 lineto stroke} bind def
0700 <8040201008040201> { 1 setlinewidth -1 9 moveto 9 -1 lineto stroke
0701 -4 4 moveto 4 -4 lineto stroke
0702 4 12 moveto 12 4 lineto stroke} bind def
0703 end def
0704 /patDict 15 dict dup begin
0705 /PatternType 1 def % Always 1 for PS Level 2
0706 /PaintType 2 def % Uncolored pattern
0707 /TilingType 3 def % constant spacing and faster tiling
0708 /BBox [ 0 0 8 8 ] def % bounding box
0709 /XStep 8 def % X offset
0710 /YStep 8 def % Y offset
0711 /PaintProc {
0712 begin
0713 patProcDict bstring known {
0714 patProcDict bstring get exec
0715 } {
0716 8 8 true [1 0 0 -1 0 8] bstring imagemask
0717 } ifelse
0718 end
0719 } bind def
0720 end def
0721 } ifelse
0722
0723 %combineColor puts together the current gray value (which could also be
0724 %a fraction of on bits for a fill pattern and the current color and calls
0725 %the appropriate function
0726 %
0727 /combineColor {
0728 FrameSepIs FMnone eq
0729 {
0730 graymode fMLevel1 or not {
0731 % Level 2 pattern
0732 [/Pattern [/DeviceCMYK]] setcolorspace
0733 FrameCurColors 0 4 getinterval aload pop FrameCurPat setcolor
0734 } {
0735 FrameCurColors 3 get 1.0 ge {
0736 FrameCurGray RealSetgray
0737 } {
0738 fMAcrobat not FMPColor graymode and and {
0739 0 1 3 {
0740 FrameCurColors exch get
0741 1 FrameCurGray sub mul
0742 } for
0743 RealSetcmykcolor
0744 } {
0745 4 1 6 {
0746 FrameCurColors exch get
0747 graymode {
0748 1 exch sub 1 FrameCurGray sub mul 1 exch sub
0749 } {
0750 1.0 lt {FrameCurGray} {1} ifelse
0751 } ifelse
0752 } for
0753 RealSetrgbcolor
0754 } ifelse
0755 } ifelse
0756 } ifelse
0757 } { % separation case
0758 FrameCurColors 0 4 getinterval aload
0759 FrameColorInSepListCMYK {
0760 FrameSepBlack eq exch
0761 FrameSepYellow eq and exch
0762 FrameSepMagenta eq and exch
0763 FrameSepCyan eq and
0764 FrameSepIs FMcustom eq and
0765 { FrameCurGray } { 1 } ifelse
0766 } {
0767 FrameSepIs FMblack eq
0768 {FrameCurGray 1.0 exch sub mul 1.0 exch sub 4 1 roll pop pop pop} {
0769 FrameSepIs FMyellow eq
0770 {pop FrameCurGray 1.0 exch sub mul 1.0 exch sub 3 1 roll pop pop} {
0771 FrameSepIs FMmagenta eq
0772 {pop pop FrameCurGray 1.0 exch sub mul 1.0 exch sub exch pop } {
0773 FrameSepIs FMcyan eq
0774 {pop pop pop FrameCurGray 1.0 exch sub mul 1.0 exch sub }
0775 {pop pop pop pop 1} ifelse } ifelse } ifelse } ifelse
0776 } ifelse
0777 graymode fMLevel1 or not {
0778 % Level 2 pattern
0779 [/Pattern [/DeviceGray]] setcolorspace
0780 FrameCurPat setcolor
0781 } {
0782 graymode not fMLevel1 and {
0783 % Level 1 patterns are either all there or not there at all
0784 dup 1 lt {pop FrameCurGray} if
0785 } if
0786 RealSetgray
0787 } ifelse
0788 } ifelse
0789 } bind def
0790
0791 /savematrix {
0792 orgmatrix currentmatrix pop
0793 } bind def
0794 /restorematrix {
0795 orgmatrix setmatrix
0796 } bind def
0797 /fMDefaultMatrix matrix defaultmatrix def
0798 /fMatrix2 matrix def
0799 /dpi 72 0 fMDefaultMatrix dtransform
0800 dup mul exch dup mul add sqrt def
0801
0802 % freq and sangle are used for ps Level 1 pattern building.
0803 /freq dpi dup 72 div round dup 0 eq {pop 1} if 8 mul div def
0804 /sangle 1 0 fMDefaultMatrix dtransform exch atan def
0805 sangle fMatrix2 rotate
0806 fMDefaultMatrix fMatrix2 concatmatrix
0807 dup 0 get /sflipx exch def
0808 3 get /sflipy exch def
0809
0810 %
0811 % screen index depending on dpi
0812 % - screenIndex smallint
0813 /screenIndex {
0814 0 1 dpiranges length 1 sub { dup dpiranges exch get 1 sub dpi le {exit} {pop} ifelse } for
0815 } bind def
0816
0817 %
0818 % These routines get the standard Adobe frequencies, angles, and spot functions
0819 % depending on the DPI
0820 %
0821 % - getCyanScreen freq angle spotfunction
0822 /getCyanScreen {
0823 FMUseHighFrequencyScreens { CHighAngles CMHighFreqs} {CLowAngles CMLowFreqs} ifelse
0824 screenIndex dup 3 1 roll get 3 1 roll get /FMSpotFunction load
0825 } bind def
0826
0827 %
0828 % - getMagentaScreen freq angle spotFunction
0829 /getMagentaScreen {
0830 FMUseHighFrequencyScreens { MHighAngles CMHighFreqs } {MLowAngles CMLowFreqs} ifelse
0831 screenIndex dup 3 1 roll get 3 1 roll get /FMSpotFunction load
0832 } bind def
0833
0834 %
0835 % - getYellowScreen freq angle spotFunction
0836 % note that some of these use a "tripple dot" function at 1/3 the frequency
0837 /getYellowScreen {
0838 FMUseHighFrequencyScreens { YHighTDot YHighFreqs} { YLowTDot YLowFreqs } ifelse
0839 screenIndex dup 3 1 roll get 3 1 roll get { 3 div
0840 {2 { 1 add 2 div 3 mul dup floor sub 2 mul 1 sub exch} repeat
0841 FMSpotFunction } } {/FMSpotFunction load } ifelse
0842 0.0 exch
0843 } bind def
0844
0845 %
0846 % - getBlackScreen freq angle spotFunction
0847 /getBlackScreen {
0848 FMUseHighFrequencyScreens { KHighFreqs } { KLowFreqs } ifelse
0849 screenIndex get 45.0 /FMSpotFunction load
0850 } bind def
0851
0852 %
0853 % - getSpotScreen freq angle spotFunction
0854 /getSpotScreen {
0855 getBlackScreen
0856 } bind def
0857
0858 %
0859 % - getCompositeScreen freq angle spotFunction
0860 /getCompositeScreen {
0861 getBlackScreen
0862 } bind def
0863
0864 % FmSetScreen sets the screen for either PostScript Level 1 or Level 2 and optionally
0865 % sets the accuratescreens flag in the latter case
0866 % freq angle spotfunction FMSetScreen -
0867 /FMSetScreen
0868 fMLevel1 { /setscreen load
0869 }{ {
0870 8 dict begin
0871 /HalftoneType 1 def
0872 /SpotFunction exch def
0873 /Angle exch def
0874 /Frequency exch def
0875 /AccurateScreens FMUseAcccurateScreens def
0876 currentdict end sethalftone
0877 } bind } ifelse
0878 def
0879
0880 % This sets the default screen as was set at the beginning of the job
0881 % - setDefaultScreen -
0882 /setDefaultScreen {
0883 FMPColor {
0884 orgrxfer cvx orggxfer cvx orgbxfer cvx orgxfer cvx setcolortransfer
0885 }
0886 {
0887 orgxfer cvx settransfer
0888 } ifelse
0889 orgfreq organgle orgproc cvx setscreen
0890 } bind def
0891
0892 % This sets the current screen depending on FrameSepIs
0893 % - setCurrentScreen -
0894 /setCurrentScreen {
0895 FrameSepIs FMnone eq {
0896 FMUseDefaultNoSeparationScreen {
0897 setDefaultScreen
0898 } {
0899 getCompositeScreen FMSetScreen
0900 } ifelse
0901 } {
0902 FrameSepIs FMcustom eq {
0903 FMUseDefaultSpotSeparationScreen {
0904 setDefaultScreen
0905 } {
0906 getSpotScreen FMSetScreen
0907 } ifelse
0908 } {
0909 FMUseDefaultProcessSeparationScreen {
0910 setDefaultScreen
0911 } {
0912 FrameSepIs FMcyan eq {
0913 getCyanScreen FMSetScreen
0914 } {
0915 FrameSepIs FMmagenta eq {
0916 getMagentaScreen FMSetScreen
0917 } {
0918 FrameSepIs FMyellow eq {
0919 getYellowScreen FMSetScreen
0920 } {
0921 getBlackScreen FMSetScreen
0922 } ifelse
0923 } ifelse
0924 } ifelse
0925 } ifelse
0926 } ifelse
0927 } ifelse
0928 } bind def
0929
0930
0931 end
0932
0933 % End of Color separation code
0934 %
0935
0936 /FMDOCUMENT { % xscale yscale edown negative paperwidth paperheight manfeed numcopies numfonts
0937 array /FMfonts exch def % Why isn't this in FrameDict???
0938 /#copies exch def
0939 FrameDict begin
0940 0 ne /manualfeed exch def
0941 /paperheight exch def
0942 /paperwidth exch def
0943 0 ne /fMNegative exch def % invert page
0944 0 ne /edown exch def % flip page along y axis
0945 /yscale exch def
0946 /xscale exch def
0947
0948 fMLevel1 {
0949 manualfeed {setmanualfeed} if
0950 /FMdicttop countdictstack 1 add def % some PS's leave junk on dict ...
0951 /FMoptop count def % ...or on operand stack...
0952 setpapername % This stuff may alter the transfer/screen/angle
0953 manualfeed {true} {papersize} ifelse % true->more work to do
0954 {manualpapersize} {false} ifelse % true->more work to do
0955 {desperatepapersize} {false} ifelse % true->failed completely
0956 {papersizefailure} if
0957 count -1 FMoptop {pop pop} for
0958 countdictstack -1 FMdicttop {pop end} for %...if tray not installed
0959 }
0960 {2 dict
0961 dup /PageSize [paperwidth paperheight] put
0962 manualfeed {dup /ManualFeed manualfeed put} if
0963 {setpagedevice} stopped {papersizefailure} if
0964 }
0965 ifelse % fMLevel1
0966
0967 FMPColor {
0968 currentcolorscreen
0969 cvlit /orgproc exch def
0970 /organgle exch def
0971 /orgfreq exch def
0972 cvlit /orgbproc exch def
0973 /orgbangle exch def
0974 /orgbfreq exch def
0975 cvlit /orggproc exch def
0976 /orggangle exch def
0977 /orggfreq exch def
0978 cvlit /orgrproc exch def
0979 /orgrangle exch def
0980 /orgrfreq exch def
0981
0982 currentcolortransfer
0983 fMNegative {
0984 1 1 4 {
0985 pop { 1 exch sub } fmConcatProcs 4 1 roll
0986 } for
0987 4 copy
0988 setcolortransfer
0989 } if
0990 cvlit /orgxfer exch def
0991 cvlit /orgbxfer exch def
0992 cvlit /orggxfer exch def
0993 cvlit /orgrxfer exch def
0994 } {
0995 currentscreen
0996 cvlit /orgproc exch def
0997 /organgle exch def
0998 /orgfreq exch def
0999
1000 currenttransfer
1001 fMNegative {
1002 { 1 exch sub } fmConcatProcs
1003 dup settransfer
1004 } if
1005 cvlit /orgxfer exch def
1006 } ifelse
1007
1008 end % FrameDict
1009 } def % only used at startup, so no bind
1010
1011 /FMBEGINPAGE { % pagewidth pageheight landscape color-arrays count
1012 FrameDict begin % for the whole page...
1013 /pagesave save def
1014 3.86 setmiterlimit
1015 /landscape exch 0 ne def
1016 landscape { % check for landscape
1017 90 rotate 0 exch dup /pwid exch def neg translate pop
1018 }{
1019 pop /pwid exch def
1020 } ifelse
1021 edown { [-1 0 0 1 pwid 0] concat } if
1022 % paint the whole page in "white". If the page is inverted, then
1023 % this will actually paint our black background
1024 0 0 moveto paperwidth 0 lineto paperwidth paperheight lineto
1025 0 paperheight lineto 0 0 lineto 1 setgray fill
1026 xscale yscale scale
1027 /orgmatrix matrix def
1028 gsave % for CLIP
1029 } def % only used infrequently, so no bind
1030
1031 /FMENDPAGE {
1032 grestore % for CLIP
1033 pagesave restore
1034 end % FrameDict
1035 showpage
1036 } def % only used infrequently, so no bind
1037
1038 /FMFONTDEFINE { % fontindex nonstd_encoding fontname --
1039 FrameDict begin
1040 findfont % fontindex nonstd_encoding font
1041 ReEncode % fontindex font'
1042 1 index exch % fontindex fontindex font'
1043 definefont % fontindex font"
1044 FMfonts 3 1 roll % FMfonts fontindex font"
1045 put
1046 end % FrameDict
1047 } def % only used infrequently, so no bind
1048
1049 /FMFILLS {
1050 FrameDict begin dup
1051 array /fillvals exch def
1052 dict /patCache exch def
1053 end % framedict
1054 } def % Only called once, so no bind
1055
1056 /FMFILL {
1057 FrameDict begin
1058 fillvals 3 1 roll put
1059 end % FrameDict
1060 } def % only used infrequently, so no bind
1061
1062 % Set things to a known, quiescent state, for when we switch to another writer
1063 /FMNORMALIZEGRAPHICS {
1064 newpath
1065 1 setlinewidth
1066 0 setlinecap
1067 0 0 0 sethsbcolor
1068 0 setgray % Not FMsetgray; only called outside of our environment!
1069 } bind def
1070
1071 /FMBEGINEPSF { % <theta> llx lly urx ury fw fh fx fy
1072 end % FrameDict
1073 /FMEPSF save def % in userdict
1074 /showpage {} def % this def is in userdict
1075 %- See Adobe's "PostScript Language Reference Manual, 2nd Edition", page 714.
1076 %- "...the following operators MUST NOT be used in an EPS file:" (emphasis ours)
1077 /banddevice {(banddevice) FMBADEPSF} def
1078 /clear {(clear) FMBADEPSF} def
1079 /cleardictstack {(cleardictstack) FMBADEPSF} def % FMBADEPSF knows this is the longest!
1080 /copypage {(copypage) FMBADEPSF} def
1081 /erasepage {(erasepage) FMBADEPSF} def
1082 /exitserver {(exitserver) FMBADEPSF} def
1083 /framedevice {(framedevice) FMBADEPSF} def
1084 /grestoreall {(grestoreall) FMBADEPSF} def
1085 /initclip {(initclip) FMBADEPSF} def
1086 /initgraphics {(initgraphics) FMBADEPSF} def
1087 % /initmatrix {(initmatrix) FMBADEPSF} def % Aldus Freehand 4.0 epsf uses this harmlessly <Gus 4/26/95>
1088 /quit {(quit) FMBADEPSF} def
1089 /renderbands {(renderbands) FMBADEPSF} def
1090 /setglobal {(setglobal) FMBADEPSF} def
1091 /setpagedevice {(setpagedevice) FMBADEPSF} def
1092 /setshared {(setshared) FMBADEPSF} def
1093 /startjob {(startjob) FMBADEPSF} def
1094 /lettertray {(lettertray) FMBADEPSF} def
1095 /letter {(letter) FMBADEPSF} def
1096 /lettersmall {(lettersmall) FMBADEPSF} def
1097 /11x17tray {(11x17tray) FMBADEPSF} def
1098 /11x17 {(11x17) FMBADEPSF} def
1099 /ledgertray {(ledgertray) FMBADEPSF} def
1100 /ledger {(ledger) FMBADEPSF} def
1101 /legaltray {(legaltray) FMBADEPSF} def
1102 /legal {(legal) FMBADEPSF} def
1103 /statementtray {(statementtray) FMBADEPSF} def
1104 /statement {(statement) FMBADEPSF} def
1105 /executivetray {(executivetray) FMBADEPSF} def
1106 /executive {(executive) FMBADEPSF} def
1107 /a3tray {(a3tray) FMBADEPSF} def
1108 /a3 {(a3) FMBADEPSF} def
1109 /a4tray {(a4tray) FMBADEPSF} def
1110 /a4 {(a4) FMBADEPSF} def
1111 /a4small {(a4small) FMBADEPSF} def
1112 /b4tray {(b4tray) FMBADEPSF} def
1113 /b4 {(b4) FMBADEPSF} def
1114 /b5tray {(b5tray) FMBADEPSF} def
1115 /b5 {(b5) FMBADEPSF} def
1116 FMNORMALIZEGRAPHICS % in case we're in a strange state
1117 [/fy /fx /fh /fw /ury /urx /lly /llx] {exch def} forall % neat trick
1118 fx fw 2 div add fy fh 2 div add translate
1119 rotate
1120 fw 2 div neg fh 2 div neg translate
1121 fw urx llx sub div fh ury lly sub div scale % then scale
1122 llx neg lly neg translate % then compensate for LL offset
1123 /FMdicttop countdictstack 1 add def % high-water mark of dict stack
1124 /FMoptop count def % tricky! "/FMoptop" on stack
1125 } bind def
1126
1127 /FMENDEPSF {
1128 count -1 FMoptop {pop pop} for % clear EPS junk from operand stack
1129 countdictstack -1 FMdicttop {pop end} for % ditto for dict stack
1130 FMEPSF restore
1131 FrameDict begin % for the whole page...
1132 } bind def
1133
1134 FrameDict begin % put most defs here
1135
1136 /setmanualfeed {
1137 %%BeginFeature *ManualFeed True
1138 statusdict /manualfeed true put
1139 %%EndFeature
1140 } bind def
1141
1142 /max {2 copy lt {exch} if pop} bind def
1143 /min {2 copy gt {exch} if pop} bind def
1144 /inch {72 mul} def
1145
1146 /pagedimen { % name width height
1147 paperheight sub abs 16 lt exch % 16pt is an arbitrary slop amount
1148 paperwidth sub abs 16 lt and
1149 {/papername exch def} {pop} ifelse
1150 } bind def
1151
1152 /setpapername { % Already set up: paperwidth paperheight and manualfeed
1153 /papersizedict 14 dict def % one for /papername, one for /unknown
1154 papersizedict begin
1155 /papername /unknown def % in case no match
1156 /Letter 8.5 inch 11.0 inch pagedimen
1157 /LetterSmall 7.68 inch 10.16 inch pagedimen
1158 /Tabloid 11.0 inch 17.0 inch pagedimen
1159 /Ledger 17.0 inch 11.0 inch pagedimen
1160 /Legal 8.5 inch 14.0 inch pagedimen
1161 /Statement 5.5 inch 8.5 inch pagedimen
1162 /Executive 7.5 inch 10.0 inch pagedimen
1163 /A3 11.69 inch 16.5 inch pagedimen
1164 /A4 8.26 inch 11.69 inch pagedimen
1165 /A4Small 7.47 inch 10.85 inch pagedimen
1166 /B4 10.125 inch 14.33 inch pagedimen
1167 /B5 7.16 inch 10.125 inch pagedimen
1168 end
1169 } bind def
1170
1171 /papersize {
1172 papersizedict begin
1173 /Letter {lettertray letter} def
1174 /LetterSmall {lettertray lettersmall} def
1175 /Tabloid {11x17tray 11x17} def
1176 /Ledger {ledgertray ledger} def
1177 /Legal {legaltray legal} def
1178 /Statement {statementtray statement} def
1179 /Executive {executivetray executive} def
1180 /A3 {a3tray a3} def
1181 /A4 {a4tray a4} def
1182 /A4Small {a4tray a4small} def
1183 /B4 {b4tray b4} def
1184 /B5 {b5tray b5} def
1185 /unknown {unknown} def
1186 papersizedict dup papername known {papername} {/unknown} ifelse get
1187 end
1188 statusdict begin stopped end % return true if more work to do
1189 } bind def
1190
1191 /manualpapersize {
1192 papersizedict begin
1193 /Letter {letter} def
1194 /LetterSmall {lettersmall} def
1195 /Tabloid {11x17} def
1196 /Ledger {ledger} def
1197 /Legal {legal} def
1198 /Statement {statement} def
1199 /Executive {executive} def
1200 /A3 {a3} def
1201 /A4 {a4} def
1202 /A4Small {a4small} def
1203 /B4 {b4} def
1204 /B5 {b5} def
1205 /unknown {unknown} def
1206 papersizedict dup papername known {papername} {/unknown} ifelse get
1207 end
1208 stopped % return true if more work to do
1209 } bind def
1210
1211 /desperatepapersize {
1212 statusdict /setpageparams known
1213 {
1214 paperwidth paperheight 0 1
1215 statusdict begin
1216 {setpageparams} stopped % return true iff failed
1217 end
1218 } {true} ifelse % return true iff failed
1219 } bind def
1220
1221 /papersizefailure {
1222 FMAllowPaperSizeMismatch not
1223 {
1224 (The requested paper size is not available in any currently-installed tray)
1225 (Edit the PS file to "FMAllowPaperSizeMismatch true" to use default tray)
1226 FMFAILURE } if
1227 } def
1228
1229 %
1230 % Font re-encoding to include diacritics
1231 %
1232 /DiacriticEncoding [
1233
1234 /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
1235 /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
1236 /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
1237 /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
1238 /.notdef /.notdef /.notdef /.notdef /space /exclam /quotedbl
1239 /numbersign /dollar /percent /ampersand /quotesingle /parenleft
1240 /parenright /asterisk /plus /comma /hyphen /period /slash /zero /one
1241 /two /three /four /five /six /seven /eight /nine /colon /semicolon
1242 /less /equal /greater /question /at /A /B /C /D /E /F /G /H /I /J /K
1243 /L /M /N /O /P /Q /R /S /T /U /V /W /X /Y /Z /bracketleft /backslash
1244 /bracketright /asciicircum /underscore /grave /a /b /c /d /e /f /g /h
1245 /i /j /k /l /m /n /o /p /q /r /s /t /u /v /w /x /y /z /braceleft /bar
1246 /braceright /asciitilde /.notdef /Adieresis /Aring /Ccedilla /Eacute
1247 /Ntilde /Odieresis /Udieresis /aacute /agrave /acircumflex /adieresis
1248 /atilde /aring /ccedilla /eacute /egrave /ecircumflex /edieresis
1249 /iacute /igrave /icircumflex /idieresis /ntilde /oacute /ograve
1250 /ocircumflex /odieresis /otilde /uacute /ugrave /ucircumflex
1251 /udieresis /dagger /.notdef /cent /sterling /section /bullet
1252 /paragraph /germandbls /registered /copyright /trademark /acute
1253 /dieresis /.notdef /AE /Oslash /.notdef /.notdef /.notdef /.notdef
1254 /yen /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
1255 /ordfeminine /ordmasculine /.notdef /ae /oslash /questiondown
1256 /exclamdown /logicalnot /.notdef /florin /.notdef /.notdef
1257 /guillemotleft /guillemotright /ellipsis /.notdef /Agrave /Atilde
1258 /Otilde /OE /oe /endash /emdash /quotedblleft /quotedblright
1259 /quoteleft /quoteright /.notdef /.notdef /ydieresis /Ydieresis
1260 /fraction /currency /guilsinglleft /guilsinglright /fi /fl /daggerdbl
1261 /periodcentered /quotesinglbase /quotedblbase /perthousand
1262 /Acircumflex /Ecircumflex /Aacute /Edieresis /Egrave /Iacute
1263 /Icircumflex /Idieresis /Igrave /Oacute /Ocircumflex /.notdef /Ograve
1264 /Uacute /Ucircumflex /Ugrave /dotlessi /circumflex /tilde /macron
1265 /breve /dotaccent /ring /cedilla /hungarumlaut /ogonek /caron
1266
1267 ] def
1268
1269 /ReEncode { % nonstd_encoding font -- reencodedfont
1270 dup % nonstd_encoding font font
1271 length % nonstd_encoding font dictlength
1272 dict begin % nonstd_encoding font % currentdict = newdict
1273 {% forall % forall is over font to be copied
1274 1 index /FID ne % skip FID
1275 {def} % defs go into newfontdict which is currentdict
1276 {pop pop} ifelse % copy all keys including /Encoding
1277 } forall % nonstd_encoding
1278 0 eq {/Encoding DiacriticEncoding def} if % --
1279 currentdict % push a copy of the copied font dict onto operand stack
1280 end % font' % before popping it off dictionary stack
1281 } bind def
1282
1283 FMPColor
1284 % setup procs for color printing
1285 {
1286
1287 /BEGINBITMAPCOLOR { % iw, ih, width, height, theta, x y
1288 BITMAPCOLOR} def
1289 /BEGINBITMAPCOLORc { % iw, ih, width, height, theta, x y
1290 BITMAPCOLORc} def
1291 /BEGINBITMAPTRUECOLOR {
1292 BITMAPTRUECOLOR } def
1293 /BEGINBITMAPTRUECOLORc {
1294 BITMAPTRUECOLORc } def
1295 /BEGINBITMAPCMYK {
1296 BITMAPCMYK } def
1297 /BEGINBITMAPCMYKc {
1298 BITMAPCMYKc } def
1299 }
1300 % setup procs for B&W printing
1301 {
1302 /BEGINBITMAPCOLOR { % iw, ih, width, height, theta, x y
1303 BITMAPGRAY} def
1304 /BEGINBITMAPCOLORc { % iw, ih, width, height, theta, x y
1305 BITMAPGRAYc} def
1306 /BEGINBITMAPTRUECOLOR {
1307 BITMAPTRUEGRAY } def
1308 /BEGINBITMAPTRUECOLORc {
1309 BITMAPTRUEGRAYc } def
1310 /BEGINBITMAPCMYK {
1311 BITMAPCMYKGRAY } def
1312 /BEGINBITMAPCMYKc {
1313 BITMAPCMYKGRAYc } def
1314 }
1315 ifelse
1316
1317 /K { % c m y k r g b SEPARATION
1318 FMPrintAllColorsAsBlack {
1319 dup 1 eq 2 index 1 eq and 3 index 1 eq and not
1320 {7 {pop} repeat 0 0 0 1 0 0 0} if
1321 } if
1322 FrameCurColors astore
1323 pop combineColor
1324 } bind def
1325 %
1326 % graymode is true if we are just doing gray fills, this way do not keep calling
1327 % setscreen. I don't know what the cost is on calling setscreen with defaults, but
1328 % this is easy to keep track of, and we know for sure we aren't wasting cycles.
1329 % if graymode is false and fMLevel1 is false, then we are using Level 2 patterns.
1330 %
1331 /graymode true def
1332
1333 % used by level 1 patterns
1334 % defaultflip matrixentry fmGetFlit -> eith -1 or 1
1335 fMLevel1 {
1336 /fmGetFlip {
1337 fMatrix2 exch get mul 0 lt { -1 } { 1 } ifelse
1338 } FmBD
1339 } if
1340
1341 /setPatternMode {
1342 fMLevel1 {
1343 2 index patScreenDict exch known {
1344 pop pop
1345 patScreenDict exch get aload pop % angle spot fspot gray mult
1346 freq % freq
1347 mul % times multiplier
1348 5 2 roll % angle spot fspot gray mult freq -> gray freq angle spot fspot
1349 fMatrix2 currentmatrix 1 get 0 ne {
1350 3 -1 roll 90 add 3 1 roll % landscape
1351 sflipx 1 fmGetFlip sflipy 2 fmGetFlip neg mul
1352 } { % portrait
1353 sflipx 0 fmGetFlip sflipy 3 fmGetFlip mul
1354 } ifelse
1355 0 lt {exch pop} {pop} ifelse % take regular or flipped spot function
1356 fMNegative {
1357 {neg} fmConcatProcs % invert spot function
1358 } if
1359 bind
1360 % we need to bypass any screen filter and go directly to systemdict
1361 % to avoid problems with Kodak Precision calibration software
1362 % <Gus 9/13/93>
1363 systemdict /setscreen get exec % leave graylevel on stack
1364 /FrameCurGray exch def
1365 } {
1366 /bwidth exch def
1367 /bpside exch def
1368 /bstring exch def
1369 /onbits 0 def /offbits 0 def
1370 freq sangle landscape {90 add} if
1371 {/ypoint exch def
1372 /xpoint exch def
1373 /xindex xpoint 1 add 2 div bpside mul cvi def
1374 /yindex ypoint 1 add 2 div bpside mul cvi def
1375 bstring yindex bwidth mul xindex 8 idiv add get
1376 1 7 xindex 8 mod sub bitshift and 0 ne fMNegative {not} if
1377 {/onbits onbits 1 add def 1}
1378 {/offbits offbits 1 add def 0}
1379 ifelse
1380 }
1381 setscreen
1382 offbits offbits onbits add div fMNegative {1.0 exch sub} if
1383 /FrameCurGray exch def
1384 } ifelse
1385 } { % Level 2 version
1386 pop pop
1387 dup patCache exch known {
1388 patCache exch get
1389 } { % not in cache
1390 dup
1391 patDict /bstring 3 -1 roll put
1392 patDict
1393 9 PatFreq screenIndex get div dup matrix scale
1394 % 9 orgfreq
1395 % organgle sin abs organgle cos abs add div
1396 % dup 16 div round dup 0 le {pop 1} if % Unix pattern size
1397 % dup 9 div round dup 0 le {pop 1} if % Mac larger (WYSIWYG) size
1398 % div div dup matrix scale % This gives Unix pattern size.
1399 makepattern
1400 dup
1401 patCache 4 -1 roll 3 -1 roll put
1402 } ifelse
1403 /FrameCurGray 0 def
1404 /FrameCurPat exch def
1405 } ifelse
1406 /graymode false def
1407 combineColor
1408 } bind def
1409
1410 /setGrayScaleMode {
1411 graymode not {
1412 /graymode true def
1413 fMLevel1 {
1414 setCurrentScreen
1415 } if
1416 } if
1417 /FrameCurGray exch def
1418 combineColor
1419 } bind def
1420
1421 /normalize {
1422 transform round exch round exch itransform
1423 } bind def
1424
1425 /dnormalize {
1426 dtransform round exch round exch idtransform
1427 } bind def
1428
1429 /lnormalize { % line widths are always odd so that arrow heads work
1430 0 dtransform exch cvi 2 idiv 2 mul 1 add exch idtransform pop
1431 } bind def
1432
1433 /H { % THICK
1434 lnormalize setlinewidth
1435 } bind def
1436
1437 /Z {
1438 setlinecap
1439 } bind def
1440
1441 % This is used to fill or stroke white behind a Level 2 pattern
1442 /PFill {
1443 graymode fMLevel1 or not {
1444 gsave 1 setgray eofill grestore
1445 } if
1446 } bind def
1447 /PStroke {
1448 graymode fMLevel1 or not {
1449 gsave 1 setgray stroke grestore
1450 } if
1451 stroke
1452 } bind def
1453
1454 /X { % TEXTURE
1455 fillvals exch get
1456 dup type /stringtype eq
1457 {8 1 setPatternMode} % Silly to pass parameters here
1458 {setGrayScaleMode}
1459 ifelse
1460 } bind def
1461
1462 /V { % FILL
1463 PFill gsave eofill grestore
1464 } bind def
1465
1466 /Vclip {
1467 clip
1468 } bind def
1469
1470 /Vstrk {
1471 currentlinewidth exch setlinewidth PStroke setlinewidth
1472 } bind def
1473
1474 /N { % PEN
1475 PStroke
1476 } bind def
1477
1478 /Nclip {
1479 strokepath clip newpath
1480 } bind def
1481
1482 /Nstrk {
1483 currentlinewidth exch setlinewidth PStroke setlinewidth
1484 } bind def
1485
1486 /M {newpath moveto} bind def
1487 /E {lineto} bind def
1488 /D {curveto} bind def
1489 /O {closepath} bind def
1490
1491 /L { % POLYLINE
1492 /n exch def
1493 newpath
1494 normalize
1495 moveto
1496 2 1 n {pop normalize lineto} for
1497 } bind def
1498
1499 /Y { % POLYGON !!!
1500 L % POLYLINE
1501 closepath
1502 } bind def
1503
1504 /R { % RECT x1 y1 x2 y2
1505 /y2 exch def
1506 /x2 exch def
1507 /y1 exch def
1508 /x1 exch def
1509 x1 y1
1510 x2 y1
1511 x2 y2
1512 x1 y2
1513 4 Y % POLYGON
1514 } bind def
1515
1516 /rarc % Leaves all sorts of junk on the operand stack for caller to clear off
1517 {rad % arcto might fail if we're scaled way down
1518 arcto
1519 } bind def
1520
1521 /RR { % ROUNDRECT x1 y1 x2 y2 r
1522 /rad exch def
1523 normalize
1524 /y2 exch def
1525 /x2 exch def
1526 normalize
1527 /y1 exch def
1528 /x1 exch def
1529 mark
1530 newpath
1531 {
1532 x1 y1 rad add moveto
1533 x1 y2 x2 y2 rarc
1534 x2 y2 x2 y1 rarc
1535 x2 y1 x1 y1 rarc
1536 x1 y1 x1 y2 rarc
1537 closepath
1538 } stopped {x1 y1 x2 y2 R} if % in case rarc failed for degenerate arcs
1539 cleartomark
1540 } bind def
1541
1542 /RRR { % ROUNDRECT ROTATED xs ys x1 y1 x2 y2 x3 y3 x4 y4 r
1543 /rad exch def
1544 normalize /y4 exch def /x4 exch def
1545 normalize /y3 exch def /x3 exch def
1546 normalize /y2 exch def /x2 exch def
1547 normalize /y1 exch def /x1 exch def
1548 newpath
1549 normalize moveto % eats xs ys
1550 mark
1551 {
1552 x2 y2 x3 y3 rarc
1553 x3 y3 x4 y4 rarc
1554 x4 y4 x1 y1 rarc
1555 x1 y1 x2 y2 rarc
1556 closepath
1557 } stopped
1558 {x1 y1 x2 y2 x3 y3 x4 y4 newpath moveto lineto lineto lineto closepath} if
1559 cleartomark
1560 } bind def
1561
1562 /C { % CLIP
1563 grestore
1564 gsave
1565 R % RECT
1566 clip
1567 setCurrentScreen
1568 } bind def
1569
1570 /CP { % CLIPPOLY p1x p1y p2x p2y ... n
1571 grestore
1572 gsave
1573 Y % POLYGON
1574 clip
1575 setCurrentScreen
1576 } bind def
1577
1578 /F { % FONT
1579 FMfonts exch get
1580 FMpointsize scalefont
1581 setfont
1582 } bind def
1583
1584 /Q { % POINTSIZE (& font)
1585 /FMpointsize exch def
1586 F % could be slightly optimized here
1587 } bind def
1588
1589 /T { % TEXT <string> <x> <y>
1590 moveto show
1591 } bind def
1592
1593 % Callers of RF (rotate/flip) must gsave (or save) first; (g)restore when done
1594 /RF { % <flip> <theta>
1595 rotate
1596 0 ne {-1 1 scale} if
1597 } bind def
1598
1599 /TF { % TEXTFLIPROTATE <string> <flip> <theta> <x> <y>
1600 gsave
1601 moveto
1602 RF
1603 show
1604 grestore
1605 } bind def
1606
1607 /P { % PADTEXT <pad> <string> <x> <y>
1608 moveto
1609 0 32 3 2 roll widthshow
1610 } bind def
1611
1612 /PF { % PADTEXTFLIPROTATE <pad> <string> <flip> <theta> <x> <y>
1613 gsave
1614 moveto
1615 RF
1616 0 32 3 2 roll widthshow
1617 grestore
1618 } bind def
1619
1620 /S { % SPREADTEXT <spread> <string> <x> <y>
1621 moveto
1622 0 exch ashow
1623 } bind def
1624
1625 /SF { % SPREADTEXTFLIPROTATE <spread> <string> <flip> <theta> <x> <y>
1626 gsave
1627 moveto
1628 RF
1629 0 exch ashow
1630 grestore
1631 } bind def
1632
1633 /B { % PADSPREADTEXT <pad> <spread> <string> <x> <y>
1634 moveto
1635 0 32 4 2 roll 0 exch awidthshow
1636 } bind def
1637
1638 /BF { % PADSPREADTEXTFLIPROTATE <pad> <spread> <string> <flip> <theta> <x> <y>
1639 gsave
1640 moveto
1641 RF
1642 0 32 4 2 roll 0 exch awidthshow
1643 grestore
1644 } bind def
1645
1646 /G { % ARCFILL theta1 theta2 width height x y
1647 gsave
1648 newpath
1649 normalize translate 0.0 0.0 moveto % eats x y
1650 dnormalize scale % eats width height
1651 0.0 0.0 1.0 5 3 roll arc % eats theta1 theta2
1652 closepath
1653 PFill fill
1654 grestore
1655 } bind def
1656
1657 /Gstrk {
1658 savematrix
1659 newpath
1660 2 index 2 div add exch 3 index 2 div sub exch % theta1 theta2 width height x y
1661 normalize 2 index 2 div sub exch 3 index 2 div add exch % theta1 theta2 width height x y
1662 translate
1663 scale % eats width height
1664 0.0 0.0 1.0 5 3 roll arc % eats theta1 theta2
1665 restorematrix
1666 currentlinewidth exch setlinewidth PStroke setlinewidth
1667 } bind def
1668
1669 /Gclip { % ARCFILL theta1 theta2 width height x y swid
1670 newpath
1671 savematrix
1672 normalize translate 0.0 0.0 moveto % eats x y
1673 dnormalize scale % eats width height
1674 0.0 0.0 1.0 5 3 roll arc % eats theta1 theta2
1675 closepath
1676 clip newpath
1677 restorematrix
1678 } bind def
1679
1680 /GG { % ARCFILL ROTATED theta1 theta2 width height angle x y
1681 gsave
1682 newpath
1683 normalize translate 0.0 0.0 moveto % eats x y
1684 rotate % eats angle
1685 dnormalize scale % eats width height
1686 0.0 0.0 1.0 5 3 roll arc % eats theta1 theta2
1687 closepath
1688 PFill
1689 fill
1690 grestore
1691 } bind def
1692
1693 /GGclip { % ARCFILL ROTATED theta1 theta2 width height angle x y
1694 savematrix
1695 newpath
1696 normalize translate 0.0 0.0 moveto % eats x y
1697 rotate % eats angle
1698 dnormalize scale % eats width height
1699 0.0 0.0 1.0 5 3 roll arc % eats theta1 theta2
1700 closepath
1701 clip newpath
1702 restorematrix
1703 } bind def
1704
1705 /GGstrk { % ARCFILL ROTATED swid theta1 theta2 width height angle x y
1706 savematrix
1707 newpath
1708 normalize translate 0.0 0.0 moveto % eats x y
1709 rotate % eats angle
1710 dnormalize scale % eats width height
1711 0.0 0.0 1.0 5 3 roll arc % eats theta1 theta2
1712 closepath
1713 restorematrix
1714 currentlinewidth exch setlinewidth PStroke setlinewidth
1715 } bind def
1716
1717 /A { % ARCPEN theta1 theta2 width height x y
1718 gsave
1719 savematrix
1720 newpath
1721 2 index 2 div add exch 3 index 2 div sub exch % theta1 theta2 width height x y
1722 normalize 2 index 2 div sub exch 3 index 2 div add exch % theta1 theta2 width height x y
1723 translate
1724 scale % eats width height
1725 0.0 0.0 1.0 5 3 roll arc % eats theta1 theta2
1726 restorematrix
1727 PStroke
1728 grestore
1729 } bind def
1730
1731 /Aclip {
1732 newpath
1733 savematrix
1734 normalize translate 0.0 0.0 moveto % eats x y
1735 dnormalize scale % eats width height
1736 0.0 0.0 1.0 5 3 roll arc % eats theta1 theta2
1737 closepath
1738 strokepath clip newpath
1739 restorematrix
1740 } bind def
1741
1742 /Astrk {
1743 Gstrk
1744 } bind def
1745
1746 /AA { % ARCPEN ROTATED theta1 theta2 width height angle x y
1747 gsave
1748 savematrix
1749 newpath
1750 % theta1 theta2 width height angle x y
1751 3 index 2 div add exch 4 index 2 div sub exch
1752 % theta1 theta2 width height angle x y
1753 normalize 3 index 2 div sub exch 4 index 2 div add exch
1754 translate % eats x y
1755 rotate % eats angle
1756 scale % eats width height
1757 0.0 0.0 1.0 5 3 roll arc % eats theta1 theta2
1758 restorematrix
1759 PStroke
1760 grestore
1761 } bind def
1762
1763 /AAclip {
1764 savematrix
1765 newpath
1766 normalize translate 0.0 0.0 moveto % eats x y
1767 rotate % eats angle
1768 dnormalize scale % eats width height
1769 0.0 0.0 1.0 5 3 roll arc % eats theta1 theta2
1770 closepath
1771 strokepath clip newpath
1772 restorematrix
1773 } bind def
1774
1775 /AAstrk {
1776 GGstrk
1777 } bind def
1778
1779 /BEGINPRINTCODE { % -x -y width height
1780 /FMdicttop countdictstack 1 add def % high-water mark of dict stack
1781 /FMoptop count 7 sub def % tricky! 7 params on stack, plus "/FMoptop"
1782 /FMsaveobject save def
1783 userdict begin % insulate user from FrameDict; not in /FMdicttop count
1784 /showpage {} def % this def is in userdict
1785 FMNORMALIZEGRAPHICS % in case we're in a strange state
1786 3 index neg 3 index neg translate
1787 } bind def
1788
1789 /ENDPRINTCODE {
1790 count -1 FMoptop {pop pop} for % clear user junk from operand stack
1791 countdictstack -1 FMdicttop {pop end} for % ditto for dict stack
1792 FMsaveobject restore % this is now safe, unless user very malicious
1793 } bind def
1794
1795 /gn { % get a number in a funny encoding scheme
1796 0 % result on stack
1797 { 46 mul % shift old digits
1798 cf read pop % get next character
1799 32 sub % zero is the space character
1800 dup 46 lt {exit} if % quit if we're the last digit
1801 46 sub add % add in this digit and loop around for next
1802 } loop
1803 add % result on stack
1804 } bind def
1805
1806 /cfs { % create a string of length "sl" filled with "val"s
1807 /str sl string def % create string as "str"
1808 0 1 sl 1 sub {str exch val put} for % fill array
1809 str def % define real array name, too; name is on stack from caller
1810 } bind def
1811
1812 /ic [ % "case" stmt list of procedures that the image commands should call
1813 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0223
1814 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0223
1815 0
1816 {0 hx} {1 hx} {2 hx} {3 hx} {4 hx} {5 hx} {6 hx} {7 hx} {8 hx} {9 hx}
1817 {10 hx} {11 hx} {12 hx} {13 hx} {14 hx} {15 hx} {16 hx} {17 hx} {18 hx}
1818 {19 hx} {gn hx} {0} {1} {2} {3} {4} {5} {6} {7} {8} {9} {10} {11} {12}
1819 {13} {14} {15} {16} {17} {18} {19} {gn} {0 wh} {1 wh} {2 wh} {3 wh}
1820 {4 wh} {5 wh} {6 wh} {7 wh} {8 wh} {9 wh} {10 wh} {11 wh} {12 wh}
1821 {13 wh} {14 wh} {gn wh} {0 bl} {1 bl} {2 bl} {3 bl} {4 bl} {5 bl} {6 bl}
1822 {7 bl} {8 bl} {9 bl} {10 bl} {11 bl} {12 bl} {13 bl} {14 bl} {gn bl}
1823 {0 fl} {1 fl} {2 fl} {3 fl} {4 fl} {5 fl} {6 fl} {7 fl} {8 fl} {9 fl}
1824 {10 fl} {11 fl} {12 fl} {13 fl} {14 fl} {gn fl}
1825 ] def
1826
1827 /ms { % make all the strings
1828 /sl exch def % remember length of currently existing strings
1829 /val 255 def % that's white
1830 /ws cfs % make "ws" a string filled with white
1831 /im cfs % and "im" is a complete image scanline
1832 /val 0 def % that's black
1833 /bs cfs % make "bs" a string filled with black
1834 /cs cfs % here's where we'll put complete command lines
1835 } bind def
1836
1837 400 ms % make strings that will be plenty long for most applications
1838
1839 /ip { % image procedure; reads and executes commands to make scanlines
1840 is % leave image string and...
1841 0 % ...image position on stack all through this procedure
1842 cf cs readline pop % get a string of commands
1843 { ic exch get exec % execute next command
1844 add % all commands leave a length on the stack; update pos
1845 } forall % step through all commands
1846 pop % get rid of image position pointer
1847 % image string left on stack, so it's returned to image primitive
1848 } bind def
1849 /rip { % this is similar to ip above, except for 24 bit images
1850 % this takes an extra argument, the width of the image
1851 % do red
1852 bis ris copy pop % copy blue to red
1853 is
1854 0
1855 cf cs readline pop
1856 { ic exch get exec
1857 add
1858 } forall
1859 pop pop % remove is and position from stack
1860 ris gis copy pop % copy red to green
1861 dup is exch % position of green is width bytes into is
1862 % do green
1863 cf cs readline pop
1864 { ic exch get exec
1865 add
1866 } forall
1867 pop pop
1868 gis bis copy pop % copy green to blue
1869 dup add is exch % position of blue is 2*width bytes into is
1870 % do blue
1871 cf cs readline pop
1872 { ic exch get exec
1873 add
1874 } forall
1875 pop
1876
1877 } bind def
1878
1879 /rip4 { % this is similar to ip above, except for 32 bit images
1880 % this takes an extra argument, the width of the image
1881 % do cyan
1882 kis cis copy pop % copy black to cyan
1883 is
1884 0
1885 cf cs readline pop
1886 { ic exch get exec
1887 add
1888 } forall
1889 pop pop % remove is and position from stack
1890 cis mis copy pop % copy cyan to magenta
1891 dup is exch % position of magenta is width bytes into is
1892 % do magenta
1893 cf cs readline pop
1894 { ic exch get exec
1895 add
1896 } forall
1897 pop pop
1898 mis yis copy pop % copy magenta to yellow
1899 dup dup add is exch % position of yellow is 2*width bytes into is
1900 % do yellow
1901 cf cs readline pop
1902 { ic exch get exec
1903 add
1904 } forall
1905 pop pop
1906 yis kis copy pop % copy yellow to black
1907 3 mul is exch % position of black is 3*width bytes into is
1908 % do black
1909 cf cs readline pop
1910 { ic exch get exec
1911 add
1912 } forall
1913 pop
1914
1915 } bind def
1916
1917
1918 /wh { % fill a number of bytes with "white"
1919 /len exch def % number of bytes to fill
1920 /pos exch def % position to put them at
1921 ws 0 len getinterval im pos len getinterval copy pop
1922 pos len % remember where we got to
1923 } bind def
1924
1925 /bl { % fill a number of bytes with "black"
1926 /len exch def % number of bytes to fill
1927 /pos exch def % position to put them at
1928 bs 0 len getinterval im pos len getinterval copy pop
1929 pos len % remember where we got to
1930 } bind def
1931
1932 /s1 1 string def
1933
1934 /fl { % fill a number of bytes with a specific hex value
1935 /len exch def % number of bytes to fill
1936 /pos exch def % position to put them at
1937 /val cf s1 readhexstring pop 0 get def
1938 pos 1 pos len add 1 sub {im exch val put} for
1939 pos len % remember where we got to
1940 } bind def
1941
1942 /hx { % read hex bytes directly; on entry, stack has <str> <pos> <len>
1943 3 copy getinterval % stack has <str> <pos> <len> <substr>
1944 cf exch readhexstring pop pop % stack back to <str> <pos> <len>
1945 } bind def
1946
1947 /wbytes { % width depth -> wb find width in bytes given 1, 2, 8 or 24 or 32
1948 dup dup
1949 8 gt { pop 8 idiv mul }
1950 { 8 eq {pop} {1 eq {7 add 8 idiv} {3 add 4 idiv} ifelse} ifelse } ifelse
1951 } bind def
1952 /BEGINBITMAPBWc { % iw, ih, width, height, theta, x y
1953 1 {} COMMONBITMAPc
1954 } bind def
1955 /BEGINBITMAPGRAYc { % iw, ih, width, height, theta, x y
1956 8 {} COMMONBITMAPc
1957 } bind def
1958 /BEGINBITMAP2BITc { % iw, ih, width, height, theta, x y
1959 2 {} COMMONBITMAPc
1960 } bind def
1961 %
1962 % Common routine for imaging compressed images
1963 %
1964 /COMMONBITMAPc { % iw, ih, width, height, theta, x y depth proc
1965 % (x,y) is the lower left corner of the image
1966 /cvtProc exch def
1967 /depth exch def
1968 gsave
1969 % rotate about center of image
1970 3 index 2 div add exch % iw ih width height theta y+(height/2) x
1971 4 index 2 div add exch % iw ih width height theta x+(width/2) y+(height/2)
1972 translate % iw ih width height theta
1973 rotate % iw ih width height
1974 1 index 2 div neg % iw ih width height -(width/2)
1975 1 index 2 div neg % iw ih width height -(width/2) -(height/2)
1976 translate % iw ih width height
1977 scale % iw ih
1978 /height exch def /width exch def
1979 /lb width depth wbytes def % so "lb" has width in bytes
1980 sl lb lt {lb ms} if % maybe make bigger strings
1981 /bitmapsave save def % LW+ has a buggy memory leak!
1982 cvtProc % run the desired proc after save has occurred
1983 /is im 0 lb getinterval def % image substring
1984 ws 0 lb getinterval is copy pop % whiten it
1985 /cf currentfile def % evaluate "currentfile" only once
1986 width height depth [width 0 0 height neg 0 height] % top to bottom
1987 {ip} image % zap!
1988 bitmapsave restore % avoid occasional disaster on the LW+
1989 grestore
1990 } bind def
1991 /BEGINBITMAPBW { % iw, ih, width, height, theta, x y
1992 1 {} COMMONBITMAP
1993 } bind def
1994 /BEGINBITMAPGRAY { % iw, ih, width, height, theta, x y
1995 8 {} COMMONBITMAP
1996 } bind def
1997 /BEGINBITMAP2BIT { % iw, ih, width, height, theta, x y
1998 2 {} COMMONBITMAP
1999 } bind def
2000 %
2001 % Common routine for uncompressed images
2002 %
2003 /COMMONBITMAP { % iw, ih, width, height, theta, x y depth proc
2004 /cvtProc exch def
2005 /depth exch def
2006 gsave
2007 % rotate about center of image
2008 3 index 2 div add exch % iw ih width height theta y+(height/2) x
2009 4 index 2 div add exch % iw ih width height theta x+(width/2) y+(height/2)
2010 translate % iw ih width height theta
2011 rotate % iw ih width height
2012 1 index 2 div neg % iw ih width height -(width/2)
2013 1 index 2 div neg % iw ih width height -(width/2) -(height/2)
2014 translate % iw ih width height
2015 scale % iw ih
2016 /height exch def /width exch def
2017 /bitmapsave save def % LW+ has a buggy memory leak!
2018 cvtProc % run the desired proc after save has occurred
2019 /is width depth wbytes string def
2020 /cf currentfile def % evaluate "currentfile" only once
2021 width height depth [width 0 0 height neg 0 height] % top to bottom
2022 {cf is readhexstring pop} image
2023 bitmapsave restore % avoid occasional disaster on the LW+
2024 grestore
2025 } bind def
2026
2027 %
2028 % All this hairy color setup stuff gus wrote on the mac, I just copied and
2029 % changed the variable names to be humanly readable.
2030
2031 /ngrayt 256 array def
2032 /nredt 256 array def
2033 /nbluet 256 array def
2034 /ngreent 256 array def
2035
2036 fMLevel1 {
2037 /colorsetup {
2038 currentcolortransfer
2039 /gryt exch def
2040 /blut exch def
2041 /grnt exch def
2042 /redt exch def
2043 0 1 255 {
2044 /indx exch def
2045 /cynu 1 red indx get 255 div sub def
2046 /magu 1 green indx get 255 div sub def
2047 /yelu 1 blue indx get 255 div sub def
2048 /kk cynu magu min yelu min def
2049 % The HP PaintJet XL300 ignores the gray transfer curve but still sets its
2050 % default black generation and undercolor removal functions as if it is
2051 % used. This causes black colors not to work. Bug#56844 <Gus 2/22/93>
2052 % - We go back to the old (correct?) way of doing this since this code
2053 % is now bypassed for PS Level 2 printers in favor of colorSetup2 which
2054 % uses PS Level 2 indexed color, which is much cleaner. <Gus 3/3/93>
2055 /u kk currentundercolorremoval exec def
2056 %- /u 0 def
2057 nredt indx 1 0 cynu u sub max sub redt exec put
2058 ngreent indx 1 0 magu u sub max sub grnt exec put
2059 nbluet indx 1 0 yelu u sub max sub blut exec put
2060 ngrayt indx 1 kk currentblackgeneration exec sub gryt exec put
2061 } for
2062 {255 mul cvi nredt exch get}
2063 {255 mul cvi ngreent exch get}
2064 {255 mul cvi nbluet exch get}
2065 {255 mul cvi ngrayt exch get}
2066 setcolortransfer
2067 {pop 0} setundercolorremoval
2068 {} setblackgeneration
2069 } bind def
2070 }
2071 {
2072 % Here, we set up indexed color for imaging on PS Level 2 without mucking around
2073 % with the transfer functions.
2074
2075 /colorSetup2 {
2076 [ /Indexed /DeviceRGB 255
2077 {dup red exch get 255 div
2078 exch dup green exch get 255 div
2079 exch blue exch get 255 div}
2080 ] setcolorspace
2081 } bind def
2082 } ifelse
2083
2084 %
2085 % Setup a transfer function to convert psuedo color values into grayscale
2086 % values based on the color lookup tables.
2087 %
2088 /fakecolorsetup {
2089 /tran 256 string def
2090 0 1 255 {/indx exch def
2091 tran indx
2092 red indx get 77 mul
2093 green indx get 151 mul
2094 blue indx get 28 mul
2095 add add 256 idiv put} for
2096 currenttransfer
2097 {255 mul cvi tran exch get 255.0 div}
2098 exch fmConcatProcs settransfer
2099 } bind def
2100 %
2101 % image a color image
2102 %
2103 /BITMAPCOLOR { % iw, ih, width, height, theta, x y
2104 /depth 8 def
2105 gsave
2106 % rotate about center of image
2107 3 index 2 div add exch % iw ih width height theta y+(height/2) x
2108 4 index 2 div add exch % iw ih width height theta x+(width/2) y+(height/2)
2109 translate % iw ih width height theta
2110 rotate % iw ih width height
2111 1 index 2 div neg % iw ih width height -(width/2)
2112 1 index 2 div neg % iw ih width height -(width/2) -(height/2)
2113 translate % iw ih width height
2114 scale % iw ih
2115 /height exch def /width exch def
2116 /bitmapsave save def
2117 fMLevel1 {
2118 colorsetup
2119 /is width depth wbytes string def
2120 /cf currentfile def % evaluate "currentfile" only once
2121 width height depth [width 0 0 height neg 0 height] % top to bottom
2122 {cf is readhexstring pop} {is} {is} true 3 colorimage
2123 } {
2124 colorSetup2
2125 /is width depth wbytes string def
2126 /cf currentfile def % evaluate "currentfile" only once
2127 7 dict dup begin
2128 /ImageType 1 def
2129 /Width width def
2130 /Height height def
2131 /ImageMatrix [width 0 0 height neg 0 height] def
2132 /DataSource {cf is readhexstring pop} bind def
2133 /BitsPerComponent depth def
2134 /Decode [0 255] def
2135 end image
2136 } ifelse
2137 bitmapsave restore
2138 grestore
2139 } bind def
2140 %
2141 % Compressed color image rendering
2142 %
2143 /BITMAPCOLORc { % iw, ih, width, height, theta, x y
2144 /depth 8 def
2145 gsave
2146 % rotate about center of image
2147 3 index 2 div add exch % iw ih width height theta y+(height/2) x
2148 4 index 2 div add exch % iw ih width height theta x+(width/2) y+(height/2)
2149 translate % iw ih width height theta
2150 rotate % iw ih width height
2151 1 index 2 div neg % iw ih width height -(width/2)
2152 1 index 2 div neg % iw ih width height -(width/2) -(height/2)
2153 translate % iw ih width height
2154 scale % iw ih
2155 /height exch def /width exch def
2156 /lb width depth wbytes def % so "lb" has width in bytes
2157 sl lb lt {lb ms} if % maybe make bigger strings
2158 /bitmapsave save def
2159 fMLevel1 {
2160 colorsetup
2161 /is im 0 lb getinterval def % image substring
2162 ws 0 lb getinterval is copy pop % whiten it
2163 /cf currentfile def % evaluate "currentfile" only once
2164 width height depth [width 0 0 height neg 0 height] % top to bottom
2165 {ip} {is} {is} true 3 colorimage
2166 } {
2167 colorSetup2
2168 /is im 0 lb getinterval def % image substring
2169 ws 0 lb getinterval is copy pop % whiten it
2170 /cf currentfile def % evaluate "currentfile" only once
2171 7 dict dup begin
2172 /ImageType 1 def
2173 /Width width def
2174 /Height height def
2175 /ImageMatrix [width 0 0 height neg 0 height] def
2176 /DataSource {ip} bind def
2177 /BitsPerComponent depth def
2178 /Decode [0 255] def
2179 end image
2180 } ifelse
2181 bitmapsave restore
2182 grestore
2183 } bind def
2184 /BITMAPTRUECOLORc {
2185 /depth 24 def
2186 gsave
2187 % rotate about center of image
2188 3 index 2 div add exch % iw ih width height theta y+(height/2) x
2189 4 index 2 div add exch % iw ih width height theta x+(width/2) y+(height/2)
2190 translate % iw ih width height theta
2191 rotate % iw ih width height
2192 1 index 2 div neg % iw ih width height -(width/2)
2193 1 index 2 div neg % iw ih width height -(width/2) -(height/2)
2194 translate % iw ih width height
2195 scale % iw ih
2196 /height exch def /width exch def
2197 /lb width depth wbytes def % so "lb" has width in bytes
2198 sl lb lt {lb ms} if % maybe make bigger strings
2199 /bitmapsave save def
2200
2201 /is im 0 lb getinterval def % Whole scanline
2202 /ris im 0 width getinterval def % red part of im
2203 /gis im width width getinterval def % green part of im
2204 /bis im width 2 mul width getinterval def % blue part of im
2205
2206 ws 0 lb getinterval is copy pop
2207 /cf currentfile def
2208 width height 8 [width 0 0 height neg 0 height]
2209 {width rip pop ris} {gis} {bis} true 3 colorimage
2210 bitmapsave restore
2211 grestore
2212 } bind def
2213 /BITMAPCMYKc {
2214 /depth 32 def
2215 gsave
2216 % rotate about center of image
2217 3 index 2 div add exch % iw ih width height theta y+(height/2) x
2218 4 index 2 div add exch % iw ih width height theta x+(width/2) y+(height/2)
2219 translate % iw ih width height theta
2220 rotate % iw ih width height
2221 1 index 2 div neg % iw ih width height -(width/2)
2222 1 index 2 div neg % iw ih width height -(width/2) -(height/2)
2223 translate % iw ih width height
2224 scale % iw ih
2225 /height exch def /width exch def
2226 /lb width depth wbytes def % so "lb" has width in bytes
2227 sl lb lt {lb ms} if % maybe make bigger strings
2228 /bitmapsave save def
2229
2230 /is im 0 lb getinterval def % Whole scanline
2231 /cis im 0 width getinterval def % cyan part of im
2232 /mis im width width getinterval def % magenta part of im
2233 /yis im width 2 mul width getinterval def % yellow part of im
2234 /kis im width 3 mul width getinterval def % black part of im
2235
2236 ws 0 lb getinterval is copy pop
2237 /cf currentfile def
2238 width height 8 [width 0 0 height neg 0 height]
2239 {width rip4 pop cis} {mis} {yis} {kis} true 4 colorimage
2240 bitmapsave restore
2241 grestore
2242 } bind def
2243 /BITMAPTRUECOLOR {
2244 gsave
2245 % rotate about center of image
2246 3 index 2 div add exch % iw ih width height theta y+(height/2) x
2247 4 index 2 div add exch % iw ih width height theta x+(width/2) y+(height/2)
2248 translate % iw ih width height theta
2249 rotate % iw ih width height
2250 1 index 2 div neg % iw ih width height -(width/2)
2251 1 index 2 div neg % iw ih width height -(width/2) -(height/2)
2252 translate % iw ih width height
2253 scale % iw ih
2254 /height exch def /width exch def
2255 /bitmapsave save def
2256 /is width string def
2257 /gis width string def
2258 /bis width string def
2259 /cf currentfile def
2260 width height 8 [width 0 0 height neg 0 height]
2261 { cf is readhexstring pop }
2262 { cf gis readhexstring pop }
2263 { cf bis readhexstring pop }
2264 true 3 colorimage
2265 bitmapsave restore
2266 grestore
2267 } bind def
2268 /BITMAPCMYK {
2269 gsave
2270 % rotate about center of image
2271 3 index 2 div add exch % iw ih width height theta y+(height/2) x
2272 4 index 2 div add exch % iw ih width height theta x+(width/2) y+(height/2)
2273 translate % iw ih width height theta
2274 rotate % iw ih width height
2275 1 index 2 div neg % iw ih width height -(width/2)
2276 1 index 2 div neg % iw ih width height -(width/2) -(height/2)
2277 translate % iw ih width height
2278 scale % iw ih
2279 /height exch def /width exch def
2280 /bitmapsave save def
2281 /is width string def
2282 /mis width string def
2283 /yis width string def
2284 /kis width string def
2285 /cf currentfile def
2286 width height 8 [width 0 0 height neg 0 height]
2287 { cf is readhexstring pop }
2288 { cf mis readhexstring pop }
2289 { cf yis readhexstring pop }
2290 { cf kis readhexstring pop }
2291 true 4 colorimage
2292 bitmapsave restore
2293 grestore
2294 } bind def
2295 %
2296 % image a color image to a b&width device
2297 %
2298 /BITMAPTRUEGRAYc {
2299 /depth 24 def
2300 gsave
2301 % rotate about center of image
2302 3 index 2 div add exch % iw ih width height theta y+(height/2) x
2303 4 index 2 div add exch % iw ih width height theta x+(width/2) y+(height/2)
2304 translate % iw ih width height theta
2305 rotate % iw ih width height
2306 1 index 2 div neg % iw ih width height -(width/2)
2307 1 index 2 div neg % iw ih width height -(width/2) -(height/2)
2308 translate % iw ih width height
2309 scale % iw ih
2310 /height exch def /width exch def
2311 /lb width depth wbytes def % so "lb" has width in bytes
2312 sl lb lt {lb ms} if % maybe make bigger strings
2313 /bitmapsave save def
2314
2315 /is im 0 lb getinterval def % Whole scanline
2316 /ris im 0 width getinterval def % red part of im
2317 /gis im width width getinterval def % green part of im
2318 /bis im width 2 mul width getinterval def % blue part of im
2319 ws 0 lb getinterval is copy pop
2320 /cf currentfile def
2321 width height 8 [width 0 0 height neg 0 height]
2322 {width rip pop ris gis bis width gray} image
2323 bitmapsave restore
2324 grestore
2325 } bind def
2326 /BITMAPCMYKGRAYc {
2327 /depth 32 def
2328 gsave
2329 % rotate about center of image
2330 3 index 2 div add exch % iw ih width height theta y+(height/2) x
2331 4 index 2 div add exch % iw ih width height theta x+(width/2) y+(height/2)
2332 translate % iw ih width height theta
2333 rotate % iw ih width height
2334 1 index 2 div neg % iw ih width height -(width/2)
2335 1 index 2 div neg % iw ih width height -(width/2) -(height/2)
2336 translate % iw ih width height
2337 scale % iw ih
2338 /height exch def /width exch def
2339 /lb width depth wbytes def % so "lb" has width in bytes
2340 sl lb lt {lb ms} if % maybe make bigger strings
2341 /bitmapsave save def
2342
2343 /is im 0 lb getinterval def % Whole scanline
2344 /cis im 0 width getinterval def % cyan part of im
2345 /mis im width width getinterval def % magenta part of im
2346 /yis im width 2 mul width getinterval def % yellow part of im
2347 /kis im width 3 mul width getinterval def % black part of im
2348 ws 0 lb getinterval is copy pop
2349 /cf currentfile def
2350 width height 8 [width 0 0 height neg 0 height]
2351 {width rip pop cis mis yis kis width cgray} image
2352 bitmapsave restore
2353 grestore
2354 } bind def
2355 /cgray { % c m y k width
2356 /ww exch def
2357 /k exch def
2358 /y exch def
2359 /m exch def
2360 /c exch def
2361 0 1 ww 1 sub { /i exch def c i get m i get y i get k i get CMYKtoRGB
2362 .144 mul 3 1 roll .587 mul 3 1 roll .299 mul add add
2363 c i 3 -1 roll floor cvi put } for
2364 c
2365 } bind def
2366 /gray { % r g b width
2367 /ww exch def
2368 /b exch def
2369 /g exch def
2370 /r exch def
2371 0 1 ww 1 sub { /i exch def r i get .299 mul g i get .587 mul
2372 b i get .114 mul add add r i 3 -1 roll floor cvi put } for
2373 r
2374 } bind def
2375 /BITMAPTRUEGRAY {
2376 gsave
2377 % rotate about center of image
2378 3 index 2 div add exch % iw ih width height theta y+(height/2) x
2379 4 index 2 div add exch % iw ih width height theta x+(width/2) y+(height/2)
2380 translate % iw ih width height theta
2381 rotate % iw ih width height
2382 1 index 2 div neg % iw ih width height -(width/2)
2383 1 index 2 div neg % iw ih width height -(width/2) -(height/2)
2384 translate % iw ih width height
2385 scale % iw ih
2386 /height exch def /width exch def
2387 /bitmapsave save def
2388 /is width string def
2389 /gis width string def
2390 /bis width string def
2391 /cf currentfile def
2392 width height 8 [width 0 0 height neg 0 height]
2393 { cf is readhexstring pop
2394 cf gis readhexstring pop
2395 cf bis readhexstring pop width gray} image
2396 bitmapsave restore
2397 grestore
2398 } bind def
2399 /BITMAPCMYKGRAY {
2400 gsave
2401 % rotate about center of image
2402 3 index 2 div add exch % iw ih width height theta y+(height/2) x
2403 4 index 2 div add exch % iw ih width height theta x+(width/2) y+(height/2)
2404 translate % iw ih width height theta
2405 rotate % iw ih width height
2406 1 index 2 div neg % iw ih width height -(width/2)
2407 1 index 2 div neg % iw ih width height -(width/2) -(height/2)
2408 translate % iw ih width height
2409 scale % iw ih
2410 /height exch def /width exch def
2411 /bitmapsave save def
2412 /is width string def
2413 /yis width string def
2414 /mis width string def
2415 /kis width string def
2416 /cf currentfile def
2417 width height 8 [width 0 0 height neg 0 height]
2418 { cf is readhexstring pop
2419 cf mis readhexstring pop
2420 cf yis readhexstring pop
2421 cf kis readhexstring pop width cgray} image
2422 bitmapsave restore
2423 grestore
2424 } bind def
2425 /BITMAPGRAY { % iw, ih, width, height, theta, x y
2426 8 {fakecolorsetup} COMMONBITMAP
2427 } bind def
2428 /BITMAPGRAYc { % iw, ih, width, height, theta, x y
2429 8 {fakecolorsetup} COMMONBITMAPc
2430 } bind def
2431 /ENDBITMAP {
2432 } bind def
2433 end % of FrameDict definitions
2434
2435 % OPI stuff
2436 /ALDmatrix matrix def ALDmatrix currentmatrix pop
2437 /StartALD {
2438 /ALDsave save def
2439 savematrix
2440 ALDmatrix setmatrix
2441 } bind def
2442 /InALD {
2443 restorematrix
2444 } bind def
2445 /DoneALD {
2446 ALDsave restore
2447 } bind def
2448
2449 % Dashed lines stuff
2450 /I { setdash } bind def
2451 /J { [] 0 setdash } bind def
2452
2453 %%EndProlog
2454 %%BeginSetup
2455 (5.0) FMVERSION
2456 1 1 0 0 612 792 0 1 14 FMDOCUMENT
2457 0 0 /Times-Bold FMFONTDEFINE
2458 1 0 /Times-Roman FMFONTDEFINE
2459 2 0 /Times-Italic FMFONTDEFINE
2460 3 1 /Symbol FMFONTDEFINE
2461 32 FMFILLS
2462 0 0 FMFILL
2463 1 0.1 FMFILL
2464 2 0.3 FMFILL
2465 3 0.5 FMFILL
2466 4 0.7 FMFILL
2467 5 0.9 FMFILL
2468 6 0.97 FMFILL
2469 7 1 FMFILL
2470 8 <0f1e3c78f0e1c387> FMFILL
2471 9 <0f87c3e1f0783c1e> FMFILL
2472 10 <cccccccccccccccc> FMFILL
2473 11 <ffff0000ffff0000> FMFILL
2474 12 <8142241818244281> FMFILL
2475 13 <03060c183060c081> FMFILL
2476 14 <8040201008040201> FMFILL
2477 16 1 FMFILL
2478 17 0.9 FMFILL
2479 18 0.7 FMFILL
2480 19 0.5 FMFILL
2481 20 0.3 FMFILL
2482 21 0.1 FMFILL
2483 22 0.03 FMFILL
2484 23 0 FMFILL
2485 24 <f0e1c3870f1e3c78> FMFILL
2486 25 <f0783c1e0f87c3e1> FMFILL
2487 26 <3333333333333333> FMFILL
2488 27 <0000ffff0000ffff> FMFILL
2489 28 <7ebddbe7e7dbbd7e> FMFILL
2490 29 <fcf9f3e7cf9f3f7e> FMFILL
2491 30 <7fbfdfeff7fbfdfe> FMFILL
2492 %%EndSetup
2493 %%Page: "1" 1
2494 %%BeginPaperSize: Letter
2495 %%EndPaperSize
2496 612 792 0 FMBEGINPAGE
2497 [0 0 0 1 0 0 0]
2498 [ 0 1 1 0 1 0 0]
2499 [ 1 0 1 0 0 1 0]
2500 [ 1 1 0 0 0 0 1]
2501 [ 1 0 0 0 0 1 1]
2502 [ 0 1 0 0 1 0 1]
2503 [ 0 0 1 0 1 1 0]
2504 7 FrameSetSepColors
2505 FrameNoSep
2506 0 0 0 1 0 0 0 K
2507 J
2508 0 0 0 1 0 0 0 K
2509 0 0 0 1 0 0 0 K
2510 0 0 0 1 0 0 0 K
2511 0 0 0 1 0 0 0 K
2512 0 0 0 1 0 0 0 K
2513 0 0 0 1 0 0 0 K
2514 0 0 0 1 0 0 0 K
2515 0 14 Q
2516 0 X
2517 0 0 0 1 0 0 0 K
2518 (1. Diffusi) 72 710.67 T
2519 (vity Module Ov) 126.31 710.67 T
2520 (er) 219.5 710.67 T
2521 (view) 231.8 710.67 T
2522 1 12 Q
2523 (The dif) 108 664 T
2524 (fusi) 142.69 664 T
2525 (vity module is responsible for calculating the dif) 160.39 664 T
2526 (fusion coef) 393.07 664 T
2527 (\336cients of momen-) 446.42 664 T
2528 -0.4 (tum and temperature for all le) 72 636 P
2529 -0.4 (v) 212.66 636 P
2530 -0.4 (el interf) 218.48 636 P
2531 -0.4 (aces interior to the atmosphere; that is, all model half le) 255.61 636 P
2532 -0.4 (v) 518.25 636 P
2533 -0.4 (els) 524.07 636 P
2534 -0.05 (e) 72 608 P
2535 -0.05 (xcept the top and bottom of the model. Note that the dif) 77.15 608 P
2536 -0.05 (fusion coef) 346.62 608 P
2537 -0.05 (\336cient for tracers is assumed) 399.92 608 P
2538 (to be the same as that of temperature.) 72 580 T
2539 0 (The dif) 108 552 P
2540 0 (fusion coef) 142.69 552 P
2541 0 (\336cients are set according to their position in the atmosphere: within the) 196.04 552 P
2542 (planetary boundary layer \050PBL\051, the interf) 72 524 T
2543 (ace between the PBL and the atmosphere abo) 274.5 524 T
2544 (v) 492.6 524 T
2545 (e, and) 498.42 524 T
2546 (abo) 72 496 T
2547 (v) 89.15 496 T
2548 (e the PBL. The follo) 94.97 496 T
2549 (wing sections describe these components.) 193 496 T
2550 0 14 Q
2551 (2. Diffusion in the planetary boundary lay) 72 434.67 T
2552 (er: the K-pr) 322.73 434.67 T
2553 (o\336le scheme) 394.78 434.67 T
2554 1 12 Q
2555 (W) 108 388 T
2556 (ithin the PBL, there are tw) 118.85 388 T
2557 (o methods for calculating dif) 246.05 388 T
2558 (fusi) 384.4 388 T
2559 (vities, a K-pro\336le scheme) 402.1 388 T
2560 (and the Old Climate model\325) 72 360 T
2561 (s v) 205.33 360 T
2562 (ersion. The choice of method is controlled by the namelist param-) 218.82 360 T
2563 (eter \322pbl_supersource\323, which with the def) 72 332 T
2564 (ault v) 277.82 332 T
2565 (alue of F) 304.52 332 T
2566 (ALSE indicates that the K-pro\336le) 346.3 332 T
2567 (scheme is the def) 72 304 T
2568 (ault selection. In this section the K-pro\336le scheme is described whereas the old) 154.86 304 T
2569 (climate-model\325) 72 276 T
2570 (s v) 144.66 276 T
2571 (ersion is described in the follo) 158.15 276 T
2572 (wing section.) 302.83 276 T
2573 -0.26 (W) 108 248 P
2574 -0.26 (ithin the boundary layer) 118.85 248 P
2575 -0.26 (, the dif) 232.56 248 P
2576 -0.26 (fusi) 268.73 248 P
2577 -0.26 (vity of momentum and heat,) 286.43 248 P
2578 -0.26 ( and) 438.66 248 P
2579 -0.26 ( respecti) 474.8 248 P
2580 -0.26 (v) 514.56 248 P
2581 -0.26 (ely) 520.38 248 P
2582 -0.26 (,) 534.26 248 P
2583 -0.19 (is calculated as a function of height in the PBL, and the surf) 72 217.35 P
2584 -0.19 (ace similarity theory set in the Monin-) 357.18 217.35 P
2585 (Ob) 72 189.35 T
2586 (ukho) 86.42 189.35 T
2587 (v module. If the height of abo) 110.24 189.35 T
2588 (v) 253.04 189.35 T
2589 (e the surf) 258.86 189.35 T
2590 (ace,) 303.4 189.35 T
2591 (, is less than the PBL depth,) 331.88 189.35 T
2592 (, and is less) 476.39 189.35 T
2593 (than the height of the surf) 72 161.1 T
2594 (ace layer) 195.53 161.1 T
2595 (,) 238.02 161.1 T
2596 (, where) 294.77 161.1 T
2597 ( is a namelist parameter \050called) 338.59 161.1 T
2598 (\322frac_inner\323\051 with a def) 72 130.45 T
2599 (ault v) 186.83 130.45 T
2600 (alue of 0.1, then) 213.53 130.45 T
2601 (,) 381.78 100.45 T
2602 2 F
2603 (\0501\051) 526.01 100.45 T
2604 423.77 241.35 438.66 255.75 C
2605 0 0 0 1 0 0 0 K
2606 0 0 0 1 0 0 0 K
2607 2 9 Q
2608 0 X
2609 0 0 0 1 0 0 0 K
2610 (K) 424.77 248 T
2611 2 7 Q
2612 (m) 431.61 245.1 T
2613 0 0 612 792 C
2614 461.46 241.35 474.8 255.75 C
2615 0 0 0 1 0 0 0 K
2616 0 0 0 1 0 0 0 K
2617 2 9 Q
2618 0 X
2619 0 0 0 1 0 0 0 K
2620 (K) 462.46 248 T
2621 2 7 Q
2622 (h) 469.3 245.1 T
2623 0 0 612 792 C
2624 325.38 185.1 331.88 197.1 C
2625 0 0 0 1 0 0 0 K
2626 0 0 0 1 0 0 0 K
2627 2 9 Q
2628 0 X
2629 0 0 0 1 0 0 0 K
2630 (z) 326.38 189.35 T
2631 0 0 612 792 C
2632 468.89 185.1 476.39 197.1 C
2633 0 0 0 1 0 0 0 K
2634 0 0 0 1 0 0 0 K
2635 2 9 Q
2636 0 X
2637 0 0 0 1 0 0 0 K
2638 (h) 469.89 189.35 T
2639 0 0 612 792 C
2640 244.02 154.45 294.77 168.85 C
2641 0 0 0 1 0 0 0 K
2642 0 0 0 1 0 0 0 K
2643 2 9 Q
2644 0 X
2645 0 0 0 1 0 0 0 K
2646 (h) 245.02 161.1 T
2647 2 7 Q
2648 (i) 249.86 158.2 T
2649 (n) 252.35 158.2 T
2650 (n) 256.38 158.2 T
2651 (e) 260.42 158.2 T
2652 (r) 264.07 158.2 T
2653 2 9 Q
2654 (f) 277.71 161.1 T
2655 (h) 288.27 161.1 T
2656 3 F
2657 (\327) 283.77 161.1 T
2658 (\272) 269.2 161.1 T
2659 0 0 612 792 C
2660 333.08 156.85 338.59 168.85 C
2661 0 0 0 1 0 0 0 K
2662 0 0 0 1 0 0 0 K
2663 2 9 Q
2664 0 X
2665 0 0 0 1 0 0 0 K
2666 (f) 334.08 161.1 T
2667 0 0 612 792 C
2668 213.23 92.6 381.78 110.45 C
2669 0 0 0 1 0 0 0 K
2670 0 0 0 1 0 0 0 K
2671 2 12 Q
2672 0 X
2673 0 0 0 1 0 0 0 K
2674 (K) 214.23 100.45 T
2675 2 9 Q
2676 (m) 223.35 96.85 T
2677 2 12 Q
2678 (k) 248.61 100.45 T
2679 (u) 254.85 100.45 T
2680 0 0 0 1 0 0 0 K
2681 1 9 Q
2682 (*) 261.3 96.85 T
2683 0 0 0 1 0 0 0 K
2684 2 12 Q
2685 (z) 266.54 100.45 T
2686 3 F
2687 (F) 279.2 100.45 T
2688 2 9 Q
2689 (m) 288.82 96.85 T
2690 3 12 Q
2691 (\244) 274.2 100.45 T
2692 0 0 0 1 0 0 0 K
2693 1 F
2694 (for) 311.02 100.45 T
2695 0 0 0 1 0 0 0 K
2696 2 F
2697 (z) 334.74 100.45 T
2698 (h) 352 100.45 T
2699 2 9 Q
2700 (i) 358.45 96.85 T
2701 (n) 361.48 96.85 T
2702 (n) 366.52 96.85 T
2703 (e) 371.55 96.85 T
2704 (r) 376.07 96.85 T
2705 3 12 Q
2706 (<) 342.41 100.45 T
2707 0 0 0 1 0 0 0 K
2708 1 F
2709 (=) 235.84 100.45 T
2710 0 0 0 1 0 0 0 K
2711 0 0 612 792 C
2712 0 0 0 1 0 0 0 K
2713 FMENDPAGE
2714 %%EndPage: "1" 1
2715 %%Page: "2" 2
2716 612 792 0 FMBEGINPAGE
2717 [0 0 0 1 0 0 0]
2718 [ 0 1 1 0 1 0 0]
2719 [ 1 0 1 0 0 1 0]
2720 [ 1 1 0 0 0 0 1]
2721 [ 1 0 0 0 0 1 1]
2722 [ 0 1 0 0 1 0 1]
2723 [ 0 0 1 0 1 1 0]
2724 7 FrameSetSepColors
2725 FrameNoSep
2726 0 0 0 1 0 0 0 K
2727 0 0 0 1 0 0 0 K
2728 1 10 Q
2729 0 X
2730 0 0 0 1 0 0 0 K
2731 (-) 270.03 749.33 T
2732 0 0 0 1 0 0 0 K
2733 2 F
2734 (August 16, 1999) 273.36 749.33 T
2735 0 0 0 1 0 0 0 K
2736 1 F
2737 (-) 338.64 749.33 T
2738 0 0 0 1 0 0 0 K
2739 0 0 0 1 0 0 0 K
2740 (2) 303.5 36 T
2741 0 0 0 1 0 0 0 K
2742 0 0 0 1 0 0 0 K
2743 0 0 0 1 0 0 0 K
2744 0 0 0 1 0 0 0 K
2745 0 0 0 1 0 0 0 K
2746 0 0 0 1 0 0 0 K
2747 0 0 0 1 0 0 0 K
2748 0 0 0 1 0 0 0 K
2749 0 0 0 1 0 0 0 K
2750 0 0 0 1 0 0 0 K
2751 0 0 0 1 0 0 0 K
2752 0 0 0 1 0 0 0 K
2753 0 0 0 1 0 0 0 K
2754 0 0 0 1 0 0 0 K
2755 0 0 0 1 0 0 0 K
2756 0 0 0 1 0 0 0 K
2757 0 0 0 1 0 0 0 K
2758 0 0 0 1 0 0 0 K
2759 0 0 0 1 0 0 0 K
2760 0 0 0 1 0 0 0 K
2761 0 0 0 1 0 0 0 K
2762 0 0 0 1 0 0 0 K
2763 0 0 0 1 0 0 0 K
2764 0 0 0 1 0 0 0 K
2765 0 0 0 1 0 0 0 K
2766 0 0 0 1 0 0 0 K
2767 0 0 0 1 0 0 0 K
2768 0 0 0 1 0 0 0 K
2769 0 0 0 1 0 0 0 K
2770 0 0 0 1 0 0 0 K
2771 0 0 0 1 0 0 0 K
2772 0 0 0 1 0 0 0 K
2773 0 0 0 1 0 0 0 K
2774 0 0 0 1 0 0 0 K
2775 0 0 0 1 0 0 0 K
2776 0 0 0 1 0 0 0 K
2777 0 0 0 1 0 0 0 K
2778 0 0 0 1 0 0 0 K
2779 0 0 0 1 0 0 0 K
2780 0 0 0 1 0 0 0 K
2781 0 0 0 1 0 0 0 K
2782 0 0 0 1 0 0 0 K
2783 0 0 0 1 0 0 0 K
2784 0 0 0 1 0 0 0 K
2785 0 0 0 1 0 0 0 K
2786 0 0 0 1 0 0 0 K
2787 0 0 0 1 0 0 0 K
2788 0 0 0 1 0 0 0 K
2789 0 0 0 1 0 0 0 K
2790 0 0 0 1 0 0 0 K
2791 0 0 0 1 0 0 0 K
2792 1 12 Q
2793 (,) 379.78 710 T
2794 2 F
2795 (\0502\051) 526.01 710 T
2796 1 F
2797 -0.22 (where) 72 678.15 P
2798 -0.22 ( is the v) 111.1 678.15 P
2799 -0.22 (on Karman constant,) 147.88 678.15 P
2800 -0.22 ( is the surf) 261.23 678.15 P
2801 -0.22 (ace friction v) 310.79 678.15 P
2802 -0.22 (elocity) 373.49 678.15 P
2803 -0.22 (, and) 405.38 678.15 P
2804 -0.22 ( are the similarity) 453.54 678.15 P
2805 (functions for momentum and heat where are e) 72 647.5 T
2806 (v) 292.64 647.5 T
2807 (aluated at the height) 298.34 647.5 T
2808 (. At heights abo) 404.83 647.5 T
2809 (v) 480.64 647.5 T
2810 (e the sur-) 486.46 647.5 T
2811 -0.28 (f) 72 619.25 P
2812 -0.28 (ace layer b) 75.88 619.25 P
2813 -0.28 (ut beneath the PBL depth, the dif) 127.04 619.25 P
2814 -0.28 (fusion coef) 284.02 619.25 P
2815 -0.28 (\336cients are set follo) 337.08 619.25 P
2816 -0.28 (wing T) 430.25 619.25 P
2817 -0.28 (roen and Mahrt) 463.87 619.25 P
2818 (\0501986\051:) 72 591.25 T
2819 (,) 447.74 551.46 T
2820 2 F
2821 (\0503\051) 526.01 551.46 T
2822 1 F
2823 (.) 445.74 500.06 T
2824 2 F
2825 (\0504\051) 526.01 500.06 T
2826 1 F
2827 (In \0503\051 and \0504\051, the stability functions are e) 72 460.46 T
2828 (v) 271.99 460.46 T
2829 (aluated at a height of) 277.69 460.46 T
2830 (.) 406.27 460.46 T
2831 (W) 108 429.81 T
2832 (ith this formulation, a crucial aspect is the determination of the PBL depth) 118.85 429.81 T
2833 (. If the) 485.65 429.81 T
2834 -0.22 (namelist parameter \322\336x) 72 401.56 P
2835 -0.22 (ed_depth\323 is set to TR) 184.03 401.56 P
2836 -0.22 (UE, then) 290.01 401.56 P
2837 -0.22 ( is set al) 342.73 401.56 P
2838 -0.22 (w) 380.96 401.56 P
2839 -0.22 (ays to the v) 389.51 401.56 P
2840 -0.22 (alue of the namelist) 443.55 401.56 P
2841 (v) 72 373.31 T
2842 (ariable \322depth_0\323. If) 77.7 373.31 T
2843 ( is not \336x) 190.16 373.31 T
2844 (ed \050the def) 235 373.31 T
2845 (ault\051, then) 286.19 373.31 T
2846 ( is determined by a method which is) 345.35 373.31 T
2847 -0.33 (dependent on the stability of the surf) 72 345.06 P
2848 -0.33 (ace layer) 245.9 345.06 P
2849 -0.33 (. If the surf) 287.89 345.06 P
2850 -0.33 (ace layer is stable or neutral, that is) 340.11 345.06 P
2851 -0.35 (where) 72 314.41 P
2852 -0.35 ( is the surf) 115.31 314.41 P
2853 -0.35 (ace b) 164.48 314.41 P
2854 -0.35 (uo) 188.87 314.41 P
2855 -0.35 (yanc) 200.75 314.41 P
2856 -0.35 (y scale, then) 223.23 314.41 P
2857 -0.35 ( is set as the height for which a Richardson number) 292.34 314.41 P
2858 -0.35 (,) 534.35 314.41 P
2859 (, e) 88.62 283.76 T
2860 (xceeds a critical Richardson number) 99.77 283.76 T
2861 (,) 273.92 283.76 T
2862 (, called \322rich_crit_pbl\323, which has a def) 295.4 283.76 T
2863 (ault v) 486.57 283.76 T
2864 (alue) 513.27 283.76 T
2865 (of 1.) 72 253.11 T
2866 ( is e) 113.62 253.11 T
2867 (v) 132.65 253.11 T
2868 (alualted as:) 138.35 253.11 T
2869 (,) 381.92 210.95 T
2870 2 F
2871 (\0505\051) 526.01 210.95 T
2872 1 F
2873 -0.33 (where) 72 169.41 P
2874 -0.33 ( is the acceleration due to gra) 111.49 169.41 P
2875 -0.33 (vity) 249.9 169.41 P
2876 -0.33 (,) 267.8 169.41 P
2877 -0.33 (, is the virtual dry static ener) 376.14 169.41 P
2878 -0.33 (gy) 510.94 169.41 P
2879 -0.33 (,) 522.16 169.41 P
2880 (and) 72 138.76 T
2881 ( are the zonal and meridional wind speeds, and) 100.83 138.76 T
2882 ( is set to the \050midpoint\051 height of the lo) 339.14 138.76 T
2883 (w-) 526.51 138.76 T
2884 (est atmospheric model le) 72 108.11 T
2885 (v) 191.35 108.11 T
2886 (el. Some comments re) 197.17 108.11 T
2887 (g) 306.65 108.11 T
2888 (arding the formulation of this Richardson num-) 312.59 108.11 T
2889 (ber are in order) 72 80.11 T
2890 (. In GCMs, it has been found that in v) 144.97 80.11 T
2891 (ery stable conditions traditional Monin-) 329.45 80.11 T
2892 215.23 702.15 379.78 720 C
2893 0 0 0 1 0 0 0 K
2894 0 0 0 1 0 0 0 K
2895 2 12 Q
2896 0 X
2897 0 0 0 1 0 0 0 K
2898 (K) 216.23 710 T
2899 2 9 Q
2900 (h) 225.35 706.4 T
2901 2 12 Q
2902 (k) 248.61 710 T
2903 (u) 254.85 710 T
2904 0 0 0 1 0 0 0 K
2905 1 9 Q
2906 (*) 261.3 706.4 T
2907 0 0 0 1 0 0 0 K
2908 2 12 Q
2909 (z) 266.54 710 T
2910 3 F
2911 (F) 279.2 710 T
2912 2 9 Q
2913 (h) 288.82 706.4 T
2914 3 12 Q
2915 (\244) 274.2 710 T
2916 0 0 0 1 0 0 0 K
2917 1 F
2918 (for) 309.02 710 T
2919 0 0 0 1 0 0 0 K
2920 2 F
2921 (z) 332.75 710 T
2922 (h) 350 710 T
2923 2 9 Q
2924 (i) 356.45 706.4 T
2925 (n) 359.49 706.4 T
2926 (n) 364.52 706.4 T
2927 (e) 369.55 706.4 T
2928 (r) 374.07 706.4 T
2929 3 12 Q
2930 (<) 340.41 710 T
2931 0 0 0 1 0 0 0 K
2932 1 F
2933 (=) 235.84 710 T
2934 0 0 0 1 0 0 0 K
2935 0 0 612 792 C
2936 104.1 673.9 111.1 685.9 C
2937 0 0 0 1 0 0 0 K
2938 0 0 0 1 0 0 0 K
2939 2 9 Q
2940 0 X
2941 0 0 0 1 0 0 0 K
2942 (k) 105.1 678.15 T
2943 0 0 612 792 C
2944 249.88 671.5 261.23 685.9 C
2945 0 0 0 1 0 0 0 K
2946 0 0 0 1 0 0 0 K
2947 2 9 Q
2948 0 X
2949 0 0 0 1 0 0 0 K
2950 (u) 250.88 678.15 T
2951 0 0 0 1 0 0 0 K
2952 1 7 Q
2953 (*) 255.73 675.25 T
2954 0 0 0 1 0 0 0 K
2955 0 0 612 792 C
2956 431.27 671.5 453.54 685.9 C
2957 0 0 0 1 0 0 0 K
2958 0 0 0 1 0 0 0 K
2959 3 9 Q
2960 0 X
2961 0 0 0 1 0 0 0 K
2962 (F) 432.27 678.15 T
2963 2 7 Q
2964 (m) 439.48 675.25 T
2965 (h) 448.04 675.25 T
2966 3 F
2967 (,) 444.54 675.25 T
2968 0 0 612 792 C
2969 398.33 643.25 404.83 655.25 C
2970 0 0 0 1 0 0 0 K
2971 0 0 0 1 0 0 0 K
2972 2 9 Q
2973 0 X
2974 0 0 0 1 0 0 0 K
2975 (z) 399.33 647.5 T
2976 0 0 612 792 C
2977 147.27 535.85 447.74 571.25 C
2978 0 0 0 1 0 0 0 K
2979 0 0 0 1 0 0 0 K
2980 2 12 Q
2981 0 X
2982 0 0 0 1 0 0 0 K
2983 (K) 148.27 551.46 T
2984 2 9 Q
2985 (m) 157.39 547.86 T
2986 2 12 Q
2987 (k) 187.5 551.46 T
2988 (u) 193.74 551.46 T
2989 0 0 0 1 0 0 0 K
2990 1 9 Q
2991 (*) 200.19 547.86 T
2992 0 0 0 1 0 0 0 K
2993 2 12 Q
2994 (z) 205.43 551.46 T
2995 3 F
2996 (F) 218.09 551.46 T
2997 2 9 Q
2998 (m) 227.71 547.86 T
2999 3 12 Q
3000 (\244) 213.09 551.46 T
3001 (\050) 182.65 551.46 T
3002 (\051) 235.05 551.46 T
3003 0 0 0 1 0 0 0 K
3004 1 F
3005 (1) 257.1 551.46 T
3006 0 0 0 1 0 0 0 K
3007 2 F
3008 (z) 281.47 561.25 T
3009 (h) 298.13 561.25 T
3010 2 9 Q
3011 (i) 304.59 557.65 T
3012 (n) 307.62 557.65 T
3013 (n) 312.65 557.65 T
3014 (e) 317.68 557.65 T
3015 (r) 322.21 557.65 T
3016 0 0 0 1 0 0 0 K
3017 1 12 Q
3018 (\320) 289.14 561.25 T
3019 0 0 0 1 0 0 0 K
3020 2 F
3021 (h) 280.79 543.7 T
3022 (h) 298.79 543.7 T
3023 2 9 Q
3024 (i) 305.24 540.1 T
3025 (n) 308.28 540.1 T
3026 (n) 313.31 540.1 T
3027 (e) 318.34 540.1 T
3028 (r) 322.86 540.1 T
3029 0 0 0 1 0 0 0 K
3030 1 12 Q
3031 (\320) 289.79 543.7 T
3032 (-) 280.79 551.74 T
3033 (-) 282.79 551.74 T
3034 (-) 284.79 551.74 T
3035 (-) 286.79 551.74 T
3036 (-) 288.78 551.74 T
3037 (-) 290.78 551.74 T
3038 (-) 292.78 551.74 T
3039 (-) 294.78 551.74 T
3040 (-) 296.77 551.74 T
3041 (-) 298.77 551.74 T
3042 (-) 300.77 551.74 T
3043 (-) 302.77 551.74 T
3044 (-) 304.77 551.74 T
3045 (-) 306.77 551.74 T
3046 (-) 308.76 551.74 T
3047 (-) 310.76 551.74 T
3048 (-) 312.76 551.74 T
3049 (-) 314.76 551.74 T
3050 (-) 316.76 551.74 T
3051 (-) 318.75 551.74 T
3052 (-) 320.75 551.74 T
3053 (-) 322.58 551.74 T
3054 (\320) 266.09 551.46 T
3055 0 0 0 1 0 0 0 K
3056 3 F
3057 (\350) 251.64 545.42 T
3058 (\370) 331.92 545.42 T
3059 (\346) 251.64 555.7 T
3060 (\366) 331.92 555.7 T
3061 0 0 0 1 0 0 0 K
3062 1 9 Q
3063 (2) 338.18 563.5 T
3064 0 0 0 1 0 0 0 K
3065 3 12 Q
3066 (\264) 242.05 551.46 T
3067 0 0 0 1 0 0 0 K
3068 1 F
3069 (for) 358.39 551.46 T
3070 0 0 0 1 0 0 0 K
3071 2 F
3072 (h) 382.09 551.46 T
3073 2 9 Q
3074 (i) 388.55 547.86 T
3075 (n) 391.58 547.86 T
3076 (n) 396.61 547.86 T
3077 (e) 401.64 547.86 T
3078 (r) 406.17 547.86 T
3079 2 12 Q
3080 (z) 422.48 551.46 T
3081 3 F
3082 (\243) 412.87 551.46 T
3083 2 F
3084 (h) 439.74 551.46 T
3085 3 F
3086 (<) 430.15 551.46 T
3087 0 0 0 1 0 0 0 K
3088 1 F
3089 (=) 169.89 551.46 T
3090 0 0 0 1 0 0 0 K
3091 279.89 541.86 276.29 541.86 276.29 565.86 3 L
3092 0.54 H
3093 2 Z
3094 N
3095 276.29 565.86 279.89 565.86 2 L
3096 N
3097 327.47 541.86 331.07 541.86 331.07 565.86 3 L
3098 N
3099 331.07 565.86 327.47 565.86 2 L
3100 N
3101 0 0 612 792 C
3102 149.27 484.46 445.74 519.85 C
3103 0 0 0 1 0 0 0 K
3104 0 0 0 1 0 0 0 K
3105 2 12 Q
3106 0 X
3107 0 0 0 1 0 0 0 K
3108 (K) 150.27 500.06 T
3109 2 9 Q
3110 (h) 159.39 496.46 T
3111 2 12 Q
3112 (k) 187.5 500.06 T
3113 (u) 193.74 500.06 T
3114 0 0 0 1 0 0 0 K
3115 1 9 Q
3116 (*) 200.19 496.46 T
3117 0 0 0 1 0 0 0 K
3118 2 12 Q
3119 (z) 205.43 500.06 T
3120 3 F
3121 (F) 218.09 500.06 T
3122 2 9 Q
3123 (h) 227.71 496.46 T
3124 3 12 Q
3125 (\244) 213.09 500.06 T
3126 (\050) 182.65 500.06 T
3127 (\051) 233.06 500.06 T
3128 0 0 0 1 0 0 0 K
3129 1 F
3130 (1) 255.1 500.06 T
3131 0 0 0 1 0 0 0 K
3132 2 F
3133 (z) 279.47 509.85 T
3134 (h) 296.14 509.85 T
3135 2 9 Q
3136 (i) 302.59 506.25 T
3137 (n) 305.62 506.25 T
3138 (n) 310.65 506.25 T
3139 (e) 315.68 506.25 T
3140 (r) 320.21 506.25 T
3141 0 0 0 1 0 0 0 K
3142 1 12 Q
3143 (\320) 287.14 509.85 T
3144 0 0 0 1 0 0 0 K
3145 2 F
3146 (h) 278.79 492.3 T
3147 (h) 296.79 492.3 T
3148 2 9 Q
3149 (i) 303.25 488.71 T
3150 (n) 306.28 488.71 T
3151 (n) 311.31 488.71 T
3152 (e) 316.34 488.71 T
3153 (r) 320.86 488.71 T
3154 0 0 0 1 0 0 0 K
3155 1 12 Q
3156 (\320) 287.79 492.3 T
3157 (-) 278.79 500.34 T
3158 (-) 280.79 500.34 T
3159 (-) 282.79 500.34 T
3160 (-) 284.79 500.34 T
3161 (-) 286.79 500.34 T
3162 (-) 288.78 500.34 T
3163 (-) 290.78 500.34 T
3164 (-) 292.78 500.34 T
3165 (-) 294.78 500.34 T
3166 (-) 296.77 500.34 T
3167 (-) 298.77 500.34 T
3168 (-) 300.77 500.34 T
3169 (-) 302.77 500.34 T
3170 (-) 304.77 500.34 T
3171 (-) 306.77 500.34 T
3172 (-) 308.76 500.34 T
3173 (-) 310.76 500.34 T
3174 (-) 312.76 500.34 T
3175 (-) 314.76 500.34 T
3176 (-) 316.76 500.34 T
3177 (-) 318.75 500.34 T
3178 (-) 320.58 500.34 T
3179 (\320) 264.1 500.06 T
3180 0 0 0 1 0 0 0 K
3181 3 F
3182 (\350) 249.64 494.02 T
3183 (\370) 329.92 494.02 T
3184 (\346) 249.64 504.31 T
3185 (\366) 329.92 504.31 T
3186 0 0 0 1 0 0 0 K
3187 1 9 Q
3188 (2) 336.19 512.1 T
3189 0 0 0 1 0 0 0 K
3190 3 12 Q
3191 (\264) 240.05 500.06 T
3192 0 0 0 1 0 0 0 K
3193 1 F
3194 (for) 356.39 500.06 T
3195 0 0 0 1 0 0 0 K
3196 2 F
3197 (h) 380.1 500.06 T
3198 2 9 Q
3199 (i) 386.55 496.46 T
3200 (n) 389.58 496.46 T
3201 (n) 394.61 496.46 T
3202 (e) 399.64 496.46 T
3203 (r) 404.17 496.46 T
3204 2 12 Q
3205 (z) 420.49 500.06 T
3206 3 F
3207 (\243) 410.88 500.06 T
3208 2 F
3209 (h) 437.74 500.06 T
3210 3 F
3211 (<) 428.15 500.06 T
3212 0 0 0 1 0 0 0 K
3213 1 F
3214 (=) 169.89 500.06 T
3215 0 0 0 1 0 0 0 K
3216 277.89 490.46 274.29 490.46 274.29 514.46 3 L
3217 0.54 H
3218 2 Z
3219 N
3220 274.29 514.46 277.89 514.46 2 L
3221 N
3222 325.48 490.46 329.07 490.46 329.07 514.46 3 L
3223 N
3224 329.07 514.46 325.48 514.46 2 L
3225 N
3226 0 0 612 792 C
3227 381.34 453.81 406.27 468.21 C
3228 0 0 0 1 0 0 0 K
3229 0 0 0 1 0 0 0 K
3230 2 9 Q
3231 0 X
3232 0 0 0 1 0 0 0 K
3233 (h) 382.34 460.46 T
3234 2 7 Q
3235 (i) 387.18 457.56 T
3236 (n) 389.66 457.56 T
3237 (n) 393.7 457.56 T
3238 (e) 397.74 457.56 T
3239 (r) 401.38 457.56 T
3240 0 0 612 792 C
3241 478.15 425.56 485.65 437.56 C
3242 0 0 0 1 0 0 0 K
3243 0 0 0 1 0 0 0 K
3244 2 9 Q
3245 0 X
3246 0 0 0 1 0 0 0 K
3247 (h) 479.15 429.81 T
3248 0 0 612 792 C
3249 335.23 397.31 342.73 409.31 C
3250 0 0 0 1 0 0 0 K
3251 0 0 0 1 0 0 0 K
3252 2 9 Q
3253 0 X
3254 0 0 0 1 0 0 0 K
3255 (h) 336.23 401.56 T
3256 0 0 612 792 C
3257 182.66 369.06 190.16 381.06 C
3258 0 0 0 1 0 0 0 K
3259 0 0 0 1 0 0 0 K
3260 2 9 Q
3261 0 X
3262 0 0 0 1 0 0 0 K
3263 (h) 183.66 373.31 T
3264 0 0 612 792 C
3265 337.85 369.06 345.35 381.06 C
3266 0 0 0 1 0 0 0 K
3267 0 0 0 1 0 0 0 K
3268 2 9 Q
3269 0 X
3270 0 0 0 1 0 0 0 K
3271 (h) 338.85 373.31 T
3272 0 0 612 792 C
3273 509.8 338.41 537.33 352.81 C
3274 0 0 0 1 0 0 0 K
3275 0 0 0 1 0 0 0 K
3276 2 9 Q
3277 0 X
3278 0 0 0 1 0 0 0 K
3279 (b) 510.8 345.06 T
3280 0 0 0 1 0 0 0 K
3281 1 7 Q
3282 (*) 515.64 342.16 T
3283 1 9 Q
3284 (0.) 528.58 345.06 T
3285 0 0 0 1 0 0 0 K
3286 3 F
3287 (\243) 521.39 345.06 T
3288 0 0 612 792 C
3289 103.97 307.76 115.31 322.16 C
3290 0 0 0 1 0 0 0 K
3291 0 0 0 1 0 0 0 K
3292 2 9 Q
3293 0 X
3294 0 0 0 1 0 0 0 K
3295 (b) 104.97 314.41 T
3296 0 0 0 1 0 0 0 K
3297 1 7 Q
3298 (*) 109.81 311.51 T
3299 0 0 0 1 0 0 0 K
3300 0 0 612 792 C
3301 284.84 310.16 292.34 322.16 C
3302 0 0 0 1 0 0 0 K
3303 0 0 0 1 0 0 0 K
3304 2 9 Q
3305 0 X
3306 0 0 0 1 0 0 0 K
3307 (h) 285.84 314.41 T
3308 0 0 612 792 C
3309 72 277.11 88.62 291.51 C
3310 0 0 0 1 0 0 0 K
3311 0 0 0 1 0 0 0 K
3312 2 9 Q
3313 0 X
3314 0 0 0 1 0 0 0 K
3315 (R) 73.12 283.76 T
3316 (i) 79.15 283.76 T
3317 2 7 Q
3318 (A) 82.35 280.86 T
3319 0 0 612 792 C
3320 279.92 277.11 295.41 291.51 C
3321 0 0 0 1 0 0 0 K
3322 0 0 0 1 0 0 0 K
3323 2 9 Q
3324 0 X
3325 0 0 0 1 0 0 0 K
3326 (R) 281.03 283.76 T
3327 (i) 287.06 283.76 T
3328 2 7 Q
3329 (h) 289.9 280.86 T
3330 0 0 612 792 C
3331 97 246.46 113.62 260.86 C
3332 0 0 0 1 0 0 0 K
3333 0 0 0 1 0 0 0 K
3334 2 9 Q
3335 0 X
3336 0 0 0 1 0 0 0 K
3337 (R) 98.11 253.11 T
3338 (i) 104.14 253.11 T
3339 2 7 Q
3340 (A) 107.34 250.21 T
3341 0 0 612 792 C
3342 213.09 193.41 381.92 230.46 C
3343 0 0 0 1 0 0 0 K
3344 0 0 0 1 0 0 0 K
3345 2 12 Q
3346 0 X
3347 0 0 0 1 0 0 0 K
3348 (R) 215.24 210.95 T
3349 (i) 223.28 210.95 T
3350 2 9 Q
3351 (A) 227.53 207.35 T
3352 2 12 Q
3353 (g) 252.03 220.46 T
3354 (s) 263.59 220.46 T
3355 2 9 Q
3356 (v) 268.71 216.86 T
3357 2 12 Q
3358 (z) 278.29 220.46 T
3359 3 F
3360 (\050) 273.41 220.46 T
3361 (\051) 283.8 220.46 T
3362 2 F
3363 (s) 299.8 220.46 T
3364 2 9 Q
3365 (v) 304.92 216.86 T
3366 2 12 Q
3367 (z) 314.5 220.46 T
3368 2 9 Q
3369 (s) 319.62 216.86 T
3370 3 12 Q
3371 (\050) 309.62 220.46 T
3372 (\051) 323.97 220.46 T
3373 0 0 0 1 0 0 0 K
3374 1 F
3375 (\320) 290.8 220.46 T
3376 0 0 0 1 0 0 0 K
3377 3 F
3378 (\050) 258.74 220.46 T
3379 (\051) 328.82 220.46 T
3380 2 F
3381 (s) 345.67 220.46 T
3382 2 9 Q
3383 (v) 350.79 216.86 T
3384 2 12 Q
3385 (z) 360.36 220.46 T
3386 2 9 Q
3387 (s) 365.49 216.86 T
3388 3 12 Q
3389 (\050) 355.49 220.46 T
3390 (\051) 369.84 220.46 T
3391 (\050) 340.82 220.46 T
3392 (\051) 374.69 220.46 T
3393 (\244) 335.82 220.46 T
3394 2 F
3395 (U) 280.21 198.41 T
3396 0 0 0 1 0 0 0 K
3397 1 9 Q
3398 (2) 289.84 205.16 T
3399 0 0 0 1 0 0 0 K
3400 2 12 Q
3401 (z) 299.92 198.41 T
3402 3 F
3403 (\050) 295.05 198.41 T
3404 (\051) 305.44 198.41 T
3405 2 F
3406 (V) 322.2 198.41 T
3407 0 0 0 1 0 0 0 K
3408 1 9 Q
3409 (2) 330.91 205.16 T
3410 0 0 0 1 0 0 0 K
3411 2 12 Q
3412 (z) 340.99 198.41 T
3413 3 F
3414 (\050) 336.12 198.41 T
3415 (\051) 346.51 198.41 T
3416 0 0 0 1 0 0 0 K
3417 1 F
3418 (+) 312.43 198.41 T
3419 0 0 0 1 0 0 0 K
3420 3 F
3421 (\050) 275.36 198.41 T
3422 (\051) 351.36 198.41 T
3423 0 0 0 1 0 0 0 K
3424 1 F
3425 (-) 252.03 210.95 T
3426 (-) 254.03 210.95 T
3427 (-) 256.03 210.95 T
3428 (-) 258.02 210.95 T
3429 (-) 260.02 210.95 T
3430 (-) 262.02 210.95 T
3431 (-) 264.02 210.95 T
3432 (-) 266.02 210.95 T
3433 (-) 268.02 210.95 T
3434 (-) 270.01 210.95 T
3435 (-) 272.01 210.95 T
3436 (-) 274.01 210.95 T
3437 (-) 276.01 210.95 T
3438 (-) 278.01 210.95 T
3439 (-) 280 210.95 T
3440 (-) 282 210.95 T
3441 (-) 284 210.95 T
3442 (-) 286 210.95 T
3443 (-) 287.99 210.95 T
3444 (-) 289.99 210.95 T
3445 (-) 291.99 210.95 T
3446 (-) 293.99 210.95 T
3447 (-) 295.99 210.95 T
3448 (-) 297.98 210.95 T
3449 (-) 299.98 210.95 T
3450 (-) 301.98 210.95 T
3451 (-) 303.98 210.95 T
3452 (-) 305.98 210.95 T
3453 (-) 307.98 210.95 T
3454 (-) 309.97 210.95 T
3455 (-) 311.97 210.95 T
3456 (-) 313.97 210.95 T
3457 (-) 315.97 210.95 T
3458 (-) 317.96 210.95 T
3459 (-) 319.96 210.95 T
3460 (-) 321.96 210.95 T
3461 (-) 323.96 210.95 T
3462 (-) 325.96 210.95 T
3463 (-) 327.95 210.95 T
3464 (-) 329.95 210.95 T
3465 (-) 331.95 210.95 T
3466 (-) 333.95 210.95 T
3467 (-) 335.95 210.95 T
3468 (-) 337.95 210.95 T
3469 (-) 339.94 210.95 T
3470 (-) 341.94 210.95 T
3471 (-) 343.94 210.95 T
3472 (-) 345.94 210.95 T
3473 (-) 347.93 210.95 T
3474 (-) 349.93 210.95 T
3475 (-) 351.93 210.95 T
3476 (-) 353.93 210.95 T
3477 (-) 355.93 210.95 T
3478 (-) 357.92 210.95 T
3479 (-) 359.92 210.95 T
3480 (-) 361.92 210.95 T
3481 (-) 363.92 210.95 T
3482 (-) 365.92 210.95 T
3483 (-) 367.92 210.95 T
3484 (-) 369.91 210.95 T
3485 (-) 371.91 210.95 T
3486 (-) 373.91 210.95 T
3487 (-) 374.69 210.95 T
3488 (=) 239.03 210.95 T
3489 0 0 0 1 0 0 0 K
3490 0 0 612 792 C
3491 103.99 165.16 111.49 177.16 C
3492 0 0 0 1 0 0 0 K
3493 0 0 0 1 0 0 0 K
3494 2 9 Q
3495 0 X
3496 0 0 0 1 0 0 0 K
3497 (g) 104.99 169.41 T
3498 0 0 612 792 C
3499 72 72 540 720 C
3500 273.47 162.76 376.14 177.16 C
3501 0 0 0 1 0 0 0 K
3502 0 0 0 1 0 0 0 K
3503 2 9 Q
3504 0 X
3505 0 0 0 1 0 0 0 K
3506 (s) 274.47 169.41 T
3507 2 7 Q
3508 (v) 278.31 166.51 T
3509 2 9 Q
3510 (c) 290.85 169.41 T
3511 2 7 Q
3512 (p) 295.72 166.51 T
3513 2 9 Q
3514 (T) 299.75 169.41 T
3515 0 0 0 1 0 0 0 K
3516 1 F
3517 (1) 309.61 169.41 T
3518 (0.608) 323.68 169.41 T
3519 0 0 0 1 0 0 0 K
3520 2 F
3521 (q) 344.46 169.41 T
3522 2 7 Q
3523 (v) 349.3 166.51 T
3524 0 0 0 1 0 0 0 K
3525 1 9 Q
3526 (+) 316.36 169.41 T
3527 0 0 0 1 0 0 0 K
3528 3 F
3529 (\050) 305.97 169.41 T
3530 (\051) 353.05 169.41 T
3531 2 F
3532 (g) 365.61 169.41 T
3533 (z) 370.64 169.41 T
3534 0 0 0 1 0 0 0 K
3535 1 F
3536 (+) 358.29 169.41 T
3537 0 0 0 1 0 0 0 K
3538 3 F
3539 (\272) 283.67 169.41 T
3540 72 72 540 720 C
3541 0 0 612 792 C
3542 527.83 165.16 537.33 177.16 C
3543 0 0 0 1 0 0 0 K
3544 0 0 0 1 0 0 0 K
3545 2 9 Q
3546 0 X
3547 0 0 0 1 0 0 0 K
3548 (U) 528.83 169.41 T
3549 0 0 612 792 C
3550 92.33 134.51 100.83 146.51 C
3551 0 0 0 1 0 0 0 K
3552 0 0 0 1 0 0 0 K
3553 2 9 Q
3554 0 X
3555 0 0 0 1 0 0 0 K
3556 (V) 93.33 138.76 T
3557 0 0 612 792 C
3558 328.78 132.11 339.14 146.51 C
3559 0 0 0 1 0 0 0 K
3560 0 0 0 1 0 0 0 K
3561 2 9 Q
3562 0 X
3563 0 0 0 1 0 0 0 K
3564 (z) 330.18 138.76 T
3565 2 7 Q
3566 (s) 334.03 135.86 T
3567 0 0 612 792 C
3568 0 0 0 1 0 0 0 K
3569 FMENDPAGE
3570 %%EndPage: "2" 2
3571 %%Page: "3" 3
3572 612 792 0 FMBEGINPAGE
3573 [0 0 0 1 0 0 0]
3574 [ 0 1 1 0 1 0 0]
3575 [ 1 0 1 0 0 1 0]
3576 [ 1 1 0 0 0 0 1]
3577 [ 1 0 0 0 0 1 1]
3578 [ 0 1 0 0 1 0 1]
3579 [ 0 0 1 0 1 1 0]
3580 7 FrameSetSepColors
3581 FrameNoSep
3582 0 0 0 1 0 0 0 K
3583 0 0 0 1 0 0 0 K
3584 1 10 Q
3585 0 X
3586 0 0 0 1 0 0 0 K
3587 (-) 270.03 749.33 T
3588 0 0 0 1 0 0 0 K
3589 2 F
3590 (August 16, 1999) 273.36 749.33 T
3591 0 0 0 1 0 0 0 K
3592 1 F
3593 (-) 338.64 749.33 T
3594 0 0 0 1 0 0 0 K
3595 0 0 0 1 0 0 0 K
3596 (3) 303.5 36 T
3597 0 0 0 1 0 0 0 K
3598 0 0 0 1 0 0 0 K
3599 0 0 0 1 0 0 0 K
3600 0 0 0 1 0 0 0 K
3601 0 0 0 1 0 0 0 K
3602 0 0 0 1 0 0 0 K
3603 0 0 0 1 0 0 0 K
3604 0 0 0 1 0 0 0 K
3605 0 0 0 1 0 0 0 K
3606 0 0 0 1 0 0 0 K
3607 0 0 0 1 0 0 0 K
3608 0 0 0 1 0 0 0 K
3609 0 0 0 1 0 0 0 K
3610 0 0 0 1 0 0 0 K
3611 0 0 0 1 0 0 0 K
3612 0 0 0 1 0 0 0 K
3613 0 0 0 1 0 0 0 K
3614 0 0 0 1 0 0 0 K
3615 0 0 0 1 0 0 0 K
3616 0 0 0 1 0 0 0 K
3617 0 0 0 1 0 0 0 K
3618 0 0 0 1 0 0 0 K
3619 0 0 0 1 0 0 0 K
3620 0 0 0 1 0 0 0 K
3621 0 0 0 1 0 0 0 K
3622 0 0 0 1 0 0 0 K
3623 0 0 0 1 0 0 0 K
3624 0 0 0 1 0 0 0 K
3625 0 0 0 1 0 0 0 K
3626 0 0 0 1 0 0 0 K
3627 0 0 0 1 0 0 0 K
3628 0 0 0 1 0 0 0 K
3629 0 0 0 1 0 0 0 K
3630 0 0 0 1 0 0 0 K
3631 0 0 0 1 0 0 0 K
3632 0 0 0 1 0 0 0 K
3633 0 0 0 1 0 0 0 K
3634 1 12 Q
3635 -0.38 (Ob) 72 712 P
3636 -0.38 (ukho) 86.42 712 P
3637 -0.38 (v theory does not gi) 110.24 712 P
3638 -0.38 (v) 203.75 712 P
3639 -0.38 (e enough transfer a) 209.57 712 P
3640 -0.38 (w) 299.88 712 P
3641 -0.38 (ay from the surf) 308.43 712 P
3642 -0.38 (ace as seems required to pre) 384.14 712 P
3643 -0.38 (v) 516.9 712 P
3644 -0.38 (ent) 522.72 712 P
3645 (the surf) 72 684 T
3646 (ace temperature from becoming unrealistically cold. As a consequence, it w) 108.2 684 T
3647 (ould seem) 475 684 T
3648 -0.14 (that in highly stable conditions some de) 72 656 P
3649 -0.14 (gree of empiricism is required. The formulation of) 261.64 656 P
3650 -0.14 ( in) 524.95 656 P
3651 (\0505\051 is designed to minimize the v) 72 625.35 T
3652 (alue of the Richardson, and hence maximize the PBL depth in) 229.69 625.35 T
3653 (stable conditions. Because this approach is empirical,) 72 597.35 T
3654 ( w) 344.99 597.35 T
3655 (as not set to 10 meters as in Holtslag) 356.54 597.35 T
3656 (and Bo) 72 566.7 T
3657 (ville \0501993\051.) 106.15 566.7 T
3658 (F) 108 538.7 T
3659 (or unstable conditions,) 114.49 538.7 T
3660 (, the height of the con) 254.01 538.7 T
3661 (v) 358.19 538.7 T
3662 (ecti) 364.01 538.7 T
3663 (v) 381.03 538.7 T
3664 (e boundary layer is determined) 386.85 538.7 T
3665 (by \336nd the le) 72 508.05 T
3666 (v) 134.7 508.05 T
3667 (el of neutral b) 140.52 508.05 T
3668 (uo) 207.26 508.05 T
3669 (yanc) 219.14 508.05 T
3670 (y of a parcel of air in the surf) 241.62 508.05 T
3671 (ace layer \050Beljaars and V) 381.46 508.05 T
3672 (iterbo) 502.02 508.05 T
3673 (1999\051. The virtual dry static ener) 72 480.05 T
3674 (gy of this parcel,) 232.75 480.05 T
3675 (, is set equal to that of the lo) 333.88 480.05 T
3676 (west atmo-) 469.24 480.05 T
3677 (spheric model le) 72 449.4 T
3678 (v) 151.02 449.4 T
3679 (el plus some e) 156.84 449.4 T
3680 (xcess ener) 224.99 449.4 T
3681 (gy which is depends on the surf) 274.42 449.4 T
3682 (ace b) 426.28 449.4 T
3683 (uo) 451.02 449.4 T
3684 (yanc) 462.9 449.4 T
3685 (y \337ux:) 485.38 449.4 T
3686 (,) 346.83 419.4 T
3687 2 F
3688 (\0506\051) 526.01 419.4 T
3689 1 F
3690 (where) 186.96 368.6 T
3691 (.) 408.05 368.6 T
3692 2 F
3693 (\0507\051) 526.01 368.6 T
3694 1 F
3695 -0.04 ( is a namelist parameter called \322parcel_b) 81.5 328.72 P
3696 -0.04 (uo) 276.3 328.72 P
3697 -0.04 (y\323 which is set to 2 \050Beljaars and V) 288.18 328.72 P
3698 -0.04 (iterbo 1999\051 and) 457.8 328.72 P
3699 ( is the \050midpoint\051 height of the lo) 81.58 300.47 T
3700 (west atmospheric model le) 240.28 300.47 T
3701 (v) 368.3 300.47 T
3702 (el.) 374.12 300.47 T
3703 ( is a v) 400.85 300.47 T
3704 (elocity scale which is:) 429 300.47 T
3705 (.) 331.9 267.82 T
3706 2 F
3707 (\0508\051) 526.01 267.82 T
3708 1 F
3709 (In \0508\051, the stability function is e) 72 235.97 T
3710 (v) 223.36 235.97 T
3711 (aluated at a height of) 229.06 235.97 T
3712 (, where) 364.57 235.97 T
3713 ( is a nominal boundary) 422.88 235.97 T
3714 (layer depth \050namelist parameter \322znom\323\051 whose def) 72 205.32 T
3715 (ault v) 320.47 205.32 T
3716 (alue is 1000 m. W) 347.17 205.32 T
3717 (ith) 437.35 205.32 T
3718 ( by def) 486.48 205.32 T
3719 (aul) 519.68 205.32 T
3720 (and the def) 72 173.68 T
3721 (ault stability function) 125.2 173.68 T
3722 ( of) 246.13 173.68 T
3723 (, \0508\051 reduces to:) 311.87 173.68 T
3724 (,) 361.96 134.51 T
3725 2 F
3726 (\0509\051) 526.01 134.51 T
3727 1 F
3728 (where) 236.97 94.88 T
3729 (.) 352.04 94.88 T
3730 2 F
3731 (\05010\051) 520.01 94.88 T
3732 508.32 649.35 524.95 663.75 C
3733 0 0 0 1 0 0 0 K
3734 0 0 0 1 0 0 0 K
3735 2 9 Q
3736 0 X
3737 0 0 0 1 0 0 0 K
3738 (R) 509.44 656 T
3739 (i) 515.47 656 T
3740 2 7 Q
3741 (A) 518.67 653.1 T
3742 0 0 612 792 C
3743 334.63 590.7 344.99 605.1 C
3744 0 0 0 1 0 0 0 K
3745 0 0 0 1 0 0 0 K
3746 2 9 Q
3747 0 X
3748 0 0 0 1 0 0 0 K
3749 (z) 336.04 597.35 T
3750 2 7 Q
3751 (s) 339.88 594.45 T
3752 0 0 612 792 C
3753 72 72 540 720 C
3754 226.49 532.05 254.01 546.45 C
3755 0 0 0 1 0 0 0 K
3756 0 0 0 1 0 0 0 K
3757 2 9 Q
3758 0 X
3759 0 0 0 1 0 0 0 K
3760 (b) 227.49 538.7 T
3761 0 0 0 1 0 0 0 K
3762 1 7 Q
3763 (*) 232.33 535.8 T
3764 1 9 Q
3765 (0.) 245.26 538.7 T
3766 0 0 0 1 0 0 0 K
3767 3 F
3768 (>) 238.08 538.7 T
3769 72 72 540 720 C
3770 0 0 612 792 C
3771 316.4 473.4 333.88 487.8 C
3772 0 0 0 1 0 0 0 K
3773 0 0 0 1 0 0 0 K
3774 2 9 Q
3775 0 X
3776 0 0 0 1 0 0 0 K
3777 (s) 317.4 480.05 T
3778 2 7 Q
3779 (v) 321.25 477.15 T
3780 (p) 328.38 477.15 T
3781 3 F
3782 (,) 324.35 477.15 T
3783 0 0 612 792 C
3784 248.17 411.55 346.83 429.4 C
3785 0 0 0 1 0 0 0 K
3786 0 0 0 1 0 0 0 K
3787 2 12 Q
3788 0 X
3789 0 0 0 1 0 0 0 K
3790 (s) 249.17 419.4 T
3791 2 9 Q
3792 (v) 254.3 415.8 T
3793 (p) 263.47 415.8 T
3794 3 F
3795 (,) 258.29 415.8 T
3796 2 12 Q
3797 (s) 286.73 419.4 T
3798 2 9 Q
3799 (v) 291.85 415.8 T
3800 2 12 Q
3801 (z) 301.43 419.4 T
3802 2 9 Q
3803 (s) 306.55 415.8 T
3804 3 12 Q
3805 (\050) 296.55 419.4 T
3806 (\051) 310.9 419.4 T
3807 (D) 327.66 419.4 T
3808 2 F
3809 (s) 335.71 419.4 T
3810 2 9 Q
3811 (v) 340.84 415.8 T
3812 0 0 0 1 0 0 0 K
3813 1 12 Q
3814 (+) 317.9 419.4 T
3815 (=) 273.96 419.4 T
3816 0 0 0 1 0 0 0 K
3817 0 0 612 792 C
3818 222.28 352.72 408.05 395.55 C
3819 0 0 0 1 0 0 0 K
3820 0 0 0 1 0 0 0 K
3821 3 12 Q
3822 0 X
3823 0 0 0 1 0 0 0 K
3824 (D) 223.28 368.6 T
3825 2 F
3826 (s) 231.33 368.6 T
3827 2 9 Q
3828 (v) 236.45 365 T
3829 2 12 Q
3830 (D) 259.55 382.61 T
3831 (w) 277.21 382.61 T
3832 3 F
3833 (\242) 285.92 382.61 T
3834 2 F
3835 (s) 289.59 382.61 T
3836 2 9 Q
3837 (v) 294.71 379.02 T
3838 3 12 Q
3839 (\242) 299.42 382.61 T
3840 2 9 Q
3841 (z) 306.54 374.52 T
3842 0 0 0 1 0 0 0 K
3843 1 F
3844 (0) 321.1 374.52 T
3845 (=) 313.03 374.52 T
3846 0 0 0 1 0 0 0 K
3847 3 12 Q
3848 (\327) 271.21 382.61 T
3849 2 F
3850 (w) 286.55 360.57 T
3851 2 9 Q
3852 (s) 295 356.97 T
3853 0 0 0 1 0 0 0 K
3854 1 12 Q
3855 (-) 259.45 368.6 T
3856 (-) 261.45 368.6 T
3857 (-) 263.45 368.6 T
3858 (-) 265.44 368.6 T
3859 (-) 267.44 368.6 T
3860 (-) 269.44 368.6 T
3861 (-) 271.44 368.6 T
3862 (-) 273.44 368.6 T
3863 (-) 275.43 368.6 T
3864 (-) 277.43 368.6 T
3865 (-) 279.43 368.6 T
3866 (-) 281.43 368.6 T
3867 (-) 283.43 368.6 T
3868 (-) 285.42 368.6 T
3869 (-) 287.42 368.6 T
3870 (-) 289.42 368.6 T
3871 (-) 291.42 368.6 T
3872 (-) 293.42 368.6 T
3873 (-) 295.41 368.6 T
3874 (-) 297.41 368.6 T
3875 (-) 299.41 368.6 T
3876 (-) 301.41 368.6 T
3877 (-) 303.41 368.6 T
3878 (-) 305.4 368.6 T
3879 (-) 307.4 368.6 T
3880 (-) 309.4 368.6 T
3881 (-) 311.4 368.6 T
3882 (-) 313.4 368.6 T
3883 (-) 315.39 368.6 T
3884 (-) 317.39 368.6 T
3885 (-) 319.39 368.6 T
3886 (-) 321.39 368.6 T
3887 (-) 321.6 368.6 T
3888 0 0 0 1 0 0 0 K
3889 2 F
3890 (D) 344.94 379.4 T
3891 (u) 354.31 379.4 T
3892 0 0 0 1 0 0 0 K
3893 1 9 Q
3894 (*) 360.76 375.8 T
3895 0 0 0 1 0 0 0 K
3896 2 12 Q
3897 (b) 365.97 379.4 T
3898 0 0 0 1 0 0 0 K
3899 1 9 Q
3900 (*) 372.43 375.8 T
3901 0 0 0 1 0 0 0 K
3902 2 12 Q
3903 (s) 377.64 379.4 T
3904 2 9 Q
3905 (v) 382.76 374.52 T
3906 2 12 Q
3907 (z) 392.33 379.4 T
3908 2 9 Q
3909 (s) 397.46 375.8 T
3910 3 12 Q
3911 (\050) 387.46 379.4 T
3912 (\051) 401.81 379.4 T
3913 2 F
3914 (w) 365.99 360.57 T
3915 2 9 Q
3916 (s) 374.45 356.97 T
3917 2 12 Q
3918 (g) 378.66 360.57 T
3919 0 0 0 1 0 0 0 K
3920 1 F
3921 (-) 344.84 368.6 T
3922 (-) 346.84 368.6 T
3923 (-) 348.84 368.6 T
3924 (-) 350.83 368.6 T
3925 (-) 352.83 368.6 T
3926 (-) 354.83 368.6 T
3927 (-) 356.83 368.6 T
3928 (-) 358.83 368.6 T
3929 (-) 360.83 368.6 T
3930 (-) 362.82 368.6 T
3931 (-) 364.82 368.6 T
3932 (-) 366.82 368.6 T
3933 (-) 368.82 368.6 T
3934 (-) 370.82 368.6 T
3935 (-) 372.81 368.6 T
3936 (-) 374.81 368.6 T
3937 (-) 376.81 368.6 T
3938 (-) 378.81 368.6 T
3939 (-) 380.8 368.6 T
3940 (-) 382.8 368.6 T
3941 (-) 384.8 368.6 T
3942 (-) 386.8 368.6 T
3943 (-) 388.8 368.6 T
3944 (-) 390.8 368.6 T
3945 (-) 392.79 368.6 T
3946 (-) 394.79 368.6 T
3947 (-) 396.79 368.6 T
3948 (-) 398.79 368.6 T
3949 (-) 400.79 368.6 T
3950 (-) 401.81 368.6 T
3951 (=) 246.45 368.6 T
3952 (=) 331.84 368.6 T
3953 0 0 0 1 0 0 0 K
3954 278.41 393.35 301.18 393.35 2 L
3955 0.54 H
3956 2 Z
3957 N
3958 304.78 375.71 304.78 393.35 2 L
3959 N
3960 0 0 612 792 C
3961 72 324.47 81.5 336.47 C
3962 0 0 0 1 0 0 0 K
3963 0 0 0 1 0 0 0 K
3964 2 9 Q
3965 0 X
3966 0 0 0 1 0 0 0 K
3967 (D) 73 328.72 T
3968 0 0 612 792 C
3969 72 293.82 81.58 308.22 C
3970 0 0 0 1 0 0 0 K
3971 0 0 0 1 0 0 0 K
3972 2 9 Q
3973 0 X
3974 0 0 0 1 0 0 0 K
3975 (z) 73.02 300.47 T
3976 2 7 Q
3977 (s) 76.86 297.57 T
3978 0 0 612 792 C
3979 388.78 293.82 400.85 308.22 C
3980 0 0 0 1 0 0 0 K
3981 0 0 0 1 0 0 0 K
3982 2 9 Q
3983 0 X
3984 0 0 0 1 0 0 0 K
3985 (w) 389.78 300.47 T
3986 2 7 Q
3987 (s) 396.13 297.57 T
3988 0 0 612 792 C
3989 263.11 259.97 331.9 277.82 C
3990 0 0 0 1 0 0 0 K
3991 0 0 0 1 0 0 0 K
3992 2 12 Q
3993 0 X
3994 0 0 0 1 0 0 0 K
3995 (w) 264.11 267.82 T
3996 2 9 Q
3997 (s) 272.57 264.22 T
3998 2 12 Q
3999 (u) 294.83 267.82 T
4000 0 0 0 1 0 0 0 K
4001 1 9 Q
4002 (*) 301.29 264.22 T
4003 0 0 0 1 0 0 0 K
4004 3 12 Q
4005 (F) 313.79 267.82 T
4006 2 9 Q
4007 (m) 323.4 264.22 T
4008 3 12 Q
4009 (\244) 308.79 267.82 T
4010 0 0 0 1 0 0 0 K
4011 1 F
4012 (=) 282.07 267.82 T
4013 0 0 0 1 0 0 0 K
4014 0 0 612 792 C
4015 332.7 229.32 364.57 243.72 C
4016 0 0 0 1 0 0 0 K
4017 0 0 0 1 0 0 0 K
4018 2 9 Q
4019 0 X
4020 0 0 0 1 0 0 0 K
4021 (f) 335.02 235.97 T
4022 (z) 345.6 235.97 T
4023 2 7 Q
4024 (n) 349.44 233.07 T
4025 (o) 353.48 233.07 T
4026 (m) 357.52 233.07 T
4027 3 9 Q
4028 (\327) 341.09 235.97 T
4029 0 0 612 792 C
4030 402.89 229.32 422.88 243.72 C
4031 0 0 0 1 0 0 0 K
4032 0 0 0 1 0 0 0 K
4033 2 9 Q
4034 0 X
4035 0 0 0 1 0 0 0 K
4036 (z) 403.91 235.97 T
4037 2 7 Q
4038 (n) 407.75 233.07 T
4039 (o) 411.79 233.07 T
4040 (m) 415.83 233.07 T
4041 0 0 612 792 C
4042 453.02 201.07 486.48 213.07 C
4043 0 0 0 1 0 0 0 K
4044 0 0 0 1 0 0 0 K
4045 2 9 Q
4046 0 X
4047 0 0 0 1 0 0 0 K
4048 (f) 455.35 205.32 T
4049 0 0 0 1 0 0 0 K
4050 1 F
4051 (0.1) 473.23 205.32 T
4052 (=) 463.66 205.32 T
4053 0 0 0 1 0 0 0 K
4054 0 0 612 792 C
4055 230.87 167.03 246.13 181.43 C
4056 0 0 0 1 0 0 0 K
4057 0 0 0 1 0 0 0 K
4058 3 9 Q
4059 0 X
4060 0 0 0 1 0 0 0 K
4061 (F) 231.87 173.68 T
4062 2 7 Q
4063 (m) 239.08 170.78 T
4064 0 0 612 792 C
4065 262.13 169.43 311.87 185.07 C
4066 0 0 0 1 0 0 0 K
4067 0 0 0 1 0 0 0 K
4068 0 0 0 1 0 0 0 K
4069 1 9 Q
4070 0 X
4071 0 0 0 1 0 0 0 K
4072 (1) 266.76 173.68 T
4073 (16) 280.26 173.68 T
4074 0 0 0 1 0 0 0 K
4075 3 F
4076 (z) 289.79 173.68 T
4077 0 0 0 1 0 0 0 K
4078 1 F
4079 (\320) 273.51 173.68 T
4080 0 0 0 1 0 0 0 K
4081 3 F
4082 (\050) 263.13 173.68 T
4083 (\051) 294.87 173.68 T
4084 0 0 0 1 0 0 0 K
4085 1 7 Q
4086 (1) 298.21 178.82 T
4087 (4) 306.37 178.82 T
4088 0 0 0 1 0 0 0 K
4089 3 F
4090 (\244) 303.45 178.82 T
4091 0 0 612 792 C
4092 72 72 540 720 C
4093 233.04 125.38 361.97 151.03 C
4094 0 0 0 1 0 0 0 K
4095 0 0 0 1 0 0 0 K
4096 2 12 Q
4097 0 X
4098 0 0 0 1 0 0 0 K
4099 (w) 234.04 134.51 T
4100 2 9 Q
4101 (s) 242.5 130.91 T
4102 2 12 Q
4103 (u) 269.61 134.51 T
4104 0 0 0 1 0 0 0 K
4105 1 9 Q
4106 (*) 276.07 130.91 T
4107 (4) 276.07 141.26 T
4108 1 12 Q
4109 (0.64) 293.33 134.51 T
4110 0 0 0 1 0 0 0 K
4111 2 F
4112 (u) 315.04 134.51 T
4113 0 0 0 1 0 0 0 K
4114 1 9 Q
4115 (*) 321.5 130.91 T
4116 0 0 0 1 0 0 0 K
4117 2 12 Q
4118 (w) 326.7 134.51 T
4119 0 0 0 1 0 0 0 K
4120 1 9 Q
4121 (*) 335.16 129.63 T
4122 (3) 335.16 141.26 T
4123 1 12 Q
4124 (+) 283.57 134.51 T
4125 0 0 0 1 0 0 0 K
4126 3 F
4127 (\050) 264.77 134.51 T
4128 (\051) 340.52 134.51 T
4129 0 0 0 1 0 0 0 K
4130 1 9 Q
4131 (1) 344.97 143.28 T
4132 (4) 355.46 143.28 T
4133 0 0 0 1 0 0 0 K
4134 3 F
4135 (\244) 351.71 143.28 T
4136 0 0 0 1 0 0 0 K
4137 1 12 Q
4138 (=) 252 134.51 T
4139 0 0 0 1 0 0 0 K
4140 72 72 540 720 C
4141 0 0 612 792 C
4142 272.29 85.74 352.04 109.38 C
4143 0 0 0 1 0 0 0 K
4144 0 0 0 1 0 0 0 K
4145 2 12 Q
4146 0 X
4147 0 0 0 1 0 0 0 K
4148 (w) 273.29 94.88 T
4149 0 0 0 1 0 0 0 K
4150 1 9 Q
4151 (*) 281.74 91.28 T
4152 (3) 281.74 101.63 T
4153 0 0 0 1 0 0 0 K
4154 2 12 Q
4155 (u) 305.01 94.88 T
4156 0 0 0 1 0 0 0 K
4157 1 9 Q
4158 (*) 311.46 91.28 T
4159 0 0 0 1 0 0 0 K
4160 2 12 Q
4161 (b) 316.67 94.88 T
4162 0 0 0 1 0 0 0 K
4163 1 9 Q
4164 (*) 323.12 91.28 T
4165 0 0 0 1 0 0 0 K
4166 2 12 Q
4167 (z) 328.36 94.88 T
4168 2 9 Q
4169 (n) 333.48 89.99 T
4170 (o) 338.51 89.99 T
4171 (m) 343.54 89.99 T
4172 0 0 0 1 0 0 0 K
4173 1 12 Q
4174 (=) 292.24 94.88 T
4175 0 0 0 1 0 0 0 K
4176 0 0 612 792 C
4177 0 0 0 1 0 0 0 K
4178 FMENDPAGE
4179 %%EndPage: "3" 3
4180 %%Page: "4" 4
4181 612 792 0 FMBEGINPAGE
4182 [0 0 0 1 0 0 0]
4183 [ 0 1 1 0 1 0 0]
4184 [ 1 0 1 0 0 1 0]
4185 [ 1 1 0 0 0 0 1]
4186 [ 1 0 0 0 0 1 1]
4187 [ 0 1 0 0 1 0 1]
4188 [ 0 0 1 0 1 1 0]
4189 7 FrameSetSepColors
4190 FrameNoSep
4191 0 0 0 1 0 0 0 K
4192 0 0 0 1 0 0 0 K
4193 1 10 Q
4194 0 X
4195 0 0 0 1 0 0 0 K
4196 (-) 270.03 749.33 T
4197 0 0 0 1 0 0 0 K
4198 2 F
4199 (August 16, 1999) 273.36 749.33 T
4200 0 0 0 1 0 0 0 K
4201 1 F
4202 (-) 338.64 749.33 T
4203 0 0 0 1 0 0 0 K
4204 0 0 0 1 0 0 0 K
4205 (4) 303.5 36 T
4206 0 0 0 1 0 0 0 K
4207 0 0 0 1 0 0 0 K
4208 0 0 0 1 0 0 0 K
4209 1 12 Q
4210 (Ho) 72 712 T
4211 (we) 86.36 712 T
4212 (v) 100.06 712 T
4213 (er) 105.88 712 T
4214 (, the module e) 114.72 712 T
4215 (v) 182.41 712 T
4216 (aluates \0508\051 to allo) 188.11 712 T
4217 (w for v) 271.46 712 T
4218 (arying stability functions.) 305.82 712 T
4219 0 14 Q
4220 (3. Diffusion in the planetary boundary lay) 72 650.67 T
4221 (er: Old Climate Model V) 322.73 650.67 T
4222 (ersion) 470.64 650.67 T
4223 1 12 Q
4224 -0.1 (As an option, the module may return the old climate model\325) 108 604 P
4225 -0.1 (s v) 393.96 604 P
4226 -0.1 (ersion of PBL dif) 407.34 604 P
4227 -0.1 (fusi) 490.4 604 P
4228 -0.1 (vities.) 508.1 604 P
4229 (In this formulation the v) 72 576 T
4230 (ertical dif) 188.48 576 T
4231 (fusi) 234.5 576 T
4232 (vities depend only on the v) 252.2 576 T
4233 (ertical wind shear:) 381.68 576 T
4234 (,) 342.16 539.34 T
4235 2 F
4236 (\05011\051) 520.01 539.34 T
4237 1 F
4238 (and) 72 502.3 T
4239 (. The mixing length) 131.62 502.3 T
4240 ( is speci\336ed as:) 237.79 502.3 T
4241 (, and) 344.48 469.65 T
4242 2 F
4243 (\05012\051) 520.01 469.65 T
4244 1 F
4245 (.) 412.89 435.8 T
4246 2 F
4247 (\05013\051) 520.01 435.8 T
4248 1 F
4249 (Although the module permits the use of this formulation with the PBL depth) 72 403.95 T
4250 ( to be calculated) 449.83 403.95 T
4251 (according the method described in the section 3, in the old climate model this formulation has) 72 375.7 T
4252 -0.1 (been only been used with a \336x) 72 347.7 P
4253 -0.1 (ed v) 217.21 347.7 P
4254 -0.1 (alue of) 237.15 347.7 P
4255 -0.1 ( of 5000 m and) 280.44 347.7 P
4256 -0.1 ( of 75 m. T) 380.54 347.7 P
4257 -0.1 (o reco) 435.76 347.7 P
4258 -0.1 (v) 465.14 347.7 P
4259 -0.1 (er this option,) 470.96 347.7 P
4260 (the namelist parameters \322pbl_supersource\323, \322\336x) 72 317.05 T
4261 (ed_depth\323, \322depth_0\323, and \322frac_inner\323 must) 302.1 317.05 T
4262 (ha) 72 289.05 T
4263 (v) 83.09 289.05 T
4264 (e the v) 88.91 289.05 T
4265 (alues TR) 120.6 289.05 T
4266 (UE, TR) 163.12 289.05 T
4267 (UE, 5000., 0.015, repsecti) 199.97 289.05 T
4268 (v) 324.98 289.05 T
4269 (ely) 330.8 289.05 T
4270 (.) 344.69 289.05 T
4271 0 14 Q
4272 (4. Entrainment at the top of the planetary boundary lay) 72 227.72 T
4273 (er) 404.75 227.72 T
4274 1 12 Q
4275 -0.07 (In a con) 108 181.05 P
4276 -0.07 (v) 146.04 181.05 P
4277 -0.07 (ecti) 151.85 181.05 P
4278 -0.07 (v) 168.88 181.05 P
4279 -0.07 (ely mix) 174.7 181.05 P
4280 -0.07 (ed boundary layer) 210.79 181.05 P
4281 -0.07 (, lar) 296.81 181.05 P
4282 -0.07 (ge-eddies typically o) 315.19 181.05 P
4283 -0.07 (v) 414.86 181.05 P
4284 -0.07 (ershoot the PBL top and) 420.68 181.05 P
4285 (entrain free atmospheric air into the boundary layer) 72 153.05 T
4286 (. T) 318.28 153.05 T
4287 (o represent this process, the amount of dif-) 333.65 153.05 T
4288 (fusion at the half-le) 72 125.05 T
4289 (v) 165.35 125.05 T
4290 (el which nearest the PBL top is set such that the ne) 171.17 125.05 T
4291 (g) 415.3 125.05 T
4292 (ati) 421.24 125.05 T
4293 (v) 432.94 125.05 T
4294 (e b) 438.76 125.05 T
4295 (uo) 452.84 125.05 T
4296 (yanc) 464.72 125.05 T
4297 (y \337ux due) 487.2 125.05 T
4298 (to entrainment is a speci\336ed fraction of the surf) 72 97.05 T
4299 (ace b) 299.17 97.05 T
4300 (uo) 323.92 97.05 T
4301 (yanc) 335.8 97.05 T
4302 (y \337ux:) 358.27 97.05 T
4303 246.85 526.3 342.16 556 C
4304 0 0 0 1 0 0 0 K
4305 0 0 0 1 0 0 0 K
4306 2 12 Q
4307 0 X
4308 0 0 0 1 0 0 0 K
4309 (K) 247.85 539.34 T
4310 2 9 Q
4311 (m) 256.97 535.74 T
4312 2 12 Q
4313 (k) 282.23 539.34 T
4314 (l) 296.76 539.34 T
4315 0 0 0 1 0 0 0 K
4316 1 9 Q
4317 (2) 300.56 546.09 T
4318 0 0 0 1 0 0 0 K
4319 2 12 Q
4320 (z) 323.69 531.3 T
4321 3 F
4322 (\266) 317 531.3 T
4323 (\266) 319.35 546 T
4324 2 F
4325 (V) 328.96 539.34 T
4326 3 F
4327 (\327) 290.76 539.34 T
4328 (\327) 308.06 539.34 T
4329 0 0 0 1 0 0 0 K
4330 1 F
4331 (=) 269.47 539.34 T
4332 0 0 0 1 0 0 0 K
4333 317 541.65 328.36 541.65 2 L
4334 0.54 H
4335 2 Z
4336 N
4337 330.16 549.14 336.02 549.14 333.62 551.54 3 L
4338 N
4339 315.26 529.5 315.26 555 2 L
4340 N
4341 338.42 529.5 338.42 555 2 L
4342 N
4343 0 0 612 792 C
4344 92.33 495.65 131.62 510.05 C
4345 0 0 0 1 0 0 0 K
4346 0 0 0 1 0 0 0 K
4347 2 9 Q
4348 0 X
4349 0 0 0 1 0 0 0 K
4350 (K) 93.33 502.3 T
4351 2 7 Q
4352 (h) 100.17 499.4 T
4353 2 9 Q
4354 (K) 117.73 502.3 T
4355 2 7 Q
4356 (m) 124.57 499.4 T
4357 0 0 0 1 0 0 0 K
4358 1 9 Q
4359 (=) 108.16 502.3 T
4360 0 0 0 1 0 0 0 K
4361 0 0 612 792 C
4362 232.29 498.05 237.79 510.05 C
4363 0 0 0 1 0 0 0 K
4364 0 0 0 1 0 0 0 K
4365 2 9 Q
4366 0 X
4367 0 0 0 1 0 0 0 K
4368 (l) 233.29 502.3 T
4369 0 0 612 792 C
4370 224.2 461.8 344.48 479.65 C
4371 0 0 0 1 0 0 0 K
4372 0 0 0 1 0 0 0 K
4373 2 12 Q
4374 0 X
4375 0 0 0 1 0 0 0 K
4376 (l) 225.2 469.65 T
4377 (k) 247.31 469.65 T
4378 (z) 253.35 469.65 T
4379 0 0 0 1 0 0 0 K
4380 1 F
4381 (for) 273.72 469.65 T
4382 0 0 0 1 0 0 0 K
4383 2 F
4384 (z) 297.44 469.65 T
4385 (h) 314.7 469.65 T
4386 2 9 Q
4387 (i) 321.15 466.05 T
4388 (n) 324.18 466.05 T
4389 (n) 329.21 466.05 T
4390 (e) 334.25 466.05 T
4391 (r) 338.77 466.05 T
4392 3 12 Q
4393 (<) 305.11 469.65 T
4394 0 0 0 1 0 0 0 K
4395 1 F
4396 (=) 234.54 469.65 T
4397 0 0 0 1 0 0 0 K
4398 0 0 612 792 C
4399 176.12 427.95 412.89 445.8 C
4400 0 0 0 1 0 0 0 K
4401 0 0 0 1 0 0 0 K
4402 2 12 Q
4403 0 X
4404 0 0 0 1 0 0 0 K
4405 (l) 177.12 435.8 T
4406 (k) 199.23 435.8 T
4407 (h) 205.27 435.8 T
4408 (h) 216.82 435.8 T
4409 (z) 234.84 435.8 T
4410 0 0 0 1 0 0 0 K
4411 1 F
4412 (\320) 225.82 435.8 T
4413 0 0 0 1 0 0 0 K
4414 3 F
4415 (\050) 211.98 435.8 T
4416 (\051) 240.36 435.8 T
4417 2 F
4418 (h) 257.21 435.8 T
4419 (h) 275.2 435.8 T
4420 2 9 Q
4421 (i) 281.66 432.2 T
4422 (n) 284.69 432.2 T
4423 (n) 289.72 432.2 T
4424 (e) 294.75 432.2 T
4425 (r) 299.28 432.2 T
4426 0 0 0 1 0 0 0 K
4427 1 12 Q
4428 (\320) 266.2 435.8 T
4429 0 0 0 1 0 0 0 K
4430 3 F
4431 (\050) 252.36 435.8 T
4432 (\051) 303.84 435.8 T
4433 (\244) 247.36 435.8 T
4434 0 0 0 1 0 0 0 K
4435 1 F
4436 (for) 323.54 435.8 T
4437 0 0 0 1 0 0 0 K
4438 2 F
4439 (h) 347.24 435.8 T
4440 2 9 Q
4441 (i) 353.7 432.2 T
4442 (n) 356.73 432.2 T
4443 (n) 361.76 432.2 T
4444 (e) 366.79 432.2 T
4445 (r) 371.32 432.2 T
4446 2 12 Q
4447 (z) 387.63 435.8 T
4448 3 F
4449 (\243) 378.02 435.8 T
4450 2 F
4451 (h) 404.89 435.8 T
4452 3 F
4453 (<) 395.3 435.8 T
4454 0 0 0 1 0 0 0 K
4455 1 F
4456 (=) 186.47 435.8 T
4457 0 0 0 1 0 0 0 K
4458 0 0 612 792 C
4459 442.33 399.7 449.83 411.7 C
4460 0 0 0 1 0 0 0 K
4461 0 0 0 1 0 0 0 K
4462 2 9 Q
4463 0 X
4464 0 0 0 1 0 0 0 K
4465 (h) 443.33 403.95 T
4466 0 0 612 792 C
4467 272.94 343.45 280.44 355.45 C
4468 0 0 0 1 0 0 0 K
4469 0 0 0 1 0 0 0 K
4470 2 9 Q
4471 0 X
4472 0 0 0 1 0 0 0 K
4473 (h) 273.94 347.7 T
4474 0 0 612 792 C
4475 355.61 341.05 380.54 355.45 C
4476 0 0 0 1 0 0 0 K
4477 0 0 0 1 0 0 0 K
4478 2 9 Q
4479 0 X
4480 0 0 0 1 0 0 0 K
4481 (h) 356.61 347.7 T
4482 2 7 Q
4483 (i) 361.45 344.8 T
4484 (n) 363.94 344.8 T
4485 (n) 367.98 344.8 T
4486 (e) 372.01 344.8 T
4487 (r) 375.66 344.8 T
4488 0 0 612 792 C
4489 0 0 0 1 0 0 0 K
4490 FMENDPAGE
4491 %%EndPage: "4" 4
4492 %%Page: "5" 5
4493 612 792 0 FMBEGINPAGE
4494 [0 0 0 1 0 0 0]
4495 [ 0 1 1 0 1 0 0]
4496 [ 1 0 1 0 0 1 0]
4497 [ 1 1 0 0 0 0 1]
4498 [ 1 0 0 0 0 1 1]
4499 [ 0 1 0 0 1 0 1]
4500 [ 0 0 1 0 1 1 0]
4501 7 FrameSetSepColors
4502 FrameNoSep
4503 0 0 0 1 0 0 0 K
4504 0 0 0 1 0 0 0 K
4505 1 10 Q
4506 0 X
4507 0 0 0 1 0 0 0 K
4508 (-) 270.03 749.33 T
4509 0 0 0 1 0 0 0 K
4510 2 F
4511 (August 16, 1999) 273.36 749.33 T
4512 0 0 0 1 0 0 0 K
4513 1 F
4514 (-) 338.64 749.33 T
4515 0 0 0 1 0 0 0 K
4516 0 0 0 1 0 0 0 K
4517 (5) 303.5 36 T
4518 0 0 0 1 0 0 0 K
4519 0 0 0 1 0 0 0 K
4520 0 0 0 1 0 0 0 K
4521 0 0 0 1 0 0 0 K
4522 0 0 0 1 0 0 0 K
4523 0 0 0 1 0 0 0 K
4524 0 0 0 1 0 0 0 K
4525 0 0 0 1 0 0 0 K
4526 0 0 0 1 0 0 0 K
4527 0 0 0 1 0 0 0 K
4528 0 0 0 1 0 0 0 K
4529 0 0 0 1 0 0 0 K
4530 0 0 0 1 0 0 0 K
4531 0 0 0 1 0 0 0 K
4532 0 0 0 1 0 0 0 K
4533 0 0 0 1 0 0 0 K
4534 0 0 0 1 0 0 0 K
4535 0 0 0 1 0 0 0 K
4536 0 0 0 1 0 0 0 K
4537 0 0 0 1 0 0 0 K
4538 0 0 0 1 0 0 0 K
4539 0 0 0 1 0 0 0 K
4540 0 0 0 1 0 0 0 K
4541 1 12 Q
4542 (,) 372.23 697.21 T
4543 2 F
4544 (\05014\051) 520.01 697.21 T
4545 1 F
4546 (where) 72 655.95 T
4547 ( is a namelist parameter called \322entr_ratio\323 which is speci\336ed to be 0.2 \050Stull 1988\051. In) 116.97 655.95 T
4548 (terms of model v) 72 625.3 T
4549 (ariables,) 153.36 625.3 T
4550 (,) 350.78 584.51 T
4551 2 F
4552 (\05015\051) 520.01 584.51 T
4553 1 F
4554 (where the) 72 544.62 T
4555 ( is the dif) 130.49 544.62 T
4556 (ference between the full model le) 175.19 544.62 T
4557 (v) 335.17 544.62 T
4558 (els which contain the PBL top. Note that) 340.99 544.62 T
4559 (if the surf) 72 516.37 T
4560 (ace layer is neutral or stable,) 118.54 516.37 T
4561 (, then) 286.35 516.37 T
4562 (.) 356.47 516.37 T
4563 (Note that entrainment is not calculated if the PBL depth is gi) 108 485.72 T
4564 (v) 399.35 485.72 T
4565 (en a \336x) 405.17 485.72 T
4566 (ed v) 440.32 485.72 T
4567 (alue) 460.34 485.72 T
4568 -0.04 (\050\322\336x) 72 457.72 P
4569 -0.04 (ed_depth\323 = TR) 93.82 457.72 P
4570 -0.04 (UE\051. This pre) 170.68 457.72 P
4571 -0.04 (v) 238.92 457.72 P
4572 -0.04 (ents the calculation of entrainment in the case that PBL dif) 244.74 457.72 P
4573 -0.04 (fu-) 526.01 457.72 P
4574 (si) 72 429.72 T
4575 (vities are calculated according to the old climate model\325) 79.7 429.72 T
4576 (s method.) 348.32 429.72 T
4577 0 14 Q
4578 (5. Diffusion in the fr) 72 368.39 T
4579 (ee atmospher) 192.69 368.39 T
4580 (e) 272.14 368.39 T
4581 1 12 Q
4582 (Abo) 108 321.72 T
4583 (v) 128.48 321.72 T
4584 (e the PBL, v) 134.3 321.72 T
4585 (ertical dif) 194.12 321.72 T
4586 (fusi) 240.14 321.72 T
4587 (vities may e) 257.84 321.72 T
4588 (v) 315.54 321.72 T
4589 (erywhere and al) 321.36 321.72 T
4590 (w) 397.87 321.72 T
4591 (ays be set to zero by k) 406.42 321.72 T
4592 (eep-) 512.94 321.72 T
4593 -0.16 (ing the setting of the namelist parameter \322free_atm_dif) 72 293.72 P
4594 -0.16 (f\323 at its def) 334.21 293.72 P
4595 -0.16 (ault v) 387.27 293.72 P
4596 -0.16 (alue of F) 413.82 293.72 P
4597 -0.16 (ALSE. Ho) 455.27 293.72 P
4598 -0.16 (we) 508.32 293.72 P
4599 -0.16 (v) 522.01 293.72 P
4600 -0.16 (er) 527.83 293.72 P
4601 (if it is set to true is calculated according the follo) 72 265.72 T
4602 (wing method.) 306.34 265.72 T
4603 (Free atmospheric dif) 108 237.72 T
4604 (fusion is speci\336ed according to a mixing length formulation:) 207.01 237.72 T
4605 (,) 373.49 201.06 T
4606 2 F
4607 (\05016\051) 520.01 201.06 T
4608 1 F
4609 -0.1 (where) 72 164.02 P
4610 -0.1 ( is a mixing length with def) 109.72 164.02 P
4611 -0.1 (ault v) 241.01 164.02 P
4612 -0.1 (alue of 30 m \050namelist parameter \322mix_len\323\051. The Rich-) 267.61 164.02 P
4613 (ardson number) 72 135.77 T
4614 (,) 143.17 135.77 T
4615 (, is e) 165.49 135.77 T
4616 (v) 187.53 135.77 T
4617 (aluated as:) 193.23 135.77 T
4618 (.) 347.36 93.61 T
4619 2 F
4620 (\05017\051) 520.01 93.61 T
4621 216.77 679.95 372.23 720 C
4622 0 0 0 1 0 0 0 K
4623 0 0 0 1 0 0 0 K
4624 2 12 Q
4625 0 X
4626 0 0 0 1 0 0 0 K
4627 (K) 217.77 697.21 T
4628 2 9 Q
4629 (m) 226.89 693.61 T
4630 (h) 237.89 693.61 T
4631 3 F
4632 (,) 233.39 693.61 T
4633 2 12 Q
4634 (z) 249.79 689.45 T
4635 3 F
4636 (\266) 243.1 689.45 T
4637 (\266) 243.1 707 T
4638 2 F
4639 (s) 249.02 707 T
4640 2 9 Q
4641 (v) 254.15 703.4 T
4642 (z) 262.3 684.2 T
4643 (h) 276.86 684.2 T
4644 0 0 0 1 0 0 0 K
4645 1 F
4646 (=) 268.79 684.2 T
4647 0 0 0 1 0 0 0 K
4648 2 12 Q
4649 (C) 300.12 697.21 T
4650 2 9 Q
4651 (e) 308.85 693.61 T
4652 2 12 Q
4653 (w) 321.84 697.21 T
4654 3 F
4655 (\242) 330.55 697.21 T
4656 2 F
4657 (s) 334.22 697.21 T
4658 2 9 Q
4659 (v) 339.35 693.61 T
4660 3 12 Q
4661 (\242) 344.05 697.21 T
4662 2 9 Q
4663 (z) 351.17 689.11 T
4664 0 0 0 1 0 0 0 K
4665 1 F
4666 (0) 365.73 689.11 T
4667 (=) 357.67 689.11 T
4668 0 0 0 1 0 0 0 K
4669 3 12 Q
4670 (\327) 315.84 697.21 T
4671 0 0 0 1 0 0 0 K
4672 1 F
4673 (=) 287.36 697.21 T
4674 0 0 0 1 0 0 0 K
4675 243.1 699.8 254.46 699.8 2 L
4676 0.54 H
4677 2 Z
4678 N
4679 260.54 685.4 260.54 717.8 2 L
4680 N
4681 323.04 707.95 345.82 707.95 2 L
4682 N
4683 349.41 690.31 349.41 707.95 2 L
4684 N
4685 0 0 612 792 C
4686 104.32 649.3 116.97 663.7 C
4687 0 0 0 1 0 0 0 K
4688 0 0 0 1 0 0 0 K
4689 2 9 Q
4690 0 X
4691 0 0 0 1 0 0 0 K
4692 (C) 105.32 655.95 T
4693 2 7 Q
4694 (e) 111.86 653.05 T
4695 0 0 612 792 C
4696 238.23 568.62 350.78 605.3 C
4697 0 0 0 1 0 0 0 K
4698 0 0 0 1 0 0 0 K
4699 2 12 Q
4700 0 X
4701 0 0 0 1 0 0 0 K
4702 (K) 239.23 584.51 T
4703 2 9 Q
4704 (m) 248.35 580.91 T
4705 (h) 259.35 580.91 T
4706 3 F
4707 (,) 254.85 580.91 T
4708 2 12 Q
4709 (C) 286.81 595.3 T
4710 2 9 Q
4711 (e) 295.53 591.7 T
4712 2 12 Q
4713 (u) 300.24 595.3 T
4714 0 0 0 1 0 0 0 K
4715 1 9 Q
4716 (*) 306.69 590.42 T
4717 0 0 0 1 0 0 0 K
4718 2 12 Q
4719 (b) 311.9 595.3 T
4720 0 0 0 1 0 0 0 K
4721 1 9 Q
4722 (*) 318.36 591.7 T
4723 0 0 0 1 0 0 0 K
4724 3 12 Q
4725 (D) 331.85 595.3 T
4726 2 F
4727 (z) 339.9 595.3 T
4728 3 F
4729 (\327) 325.86 595.3 T
4730 2 F
4731 (g) 282.85 576.47 T
4732 3 F
4733 (D) 297.84 576.47 T
4734 2 F
4735 (s) 305.89 576.47 T
4736 2 9 Q
4737 (v) 311.02 572.87 T
4738 2 12 Q
4739 (s) 323.02 576.47 T
4740 2 9 Q
4741 (v) 328.14 572.87 T
4742 2 12 Q
4743 (h) 337.69 576.47 T
4744 3 F
4745 (\050) 332.84 576.47 T
4746 (\051) 344.54 576.47 T
4747 (\244) 318.01 576.47 T
4748 (\327) 291.85 576.47 T
4749 0 0 0 1 0 0 0 K
4750 1 F
4751 (-) 282.85 584.51 T
4752 (-) 284.84 584.51 T
4753 (-) 286.84 584.51 T
4754 (-) 288.84 584.51 T
4755 (-) 290.84 584.51 T
4756 (-) 292.84 584.51 T
4757 (-) 294.83 584.51 T
4758 (-) 296.83 584.51 T
4759 (-) 298.83 584.51 T
4760 (-) 300.83 584.51 T
4761 (-) 302.83 584.51 T
4762 (-) 304.82 584.51 T
4763 (-) 306.82 584.51 T
4764 (-) 308.82 584.51 T
4765 (-) 310.82 584.51 T
4766 (-) 312.82 584.51 T
4767 (-) 314.81 584.51 T
4768 (-) 316.81 584.51 T
4769 (-) 318.81 584.51 T
4770 (-) 320.81 584.51 T
4771 (-) 322.81 584.51 T
4772 (-) 324.8 584.51 T
4773 (-) 326.8 584.51 T
4774 (-) 328.8 584.51 T
4775 (-) 330.8 584.51 T
4776 (-) 332.8 584.51 T
4777 (-) 334.79 584.51 T
4778 (-) 336.79 584.51 T
4779 (-) 338.79 584.51 T
4780 (-) 340.79 584.51 T
4781 (-) 342.79 584.51 T
4782 (-) 344.54 584.51 T
4783 (=) 269.84 584.51 T
4784 0 0 0 1 0 0 0 K
4785 0 0 612 792 C
4786 121.98 540.37 130.49 552.37 C
4787 0 0 0 1 0 0 0 K
4788 0 0 0 1 0 0 0 K
4789 3 9 Q
4790 0 X
4791 0 0 0 1 0 0 0 K
4792 (D) 122.98 544.62 T
4793 0 0 612 792 C
4794 258.83 509.72 286.35 524.12 C
4795 0 0 0 1 0 0 0 K
4796 0 0 0 1 0 0 0 K
4797 2 9 Q
4798 0 X
4799 0 0 0 1 0 0 0 K
4800 (b) 259.83 516.37 T
4801 0 0 0 1 0 0 0 K
4802 1 7 Q
4803 (*) 264.67 513.47 T
4804 1 9 Q
4805 (0.) 277.6 516.37 T
4806 0 0 0 1 0 0 0 K
4807 3 F
4808 (\243) 270.42 516.37 T
4809 0 0 612 792 C
4810 316.02 509.72 356.47 524.12 C
4811 0 0 0 1 0 0 0 K
4812 0 0 0 1 0 0 0 K
4813 2 9 Q
4814 0 X
4815 0 0 0 1 0 0 0 K
4816 (K) 317.02 516.37 T
4817 2 7 Q
4818 (m) 323.86 513.47 T
4819 (h) 332.41 513.47 T
4820 3 F
4821 (,) 328.91 513.47 T
4822 0 0 0 1 0 0 0 K
4823 1 9 Q
4824 (0) 349.97 516.37 T
4825 (=) 340.4 516.37 T
4826 0 0 0 1 0 0 0 K
4827 0 0 612 792 C
4828 215.52 188.02 373.49 217.72 C
4829 0 0 0 1 0 0 0 K
4830 0 0 0 1 0 0 0 K
4831 2 12 Q
4832 0 X
4833 0 0 0 1 0 0 0 K
4834 (K) 216.52 201.06 T
4835 2 9 Q
4836 (m) 225.64 197.46 T
4837 2 12 Q
4838 (l) 250.9 201.06 T
4839 0 0 0 1 0 0 0 K
4840 1 9 Q
4841 (2) 254.7 207.81 T
4842 0 0 0 1 0 0 0 K
4843 2 12 Q
4844 (z) 269.55 193.02 T
4845 3 F
4846 (\266) 262.85 193.02 T
4847 (\266) 265.2 207.72 T
4848 2 F
4849 (V) 274.81 201.06 T
4850 (F) 295 201.06 T
4851 (R) 308.45 201.06 T
4852 (i) 316.49 201.06 T
4853 2 9 Q
4854 (B) 320.36 197.46 T
4855 3 12 Q
4856 (\050) 303.45 201.06 T
4857 (\051) 326.71 201.06 T
4858 2 F
4859 (G) 339.7 201.06 T
4860 3 F
4861 (D) 353.92 201.06 T
4862 2 F
4863 (z) 361.97 201.06 T
4864 3 F
4865 (\050) 349.07 201.06 T
4866 (\051) 367.49 201.06 T
4867 (\327) 333.7 201.06 T
4868 (\327) 289.01 201.06 T
4869 0 0 0 1 0 0 0 K
4870 1 F
4871 (=) 238.13 201.06 T
4872 0 0 0 1 0 0 0 K
4873 262.85 203.37 274.21 203.37 2 L
4874 0.54 H
4875 2 Z
4876 N
4877 276.01 210.86 281.87 210.86 279.47 213.26 3 L
4878 N
4879 261.11 191.22 261.11 216.72 2 L
4880 N
4881 284.27 191.22 284.27 216.72 2 L
4882 N
4883 0 0 612 792 C
4884 104.22 159.77 109.72 171.77 C
4885 0 0 0 1 0 0 0 K
4886 0 0 0 1 0 0 0 K
4887 2 9 Q
4888 0 X
4889 0 0 0 1 0 0 0 K
4890 (l) 105.22 164.02 T
4891 0 0 612 792 C
4892 149.17 129.12 165.49 143.52 C
4893 0 0 0 1 0 0 0 K
4894 0 0 0 1 0 0 0 K
4895 2 9 Q
4896 0 X
4897 0 0 0 1 0 0 0 K
4898 (R) 150.29 135.77 T
4899 (i) 156.32 135.77 T
4900 2 7 Q
4901 (B) 159.22 132.87 T
4902 0 0 612 792 C
4903 241.65 76.08 347.36 113.12 C
4904 0 0 0 1 0 0 0 K
4905 0 0 0 1 0 0 0 K
4906 2 12 Q
4907 0 X
4908 0 0 0 1 0 0 0 K
4909 (R) 242.8 93.61 T
4910 (i) 250.85 93.61 T
4911 2 9 Q
4912 (B) 254.71 90.01 T
4913 2 12 Q
4914 (g) 291.66 103.13 T
4915 3 F
4916 (D) 298.37 103.13 T
4917 2 F
4918 (s) 306.42 103.13 T
4919 2 9 Q
4920 (v) 311.55 99.53 T
4921 2 12 Q
4922 (s) 323.54 103.13 T
4923 2 9 Q
4924 (v) 328.67 99.53 T
4925 3 12 Q
4926 (\244) 318.54 103.13 T
4927 (D) 284.06 81.08 T
4928 2 F
4929 (U) 292.11 81.08 T
4930 0 0 0 1 0 0 0 K
4931 1 9 Q
4932 (2) 301.74 87.83 T
4933 0 0 0 1 0 0 0 K
4934 3 12 Q
4935 (D) 319.01 81.08 T
4936 2 F
4937 (V) 327.06 81.08 T
4938 0 0 0 1 0 0 0 K
4939 1 9 Q
4940 (2) 335.77 87.83 T
4941 1 12 Q
4942 (+) 309.24 81.08 T
4943 0 0 0 1 0 0 0 K
4944 3 F
4945 (\050) 279.21 81.08 T
4946 (\051) 341.12 81.08 T
4947 0 0 0 1 0 0 0 K
4948 1 F
4949 (-) 279.21 93.61 T
4950 (-) 281.21 93.61 T
4951 (-) 283.2 93.61 T
4952 (-) 285.2 93.61 T
4953 (-) 287.2 93.61 T
4954 (-) 289.2 93.61 T
4955 (-) 291.2 93.61 T
4956 (-) 293.2 93.61 T
4957 (-) 295.19 93.61 T
4958 (-) 297.19 93.61 T
4959 (-) 299.19 93.61 T
4960 (-) 301.19 93.61 T
4961 (-) 303.18 93.61 T
4962 (-) 305.18 93.61 T
4963 (-) 307.18 93.61 T
4964 (-) 309.18 93.61 T
4965 (-) 311.18 93.61 T
4966 (-) 313.17 93.61 T
4967 (-) 315.17 93.61 T
4968 (-) 317.17 93.61 T
4969 (-) 319.17 93.61 T
4970 (-) 321.17 93.61 T
4971 (-) 323.16 93.61 T
4972 (-) 325.16 93.61 T
4973 (-) 327.16 93.61 T
4974 (-) 329.16 93.61 T
4975 (-) 331.16 93.61 T
4976 (-) 333.15 93.61 T
4977 (-) 335.15 93.61 T
4978 (-) 337.15 93.61 T
4979 (-) 339.15 93.61 T
4980 (-) 341.12 93.61 T
4981 (=) 266.2 93.61 T
4982 0 0 0 1 0 0 0 K
4983 0 0 612 792 C
4984 0 0 0 1 0 0 0 K
4985 FMENDPAGE
4986 %%EndPage: "5" 5
4987 %%Page: "6" 6
4988 612 792 0 FMBEGINPAGE
4989 [0 0 0 1 0 0 0]
4990 [ 0 1 1 0 1 0 0]
4991 [ 1 0 1 0 0 1 0]
4992 [ 1 1 0 0 0 0 1]
4993 [ 1 0 0 0 0 1 1]
4994 [ 0 1 0 0 1 0 1]
4995 [ 0 0 1 0 1 1 0]
4996 7 FrameSetSepColors
4997 FrameNoSep
4998 0 0 0 1 0 0 0 K
4999 0 0 0 1 0 0 0 K
5000 1 10 Q
5001 0 X
5002 0 0 0 1 0 0 0 K
5003 (-) 270.03 749.33 T
5004 0 0 0 1 0 0 0 K
5005 2 F
5006 (August 16, 1999) 273.36 749.33 T
5007 0 0 0 1 0 0 0 K
5008 1 F
5009 (-) 338.64 749.33 T
5010 0 0 0 1 0 0 0 K
5011 0 0 0 1 0 0 0 K
5012 (6) 303.5 36 T
5013 0 0 0 1 0 0 0 K
5014 0 0 0 1 0 0 0 K
5015 0 0 0 1 0 0 0 K
5016 1 12 Q
5017 (The Richardson number function is gi) 72 712 T
5018 (v) 254.02 712 T
5019 (en by:) 259.84 712 T
5020 (,) 349.19 672.49 T
5021 2 F
5022 (\05018\051) 520.01 672.49 T
5023 1 F
5024 (where) 72 632.6 T
5025 ( is the critical Richardson number beneath which free atmospheric dif) 120.3 632.6 T
5026 (fusion occurs) 454.6 632.6 T
5027 (\050namelist parameter \322rich_crit_dif) 72 601.95 T
5028 (f\323 withdef) 235.66 601.95 T
5029 (ault v) 284.52 601.95 T
5030 (alue of 0.25\051.) 311.22 601.95 T
5031 (This dif) 108 573.95 T
5032 (fusion is implemented in tw) 145.37 573.95 T
5033 (o w) 279.25 573.95 T
5034 (ays. In the \336rst method,) 296.8 573.95 T
5035 ( is set to 1, and) 442.96 573.95 T
5036 (, where) 127.03 545.7 T
5037 ( is a namelist speci\336ed Prandtl number \050called \322rich_prandtl\323\051 with def) 178.08 545.7 T
5038 (ault) 518.57 545.7 T
5039 (v) 72 515.05 T
5040 (alue of 1. In the second method \050selected by setting \322free_atm_sk) 77.7 515.05 T
5041 (yhi_dif) 394.79 515.05 T
5042 (f\323 to TR) 429.16 515.05 T
5043 (UE\051,) 468.67 515.05 T
5044 (, where) 172.26 483.67 T
5045 ( is the v) 223.11 483.67 T
5046 (ertical spacing of model le) 260.6 483.67 T
5047 (v) 387.61 483.67 T
5048 (els in km. In addition, the) 393.43 483.67 T
5049 (Richardson number used is) 72 455.42 T
5050 (, and) 251.48 455.42 T
5051 (.) 392.97 422.77 T
5052 2 F
5053 (\05019\051) 520.01 422.77 T
5054 1 F
5055 (The moti) 72 390.92 T
5056 (v) 115.37 390.92 T
5057 (ation for this second method can be found in Le) 121.07 390.92 T
5058 (vy et al. \0501982\051.) 350.4 390.92 T
5059 0 14 Q
5060 (6. Backgr) 72 329.58 T
5061 (ound Diffusion) 129.3 329.58 T
5062 1 12 Q
5063 (In addition to the abo) 108 282.92 T
5064 (v) 210.48 282.92 T
5065 (e speci\336cation of dif) 216.3 282.92 T
5066 (fusi) 314.32 282.92 T
5067 (vities, a background le) 332.02 282.92 T
5068 (v) 440.36 282.92 T
5069 (el of atmospheric) 446.18 282.92 T
5070 -0.32 (dif) 72 254.92 P
5071 -0.32 (fusi) 85.03 254.92 P
5072 -0.32 (vities \050namelist parameters \322background_m\323 and \322background_t\323 with def) 102.73 254.92 P
5073 -0.32 (ault v) 457.94 254.92 P
5074 -0.32 (alues of 0.\051) 484.32 254.92 P
5075 (is speci\336ed such that e) 72 226.92 T
5076 (v) 179.69 226.92 T
5077 (erywhere) 185.51 226.92 T
5078 ( \263) 246.49 226.92 T
5079 3 F
5080 (\263) 249.49 226.92 T
5081 1 F
5082 (background_t and) 259.08 226.92 T
5083 ( \263) 361.73 226.92 T
5084 3 F
5085 (\263) 364.73 226.92 T
5086 1 F
5087 (background_m.) 374.32 226.92 T
5088 0 14 Q
5089 (7. Refer) 72 162.93 T
5090 (ences) 119.17 162.93 T
5091 1 12 Q
5092 (Beljaars, A. C. M. and P) 72 116.27 T
5093 (. V) 188.33 116.27 T
5094 (iterbo, 1999: The role of the boundary layer in a numerical weather) 202.27 116.27 T
5095 (prediction model, in Clear and cloudy boundary layers, A.A.M. Holtslag and P) 108 88.27 T
5096 (.G.) 485.29 88.27 T
5097 239.82 656.6 349.19 692 C
5098 0 0 0 1 0 0 0 K
5099 0 0 0 1 0 0 0 K
5100 2 12 Q
5101 0 X
5102 0 0 0 1 0 0 0 K
5103 (F) 240.82 672.49 T
5104 (R) 254.27 672.49 T
5105 (i) 262.31 672.49 T
5106 2 9 Q
5107 (B) 266.17 668.89 T
5108 3 12 Q
5109 (\050) 249.27 672.49 T
5110 (\051) 272.52 672.49 T
5111 0 0 0 1 0 0 0 K
5112 1 F
5113 (1) 300.74 672.49 T
5114 0 0 0 1 0 0 0 K
5115 2 F
5116 (R) 319.13 682 T
5117 (i) 327.17 682 T
5118 2 9 Q
5119 (B) 331.04 678.4 T
5120 2 12 Q
5121 (R) 319.35 664.45 T
5122 (i) 327.39 664.45 T
5123 2 9 Q
5124 (f) 332.5 660.85 T
5125 0 0 0 1 0 0 0 K
5126 1 12 Q
5127 (-) 318.98 672.49 T
5128 (-) 320.97 672.49 T
5129 (-) 322.97 672.49 T
5130 (-) 324.97 672.49 T
5131 (-) 326.97 672.49 T
5132 (-) 328.97 672.49 T
5133 (-) 330.96 672.49 T
5134 (-) 332.54 672.49 T
5135 (\320) 309.74 672.49 T
5136 0 0 0 1 0 0 0 K
5137 3 F
5138 (\350) 295.28 666.45 T
5139 (\370) 336.43 666.45 T
5140 (\346) 295.28 676.73 T
5141 (\366) 336.43 676.73 T
5142 0 0 0 1 0 0 0 K
5143 1 9 Q
5144 (2) 342.69 684.25 T
5145 1 12 Q
5146 (=) 282.52 672.49 T
5147 0 0 0 1 0 0 0 K
5148 0 0 612 792 C
5149 104.32 625.95 120.3 640.35 C
5150 0 0 0 1 0 0 0 K
5151 0 0 0 1 0 0 0 K
5152 2 9 Q
5153 0 X
5154 0 0 0 1 0 0 0 K
5155 (R) 105.43 632.6 T
5156 (i) 111.46 632.6 T
5157 2 7 Q
5158 (f) 115.33 629.7 T
5159 0 0 612 792 C
5160 416.12 569.7 442.96 581.7 C
5161 0 0 0 1 0 0 0 K
5162 0 0 0 1 0 0 0 K
5163 2 9 Q
5164 0 X
5165 0 0 0 1 0 0 0 K
5166 (G) 417.12 573.95 T
5167 3 F
5168 (D) 427.79 573.95 T
5169 2 F
5170 (z) 433.83 573.95 T
5171 3 F
5172 (\050) 424.15 573.95 T
5173 (\051) 437.96 573.95 T
5174 0 0 612 792 C
5175 72 539.05 127.03 553.45 C
5176 0 0 0 1 0 0 0 K
5177 0 0 0 1 0 0 0 K
5178 2 9 Q
5179 0 X
5180 0 0 0 1 0 0 0 K
5181 (K) 73 545.7 T
5182 2 7 Q
5183 (h) 79.84 542.8 T
5184 2 9 Q
5185 (K) 97.4 545.7 T
5186 2 7 Q
5187 (m) 104.24 542.8 T
5188 2 9 Q
5189 (P) 115.29 545.7 T
5190 (r) 121.32 545.7 T
5191 3 F
5192 (\244) 111.54 545.7 T
5193 0 0 0 1 0 0 0 K
5194 1 F
5195 (=) 87.83 545.7 T
5196 0 0 0 1 0 0 0 K
5197 0 0 612 792 C
5198 165.35 541.45 178.08 553.45 C
5199 0 0 0 1 0 0 0 K
5200 0 0 0 1 0 0 0 K
5201 2 9 Q
5202 0 X
5203 0 0 0 1 0 0 0 K
5204 (P) 166.35 545.7 T
5205 (r) 172.38 545.7 T
5206 0 0 612 792 C
5207 72 479.42 172.26 495.05 C
5208 0 0 0 1 0 0 0 K
5209 0 0 0 1 0 0 0 K
5210 2 9 Q
5211 0 X
5212 0 0 0 1 0 0 0 K
5213 (G) 73 483.67 T
5214 3 F
5215 (D) 83.66 483.67 T
5216 2 F
5217 (z) 89.7 483.67 T
5218 3 F
5219 (\050) 80.03 483.67 T
5220 (\051) 93.84 483.67 T
5221 0 0 0 1 0 0 0 K
5222 1 F
5223 (1.) 110.9 483.67 T
5224 (10) 127.22 483.67 T
5225 1 7 Q
5226 (4) 140.33 488.8 T
5227 (\320) 136.56 488.8 T
5228 0 0 0 1 0 0 0 K
5229 3 9 Q
5230 (D) 147.99 483.67 T
5231 2 F
5232 (z) 154.03 483.67 T
5233 3 F
5234 (\050) 144.36 483.67 T
5235 (\051) 158.17 483.67 T
5236 0 0 0 1 0 0 0 K
5237 1 7 Q
5238 (1.5) 161.51 488.8 T
5239 1 9 Q
5240 (+) 119.9 483.67 T
5241 (=) 101.33 483.67 T
5242 0 0 0 1 0 0 0 K
5243 0 0 612 792 C
5244 210.57 479.42 223.11 491.42 C
5245 0 0 0 1 0 0 0 K
5246 0 0 0 1 0 0 0 K
5247 3 9 Q
5248 0 X
5249 0 0 0 1 0 0 0 K
5250 (D) 211.57 483.67 T
5251 2 F
5252 (z) 217.61 483.67 T
5253 0 0 612 792 C
5254 205.32 448.77 251.48 463.17 C
5255 0 0 0 1 0 0 0 K
5256 0 0 0 1 0 0 0 K
5257 2 9 Q
5258 0 X
5259 0 0 0 1 0 0 0 K
5260 (R) 206.44 455.42 T
5261 (i) 212.47 455.42 T
5262 2 7 Q
5263 (B) 215.37 452.52 T
5264 2 9 Q
5265 (G) 225.64 455.42 T
5266 3 F
5267 (D) 236.3 455.42 T
5268 2 F
5269 (z) 242.34 455.42 T
5270 3 F
5271 (\050) 232.67 455.42 T
5272 (\051) 246.48 455.42 T
5273 (\244) 221.89 455.42 T
5274 0 0 612 792 C
5275 196.03 414.92 392.97 432.77 C
5276 0 0 0 1 0 0 0 K
5277 0 0 0 1 0 0 0 K
5278 2 12 Q
5279 0 X
5280 0 0 0 1 0 0 0 K
5281 (K) 197.03 422.77 T
5282 2 9 Q
5283 (h) 206.15 419.17 T
5284 2 12 Q
5285 (K) 229.41 422.77 T
5286 2 9 Q
5287 (m) 238.54 419.17 T
5288 0 0 0 1 0 0 0 K
5289 1 12 Q
5290 (0.1) 258.88 422.77 T
5291 (0.9) 286.64 422.77 T
5292 0 0 0 1 0 0 0 K
5293 2 F
5294 (F) 310.64 422.77 T
5295 (R) 324.09 422.77 T
5296 (i) 332.13 422.77 T
5297 2 9 Q
5298 (B) 335.99 419.17 T
5299 2 12 Q
5300 (G) 349.49 422.77 T
5301 3 F
5302 (D) 363.71 422.77 T
5303 2 F
5304 (z) 371.76 422.77 T
5305 3 F
5306 (\050) 358.86 422.77 T
5307 (\051) 377.28 422.77 T
5308 (\244) 344.49 422.77 T
5309 (\050) 319.09 422.77 T
5310 (\051) 382.13 422.77 T
5311 (\327) 304.64 422.77 T
5312 0 0 0 1 0 0 0 K
5313 1 F
5314 (+) 276.87 422.77 T
5315 0 0 0 1 0 0 0 K
5316 3 F
5317 (\050) 254.03 422.77 T
5318 (\051) 386.98 422.77 T
5319 (\327) 248.03 422.77 T
5320 0 0 0 1 0 0 0 K
5321 1 F
5322 (=) 216.65 422.77 T
5323 0 0 0 1 0 0 0 K
5324 0 0 612 792 C
5325 72 72 540 720 C
5326 233.15 220.27 246.49 234.67 C
5327 0 0 0 1 0 0 0 K
5328 0 0 0 1 0 0 0 K
5329 2 9 Q
5330 0 X
5331 0 0 0 1 0 0 0 K
5332 (K) 234.15 226.92 T
5333 2 7 Q
5334 (h) 240.99 224.02 T
5335 72 72 540 720 C
5336 0 0 612 792 C
5337 72 72 540 720 C
5338 348.39 220.27 361.73 234.67 C
5339 0 0 0 1 0 0 0 K
5340 0 0 0 1 0 0 0 K
5341 2 9 Q
5342 0 X
5343 0 0 0 1 0 0 0 K
5344 (K) 348.61 226.92 T
5345 2 7 Q
5346 (m) 355.45 224.02 T
5347 72 72 540 720 C
5348 0 0 612 792 C
5349 0 0 0 1 0 0 0 K
5350 FMENDPAGE
5351 %%EndPage: "6" 6
5352 %%Page: "7" 7
5353 612 792 0 FMBEGINPAGE
5354 [0 0 0 1 0 0 0]
5355 [ 0 1 1 0 1 0 0]
5356 [ 1 0 1 0 0 1 0]
5357 [ 1 1 0 0 0 0 1]
5358 [ 1 0 0 0 0 1 1]
5359 [ 0 1 0 0 1 0 1]
5360 [ 0 0 1 0 1 1 0]
5361 7 FrameSetSepColors
5362 FrameNoSep
5363 0 0 0 1 0 0 0 K
5364 0 0 0 1 0 0 0 K
5365 1 10 Q
5366 0 X
5367 0 0 0 1 0 0 0 K
5368 (-) 270.03 749.33 T
5369 0 0 0 1 0 0 0 K
5370 2 F
5371 (August 16, 1999) 273.36 749.33 T
5372 0 0 0 1 0 0 0 K
5373 1 F
5374 (-) 338.64 749.33 T
5375 0 0 0 1 0 0 0 K
5376 0 0 0 1 0 0 0 K
5377 (7) 303.5 36 T
5378 0 0 0 1 0 0 0 K
5379 0 0 0 1 0 0 0 K
5380 0 0 0 1 0 0 0 K
5381 1 12 Q
5382 (Duynk) 108 712 T
5383 (erk) 140.54 712 T
5384 (e \050eds.\051, Ro) 155.75 712 T
5385 (yal Netherlands Academy of Arts and Sciences, Amsterdam, 287-) 213.95 712 T
5386 (304.) 108 684 T
5387 (Holtslag, A. A. M. and B. A. Bo) 72 656 T
5388 (ville, 1993: Local v) 227.48 656 T
5389 (ersus nonlocal boundary-layer dif) 321.3 656 T
5390 (fusion in a) 482.63 656 T
5391 (global climate model.) 108 628 T
5392 2 F
5393 (J) 215.33 628 T
5394 (. Clim.) 220.36 628 T
5395 1 F
5396 (,) 252.7 628 T
5397 0 F
5398 (6) 258.7 628 T
5399 1 F
5400 (, 1825-1842.) 264.7 628 T
5401 (Le) 72 600 T
5402 (vy II, H., J. D. Mahlman, and W) 84.36 600 T
5403 (. J. Moxim, 1982: T) 238.9 600 T
5404 (ropospheric N) 334.15 600 T
5405 1 7.2 Q
5406 (2) 402.47 597.75 T
5407 1 12 Q
5408 (O v) 406.07 600 T
5409 (ariability) 423.43 600 T
5410 (.) 465.98 600 T
5411 2 F
5412 (J) 471.98 600 T
5413 (. Geophys.) 477.01 600 T
5414 (Res.) 108 571.35 T
5415 1 F
5416 (,) 128.33 571.35 T
5417 0 F
5418 (87) 134.33 571.35 T
5419 1 F
5420 (, 3061-3080.) 146.33 571.35 T
5421 (T) 72 543.35 T
5422 (roen, I. and L. Mahrt, 1986: A simple model of the atmospheric boundary layer; sensiti) 78.91 543.35 T
5423 (vity to) 496.56 543.35 T
5424 (surf) 108 515.35 T
5425 (ace e) 126.54 515.35 T
5426 (v) 150.55 515.35 T
5427 (aporation.) 156.25 515.35 T
5428 2 F
5429 (Bound.-Layer Meteor) 207.58 515.35 T
5430 (.) 310.22 515.35 T
5431 1 F
5432 (,) 313.22 515.35 T
5433 0 F
5434 (37) 319.22 515.35 T
5435 1 F
5436 (, 129-148.) 331.22 515.35 T
5437 (Stull, R. B., 1988: An introduction to boundary layer meteorology) 72 487.35 T
5438 (.) 388.88 487.35 T
5439 2 F
5440 (Kluwer Acad. Publ.) 394.88 487.35 T
5441 1 F
5442 (, Boston,) 489.55 487.35 T
5443 (USA, 666 pp.) 108 459.35 T
5444 0 0 0 1 0 0 0 K
5445 FMENDPAGE
5446 %%EndPage: "7" 7
5447 %%Trailer
5448 %%BoundingBox: 0 0 612 792
5449 %%PageOrder: Ascend
5450 %%Pages: 7
5451 %%DocumentFonts: Times-Bold
5452 %%+ Times-Roman
5453 %%+ Times-Italic
5454 %%+ Symbol
5455 %%EOF