You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
|
myRepeat :: a -> [a]
|
|
myRepeat n = cycle [n]
|
|
|
|
subseq :: Int -> Int -> [a] -> [a]
|
|
subseq start end aList = take end (drop start aList)
|
|
|
|
inFirstHalf :: Eq a => a -> [a] -> Bool
|
|
inFirstHalf item aList = item `elem` firstHalf
|
|
where firstHalf = take (length aList `div` 2) aList |