Module `Tyxml_svg`Source

Typesafe constructors and printers for Svg documents.

see http://www.w3.org/TR/SVG
W3C Recommendation

Concrete implementation of Svg typesafe constructors. See Svg_sigs.T.

include Svg_sigs.Make(Tyxml_xml).T with module Xml.W = Xml_wrap.NoWrap

Sourcetype +'a elt

SVG elements.

Element constructors are in section Elements. Most elements constructors are either nullary, unary or star, depending on the number of children they accept. Children are usually given as a list of elements. txt is used for text.

The type variable 'a is used to track the element's type. This allows the OCaml typechecker to check SVG validity.

Note that the concrete implementation of this type can vary. See Xml for details.

Sourcetype doc = [ `Svg ] Tyxml_svg.elt

A complete SVG document.

Sourcetype +'a attrib

SVG attributes

Attribute constructors are in section Attributes and their name starts with a_. Attributes are given to elements with the ~a optional argument.

Similarly to elt, attributes use the OCaml type system to enforce Html validity.

In some cases, attributes have to be disambiguated. The max attribute has two version, a_fill and a_animation_fill, depending on the element. Such disambiguated attribute will contain the name of the associated element.

module Xml : 
  Xml_sigs.T
    with type 'a W.t = 'a Tyxml_xml.W.t
    with type 'a W.tlist = 'a Tyxml_xml.W.tlist
    with type ('a, 'b) W.ft = ('a, 'b) Tyxml_xml.W.ft
    with type uri = Tyxml_xml.uri
    with type event_handler = Tyxml_xml.event_handler
    with type mouse_event_handler = Tyxml_xml.mouse_event_handler
    with type keyboard_event_handler = Tyxml_xml.keyboard_event_handler
    with type touch_event_handler = Tyxml_xml.touch_event_handler
    with type attrib = Tyxml_xml.attrib
    with type elt = Tyxml_xml.elt
    with module W = Xml_wrap.NoWrap

Underlying XML data-structure

Sourcetype 'a wrap = 'a Xml.W.t

wrap is a container for elements and values.

In most cases, 'a wrap = 'a. For R modules (in eliom or js_of_ocaml), It will be React.S.t.

Sourcetype 'a list_wrap = 'a Xml.W.tlist

list_wrap is a containre for list of elements.

In most cases, 'a list_wrap = 'a list. For R modules (in eliom or js_of_ocaml), It will be ReactiveData.RList.t.

Sourcetype ('a, 'b) nullary = ?a:'a Tyxml_svg.attrib list -> unit -> 'b Tyxml_svg.elt

A nullary element is an element that doesn't have any children.

type ('a, 'b, 'c) unary =
  ?a:'a Tyxml_svg.attrib list ->
  'b Tyxml_svg.elt Tyxml_svg.wrap ->
  'c Tyxml_svg.elt

A unary element is an element that have exactly one children.

type ('a, 'b, 'c) star =
  ?a:'a Tyxml_svg.attrib list ->
  'b Tyxml_svg.elt Tyxml_svg.list_wrap ->
  'c Tyxml_svg.elt

A star element is an element that has any number of children, including zero.

module Info : Xml_sigs.Info

Various information about SVG, such as the doctype, ...

Uri

Sourcetype uri = Tyxml_svg.Xml.uri

Sourceval string_of_uri : (Tyxml_svg.uri, string) Xml.W.ft

Sourceval uri_of_string : (string, Tyxml_svg.uri) Xml.W.ft

Attributes

Sourceval a_version : string Tyxml_svg.wrap -> [> `Version ] Tyxml_svg.attrib

deprecated
Removed in SVG2

Sourceval a_baseProfile : string Tyxml_svg.wrap -> [> `BaseProfile ] Tyxml_svg.attrib

deprecated
Removed in SVG2

Sourceval a_x : Svg_types.coord Tyxml_svg.wrap -> [> `X ] Tyxml_svg.attrib

Sourceval a_y : Svg_types.coord Tyxml_svg.wrap -> [> `Y ] Tyxml_svg.attrib

val a_width : 
  Svg_types.Unit.length Tyxml_svg.wrap ->
  [> `Width ] Tyxml_svg.attrib

val a_height : 
  Svg_types.Unit.length Tyxml_svg.wrap ->
  [> `Height ] Tyxml_svg.attrib

val a_preserveAspectRatio : 
  string Tyxml_svg.wrap ->
  [> `PreserveAspectRatio ] Tyxml_svg.attrib

val a_contentScriptType : 
  string Tyxml_svg.wrap ->
  [> `ContentScriptType ] Tyxml_svg.attrib

deprecated
Removed in SVG2

val a_contentStyleType : 
  string Tyxml_svg.wrap ->
  [> `ContentStyleType ] Tyxml_svg.attrib

deprecated
Removed in SVG2

val a_zoomAndPan : 
  [< `Disable | `Magnify ] Tyxml_svg.wrap ->
  [> `ZoomAndSpan ] Tyxml_svg.attrib

Sourceval a_href : Svg_types.iri Tyxml_svg.wrap -> [> `Xlink_href ] Tyxml_svg.attrib

val a_xlink_href : 
  Svg_types.iri Tyxml_svg.wrap ->
  [> `Xlink_href ] Tyxml_svg.attrib

deprecated
Use a_href

val a_requiredFeatures : 
  Svg_types.spacestrings Tyxml_svg.wrap ->
  [> `RequiredFeatures ] Tyxml_svg.attrib

deprecated
Removed in SVG2

val a_requiredExtensions : 
  Svg_types.spacestrings Tyxml_svg.wrap ->
  [> `RequiredExtension ] Tyxml_svg.attrib

val a_systemLanguage : 
  Svg_types.commastrings Tyxml_svg.wrap ->
  [> `SystemLanguage ] Tyxml_svg.attrib

val a_externalRessourcesRequired : 
  bool Tyxml_svg.wrap ->
  [> `ExternalRessourcesRequired ] Tyxml_svg.attrib

Sourceval a_id : string Tyxml_svg.wrap -> [> `Id ] Tyxml_svg.attrib

val a_user_data : 
  string ->
  string Tyxml_svg.wrap ->
  [> `User_data ] Tyxml_svg.attrib

val a_xml_base : 
  Svg_types.iri Tyxml_svg.wrap ->
  [> `Xml_Base ] Tyxml_svg.attrib

deprecated
Removed in SVG2

val a_xml_lang : 
  Svg_types.iri Tyxml_svg.wrap ->
  [> `Xml_Lang ] Tyxml_svg.attrib

val a_xml_space : 
  [< `Default | `Preserve ] Tyxml_svg.wrap ->
  [> `Xml_Space ] Tyxml_svg.attrib

deprecated
Use CSS white-space

Sourceval a_type : string Tyxml_svg.wrap -> [> `Type ] Tyxml_svg.attrib

val a_media : 
  Svg_types.commastrings Tyxml_svg.wrap ->
  [> `Media ] Tyxml_svg.attrib

