let lines_of_tu_date_opt (doc_settings : t_doc_settings) (date_opt : tu_date option) : string list = match date_opt with |None -> [] |Some date -> lines_of_tu_date doc_settings date