Create datatypes for radar sweeps

src/Dodge/Render/ShapePicture.hs

@@ -1,6 +1,7 @@
 module Dodge.Render.ShapePicture
     ( worldSPic
     ) where
+import Dodge.RadarSweep.Draw
 import Dodge.Item.Draw.SPic
 import Dodge.EnergyBall.Draw
 import Dodge.Creature.Picture.Awareness
@@ -88,6 +89,7 @@ cullPoint cfig w p
 extraPics :: Configuration -> World -> Picture
 extraPics cfig w = pictures (_decorations w)
     <> concatMapPic drawParticle (_particles    w)
+    <> concatMapPic drawRadarSweep (_radarSweeps    w)
     <> concatMapPic drawFlame (_flames    w)
     <> concatMapPic drawEnergyBall (_energyBalls    w)
     <> concatMapPic drawSpark (_sparks    w)