[過去ﾛｸﾞ] 関数型プログラミング言語Haskell Part7 (1001ﾚｽ)

関数型プログラミング言語Haskell Part7 http://echo.5ch.net/test/read.cgi/tech/1174211797/

上下前次1-新
通常表示 512ﾊﾞｲﾄ分割 ﾚｽ栞
抽出解除 ﾚｽ栞

---

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ

---

820: デフォルトの名無しさん [sage] 2007/08/17(金) 23:52:32 >>819 T型の値を変更する関数を書く代わりに、T型の値を受け取ってT型の値を返す関数を書くのが定石。 俺ならこんな感じで書く。 getRen :: IgoBoard -> Point -> Stone -> Set Point getRen board point stone = augmentRen point empty   where     augmentRen :: Point -> Set Point -> Set Point     augmentRen (Point x y) ren       | stone == boardGetStone board && not (member point ren)         = augmentRen (Point x (y-1)) $           augmentRen (Point x (y+1)) $           augmentRen (Point (x-1) y) $           augmentRen (Point (x+1) y) $             insert point ren       | otherwise = ren http://echo.5ch.net/test/read.cgi/tech/1174211797/820

821: 820 [sage] 2007/08/18(土) 00:28:29 ひどいバグを仕込んでた。 (Point x y)のところはpoint@(Point x y)で。 http://echo.5ch.net/test/read.cgi/tech/1174211797/821

822: 819 [sage] 2007/08/18(土) 11:03:32 >>820 ありがとうございます。 augmentRenを直列に並べるのは思いつかなかったです。 なぜか並列に並べなければいけないという思い込みがありました。 http://echo.5ch.net/test/read.cgi/tech/1174211797/822

---

ﾒﾓ帳

(0/65535文字)

---

上下前次1-新書関写板覧索設栞歴

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.031s