module Text.Layout.Table.Spec.HeaderColSpec where
import Data.Default.Class
import Data.Default.Instances.Base ()
import Text.Layout.Table.Spec.Position
import Text.Layout.Table.Spec.CutMark
data = (Position H) (Maybe CutMark)
headerColumn :: Position H -> Maybe CutMark -> HeaderColSpec
headerColumn :: Position H -> Maybe CutMark -> HeaderColSpec
headerColumn = Position H -> Maybe CutMark -> HeaderColSpec
HeaderColSpec
instance Default HeaderColSpec where
def :: HeaderColSpec
def = Position H -> Maybe CutMark -> HeaderColSpec
headerColumn Position H
forall orientation. Position orientation
center Maybe CutMark
forall a. Default a => a
def