# Copyright(c) 1986 Association of Universities for Research in Astronomy Inc. include # IMGS1? -- Get a section from an apparently one dimensional image. pointer procedure imgs1l (im, x1, x2) pointer im int x1, x2 pointer imggsl(), imgl1l() begin if (x1 == 1 && x2 == IM_LEN(im,1)) return (imgl1l (im)) else return (imggsl (im, long(x1), long(x2), 1)) end