int QSget_param (QSprob p, int whichparam, int *value)
/* p is a QSprob, a handle to an existing LP problem.  */
/* Get the current pricing rule used in QSdual_opt().  */

int rval, param;

rval = QSget_param (p, QS_PARAM_DUAL_PRICING, ¶m);
if (rval) {
    fprintf (stderr,
            "Could not get the parameter, error code %d\n", rval);
} else {
    switch (param) {
    case QS_PRICE_DDANTZIG:
        printf ("Dual Dantzig Pricing\n");
        break;
    case QS_PRICE_DSTEEP:
        printf ("Dual Steepest-Edge Pricing\n");
        break;
    case QS_PRICE_DMULTPARTIAL:
        printf ("Dual Multiple-Partial Pricing\n");
        break;
    default:
        printf ("Unknown dual pricing rule: %d\n", param);
        break;
    }
}