;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; cspan.ncl
; Carl Schreck (cjschrec@ncsu.edu)
; January 2015
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Description: Similar to fspan, but allows the user to pick the interval
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
undef ( "cspan" )
function cspan( \
  i_start  [1] : numeric, \
  i_finish [1] : numeric, \
  i_stride [1] : numeric \
)
begin

  npts = 1 + round( ( i_finish - i_start ) / i_stride, 3 )
  retVal = fspan( i_start, i_finish, npts )
  return(retVal)

end ; cspan