-- cuts the list from the start to front until end and drops everything else
-- doubleDrop 2 3 "Haskell is fun!" -> "skell is fu"
dropDouble :: Int -> Int -> [a] -> [a]
dropDouble front end l = reverse (e f)
                        where f = drop front l
                              e f = drop end (reverse f)
dropDouble :: Int -> Int -> [a] -> [a]
dropDouble front end l = reverse (e f)
                        where f = drop front l
                              e f = drop end (reverse f)
dropDouble front end l = reverse (e f)
                        where f = drop front l
                              e f = drop end (reverse f)