LineSegment = Type("lseg") do
          SQL::Types.define(Values::LineSegment) do
            input do |segment|
              "[(#{ segment.begin.x },#{ segment.begin.y }),"\
              "(#{ segment.end.x },#{ segment.end.y })]"