8 lines
268 B
Haskell
8 lines
268 B
Haskell
module Texture ( Texture(..)
|
|
, TextureObject
|
|
) where
|
|
|
|
import Graphics.Rendering.OpenGL.GL.Texturing.Objects (TextureObject)
|
|
|
|
data Texture = TextureWood | TextureTank | TextureCannon | TextureBullet
|
|
deriving (Eq, Ord, Show)
|