let column_by_name_opt = fun table ~name -> try Some (column_by_name table name) with | Not_found -> None