[project @ 1998-12-02 13:17:09 by simonm]
[ghc-hetmet.git] / ghc / interpreter / test / std / list1.hs
1 --!!! Testing (List.\\) and related functions
2 module T where
3
4 import List( deleteBy, delete, (\\) )
5
6 test1 :: [Int]
7 test1 = deleteBy (==) 1 [0,1,1,2,3,4]
8
9 test2 :: [Int]
10 test2 = delete 1 [0,1,1,2,3,4]
11
12 test3 :: [Int]
13 test3 = [0,1,1,2,3,4] \\ [3,2,1]
14