Sourceval a_xlink_title : string Tyxml_svg.wrap -> [> `Title ] Tyxml_svg.attrib

deprecated
Use a child title element

val a_class : 
  Svg_types.spacestrings Tyxml_svg.wrap ->
  [> `Class ] Tyxml_svg.attrib

Sourceval a_style : string Tyxml_svg.wrap -> [> `Style ] Tyxml_svg.attrib

val a_transform : 
  Svg_types.transforms Tyxml_svg.wrap ->
  [> `Transform ] Tyxml_svg.attrib

val a_viewBox : 
  Svg_types.fourfloats Tyxml_svg.wrap ->
  [> `ViewBox ] Tyxml_svg.attrib

Sourceval a_d : string Tyxml_svg.wrap -> [> `D ] Tyxml_svg.attrib

Sourceval a_pathLength : float Tyxml_svg.wrap -> [> `PathLength ] Tyxml_svg.attrib

Sourceval a_rx : Svg_types.Unit.length Tyxml_svg.wrap -> [> `Rx ] Tyxml_svg.attrib

Sourceval a_ry : Svg_types.Unit.length Tyxml_svg.wrap -> [> `Ry ] Tyxml_svg.attrib

Sourceval a_cx : Svg_types.Unit.length Tyxml_svg.wrap -> [> `Cx ] Tyxml_svg.attrib

Sourceval a_cy : Svg_types.Unit.length Tyxml_svg.wrap -> [> `Cy ] Tyxml_svg.attrib

Sourceval a_r : Svg_types.Unit.length Tyxml_svg.wrap -> [> `R ] Tyxml_svg.attrib

Sourceval a_x1 : Svg_types.coord Tyxml_svg.wrap -> [> `X1 ] Tyxml_svg.attrib

Sourceval a_y1 : Svg_types.coord Tyxml_svg.wrap -> [> `Y1 ] Tyxml_svg.attrib

Sourceval a_x2 : Svg_types.coord Tyxml_svg.wrap -> [> `X2 ] Tyxml_svg.attrib

Sourceval a_y2 : Svg_types.coord Tyxml_svg.wrap -> [> `Y2 ] Tyxml_svg.attrib

Sourceval a_points : Svg_types.coords Tyxml_svg.wrap -> [> `Points ] Tyxml_svg.attrib

val a_x_list : 
  Svg_types.lengths Tyxml_svg.wrap ->
  [> `X_list ] Tyxml_svg.attrib

val a_y_list : 
  Svg_types.lengths Tyxml_svg.wrap ->
  [> `Y_list ] Tyxml_svg.attrib

Sourceval a_dx : Svg_types.number Tyxml_svg.wrap -> [> `Dx ] Tyxml_svg.attrib

Sourceval a_dy : Svg_types.number Tyxml_svg.wrap -> [> `Dy ] Tyxml_svg.attrib

val a_dx_list : 
  Svg_types.lengths Tyxml_svg.wrap ->
  [> `Dx_list ] Tyxml_svg.attrib

val a_dy_list : 
  Svg_types.lengths Tyxml_svg.wrap ->
  [> `Dy_list ] Tyxml_svg.attrib

val a_lengthAdjust : 
  [< `Spacing | `SpacingAndGlyphs ] Tyxml_svg.wrap ->
  [> `LengthAdjust ] Tyxml_svg.attrib

val a_textLength : 
  Svg_types.Unit.length Tyxml_svg.wrap ->
  [> `TextLength ] Tyxml_svg.attrib

val a_text_anchor : 
  [< `Start | `Middle | `End | `Inherit ] Tyxml_svg.wrap ->
  [> `Text_Anchor ] Tyxml_svg.attrib

val a_text_decoration : 
  [< `None | `Underline | `Overline | `Line_through | `Blink | `Inherit ]
    Tyxml_svg.wrap ->
  [> `Text_Decoration ] Tyxml_svg.attrib

val a_text_rendering : 
  [< `Auto
  | `OptimizeSpeed
  | `OptimizeLegibility
  | `GeometricPrecision
  | `Inherit ]
    Tyxml_svg.wrap ->
  [> `Text_Rendering ] Tyxml_svg.attrib

val a_rotate : 
  Svg_types.numbers Tyxml_svg.wrap ->
  [> `Rotate ] Tyxml_svg.attrib

val a_startOffset : 
  Svg_types.Unit.length Tyxml_svg.wrap ->
  [> `StartOffset ] Tyxml_svg.attrib

val a_method : 
  [< `Align | `Stretch ] Tyxml_svg.wrap ->
  [> `Method ] Tyxml_svg.attrib

val a_spacing : 
  [< `Auto | `Exact ] Tyxml_svg.wrap ->
  [> `Spacing ] Tyxml_svg.attrib

Sourceval a_glyphRef : string Tyxml_svg.wrap -> [> `GlyphRef ] Tyxml_svg.attrib

Sourceval a_format : string Tyxml_svg.wrap -> [> `Format ] Tyxml_svg.attrib

val a_markerUnits : 
  [< `StrokeWidth | `UserSpaceOnUse ] Tyxml_svg.wrap ->
  [> `MarkerUnits ] Tyxml_svg.attrib

Sourceval a_refX : Svg_types.coord Tyxml_svg.wrap -> [> `RefX ] Tyxml_svg.attrib

Sourceval a_refY : Svg_types.coord Tyxml_svg.wrap -> [> `RefY ] Tyxml_svg.attrib

val a_markerWidth : 
  Svg_types.Unit.length Tyxml_svg.wrap ->
  [> `MarkerWidth ] Tyxml_svg.attrib

val a_markerHeight : 
  Svg_types.Unit.length Tyxml_svg.wrap ->
  [> `MarkerHeight ] Tyxml_svg.attrib

val a_orient : 
  Svg_types.Unit.angle option Tyxml_svg.wrap ->
  [> `Orient ] Tyxml_svg.attrib

Sourceval a_local : string Tyxml_svg.wrap -> [> `Local ] Tyxml_svg.attrib

val a_rendering_intent : 
  [< `Auto
  | `Perceptual
  | `Relative_colorimetric
  | `Saturation
  | `Absolute_colorimetric ]
    Tyxml_svg.wrap ->
  [> `Rendering_Indent ] Tyxml_svg.attrib

val a_gradientUnits : 
  [< `UserSpaceOnUse | `ObjectBoundingBox ] Tyxml_svg.wrap ->
  [ `GradientUnits ] Tyxml_svg.attrib

val a_gradientTransform : 
  Svg_types.transforms Tyxml_svg.wrap ->
  [> `GradientTransform ] Tyxml_svg.attrib

val a_spreadMethod : 
  [< `Pad | `Reflect | `Repeat ] Tyxml_svg.wrap ->
  [> `SpreadMethod ] Tyxml_svg.attrib

