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