&typ Do not
display 1040
legend.gra
pagesize  1.5 5
shadeset colornames
units page
textq kern
textfont 'univers'
textj cc
textsize .30
shadesymbol 26
gridnodatasymbol 26   /* ignored in gridcomposite
textcolor black
linecolor black


&s xpos .0 ; &s ypos 5
&s dx 1.5
&s dxp .75   /* .6
&s dy  .55
&s dy2 .75
move %xpos% [calc %ypos% + .05]
text 'mm/day'
&s tstring1 'stable'
&s tstring2 ' > 400'
&s tstring3 '200 - 400'
&s tstring4 '100 - 200'
&s tstring5 '50 - 100'
&s tstring6 ' 0 - 50'
&s tstring7 'unstable'
&s index 1
&do shadsym &list 13 53 56 73 83 110 28
      shadesymbol %shadsym%
      patch %xpos% [calc %ypos% - %dy%] [calc %xpos% + %dx%] %ypos%
      move [calc %xpos% + %dxp%] [calc %ypos% - .25]
      text [value tstring%index%]
      &s ypos %ypos% - %dy2%
      &s index [calc %index% + 1]
&end
display 0