Sourceval a_fx : Svg_types.coord Tyxml_svg.wrap -> [> `Fx ] Tyxml_svg.attrib

Sourceval a_fy : Svg_types.coord Tyxml_svg.wrap -> [> `Fy ] Tyxml_svg.attrib

val a_offset : 
  [< `Number of Svg_types.number | `Percentage of Svg_types.percentage ]
    Tyxml_svg.wrap ->
  [> `Offset ] Tyxml_svg.attrib

val a_patternUnits : 
  [< `UserSpaceOnUse | `ObjectBoundingBox ] Tyxml_svg.wrap ->
  [> `PatternUnits ] Tyxml_svg.attrib

val a_patternContentUnits : 
  [< `UserSpaceOnUse | `ObjectBoundingBox ] Tyxml_svg.wrap ->
  [> `PatternContentUnits ] Tyxml_svg.attrib

val a_patternTransform : 
  Svg_types.transforms Tyxml_svg.wrap ->
  [> `PatternTransform ] Tyxml_svg.attrib

val a_clipPathUnits : 
  [< `UserSpaceOnUse | `ObjectBoundingBox ] Tyxml_svg.wrap ->
  [> `ClipPathUnits ] Tyxml_svg.attrib

val a_maskUnits : 
  [< `UserSpaceOnUse | `ObjectBoundingBox ] Tyxml_svg.wrap ->
  [> `MaskUnits ] Tyxml_svg.attrib

val a_maskContentUnits : 
  [< `UserSpaceOnUse | `ObjectBoundingBox ] Tyxml_svg.wrap ->
  [> `MaskContentUnits ] Tyxml_svg.attrib

val a_primitiveUnits : 
  [< `UserSpaceOnUse | `ObjectBoundingBox ] Tyxml_svg.wrap ->
  [> `PrimitiveUnits ] Tyxml_svg.attrib

val a_filterRes : 
  Svg_types.number_optional_number Tyxml_svg.wrap ->
  [> `FilterResUnits ] Tyxml_svg.attrib

Sourceval a_result : string Tyxml_svg.wrap -> [> `Result ] Tyxml_svg.attrib

val a_in : 
  [< `SourceGraphic
  | `SourceAlpha
  | `BackgroundImage
  | `BackgroundAlpha
  | `FillPaint
  | `StrokePaint
  | `Ref of string ]
    Tyxml_svg.wrap ->
  [> `In ] Tyxml_svg.attrib

val a_in2 : 
  [< `SourceGraphic
  | `SourceAlpha
  | `BackgroundImage
  | `BackgroundAlpha
  | `FillPaint
  | `StrokePaint
  | `Ref of string ]
    Tyxml_svg.wrap ->
  [> `In2 ] Tyxml_svg.attrib

Sourceval a_azimuth : float Tyxml_svg.wrap -> [> `Azimuth ] Tyxml_svg.attrib

Sourceval a_elevation : float Tyxml_svg.wrap -> [> `Elevation ] Tyxml_svg.attrib

Sourceval a_pointsAtX : float Tyxml_svg.wrap -> [> `PointsAtX ] Tyxml_svg.attrib

Sourceval a_pointsAtY : float Tyxml_svg.wrap -> [> `PointsAtY ] Tyxml_svg.attrib

Sourceval a_pointsAtZ : float Tyxml_svg.wrap -> [> `PointsAtZ ] Tyxml_svg.attrib

val a_specularExponent : 
  float Tyxml_svg.wrap ->
  [> `SpecularExponent ] Tyxml_svg.attrib

val a_specularConstant : 
  float Tyxml_svg.wrap ->
  [> `SpecularConstant ] Tyxml_svg.attrib

val a_limitingConeAngle : 
  float Tyxml_svg.wrap ->
  [> `LimitingConeAngle ] Tyxml_svg.attrib

val a_mode : 
  [< `Normal | `Multiply | `Screen | `Darken | `Lighten ] Tyxml_svg.wrap ->
  [> `Mode ] Tyxml_svg.attrib

val a_feColorMatrix_type : 
  [< `Matrix | `Saturate | `HueRotate | `LuminanceToAlpha ] Tyxml_svg.wrap ->
  [> `Typefecolor ] Tyxml_svg.attrib

val a_values : 
  Svg_types.numbers Tyxml_svg.wrap ->
  [> `Values ] Tyxml_svg.attrib

val a_transfer_type : 
  [< `Identity | `Table | `Discrete | `Linear | `Gamma ] Tyxml_svg.wrap ->
  [> `Type_transfert ] Tyxml_svg.attrib

val a_tableValues : 
  Svg_types.numbers Tyxml_svg.wrap ->
  [> `TableValues ] Tyxml_svg.attrib

val a_intercept : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `Intercept ] Tyxml_svg.attrib

val a_amplitude : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `Amplitude ] Tyxml_svg.attrib

val a_exponent : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `Exponent ] Tyxml_svg.attrib

val a_transfer_offset : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `Offset_transfer ] Tyxml_svg.attrib

val a_feComposite_operator : 
  [< `Over | `In | `Out | `Atop | `Xor | `Arithmetic ] Tyxml_svg.wrap ->
  [> `OperatorComposite ] Tyxml_svg.attrib

Sourceval a_k1 : Svg_types.number Tyxml_svg.wrap -> [> `K1 ] Tyxml_svg.attrib

Sourceval a_k2 : Svg_types.number Tyxml_svg.wrap -> [> `K2 ] Tyxml_svg.attrib

Sourceval a_k3 : Svg_types.number Tyxml_svg.wrap -> [> `K3 ] Tyxml_svg.attrib

Sourceval a_k4 : Svg_types.number Tyxml_svg.wrap -> [> `K4 ] Tyxml_svg.attrib

val a_order : 
  Svg_types.number_optional_number Tyxml_svg.wrap ->
  [> `Order ] Tyxml_svg.attrib

val a_kernelMatrix : 
  Svg_types.numbers Tyxml_svg.wrap ->
  [> `KernelMatrix ] Tyxml_svg.attrib

val a_divisor : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `Divisor ] Tyxml_svg.attrib

Sourceval a_bias : Svg_types.number Tyxml_svg.wrap -> [> `Bias ] Tyxml_svg.attrib

val a_kernelUnitLength : 
  Svg_types.number_optional_number Tyxml_svg.wrap ->
  [> `KernelUnitLength ] Tyxml_svg.attrib

Sourceval a_targetX : int Tyxml_svg.wrap -> [> `TargetX ] Tyxml_svg.attrib

Sourceval a_targetY : int Tyxml_svg.wrap -> [> `TargetY ] Tyxml_svg.attrib

val a_edgeMode : 
  [< `Duplicate | `Wrap | `None ] Tyxml_svg.wrap ->
  [> `TargetY ] Tyxml_svg.attrib

Sourceval a_preserveAlpha : bool Tyxml_svg.wrap -> [> `TargetY ] Tyxml_svg.attrib

