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