sig type t = [ `Body | `Head | `Html | `Title ] end