val a_surfaceScale : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `SurfaceScale ] Tyxml_svg.attrib

val a_diffuseConstant : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `DiffuseConstant ] Tyxml_svg.attrib

Sourceval a_scale : Svg_types.number Tyxml_svg.wrap -> [> `Scale ] Tyxml_svg.attrib

val a_xChannelSelector : 
  [< `R | `G | `B | `A ] Tyxml_svg.wrap ->
  [> `XChannelSelector ] Tyxml_svg.attrib

val a_yChannelSelector : 
  [< `R | `G | `B | `A ] Tyxml_svg.wrap ->
  [> `YChannelSelector ] Tyxml_svg.attrib

val a_stdDeviation : 
  Svg_types.number_optional_number Tyxml_svg.wrap ->
  [> `StdDeviation ] Tyxml_svg.attrib

val a_feMorphology_operator : 
  [< `Erode | `Dilate ] Tyxml_svg.wrap ->
  [> `OperatorMorphology ] Tyxml_svg.attrib

val a_radius : 
  Svg_types.number_optional_number Tyxml_svg.wrap ->
  [> `Radius ] Tyxml_svg.attrib

val a_baseFrenquency : 
  Svg_types.number_optional_number Tyxml_svg.wrap ->
  [> `BaseFrequency ] Tyxml_svg.attrib

Sourceval a_numOctaves : int Tyxml_svg.wrap -> [> `NumOctaves ] Tyxml_svg.attrib

Sourceval a_seed : Svg_types.number Tyxml_svg.wrap -> [> `Seed ] Tyxml_svg.attrib

val a_stitchTiles : 
  [< `Stitch | `NoStitch ] Tyxml_svg.wrap ->
  [> `StitchTiles ] Tyxml_svg.attrib

val a_feTurbulence_type : 
  [< `FractalNoise | `Turbulence ] Tyxml_svg.wrap ->
  [> `TypeStitch ] Tyxml_svg.attrib

val a_xlink_show : 
  [< `New | `Replace ] Tyxml_svg.wrap ->
  [> `Xlink_show ] Tyxml_svg.attrib

deprecated
Removed in SVG2

val a_xlink_actuate : 
  [< `OnRequest | `OnLoad | `Other | `None ] Tyxml_svg.wrap ->
  [> `Xlink_actuate ] Tyxml_svg.attrib

deprecated
Removed in SVG2

Sourceval a_target : string Tyxml_svg.wrap -> [> `Xlink_target ] Tyxml_svg.attrib

Sourceval a_viewTarget : string Tyxml_svg.wrap -> [> `ViewTarget ] Tyxml_svg.attrib

deprecated
Removed in SVG2

val a_attributeName : 
  string Tyxml_svg.wrap ->
  [> `AttributeName ] Tyxml_svg.attrib

val a_attributeType : 
  [< `CSS | `XML | `Auto ] Tyxml_svg.wrap ->
  [> `AttributeType ] Tyxml_svg.attrib

Sourceval a_begin : string Tyxml_svg.wrap -> [> `Begin ] Tyxml_svg.attrib

Sourceval a_dur : string Tyxml_svg.wrap -> [> `Dur ] Tyxml_svg.attrib

Sourceval a_min : string Tyxml_svg.wrap -> [> `Min ] Tyxml_svg.attrib

Sourceval a_max : string Tyxml_svg.wrap -> [> `Max ] Tyxml_svg.attrib

val a_restart : 
  [< `Always | `WhenNotActive | `Never ] Tyxml_svg.wrap ->
  [> `Restart ] Tyxml_svg.attrib

Sourceval a_repeatCount : string Tyxml_svg.wrap -> [> `RepeatCount ] Tyxml_svg.attrib

Sourceval a_repeatDur : string Tyxml_svg.wrap -> [> `RepeatDur ] Tyxml_svg.attrib

Sourceval a_fill : Svg_types.paint Tyxml_svg.wrap -> [> `Fill ] Tyxml_svg.attrib

val a_animation_fill : 
  [< `Freeze | `Remove ] Tyxml_svg.wrap ->
  [> `Fill_Animation ] Tyxml_svg.attrib

val a_fill_rule : 
  Svg_types.fill_rule Tyxml_svg.wrap ->
  [> `Fill_rule ] Tyxml_svg.attrib

val a_calcMode : 
  [< `Discrete | `Linear | `Paced | `Spline ] Tyxml_svg.wrap ->
  [> `CalcMode ] Tyxml_svg.attrib

val a_animation_values : 
  Svg_types.strings Tyxml_svg.wrap ->
  [> `Valuesanim ] Tyxml_svg.attrib

val a_keyTimes : 
  Svg_types.strings Tyxml_svg.wrap ->
  [> `KeyTimes ] Tyxml_svg.attrib

val a_keySplines : 
  Svg_types.strings Tyxml_svg.wrap ->
  [> `KeySplines ] Tyxml_svg.attrib

Sourceval a_from : string Tyxml_svg.wrap -> [> `From ] Tyxml_svg.attrib

Sourceval a_to : string Tyxml_svg.wrap -> [> `To ] Tyxml_svg.attrib

Sourceval a_by : string Tyxml_svg.wrap -> [> `By ] Tyxml_svg.attrib

val a_additive : 
  [< `Replace | `Sum ] Tyxml_svg.wrap ->
  [> `Additive ] Tyxml_svg.attrib

val a_accumulate : 
  [< `None | `Sum ] Tyxml_svg.wrap ->
  [> `Accumulate ] Tyxml_svg.attrib

val a_keyPoints : 
  Svg_types.numbers_semicolon Tyxml_svg.wrap ->
  [> `KeyPoints ] Tyxml_svg.attrib

Sourceval a_path : string Tyxml_svg.wrap -> [> `Path ] Tyxml_svg.attrib

val a_animateTransform_type : 
  [ `Translate | `Scale | `Rotate | `SkewX | `SkewY ] Tyxml_svg.wrap ->
  [ `Typeanimatetransform ] Tyxml_svg.attrib

val a_horiz_origin_x : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `HorizOriginX ] Tyxml_svg.attrib

val a_horiz_origin_y : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `HorizOriginY ] Tyxml_svg.attrib

val a_horiz_adv_x : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `HorizAdvX ] Tyxml_svg.attrib

val a_vert_origin_x : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `VertOriginX ] Tyxml_svg.attrib

val a_vert_origin_y : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `VertOriginY ] Tyxml_svg.attrib

val a_vert_adv_y : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `VertAdvY ] Tyxml_svg.attrib

Sourceval a_unicode : string Tyxml_svg.wrap -> [> `Unicode ] Tyxml_svg.attrib

Sourceval a_glyph_name : string Tyxml_svg.wrap -> [> `glyphname ] Tyxml_svg.attrib

val a_orientation : 
  [< `H | `V ] Tyxml_svg.wrap ->
  [> `Orientation ] Tyxml_svg.attrib

val a_arabic_form : 
  [< `Initial | `Medial | `Terminal | `Isolated ] Tyxml_svg.wrap ->
  [> `Arabicform ] Tyxml_svg.attrib

