prologue-3.0.9: src/Prologue/Data/Ix.hs

module Prologue.Data.Ix (module Prologue.Data.Ix, module X) where

import Prelude
import           Data.Ix as X (Ix, range, inRange, rangeSize)
import qualified Data.Ix as Ix

rangeIndex :: Ix a => (a, a) -> a -> Int
rangeIndex = Ix.index ; {-# INLINE rangeIndex #-}