Lines Matching refs:LUSOL
6 MYBOOL LU1L0(LUSOLrec *LUSOL, LUSOLmat **mat, int *inform) in LU1L0() argument
20 NUML0 = LUSOL->luparm[LUSOL_IP_COLCOUNT_L0]; in LU1L0()
21 LENL0 = LUSOL->luparm[LUSOL_IP_NONZEROS_L0]; in LU1L0()
23 (LUSOL->luparm[LUSOL_IP_ACCELERATION] == LUSOL_BASEORDER) || in LU1L0()
24 ((LUSOL->luparm[LUSOL_IP_ACCELERATION] & LUSOL_ACCELERATE_L0) == 0)) in LU1L0()
28 lsumr = (int *) LUSOL_CALLOC((LUSOL->m+1), sizeof(*lsumr)); in LU1L0()
36 L2 = LUSOL->lena; in LU1L0()
39 I = LUSOL->indc[L]; in LU1L0()
44 LUSOL->luparm[LUSOL_IP_ROWCOUNT_L0] = K; in LU1L0()
47 if((LUSOL->luparm[LUSOL_IP_ACCELERATION] & LUSOL_AUTOORDER) && in LU1L0()
48 ((REAL) LUSOL->luparm[LUSOL_IP_ROWCOUNT_L0] / in LU1L0()
50 LUSOL->luparm[LUSOL_IP_COLCOUNT_L0] in LU1L0()
52 LUSOL->m in LU1L0()
54 > LUSOL->parmlu[LUSOL_RP_SMARTRATIO])) in LU1L0()
58 *mat = LUSOL_matcreate(LUSOL->m, LENL0); in LU1L0()
67 for(K = 1; K <= LUSOL->m; K++) { in LU1L0()
76 L2 = LUSOL->lena; in LU1L0()
79 I = LUSOL->indc[L]; in LU1L0()
81 (*mat)->a[LL] = LUSOL->a[L]; in LU1L0()
82 (*mat)->indr[LL] = LUSOL->indr[L]; in LU1L0()
88 for(L = 1; L <= LUSOL->m; L++) { in LU1L0()
89 K = LUSOL->ip[L]; in LU1L0()
106 void LU6L0T_v(LUSOLrec *LUSOL, LUSOLmat *mat, REAL V[], int NZidx[], int *INFORM) in LU6L0T_v() argument
121 NUML0 = LUSOL->luparm[LUSOL_IP_ROWCOUNT_L0]; in LU6L0T_v()
122 SMALL = LUSOL->parmlu[LUSOL_RP_ZEROTOLERANCE]; in LU6L0T_v()