RosettaCodeData/Task/Binary-strings/Haskell/binary-strings-6.hs
2023-07-01 13:44:08 -04:00

4 lines
163 B
Haskell

{- Take a certain substring, specified by
two integers, from the given string -}
strPull :: Int -> Int -> String -> String
strPull x y s = take (y-x+1) (drop x s)