Back to home page

MITgcm

 
 

    


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