びーびーすれ

445びーびー@イケメン
2017-07-21 22:16:35
ID:bbbbbbbb

ひまつぶしに始めたhaskell
substrが標準関数にないから作ろうとして20分くらい格闘した
やっぱ関数型ってクソなんでは……


substr :: Int -> Int -> [Char] -> [Char]
substr _ 0 (x:xs) = [x]
substr _ _ [] = []
substr s e (x:xs) | s == 0 = x : substr s (e - 1) xs
  | otherwise = substr (s - 1) (e - 1) xs

名前:

メール欄:

内容:

File: