Copyright | (c) 2011-2015 Ian-Woo Kim |
---|---|
License | BSD3 |
Maintainer | Ian-Woo Kim <ianwookim@gmail.com> |
Stability | experimental |
Portability | GHC |
Safe Haskell | None |
Language | Haskell98 |
- type Title = ByteString
- data Dimension = Dim {
- dim_width :: !Double
- dim_height :: !Double
- 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)]
- = Stroke {
- data Image = Image {}
- data SVG = SVG {
- svg_text :: Maybe ByteString
- svg_command :: Maybe ByteString
- svg_render :: ByteString
- svg_pos :: (Double, Double)
- svg_dim :: !Dimension
- data Link
- = Link { }
- | LinkDocID { }
- | LinkAnchor { }
- data Anchor = Anchor {
- anchor_id :: ByteString
- anchor_render :: ByteString
- anchor_pos :: (Double, Double)
- anchor_dim :: !Dimension
- data Item
- data Background
- = Background {
- bkg_type :: !ByteString
- bkg_color :: !ByteString
- bkg_style :: !ByteString
- | BackgroundPdf { }
- | BackgroundEmbedPdf {
- bkg_type :: ByteString
- bkg_pageno :: Int
- = Background {
- data Revision
- = Revision {
- _revmd5 :: !ByteString
- _revtxt :: !ByteString
- | RevisionInk {
- _revmd5 :: !ByteString
- _revink :: [Stroke]
- = Revision {
- data Layer = Layer {
- layer_items :: ![Item]
- data Page = Page {
- page_dim :: !Dimension
- page_bkg :: !Background
- page_layers :: ![Layer]
- data Hoodle = Hoodle {}
- getXYtuples :: Stroke -> [(Double, Double)]
- tool :: Simple Lens Stroke ByteString
- color :: Simple Lens Stroke ByteString
- hoodleID :: Simple Lens Hoodle ByteString
- title :: Simple Lens Hoodle Title
- revisions :: Simple Lens Hoodle [Revision]
- revmd5 :: Simple Lens Revision ByteString
- embeddedPdf :: Simple Lens Hoodle (Maybe ByteString)
- embeddedText :: Simple Lens Hoodle (Maybe Text)
- 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
type Title = ByteString Source #
defaultOptions {constructorTagModifier = const Pair} ''Pair)
Dim | |
|
Pen stroke item
Stroke | |
| |
VWStroke | |
|
Image item
SVG | |
|
Link | |
| |
LinkDocID | |
| |
LinkAnchor | |
|
Anchor | |
|
wrapper of object embeddable in Layer
data Background Source #
Revision | |
| |
RevisionInk | |
|
Layer | |
|
Page | |
|
Hoodle | |
|
emptyHoodle :: IO Hoodle Source #
emptyLayer :: Layer Source #
emptyStroke :: Stroke Source #
defaultPage :: Page Source #
defaultHoodle :: IO Hoodle Source #
newPageFromOld :: Page -> Page Source #