void lpf_delete_it(LPF *lpf)
#if 0 /* 06/VI-2013 */
{ luf_delete_it(lpf->luf);
#else
{ lufint_delete(lpf->lufint);
#endif
#if GLPLPF_DEBUG
if (lpf->B != NULL) xfree(lpf->B);
#else
xassert(lpf->B == NULL);
#endif
if (lpf->R_ptr != NULL) xfree(lpf->R_ptr);
if (lpf->R_len != NULL) xfree(lpf->R_len);
if (lpf->S_ptr != NULL) xfree(lpf->S_ptr);
if (lpf->S_len != NULL) xfree(lpf->S_len);
if (lpf->scf != NULL) scf_delete_it(lpf->scf);
if (lpf->P_row != NULL) xfree(lpf->P_row);
if (lpf->P_col != NULL) xfree(lpf->P_col);
if (lpf->Q_row != NULL) xfree(lpf->Q_row);
if (lpf->Q_col != NULL) xfree(lpf->Q_col);
if (lpf->v_ind != NULL) xfree(lpf->v_ind);
if (lpf->v_val != NULL) xfree(lpf->v_val);
if (lpf->work1 != NULL) xfree(lpf->work1);
if (lpf->work2 != NULL) xfree(lpf->work2);
xfree(lpf);
return;
}
void fhv_delete_it(FHV *fhv)
{ luf_delete_it(fhv->luf);
if (fhv->hh_ind != NULL) xfree(fhv->hh_ind);
if (fhv->hh_ptr != NULL) xfree(fhv->hh_ptr);
if (fhv->hh_len != NULL) xfree(fhv->hh_len);
if (fhv->p0_row != NULL) xfree(fhv->p0_row);
if (fhv->p0_col != NULL) xfree(fhv->p0_col);
if (fhv->cc_ind != NULL) xfree(fhv->cc_ind);
if (fhv->cc_val != NULL) xfree(fhv->cc_val);
xfree(fhv);
return;
}