; function to flatten image in horizontal strip ; between y-values y1 to y2 to a 1-D vector. function h_strip,im,y1,y2 s=size(im) xs=s[1] ; x dimension of image strip=replicate(0.0,xs) for i=0,(xs-1) do strip[i]=total(im[i,y1:y2]) return, strip end