arrayfunctor/test.icl

   1 module test
   2
   3 import StdEnv
   4 import Data.Functor
   5 import Data.Array
   6 import Control.Applicative
   7 import Control.Monad
   8
   9 Start :: {Int}
  10 Start = (+) <$> {1,2} <*> {1,2,3,4} >>= \e->pure (e+1)