Fixed run at k-points. Need to speed up list_col_correct, tosparse and sparse_uc