function monname, monnum ;+ ; NAME: ; MONNAME ; PURPOSE: ; Convert month number to month name ; CALLING SEQUENCE: ; mn_name = monname(mn_num) ; INPUTS: ; month number (1 - 12) ; OUTPUTS: ; month name (JAN FEB...) ; MODIFICATION HISTORY: ; Created August 2012 by Gert van Dijken ;- months = ['JAN','FEB','MAR','APR','MAY','JUN','JUL','AUG','SEP','OCT', $ 'NOV','DEC'] mon_name = months(monnum-1) return, mon_name end