Refactor, try to limit dependencies

src/Dodge/Initialisation.hs

@@ -1,18 +1,18 @@
 module Dodge.Initialisation where
-import Dodge.Default.World
-import Dodge.Data
+
+import Control.Lens
 import Dodge.Creature
+import Dodge.Data.World
+import Dodge.Default.World
 import Dodge.SoundLogic
 import Geometry.Data
-
 import qualified IntMapHelp as IM
-import Control.Lens
 
 initialWorld :: World
-initialWorld = defaultWorld
-    & cWorld . cameraZoom .~ 10
-    & cWorld . creatures .~ IM.fromList [(0,startCr)]
-    & cWorld . yourID .~ 0
-    & cWorld . worldEvents .~ SoundStart BackgroundSound (V2 0 0) foamSprayFadeOutS Nothing 
-                : [MakeStartCloudAt (V3 x y 5) | x <- [-5,-4..5] , y <- [-5,-4..5]]
-
+initialWorld =
+    defaultWorld
+        & cWorld . cameraZoom .~ 10
+        & cWorld . creatures .~ IM.fromList [(0, startCr)]
+        & cWorld . yourID .~ 0
+        & cWorld . worldEvents .~ SoundStart BackgroundSound (V2 0 0) foamSprayFadeOutS Nothing :
+        [MakeStartCloudAt (V3 x y 5) | x <- [-5, -4 .. 5], y <- [-5, -4 .. 5]]