Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/prelude/Array/Indices.hs
module Array where import Ix import DArray import Bounds indices :: (Ix a) => Array a b -> [a] indices = range . bounds