nek0/vulkan-tutorial
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

cleaning

Browse source 
Particles will be implemented in affection itself
This commit is contained in:
nek0 2016-12-12 02:10:42 +01:00
parent b0d44124dc
commit 05b126ef94
1 changed files with 0 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
examples/example02.hs
View file

@ -32,12 +32,6 @@ data UserData = UserData
, coordinates :: Maybe (Int, Int) , coordinates :: Maybe (Int, Int)
} }
data Particle = Particle
{ particleCoords :: (Int, Int)
, particleTTL :: Double
, particleVel :: (Int, Int)
}
load :: SDL.Surface -> IO UserData load :: SDL.Surface -> IO UserData
load _ = do load _ = do
traceM "loading" traceM "loading"