関数型プログラミングの基礎 ラムダ関数とレキシカルスコープ 独自のwhere句を記述する
入門Haskellプログラミング (Will Kurt(著)、株式会社クイープ(監修、翻訳)、翔泳社)のUNIT1(関数型プログラミングの基礎)、LESSON 3(ラムダ関数とレキシカルスコープ)、3.2(独自のwhere句を記述する)、クイックチェック 3-2の解答を求めてみる。
コード
lesson/app/Main.hs
module Main where
-- import Lib ()
doubleDouble :: Num a => a -> a
doubleDouble x =
(\dubs -> dubs * 2) x * 2
ns :: [Integer]
ns = [-4 .. 5]
main :: IO ()
main = do
print ns
print $ map doubleDouble ns
入出力結果(Terminal, Zsh)
% stack runghc app/Main.hs
[-4,-3,-2,-1,0,1,2,3,4,5]
[-16,-12,-8,-4,0,4,8,12,16,20]
%