ArrayType.purs

module Main where

import Prelude
import Control.Monad.Eff.Console (log)

class Pointed p where
  point :: forall a. a -> p a

instance pointedArray :: Pointed Array where
  point a = [a]

main = log "Done"