2012-05-20から1日間の記事一覧
配列の練習にData.Array で数独のテーブルを表現してみます。 import Data.Array data Cell = Cell{digit::Int, mark::Char} deriving(Eq,Show) blockSize :: ((Int, Int), (Int, Int)) blockSize = ((1,1),(3,3)) type Block = Array (Int, Int) Cell -- 3 …
配列の練習にData.Array で数独のテーブルを表現してみます。 import Data.Array data Cell = Cell{digit::Int, mark::Char} deriving(Eq,Show) blockSize :: ((Int, Int), (Int, Int)) blockSize = ((1,1),(3,3)) type Block = Array (Int, Int) Cell -- 3 …
