shithub: MicroHs

ref: 525d6d0502b48a01e87cf0f49f452fdd2fcb1ec3
dir: /tests/ListTest.hs/

View raw version 
module ListTest(module ListTest) where

import Data.List

main :: IO ()
main = do
  print $ sum [1, 2, 3 :: Int]
  print $ product [1, 2, 3, 4 :: Int]
  print $ and [True]
  print $ and [True, False]
  print $ [2] `isInfixOf` [1, 2, 3 :: Int]