module Language.Ltml.AST.SimpleParagraph
    ( SimpleParagraph (..)
    )
where

import Language.Lsd.AST.Type.SimpleParagraph (SimpleParagraphFormat)
import Language.Ltml.AST.Text (RichTextTree)

data SimpleParagraph
    = SimpleParagraph
        SimpleParagraphFormat
        [RichTextTree]
    deriving (Int -> SimpleParagraph -> ShowS
[SimpleParagraph] -> ShowS
SimpleParagraph -> String
(Int -> SimpleParagraph -> ShowS)
-> (SimpleParagraph -> String)
-> ([SimpleParagraph] -> ShowS)
-> Show SimpleParagraph
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> SimpleParagraph -> ShowS
showsPrec :: Int -> SimpleParagraph -> ShowS
$cshow :: SimpleParagraph -> String
show :: SimpleParagraph -> String
$cshowList :: [SimpleParagraph] -> ShowS
showList :: [SimpleParagraph] -> ShowS
Show)