;+
; NAME:
;       MKARR
; PURPOSE:
;       Creates an array with constant increments
; CALLING SEQUENCE:
;       mkarr, start=start, stop=stop, size=size, num=num
; EXAMPLES:
;       a = MKARR(start=2, stop=5, size=0.1)
;           Creates an array with values from 2 to 5 with a stepsize
;           of 0.1
;       b = MKARR(start=2, stop=5, num=11)
;           Creates an array with values from 2 to 5 having also the 9
;           values in between
; KEYWORDS:
;       NONE
; MODIFICATION HISTORY:
;       Before 05/06/2007 Written by Eduard Westra
;       18/06/2008 EW Added step keyword
;-
FUNCTION mkarr, start=start, stop=stop, step=step, size=size, num=num
  IF N_ELEMENTS(step) NE 0 THEN size = step
  IF N_ELEMENTS(num) NE 0 THEN BEGIN
     n    = num
     size = (DOUBLE(stop)-DOUBLE(start))/DOUBLE(n - 1)
  ENDIF ELSE BEGIN
     n = CEIL((stop-start)/size) + 1
  ENDELSE
  
  arr = DINDGEN(n)*DOUBLE(size) + DOUBLE(start)

  RETURN, arr
END