{-# LANGUAGE FlexibleContexts #-} -- only to satisfy the type spec being there module Output where import Data.Array.IO import Control.Monad ((>=>)) -- type generated by GHCi output :: (Show e, Ix i, MArray a e IO) => a i e -> IO () output = getElems >=> print