計算機科学のブログ

関数型プログラミングの基礎 リスト 繰り返し、cycle関数によるrepeat関数の実装

入門Haskellプログラミング (Will Kurt(著)、株式会社クイープ(監修、翻訳)、翔泳社)のUNIT1(関数型プログラミングの基礎)、LESSON5(リスト)、6.5(練習問題)Q6-1の解答を求めてみる。

コード

myRepeat :: a -> [a]
myRepeat x = cycle [x]

main :: IO ()
main = do
  print $ take 5 $ myRepeat 5
  print $ take 10 $ myRepeat 'a'

入出力結果(Terminal, Zsh)

% runghc sample1.hs
[5,5,5,5,5]
"aaaaaaaaaa"
%