module Internal ((%^%)) where import Data.Complex ( Complex (..) ) (%^%) :: Complex Double -> Int -> Complex Double %^% :: Complex Double -> Int -> Complex Double (%^%) Complex Double z Int p = Complex Double z forall a b. (Fractional a, Integral b) => a -> b -> a ^^ Int p