遅延パターン - mrsekut-p

遅延パターン

from 反駁不可パターン

Haskellのtilde (~)の使い方

上の例は、以下で解決できる

code:hs

(\ ~(x,y) -> two y) undefined

ちなみに\~の間にはスペース入れないとエラーになるmrsekut.icon

take関数の定義

全体に対してguardを使って定義する

code:hs

take n ~l@(x:xs)

| null l = []

| n <= 0 = []

| otherwise = x : take (n-1) xs

~がないと、take _ []のときに失敗する