Lines Matching refs:luparm
38 PETSC_EXTERN void LU1FAC(int *m, int *n, int *nnz, int *size, int *luparm, double *parmlu, double *data, int *indc, int *indr, int *rowperm, int *colperm, int *collen, int *rowlen, int *colstart, int *rowstart, int *rploc, int *cploc, int *rpinv, int *cpinv, double *w, int *inform);
40 PETSC_EXTERN void LU6SOL(int *mode, int *m, int *n, double *rhs, double *x, int *size, int *luparm, double *parmlu, double *data, int *indc, int *indr, int *rowperm, int *colperm, int *collen, int *rowlen, int *colstart, int *rowstart, int *inform);
67 int luparm[30]; /* Input/output to LUSOL */
77 luparm(0) = nout File number for printed messages. 6
78 luparm(1) = lprint Print level. 0
86 luparm(2) = maxcol lu1fac: maximum number of columns 5
95 luparm(9) = inform Return code from last call to any LU routine.
96 luparm(10) = nsing No. of singularities marked in the
98 luparm(11) = jsing Column index of last singularity.
99 luparm(12) = minlen Minimum recommended value for lena.
100 luparm(13) = maxlen ?
101 luparm(14) = nupdat No. of updates performed by the lu8 routines.
102 luparm(15) = nrank No. of nonempty rows of U.
103 luparm(16) = ndens1 No. of columns remaining when the density of
105 luparm(17) = ndens2 No. of columns remaining when the density of
107 luparm(18) = jumin The column index associated with dumin.
108 luparm(19) = numl0 No. of columns in initial L.
109 luparm(20) = lenl0 Size of initial L (no. of nonzeros).
110 luparm(21) = lenu0 Size of initial U.
111 luparm(22) = lenl Size of current L.
112 luparm(23) = lenu Size of current U.
113 luparm(24) = lrow Length of row file.
114 luparm(25) = ncp No. of compressions of LU data structures.
115 luparm(26) = mersum lu1fac: sum of Markowitz merit counts.
116 luparm(27) = nutri lu1fac: triangular rows in U.
117 luparm(28) = nltri lu1fac: triangular rows in L.
118 luparm(29) =
206 LU6SOL(&mode, &m, &n, lusol->mnsv, xx, &nnz, lusol->luparm, lusol->parmlu, lusol->data, lusol->indc, lusol->indr, lusol->ip, lusol->iq, lusol->lenc, lusol->lenr, lusol->locc, lusol->locr, &status);
239 if (nnz < lusol->luparm[12]) {
240 nnz = (int)(lusol->luroom * lusol->luparm[12]);
245 nnz = PetscMax(nnz, (int)(lusol->luroom * (lusol->luparm[22] + lusol->luparm[23])));
271 LU1FAC(&m, &n, &nz, &nnz, lusol->luparm, lusol->parmlu, lusol->data, lusol->indc, lusol->indr, lusol->ip, lusol->iq, lusol->lenc, lusol->lenr, lusol->locc, lusol->locr, lusol->iploc, lusol->iqloc, lusol->ipinv, lusol->iqinv, lusol->mnsw, &status);
325 lusol->luparm[i] = 0;
329 lusol->luparm[1] = -1;
330 lusol->luparm[2] = 5;
331 lusol->luparm[7] = 1;