Tweak floor normal map shading

src/Preload/Render.hs

@@ -212,8 +212,7 @@ preloadRender = do
         , eslist
         ]
     initializeGLState
-
-    tonormalmap <- initTexture 3 GL_LINEAR_MIPMAP_LINEAR GL_LINEAR "data/normalMaps/squaresPattern.png"
+    tonormalmap <- initTexture 3 GL_LINEAR_MIPMAP_LINEAR GL_LINEAR "data/normalMaps/attachedPanel.png"
     return $
         RenderData
             { _pictureShaders = shadV

src/Shader/Poke/Floor.hs

@@ -1,4 +1,6 @@
-module Shader.Poke.Floor where
+module Shader.Poke.Floor
+    ( pokeTile
+    )  where
 
 import Geometry
 import Shader.Poke.Triangulate