monad-s4.out

max expr size  =    4
  |- on ineqs  =    3
  |- on conds  =    3
max  #-tests   =  500
min  #-tests   =   25  (to consider p ==> q true)
max  #-vars    =    2  (for inequational and conditional laws)

_ :: Int  (holes: Int)
_ :: [Int]  (holes: [Int])
_ :: Int -> [Int]  (holes: Int -> [Int])
return :: Int -> [Int]
(>>=) :: [Int] -> (Int -> [Int]) -> [Int]
(>=>) :: (Int -> [Int]) -> (Int -> [Int]) -> Int -> [Int]

(xs >>= return) == xs
            f x == (return x >>= f)
    (f >=> g) x == (f x >>= g)
 (f >=> return) == f
 (return >=> f) == f