diff options
Diffstat (limited to 'h19.hs')
-rw-r--r-- | h19.hs | 6 |
1 files changed, 0 insertions, 6 deletions
@@ -1,6 +0,0 @@ -rotate :: [a] -> Int -> [a] -rotate xs c - | c < 0 = rotate xs (c + (length xs)) - | otherwise = (drop (c `mod` (length xs)) xs ) ++ (take (c `mod` (length xs)) xs) - -rotate' xs c = take (length xs) $ drop (length xs + c) $ cycle xs |