# Shape

The Shape structure contains functions to draw various shapes.

    structure Shape:
      sig
        type HBRUSH
        type HDC
        type POINT = { x: int, y: int }
        type RECT = { top: int, left: int, bottom: int, right: int }

        val Chord : HDC * RECT * POINT * POINT -> unit
        val Ellipse : HDC * RECT -> unit
        val FillRect : HDC * RECT * HBRUSH -> unit
        val FrameRect : HDC * RECT * HBRUSH -> unit
        val InvertRect : HDC * RECT -> unit
        val Pie : HDC * RECT * POINT * POINT -> unit
        val Polygon : HDC * POINT list -> unit
        val Rectangle : HDC * RECT -> unit
        val RoundRect : HDC * RECT * int * int -> unit
      end