Refactor projectiles

src/Dodge/Default/Prop.hs

@@ -2,13 +2,13 @@ module Dodge.Default.Prop where
 import Dodge.Data
 import Geometry
 defaultProp :: Prop
-defaultProp = Projectile
+defaultProp = ShapeProp
     { _prPos = V2 0 0
-    , _pjStartPos = V2 0 0
-    , _pjVel = V2 0 0
     , _prDraw = const mempty
     , _pjID = 0
     , _pjUpdate = const id
+    , _prToggle = True
+    , _pjRot = 0
     }
 defaultShapeProp :: Prop
 defaultShapeProp = ShapeProp