LPF *lpf_create_it(void)
{ LPF *lpf;
#if GLPLPF_DEBUG
xprintf("lpf_create_it: warning: debug mode enabled\n");
#endif
lpf = xmalloc(sizeof(LPF));
lpf->valid = 0;
lpf->m0_max = lpf->m0 = 0;
#if 0 /* 06/VI-2013 */
lpf->luf = luf_create_it();
#else
lpf->lufint = lufint_create();
#endif
lpf->m = 0;
lpf->B = NULL;
lpf->n_max = 50;
lpf->n = 0;
lpf->R_ptr = lpf->R_len = NULL;
lpf->S_ptr = lpf->S_len = NULL;
lpf->scf = NULL;
lpf->P_row = lpf->P_col = NULL;
lpf->Q_row = lpf->Q_col = NULL;
lpf->v_size = 1000;
lpf->v_ptr = 0;
lpf->v_ind = NULL;
lpf->v_val = NULL;
lpf->work1 = lpf->work2 = NULL;
return lpf;
}
FHV *fhv_create_it(void)
{ FHV *fhv;
fhv = xmalloc(sizeof(FHV));
fhv->m_max = fhv->m = 0;
fhv->valid = 0;
fhv->luf = luf_create_it();
fhv->hh_max = 50;
fhv->hh_nfs = 0;
fhv->hh_ind = fhv->hh_ptr = fhv->hh_len = NULL;
fhv->p0_row = fhv->p0_col = NULL;
fhv->cc_ind = NULL;
fhv->cc_val = NULL;
fhv->upd_tol = 1e-6;
fhv->nnz_h = 0;
return fhv;
}
