added pitch rate for particles
This commit is contained in:
parent
ab976b4af6
commit
954c70b31b
1 changed files with 5 additions and 4 deletions
|
@ -128,10 +128,11 @@ data DrawType
|
|||
|
||||
-- | A single particle
|
||||
data Particle = Particle
|
||||
{ particleLife :: Double -- ^ Time to live in seconds
|
||||
, particlePosition :: (Double, Double) -- ^ Position of particle on canvas
|
||||
, particleRotation :: Double -- ^ Particle rotation
|
||||
, particleVelocity :: (Int, Int) -- ^ particle velocity as vector of pixels per second
|
||||
{ particleLife :: Double -- ^ Time to live in seconds
|
||||
, particlePosition :: (Double, Double) -- ^ Position of particle on canvas
|
||||
, particleRotation :: Double -- ^ Particle rotation
|
||||
, particleVelocity :: (Int, Int) -- ^ particle velocity as vector of pixels per second
|
||||
, particlePitchRate :: Double -- ^ Rotational velocity of particle
|
||||
} deriving (Show, Eq)
|
||||
|
||||
data ParticleSystem = ParticleSystem
|
||||
|
|
Loading…
Reference in a new issue