let xmls_of_source_opt = xmls_of_opt_f xml_of_source