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

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

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

---

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

---

770: デフォルトの名無しさん [sage] 2011/12/20(火) 22:55:42.52 >>767 めっさ力技 data Pos = F | M | E deriving Show getPos :: Eq a => [a] -> [a] -> a -> (Maybe Pos) getPos listA listB = fmap f . (`lookup`listE) where     listC = map (`elem` listB) listA     listE = zip listA $ zip listC $ scanl1 (||) listC     f (True,_)      = M     f (False,False) = F     f (False,True)  = E listA = [0,1,2,3,4] listB = [2,3,1] x=0 main = do  let g = getPos listA listB  print $ g 0  print $ g 1  print $ g 2  print $ g 3  print $ g 4 http://echo.5ch.net/test/read.cgi/tech/1317958045/770

---

ﾒﾓ帳

(0/65535文字)

---

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

---

あと 208 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.017s