let indexes_using_column_part = fun column ->
let index_use_column = fun index ->
List.exists (fun c -> c == column) index.idx_columns (* Phys. eq *)
in
List.partition index_use_column
column.col_table.ta_db.db_indexes