My code looks like this:
threeByThree :: Sudoku -> [Block]
threeByThree sudoku = (chunksOf 9(concat(transpose(take 3 (rows sudoku)))++
(transpose(take 3 rs))++(transpose xs)))
where
rs <- drop 3 (rows sudoku)
xs <- drop 3 rs
The error message I'm receiving:
Sudoku.hs:130:12: parse error on input `<-'
Which should be exactly at the first arrow. Am I missing the obvious here?