sig type inline = [ `A ] type flow = Xhtml_types.HYPERTEXT.inline end