Remove force fields, cleanup

src/Dodge/Render/List.hs

@@ -1,4 +1,8 @@
 module Dodge.Render.List
+    ( renderListAt
+    , dShadCol
+    , winScale
+    )
     where
 import Dodge.Data
 import Dodge.Base.Window
@@ -21,6 +25,7 @@ listPairAt xoff yoff w yint (s,col)
     . scale 0.1 0.1
     . dShadCol col
     $ text s
+--TODO put the following functions in an appropriate place
 {- | Colour picture and add black drop shadow. -}
 dShadCol :: Color -> Picture -> Picture
 {-# INLINE dShadCol #-}