assert (last_col < A->size1);
gsl_matrix_swap_rows (A, A->size1 - 1, last_col);
gsl_matrix_swap_columns (A, A->size1 - 1 , last_col);
assert (last_col < A->size1);
gsl_matrix_swap_rows (A, A->size1 - 1, last_col);
gsl_matrix_swap_columns (A, A->size1 - 1 , last_col);