Sourceval a_lang : string Tyxml_svg.wrap -> [> `Lang ] Tyxml_svg.attrib

Sourceval a_u1 : string Tyxml_svg.wrap -> [> `U1 ] Tyxml_svg.attrib

Sourceval a_u2 : string Tyxml_svg.wrap -> [> `U2 ] Tyxml_svg.attrib

Sourceval a_g1 : string Tyxml_svg.wrap -> [> `G1 ] Tyxml_svg.attrib

Sourceval a_g2 : string Tyxml_svg.wrap -> [> `G2 ] Tyxml_svg.attrib

Sourceval a_k : string Tyxml_svg.wrap -> [> `K ] Tyxml_svg.attrib

Sourceval a_font_family : string Tyxml_svg.wrap -> [> `Font_Family ] Tyxml_svg.attrib

Sourceval a_font_style : string Tyxml_svg.wrap -> [> `Font_Style ] Tyxml_svg.attrib

val a_font_variant : 
  string Tyxml_svg.wrap ->
  [> `Font_Variant ] Tyxml_svg.attrib

Sourceval a_font_weight : string Tyxml_svg.wrap -> [> `Font_Weight ] Tyxml_svg.attrib

val a_font_stretch : 
  string Tyxml_svg.wrap ->
  [> `Font_Stretch ] Tyxml_svg.attrib

Sourceval a_font_size : string Tyxml_svg.wrap -> [> `Font_Size ] Tyxml_svg.attrib

val a_unicode_range : 
  string Tyxml_svg.wrap ->
  [> `UnicodeRange ] Tyxml_svg.attrib

Sourceval a_units_per_em : string Tyxml_svg.wrap -> [> `UnitsPerEm ] Tyxml_svg.attrib

Sourceval a_stemv : Svg_types.number Tyxml_svg.wrap -> [> `Stemv ] Tyxml_svg.attrib

Sourceval a_stemh : Svg_types.number Tyxml_svg.wrap -> [> `Stemh ] Tyxml_svg.attrib

Sourceval a_slope : Svg_types.number Tyxml_svg.wrap -> [> `Slope ] Tyxml_svg.attrib

val a_cap_height : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `CapHeight ] Tyxml_svg.attrib

val a_x_height : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `XHeight ] Tyxml_svg.attrib

val a_accent_height : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `AccentHeight ] Tyxml_svg.attrib

Sourceval a_ascent : Svg_types.number Tyxml_svg.wrap -> [> `Ascent ] Tyxml_svg.attrib

Sourceval a_widths : string Tyxml_svg.wrap -> [> `Widths ] Tyxml_svg.attrib

Sourceval a_bbox : string Tyxml_svg.wrap -> [> `Bbox ] Tyxml_svg.attrib

val a_ideographic : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `Ideographic ] Tyxml_svg.attrib

val a_alphabetic : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `Alphabetic ] Tyxml_svg.attrib

val a_mathematical : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `Mathematical ] Tyxml_svg.attrib

val a_hanging : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `Hanging ] Tyxml_svg.attrib

val a_videographic : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `VIdeographic ] Tyxml_svg.attrib

val a_v_alphabetic : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `VAlphabetic ] Tyxml_svg.attrib

val a_v_mathematical : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `VMathematical ] Tyxml_svg.attrib

val a_v_hanging : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `VHanging ] Tyxml_svg.attrib

val a_underline_position : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `UnderlinePosition ] Tyxml_svg.attrib

val a_underline_thickness : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `UnderlineThickness ] Tyxml_svg.attrib

val a_strikethrough_position : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `StrikethroughPosition ] Tyxml_svg.attrib

val a_strikethrough_thickness : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `StrikethroughThickness ] Tyxml_svg.attrib

val a_overline_position : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `OverlinePosition ] Tyxml_svg.attrib

val a_overline_thickness : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `OverlineThickness ] Tyxml_svg.attrib

Sourceval a_string : string Tyxml_svg.wrap -> [> `String ] Tyxml_svg.attrib

Sourceval a_name : string Tyxml_svg.wrap -> [> `Name ] Tyxml_svg.attrib

val a_alignment_baseline : 
  [< `Auto
  | `Baseline
  | `Before_edge
  | `Text_before_edge
  | `Middle
  | `Central
  | `After_edge
  | `Text_after_edge
  | `Ideographic
  | `Alphabetic
  | `Hanging
  | `Mathematical
  | `Inherit ]
    Tyxml_svg.wrap ->
  [> `Alignment_Baseline ] Tyxml_svg.attrib

val a_dominant_baseline : 
  [< `Auto
  | `Use_script
  | `No_change
  | `Reset_size
  | `Ideographic
  | `Alphabetic
  | `Hanging
  | `Mathematical
  | `Central
  | `Middle
  | `Text_after_edge
  | `Text_before_edge
  | `Inherit ]
    Tyxml_svg.wrap ->
  [> `Dominant_Baseline ] Tyxml_svg.attrib

val a_stop_color : 
  Svg_types.color Tyxml_svg.wrap ->
  [> `Stop_Color ] Tyxml_svg.attrib

val a_stop_opacity : 
  Svg_types.number Tyxml_svg.wrap ->
  [> `Stop_Opacity ] Tyxml_svg.attrib

Sourceval a_stroke : Svg_types.paint Tyxml_svg.wrap -> [> `Stroke ] Tyxml_svg.attrib

val a_stroke_width : 
  Svg_types.Unit.length Tyxml_svg.wrap ->
  [> `Stroke_Width ] Tyxml_svg.attrib

val a_stroke_linecap : 
  [< `Butt | `Round | `Square ] Tyxml_svg.wrap ->
  [> `Stroke_Linecap ] Tyxml_svg.attrib

val a_stroke_linejoin : 
  [< `Miter | `Round | `Bever ] Tyxml_svg.wrap ->
  [> `Stroke_Linejoin ] Tyxml_svg.attrib

val a_stroke_miterlimit : 
  float Tyxml_svg.wrap ->
  [> `Stroke_Miterlimit ] Tyxml_svg.attrib

val a_stroke_dasharray : 
  Svg_types.Unit.length list Tyxml_svg.wrap ->
  [> `Stroke_Dasharray ] Tyxml_svg.attrib

val a_stroke_dashoffset : 
  Svg_types.Unit.length Tyxml_svg.wrap ->
  [> `Stroke_Dashoffset ] Tyxml_svg.attrib

val a_stroke_opacity : 
  float Tyxml_svg.wrap ->
  [> `Stroke_Opacity ] Tyxml_svg.attrib

Events

Javascript events

Sourceval a_onabort : Tyxml_svg.Xml.event_handler -> [> `OnAbort ] Tyxml_svg.attrib

