int QSdelete_col (QSprob p, int colindex)
/* Assume p is an initialized LP problem with at least 5 columns.   */
/* Use QSdelete_col() to remove column 4.                           */

int rval;

rval = QSdelete_col (p, 4);
if (rval) {
    fprintf (stderr, "QSdelete_col failed with return code %d\n", rval);
}