function mes, monthstring
;convert the monthstring into a number.
case monthstring of
        'Jan': m=1
        'jan': m=1
        'JAN': m=1
        'Feb': m=2
        'feb': m=2
        'FEB': m=2
        'MAR': m=3
        'mar': m=3
        'Mar': m=3
        'Apr': m=4
        'apr': m=4
        'APR': m=4
        'MAY': m=5
        'May': m=5
        'may': m=5
        'JUN': m=6
        'jun': m=6
        'Jun': m=6
        'Jul': m=7
        'jul': m=7
        'JUL': m=7
        'AUG': m=8
        'aug': m=8
        'Aug': m=8
        'Sep': m=9
        'sep': m=9
        'SEP': m=9
        'OCT': m=10
        'oct': m=10
        'Oct': m=10
        'Nov': m=11
        'NOV': m=11
        'nov': m=11
        'Dec': m=12
        'DEC': m=12
        'dec': m=12
else: print, 'Uh oh!'
endcase
return, m
end