val a_onactivate : 
  Tyxml_svg.Xml.event_handler ->
  [> `OnActivate ] Tyxml_svg.attrib

Sourceval a_onbegin : Tyxml_svg.Xml.event_handler -> [> `OnBegin ] Tyxml_svg.attrib

Sourceval a_onend : Tyxml_svg.Xml.event_handler -> [> `OnEnd ] Tyxml_svg.attrib

Sourceval a_onerror : Tyxml_svg.Xml.event_handler -> [> `OnError ] Tyxml_svg.attrib

val a_onfocusin : 
  Tyxml_svg.Xml.event_handler ->
  [> `OnFocusIn ] Tyxml_svg.attrib

val a_onfocusout : 
  Tyxml_svg.Xml.event_handler ->
  [> `OnFocusOut ] Tyxml_svg.attrib

Sourceval a_onload : Tyxml_svg.Xml.event_handler -> [> `OnLoad ] Tyxml_svg.attrib

deprecated
Removed in SVG2

Sourceval a_onrepeat : Tyxml_svg.Xml.event_handler -> [> `OnRepeat ] Tyxml_svg.attrib

Sourceval a_onresize : Tyxml_svg.Xml.event_handler -> [> `OnResize ] Tyxml_svg.attrib

Sourceval a_onscroll : Tyxml_svg.Xml.event_handler -> [> `OnScroll ] Tyxml_svg.attrib

Sourceval a_onunload : Tyxml_svg.Xml.event_handler -> [> `OnUnload ] Tyxml_svg.attrib

Sourceval a_onzoom : Tyxml_svg.Xml.event_handler -> [> `OnZoom ] Tyxml_svg.attrib

Javascript mouse events

val a_onclick : 
  Tyxml_svg.Xml.mouse_event_handler ->
  [> `OnClick ] Tyxml_svg.attrib

val a_onmousedown : 
  Tyxml_svg.Xml.mouse_event_handler ->
  [> `OnMouseDown ] Tyxml_svg.attrib

val a_onmouseup : 
  Tyxml_svg.Xml.mouse_event_handler ->
  [> `OnMouseUp ] Tyxml_svg.attrib

val a_onmouseover : 
  Tyxml_svg.Xml.mouse_event_handler ->
  [> `OnMouseOver ] Tyxml_svg.attrib

val a_onmouseout : 
  Tyxml_svg.Xml.mouse_event_handler ->
  [> `OnMouseOut ] Tyxml_svg.attrib

val a_onmousemove : 
  Tyxml_svg.Xml.mouse_event_handler ->
  [> `OnMouseMove ] Tyxml_svg.attrib

val a_ontouchstart : 
  Tyxml_svg.Xml.touch_event_handler ->
  [> `OnTouchStart ] Tyxml_svg.attrib

Javascript touch events

val a_ontouchend : 
  Tyxml_svg.Xml.touch_event_handler ->
  [> `OnTouchEnd ] Tyxml_svg.attrib

val a_ontouchmove : 
  Tyxml_svg.Xml.touch_event_handler ->
  [> `OnTouchMove ] Tyxml_svg.attrib

val a_ontouchcancel : 
  Tyxml_svg.Xml.touch_event_handler ->
  [> `OnTouchCancel ] Tyxml_svg.attrib

Elements

Sourceval txt : string Tyxml_svg.wrap -> [> Svg_types.txt ] Tyxml_svg.elt

val svg : 
  ([< Svg_types.svg_attr ], [< Svg_types.svg_content ], [> Svg_types.svg ])
    Tyxml_svg.star

val g : 
  ([< Svg_types.g_attr ], [< Svg_types.g_content ], [> Svg_types.g ])
    Tyxml_svg.star

val defs : 
  ([< Svg_types.defs_attr ], [< Svg_types.defs_content ], [> Svg_types.defs ])
    Tyxml_svg.star

val desc : 
  ([< Svg_types.desc_attr ], [< Svg_types.desc_content ], [> Svg_types.desc ])
    Tyxml_svg.unary

val title : 
  ([< Svg_types.title_attr ],
    [< Svg_types.title_content ],
    [> Svg_types.title ])
    Tyxml_svg.unary

val symbol : 
  ([< Svg_types.symbol_attr ],
    [< Svg_types.symbol_content ],
    [> Svg_types.symbol ])
    Tyxml_svg.star

val use : 
  ([< Svg_types.use_attr ], [< Svg_types.use_content ], [> Svg_types.use ])
    Tyxml_svg.star

val image : 
  ([< Svg_types.image_attr ],
    [< Svg_types.image_content ],
    [> Svg_types.image ])
    Tyxml_svg.star

val switch : 
  ([< Svg_types.switch_attr ],
    [< Svg_types.switch_content ],
    [> Svg_types.switch ])
    Tyxml_svg.star

val style : 
  ([< Svg_types.style_attr ],
    [< Svg_types.style_content ],
    [> Svg_types.style ])
    Tyxml_svg.unary

val path : 
  ([< Svg_types.path_attr ], [< Svg_types.path_content ], [> Svg_types.path ])
    Tyxml_svg.star

val rect : 
  ([< Svg_types.rect_attr ], [< Svg_types.rect_content ], [> Svg_types.rect ])
    Tyxml_svg.star

val circle : 
  ([< Svg_types.circle_attr ],
    [< Svg_types.circle_content ],
    [> Svg_types.circle ])
    Tyxml_svg.star

val ellipse : 
  ([< Svg_types.ellipse_attr ],
    [< Svg_types.ellipse_content ],
    [> Svg_types.ellipse ])
    Tyxml_svg.star

val line : 
  ([< Svg_types.line_attr ], [< Svg_types.line_content ], [> Svg_types.line ])
    Tyxml_svg.star

val polyline : 
  ([< Svg_types.polyline_attr ],
    [< Svg_types.polyline_content ],
    [> Svg_types.polyline ])
    Tyxml_svg.star

val polygon : 
  ([< Svg_types.polygon_attr ],
    [< Svg_types.polygon_content ],
    [> Svg_types.polygon ])
    Tyxml_svg.star

val text : 
  ([< Svg_types.text_attr ], [< Svg_types.text_content ], [> Svg_types.text ])
    Tyxml_svg.star

val tspan : 
  ([< Svg_types.tspan_attr ],
    [< Svg_types.tspan_content ],
    [> Svg_types.tspan ])
    Tyxml_svg.star

val tref : 
  ([< Svg_types.tref_attr ], [< Svg_types.tref_content ], [> Svg_types.tref ])
    Tyxml_svg.star

deprecated
Removed in SVG2

val textPath : 
  ([< Svg_types.textpath_attr ],
    [< Svg_types.textpath_content ],
    [> Svg_types.textpath ])
    Tyxml_svg.star

val altGlyph : 
  ([< Svg_types.altglyph_attr ],
    [< Svg_types.altglyph_content ],
    [> Svg_types.altglyph ])
    Tyxml_svg.unary

deprecated
Removed in SVG2

