nek0/tracer
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

this might have been the toilet bug

Browse source
This commit is contained in:
nek0 2018-11-13 00:56:18 +01:00
parent a991f2436b
commit 9e077cec16
1 changed files with 14 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
src/Util.hs
View file

@ -107,6 +107,20 @@ convertTileToImg mat = fromLists conversion
Just ImgEmpty Just ImgEmpty
| otherwise -> | otherwise ->
Nothing Nothing
Kitc
| any
(\(rr, cc) -> M.safeGet (irow + rr) (icol + cc) mat == Just Door)
[(1, 0), (-1, 0), (0, 1), (0, -1)] ->
Just ImgEmpty
| otherwise ->
Nothing
Toil
| any
(\(rr, cc) -> M.safeGet (irow + rr) (icol + cc) mat == Just Door)
[(1, 0), (-1, 0), (0, 1), (0, -1)] ->
Just ImgEmpty
| otherwise ->
Nothing
_ -> _ ->
Nothing Nothing