1{-# LANGUAGE NoImplicitPrelude #-} 2 3module Data.Semigroup.Internal where 4 5import {-# SOURCE #-} GHC.Real (Integral) 6import {-# SOURCE #-} GHC.Base (Semigroup,Monoid,Maybe) 7import GHC.Integer () -- See Note [Depend on GHC.Integer] in GHC.Base 8 9stimesIdempotentMonoid :: (Integral b, Monoid a) => b -> a -> a 10 11stimesDefault :: (Integral b, Semigroup a) => b -> a -> a 12stimesMaybe :: (Integral b, Semigroup a) => b -> Maybe a -> Maybe a 13stimesList :: Integral b => b -> [a] -> [a] 14