Sourcetype altglyphdef_content = [

| `Ref of Svg_types.glyphref Tyxml_svg.elt list
| `Item of Svg_types.altglyphitem Tyxml_svg.elt list

]

val altGlyphDef : 
  ([< Svg_types.altglyphdef_attr ],
    [< Tyxml_svg.altglyphdef_content ],
    [> Svg_types.altglyphdef ])
    Tyxml_svg.unary

deprecated
Removed in SVG2

val altGlyphItem : 
  ([< Svg_types.altglyphitem_attr ],
    [< Svg_types.altglyphitem_content ],
    [> Svg_types.altglyphitem ])
    Tyxml_svg.star

deprecated
Removed in SVG2

val glyphRef : 
  ([< Svg_types.glyphref_attr ], [> Svg_types.glyphref ]) Tyxml_svg.nullary

deprecated
Removed in SVG2

val marker : 
  ([< Svg_types.marker_attr ],
    [< Svg_types.marker_content ],
    [> Svg_types.marker ])
    Tyxml_svg.star

val color_profile : 
  ([< Svg_types.colorprofile_attr ],
    [< Svg_types.colorprofile_content ],
    [> Svg_types.colorprofile ])
    Tyxml_svg.star

deprecated
Removed in SVG2

val linearGradient : 
  ([< Svg_types.lineargradient_attr ],
    [< Svg_types.lineargradient_content ],
    [> Svg_types.lineargradient ])
    Tyxml_svg.star

val radialGradient : 
  ([< Svg_types.radialgradient_attr ],
    [< Svg_types.radialgradient_content ],
    [> Svg_types.radialgradient ])
    Tyxml_svg.star

val stop : 
  ([< Svg_types.stop_attr ], [< Svg_types.stop_content ], [> Svg_types.stop ])
    Tyxml_svg.star

val pattern : 
  ([< Svg_types.pattern_attr ],
    [< Svg_types.pattern_content ],
    [> Svg_types.pattern ])
    Tyxml_svg.star

val clipPath : 
  ([< Svg_types.clippath_attr ],
    [< Svg_types.clippath_content ],
    [> Svg_types.clippath ])
    Tyxml_svg.star

val filter : 
  ([< Svg_types.filter_attr ],
    [< Svg_types.filter_content ],
    [> Svg_types.filter ])
    Tyxml_svg.star

val feDistantLight : 
  ([< Svg_types.fedistantlight_attr ],
    [< Svg_types.fedistantlight_content ],
    [> Svg_types.fedistantlight ])
    Tyxml_svg.star

val fePointLight : 
  ([< Svg_types.fepointlight_attr ],
    [< Svg_types.fepointlight_content ],
    [> Svg_types.fepointlight ])
    Tyxml_svg.star

val feSpotLight : 
  ([< Svg_types.fespotlight_attr ],
    [< Svg_types.fespotlight_content ],
    [> Svg_types.fespotlight ])
    Tyxml_svg.star

val feBlend : 
  ([< Svg_types.feblend_attr ],
    [< Svg_types.feblend_content ],
    [> Svg_types.feblend ])
    Tyxml_svg.star

val feColorMatrix : 
  ([< Svg_types.fecolormatrix_attr ],
    [< Svg_types.fecolormatrix_content ],
    [> Svg_types.fecolormatrix ])
    Tyxml_svg.star

val feComponentTransfer : 
  ([< Svg_types.fecomponenttransfer_attr ],
    [< Svg_types.fecomponenttransfer_content ],
    [> Svg_types.fecomponenttransfer ])
    Tyxml_svg.star

val feFuncA : 
  ([< Svg_types.fefunca_attr ],
    [< Svg_types.fefunca_content ],
    [> Svg_types.fefunca ])
    Tyxml_svg.star

val feFuncG : 
  ([< Svg_types.fefuncg_attr ],
    [< Svg_types.fefuncg_content ],
    [> Svg_types.fefuncg ])
    Tyxml_svg.star

val feFuncB : 
  ([< Svg_types.fefuncb_attr ],
    [< Svg_types.fefuncb_content ],
    [> Svg_types.fefuncb ])
    Tyxml_svg.star

val feFuncR : 
  ([< Svg_types.fefuncr_attr ],
    [< Svg_types.fefuncr_content ],
    [> Svg_types.fefuncr ])
    Tyxml_svg.star

val feComposite : 
  ([< Svg_types.fecomposite_attr ],
    [< Svg_types.fecomposite_content ],
    [> Svg_types.fecomposite ])
    Tyxml_svg.star

val feConvolveMatrix : 
  ([< Svg_types.feconvolvematrix_attr ],
    [< Svg_types.feconvolvematrix_content ],
    [> Svg_types.feconvolvematrix ])
    Tyxml_svg.star

val feDiffuseLighting : 
  ([< Svg_types.fediffuselighting_attr ],
    [< Svg_types.fediffuselighting_content ],
    [> Svg_types.fediffuselighting ])
    Tyxml_svg.star

val feDisplacementMap : 
  ([< Svg_types.fedisplacementmap_attr ],
    [< Svg_types.fedisplacementmap_content ],
    [> Svg_types.fedisplacementmap ])
    Tyxml_svg.star

val feFlood : 
  ([< Svg_types.feflood_attr ],
    [< Svg_types.feflood_content ],
    [> Svg_types.feflood ])
    Tyxml_svg.star

val feGaussianBlur : 
  ([< Svg_types.fegaussianblur_attr ],
    [< Svg_types.fegaussianblur_content ],
    [> Svg_types.fegaussianblur ])
    Tyxml_svg.star

val feImage : 
  ([< Svg_types.feimage_attr ],
    [< Svg_types.feimage_content ],
    [> Svg_types.feimage ])
    Tyxml_svg.star

val feMerge : 
  ([< Svg_types.femerge_attr ],
    [< Svg_types.femerge_content ],
    [> Svg_types.femerge ])
    Tyxml_svg.star

val feMorphology : 
  ([< Svg_types.femorphology_attr ],
    [< Svg_types.femorphology_content ],
    [> Svg_types.femorphology ])
    Tyxml_svg.star

val feOffset : 
  ([< Svg_types.feoffset_attr ],
    [< Svg_types.feoffset_content ],
    [> Svg_types.feoffset ])
    Tyxml_svg.star

val feSpecularLighting : 
  ([< Svg_types.fespecularlighting_attr ],
    [< Svg_types.fespecularlighting_content ],
    [> Svg_types.fespecularlighting ])
    Tyxml_svg.star

val feTile : 
  ([< Svg_types.fetile_attr ],
    [< Svg_types.fetile_content ],
    [> Svg_types.fetile ])
    Tyxml_svg.star

val feTurbulence : 
  ([< Svg_types.feturbulence_attr ],
    [< Svg_types.feturbulence_content ],
    [> Svg_types.feturbulence ])
    Tyxml_svg.star

val cursor : 
  ([< Svg_types.cursor_attr ],
    [< Svg_types.cursor_content ],
    [> Svg_types.cursor ])
    Tyxml_svg.star

