itto100pen https://blog.hatena.ne.jp/itto100pen/ らむだ畑でつかまえて (catcher in the λ) https://itto100pen.hatenadiary.org/ Haskell Haskell で数独ソルバを書いてみた。 特徴は ・明示的な再帰は使わず (iterate ...) !! 81 を使った。（８１手目に解が求まる） ・探索中のマス目状態を、未確定部分と仮確定部分に分けて持つ。 import List (partition,delete) mark (pos@(i,j),d) cand = (cand1++) $ filter (not.null.snd) $ map del cand2 where (cand1,cand2) = partition p cand p ((k,l),_) = k /= i && l /= j && map (`div`3) … 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fitto100pen.hatenadiary.org%2Fentry%2F20090604%2F1244121632" title=" 数独ソルバ - らむだ畑でつかまえて (catcher in the λ)" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2009-06-04 22:20:32 rich https://itto100pen.hatenadiary.org/entry/20090604/1244121632 1.0 100%