let xml_of_enclosure e = Element ("enclosure", [ "url", e.encl_url ; "length", string_of_int e.encl_length ; "type", e.encl_type ; ], [] )