Data.Hoodle.Simple

Description

Synopsis

• type Title = ByteString
• data Item
  • = ItemStroke Stroke
  • | ItemImage Image
  • | ItemSVG SVG
  • | ItemLink Link
• data Stroke
  • = Stroke {
    • stroke_tool :: !ByteString
    • stroke_color :: !ByteString
    • stroke_width :: !Double
    • stroke_data :: ![Pair Double Double]
    }
  • | VWStroke {
    • stroke_tool :: ByteString
    • stroke_color :: ByteString
    • stroke_vwdata :: [(Double, Double, Double)]
    }
• data Image = Image {
  • img_src :: ByteString
  • img_pos :: (Double, Double)
  • img_dim :: !Dimension
  }
• data SVG = SVG {
  • svg_text :: Maybe ByteString
  • svg_command :: Maybe ByteString
  • svg_render :: ByteString
  • svg_pos :: (Double, Double)
  • svg_dim :: !Dimension
  }
• data Link
  • = Link {
    • link_id :: ByteString
    • link_type :: ByteString
    • link_location :: ByteString
    • link_text :: Maybe ByteString
    • link_command :: Maybe ByteString
    • link_render :: ByteString
    • link_pos :: (Double, Double)
    • link_dim :: !Dimension
    }
  • | LinkDocID {
    • link_id :: ByteString
    • link_linkeddocid :: ByteString
    • link_location :: ByteString
    • link_text :: Maybe ByteString
    • link_command :: Maybe ByteString
    • link_render :: ByteString
    • link_pos :: (Double, Double)
    • link_dim :: !Dimension
    }
• data Dimension = Dim {
  • dim_width :: !Double
  • dim_height :: !Double
  }
• data Background
  • = Background {
    • bkg_type :: !ByteString
    • bkg_color :: !ByteString
    • bkg_style :: !ByteString
    }
  • | BackgroundPdf {
    • bkg_type :: ByteString
    • bkg_domain :: Maybe ByteString
    • bkg_filename :: Maybe ByteString
    • bkg_pageno :: Int
    }
  • | BackgroundEmbedPdf {
    • bkg_type :: ByteString
    • bkg_pageno :: Int
    }
• data Hoodle = Hoodle {
  • hoodle_id :: ByteString
  • hoodle_title :: !Title
  • hoodle_embeddedpdf :: Maybe ByteString
  • hoodle_pages :: ![Page]
  }
• data Page = Page {
  • page_dim :: !Dimension
  • page_bkg :: !Background
  • page_layers :: ![Layer]
  }
• data Layer = Layer {
  • layer_items :: ![Item]
  }
• getXYtuples :: Stroke -> [(Double, Double)]
• tool :: Simple Lens Stroke ByteString
• color :: Simple Lens Stroke ByteString
• hoodleID :: Simple Lens Hoodle ByteString
• title :: Simple Lens Hoodle Title
• embeddedPdf :: Simple Lens Hoodle (Maybe ByteString)
• pages :: Simple Lens Hoodle [Page]
• dimension :: Simple Lens Page Dimension
• background :: Simple Lens Page Background
• layers :: Simple Lens Page [Layer]
• items :: Simple Lens Layer [Item]
• emptyHoodle :: IO Hoodle
• emptyLayer :: Layer
• emptyStroke :: Stroke
• defaultBackground :: Background
• defaultPage :: Page
• defaultHoodle :: IO Hoodle
• newPageFromOld :: Page -> Page

Documentation