FUNCTION integrate, array

; Integrate array and return results in iarray.

size = n_elements(array)

iarray = array
for i = 1L,size-1 do begin
	iarray(i) = iarray(i-1) + array(i)
	endfor

return, iarray

end