let to_range_list t = List.map ~f:Range.to_pair t