Texture.hs


1
2
3
4
5
6
7
8

module Texture ( Texture(..)
               , TextureObject
               ) where

import Graphics.Rendering.OpenGL.GL.Texturing.Objects (TextureObject)

data Texture = TextureWood | TextureTank | TextureCannon | TextureBullet
               deriving (Eq, Ord, Show)