Working commit with booster

This commit is contained in:
jgk
2021-05-24 14:00:53 +02:00
parent 968273bf25
commit a15d592951
+1 -7
View File
@@ -384,7 +384,7 @@ data Projectile
{ _pjPos :: Point2
, _pjStartPos :: Point2
, _pjVel :: Point2
, _pjDraw :: Picture
, _pjPict :: Picture
, _pjID :: Int
, _pjUpdate :: World -> World
}
@@ -397,12 +397,6 @@ data Projectile
, _pjUpdate :: World -> World
, _pjPayload :: Point2-> World -> World
}
| BoostShockwave
{ _pjID :: Int
, _pjPict :: Picture
, _pjUpdate :: World -> World
, _pjPoints :: [Point2]
}
data Either3 a b c = E3x1 a | E3x2 b | E3x3 c
data Wall
= Wall