Revision as of 12:21, 9 October 2019 (view source) Hout (talk \| contribs) m (→‎{{header\|Python}}: spelling) ← Older edit		Revision as of 12:29, 9 October 2019 (view source) Hout (talk \| contribs) m (→‎{{header\|Haskell}}) Newer edit →
Line 3,220: knightMoves :: Square -> [Square] knightMoves (x, y) = ~~let~~[(1, ~~onBoard~~2), =(1, -2), (&&-1, 2), .(-1, -2), (02, <1), ~~<>~~(2, -1), (9-2, >1), (-2, -1)] >>= in (~~=<<~~\(i, j) -> let ~~(\(i,~~a j)= ->x + i ~~let a~~b = xy + ij in bool [] [(a, b)] (onBoard a && onBoard b ~~= y + j~~)) ~~in bool [] [(a, b)] (onBoard a && onBoard b))~~ onBoard :: Int -> Bool ~~[(1, 2), (1, -2), (-1, 2), (-1, -2), (2, 1), (2, -1), (-2, 1), (-2, -1)]~~ onBoard = (&&) . (0 <) <> (9 >) -- TEST ---------------------------------------------------

Knight's tour: Difference between revisions

Knight's tour (view source)