{-# htermination elemIndices :: (Ratio Int) -> [(Ratio Int)] -> [Int] #-}
import List