Wumpus.Basic.Shapes.Derived

Documentation

data Rectangle u

Instances

Eq u => Eq (Rectangle u)

Show u => Show (Rectangle u)

(Real u, Floating u) => RadialAnchor (Rectangle u)

(Real u, Floating u) => CardinalAnchor2 (Rectangle u)

(Real u, Floating u) => CardinalAnchor (Rectangle u)

(Real u, Floating u) => CenterAnchor (Rectangle u)

type DRectangle = Rectangle Double

rectangle :: (Real u, Floating u) => u -> u -> Shape u (Rectangle u)

lrectangle :: (Real u, Floating u, FromPtSize u) => u -> u -> String -> Shape u (Rectangle u)

data Circle u

Instances

Eq u => Eq (Circle u)

Show u => Show (Circle u)

(Real u, Floating u) => RadialAnchor (Circle u)

(Real u, Floating u) => CardinalAnchor2 (Circle u)

(Real u, Floating u) => CardinalAnchor (Circle u)

(Real u, Floating u) => CenterAnchor (Circle u)

type DCircle = Circle Double

circle :: (Real u, Floating u) => u -> Shape u (Circle u)

lcircle :: (Real u, Floating u, FromPtSize u) => u -> String -> Shape u (Circle u)

data Coordinate u

Coordinate

Instances

(Real u, Floating u) => CenterAnchor (Coordinate u)

type DCoordinate = Coordinate Double

coordinate :: (Real u, Floating u) => Shape u (Coordinate u)

data Diamond u

Instances

(Real u, Floating u) => CardinalAnchor (Diamond u)

(Real u, Floating u) => CenterAnchor (Diamond u)

type DDiamond = Diamond Double

diamond :: (Real u, Floating u) => u -> u -> Shape u (Diamond u)

ldiamond :: (Real u, Floating u, FromPtSize u) => u -> u -> String -> Shape u (Diamond u)

data Ellipse u

Instances

(Real u, Floating u) => CenterAnchor (Ellipse u)

type DEllipse = Ellipse Double

ellipse :: (Real u, Floating u) => u -> u -> Shape u (Ellipse u)

lellipse :: (Real u, Floating u, FromPtSize u) => u -> u -> String -> Shape u (Ellipse u)

data FreeLabel u

Instances

(Real u, Floating u) => RadialAnchor (FreeLabel u)

(Real u, Floating u) => CardinalAnchor2 (FreeLabel u)

(Real u, Floating u) => CardinalAnchor (FreeLabel u)

(Real u, Floating u) => CenterAnchor (FreeLabel u)

type DFreeLabel = FreeLabel Double

freelabel :: (Real u, Floating u, FromPtSize u) => String -> Shape u (FreeLabel u)