MODULE enumdefs
    ENUM, BIND(C) 
    ENUMERATOR :: jan=1, feb, mar, apr, may, jun, &
		 jul, aug, sep, oct, nov, dec
  END ENUM
END MODULE enumdefs