-- | The @bound@ element of a OSM file.moduleData.Geo.OSM.Bound(Bound,bound)whereimportText.XML.HXT.ArrowimportText.XML.HXT.ExtrasimportData.Geo.OSM.Accessor.BoximportData.Geo.OSM.Accessor.Origin-- | The @bound@ element of a OSM file.dataBound=BoundString(MaybeString)derivingEqinstanceXmlPicklerBoundwherexpickle=xpElem"bound"(xpWrap(uncurrybound,\(Boundbo)->(b,o))(xpPair(xpAttr"box"xpText)(xpOption(xpAttr"origin"xpText))))instanceShowBoundwhereshow=showPickled[]instanceBoxBoundwherebox(Boundx_)=xsetBoxa(Bound_b)=boundabinstanceOriginBoundwhereorigin(Bound_x)=xsetOriginb(Bounda_)=boundab-- | Constructs a bound with a box and origin attributes.bound::String-- ^ The @box@ attribute.->MaybeString-- ^ The @origin@ attribute.->Boundbound=Bound