{-# htermination eltsFM_LE :: Ord a => FiniteMap a b -> a -> [b] #-} import FiniteMap