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