val a : 
  ([< Svg_types.a_attr ], [< Svg_types.a_content ], [> Svg_types.a ])
    Tyxml_svg.star

val view : 
  ([< Svg_types.view_attr ], [< Svg_types.view_content ], [> Svg_types.view ])
    Tyxml_svg.star

val script : 
  ([< Svg_types.script_attr ],
    [< Svg_types.script_content ],
    [> Svg_types.script ])
    Tyxml_svg.unary

val animate : 
  ([< Svg_types.animate_attr ],
    [< Svg_types.animate_content ],
    [> Svg_types.animate ])
    Tyxml_svg.star

val set : 
  ([< Svg_types.set_attr ], [< Svg_types.set_content ], [> Svg_types.set ])
    Tyxml_svg.star

val animateMotion : 
  ([< Svg_types.animatemotion_attr ],
    [< Svg_types.animatemotion_content ],
    [> Svg_types.animatemotion ])
    Tyxml_svg.star

val mpath : 
  ([< Svg_types.mpath_attr ],
    [< Svg_types.mpath_content ],
    [> Svg_types.mpath ])
    Tyxml_svg.star

val animateColor : 
  ([< Svg_types.animatecolor_attr ],
    [< Svg_types.animatecolor_content ],
    [> Svg_types.animatecolor ])
    Tyxml_svg.star

val animateTransform : 
  ([< Svg_types.animatetransform_attr ],
    [< Svg_types.animatetransform_content ],
    [> Svg_types.animatetransform ])
    Tyxml_svg.star

val font : 
  ([< Svg_types.font_attr ], [< Svg_types.font_content ], [> Svg_types.font ])
    Tyxml_svg.star

deprecated
Removed in SVG2

val glyph : 
  ([< Svg_types.glyph_attr ],
    [< Svg_types.glyph_content ],
    [> Svg_types.glyph ])
    Tyxml_svg.star

deprecated
Removed in SVG2

val missing_glyph : 
  ([< Svg_types.missingglyph_attr ],
    [< Svg_types.missingglyph_content ],
    [> Svg_types.missingglyph ])
    Tyxml_svg.star

deprecated
Removed in SVG2

Sourceval hkern : ([< Svg_types.hkern_attr ], [> Svg_types.hkern ]) Tyxml_svg.nullary

deprecated
Removed in SVG2

Sourceval vkern : ([< Svg_types.vkern_attr ], [> Svg_types.vkern ]) Tyxml_svg.nullary

deprecated
Removed in SVG2

val font_face : 
  ([< Svg_types.font_face_attr ], [> Svg_types.font_face ]) Tyxml_svg.nullary

deprecated
Removed in SVG2

val font_face_src : 
  ([< Svg_types.font_face_src_attr ],
    [< Svg_types.font_face_src_content ],
    [> Svg_types.font_face_src ])
    Tyxml_svg.star

deprecated
Removed in SVG2

val font_face_uri : 
  ([< Svg_types.font_face_uri_attr ],
    [< Svg_types.font_face_uri_content ],
    [> Svg_types.font_face_uri ])
    Tyxml_svg.star

deprecated
Removed in SVG2

val font_face_format : 
  ([< Svg_types.font_face_format_attr ], [> Svg_types.font_face_format ])
    Tyxml_svg.nullary

deprecated
Removed in SVG2

val font_face_name : 
  ([< Svg_types.font_face_name_attr ], [> Svg_types.font_face_name ])
    Tyxml_svg.nullary

deprecated
Removed in SVG2

val metadata : 
  ?a:Svg_types.metadata_attr Tyxml_svg.attrib list ->
  Tyxml_svg.Xml.elt Tyxml_svg.list_wrap ->
  [> Svg_types.metadata ] Tyxml_svg.elt

val foreignObject : 
  ?a:Svg_types.foreignobject_attr Tyxml_svg.attrib list ->
  Tyxml_svg.Xml.elt Tyxml_svg.list_wrap ->
  [> Svg_types.foreignobject ] Tyxml_svg.elt

Deprecated

Sourceval pcdata : string Tyxml_svg.wrap -> [> Svg_types.txt ] Tyxml_svg.elt

deprecated
Use txt instead

val animation : 
  ([< Svg_types.animate_attr ],
    [< Svg_types.animate_content ],
    [> Svg_types.animate ])
    Tyxml_svg.star

deprecated
Use animate instead

Conversion with untyped representation

WARNING: These functions do not ensure HTML or SVG validity! You should always explicitly given an appropriate type to the output.

val of_seq : 
  Xml_stream.signal Stdlib.Seq.t ->
  'a Tyxml_svg.elt Tyxml_svg.list_wrap

import signal converts the given XML signal into Tyxml elements. It can be used with HTML and SVG parsing libraries, such as Markup.

raises Xml_stream.Malformed_stream
if the stream is malformed.

Sourceval tot : Tyxml_svg.Xml.elt -> 'a Tyxml_svg.elt

val totl : 
  Tyxml_svg.Xml.elt Tyxml_svg.list_wrap ->
  'a Tyxml_svg.elt Tyxml_svg.list_wrap

Sourceval toelt : 'a Tyxml_svg.elt -> Tyxml_svg.Xml.elt

val toeltl : 
  'a Tyxml_svg.elt Tyxml_svg.list_wrap ->
  Tyxml_svg.Xml.elt Tyxml_svg.list_wrap

Sourceval doc_toelt : Tyxml_svg.doc -> Tyxml_svg.Xml.elt

Sourceval to_xmlattribs : 'a Tyxml_svg.attrib list -> Tyxml_svg.Xml.attrib list

Sourceval to_attrib : Tyxml_svg.Xml.attrib -> 'a Tyxml_svg.attrib

module Unsafe : sig ... end

Unsafe features.

Printers

val pp : 
  ?encode:(string -> string) ->
  ?indent:bool ->
  ?advert:string ->
  unit ->
  Stdlib.Format.formatter ->
  Tyxml_svg.doc ->
  unit

pp () is a Format printer for Svg documents.

It can be used in combination with "%a". For example, to get a string:

let s = Format.asprintf "%a" (Tyxml.Svg.pp ()) my_svg

val pp_elt : 
  ?encode:(string -> string) ->
  ?indent:bool ->
  unit ->
  Stdlib.Format.formatter ->
  'a Tyxml_svg.elt ->
  unit

pp_elt () is a Format printer for Svg elements.

module Make_printer
  (O : Xml_sigs.Output) : 
  Xml_sigs.Typed_printer
    with type out := O.out
     and type 'a elt := 'a Tyxml_svg.elt
     and type doc := Tyxml_svg.doc

Parametrized stream printer for Svg documents.

/

Toplevel printers

Sourceval _pp : Stdlib.Format.formatter -> Tyxml_svg.doc -> unit

Sourceval _pp_elt : Stdlib.Format.formatter -> _ Tyxml_svg.elt -> unit