[count_n (next_turn game) [(step_game game play) >> (while_game_finished select_ai_for_monte) | _ <- [1..100]] | play <- hands] この時点でそれぞれの着手選択肢について着手した後ゲームが終わるまで100回実行した結果、勝ったのが自分である回数の…

Twitterから転載 ラムダ使わずにプログラム書くの難しい。一つの値を名前に束縛せずに複数箇所で使うってどうやるんだ。Sコンビネータ的なものが用意されてる？ Control.ApplicativeにSコンビネータあった →Control.ApplicativeのがSコンビネータだと書いて…

@pi8027 あともっと fold とか使ってくれないと読めません。本物の Haskeller は再帰もラムダ式もあまり使わない! @pi8027 countM a l = sequence l >>= return.length.filter (a==) なるほど。sequence で[IO Int]がIO [Int]になって、 >>= f で fに[Int]が…