utc_line <- time_lines[str_detect(time_lines, "UTC")]
#etc.