# LANGUAGE TemplateHaskell #
--------------------------------------------------------------------------------
-- |
  Module       :   Ipe . Layer
  Copyright    :   ( C )  
-- License     :  see the LICENSE file
  Maintainer   :    
--
  Layers in Ipe documents .
--
--------------------------------------------------------------------------------
module Ipe.Layer(
  LayerName(LayerName), layerName
  ) where

import           Control.Lens
import           Data.Text (Text)
import           GHC.Exts

--------------------------------------------------------------------------------

  | Defines an Layer in Ipe .
newtype LayerName = LayerName {_layerName :: Text } deriving (Show,Read,Eq,Ord,IsString)
makeLenses ''LayerName

------------------------------------------------------------------------------
 |
 License     :  see the LICENSE file


------------------------------------------------------------------------------
------------------------------------------------------------------------------
# LANGUAGE TemplateHaskell #
  Module       :   Ipe . Layer
  Copyright    :   ( C )  
  Maintainer   :    
  Layers in Ipe documents .
module Ipe.Layer(
  LayerName(LayerName), layerName
  ) where

import           Control.Lens
import           Data.Text (Text)
import           GHC.Exts


  | Defines an Layer in Ipe .
newtype LayerName = LayerName {_layerName :: Text } deriving (Show,Read,Eq,Ord,IsString)
makeLenses ''LayerName
