Home
last modified time | relevance | path

Searched refs:iwork1 (Results 1 – 25 of 40) sorted by relevance

12

/dports/math/highs/HiGHS-cfe064e/src/ipm/basiclu/src/
H A Dlu_build_factors.c153 lu_int *iwork1 = this->iwork1; in lu_build_factors() local
265 iwork1[i]++; in lu_build_factors()
273 put += iwork1[i]; in lu_build_factors()
275 iwork1[i]= Ltbegin_p[k]; in lu_build_factors()
291 assert(Lindex[iwork1[i]] == -1); in lu_build_factors()
322 iwork1[j]++; in lu_build_factors()
345 iwork1[j]++; in lu_build_factors()
375 nz = iwork1[j]; in lu_build_factors()
386 iwork1[j] = Ubegin[i]; in lu_build_factors()
396 put = iwork1[j]++; in lu_build_factors()
[all …]
H A Dlu_singletons.c159 lu_int *iwork1 = this->iwork1; in lu_singletons() local
160 lu_int *iwork2 = iwork1 + m; in lu_singletons()
195 memset(iwork1, 0, m*sizeof(lu_int)); /* row counts */ in lu_singletons()
205 iwork1[i]++; in lu_singletons()
216 put += iwork1[i]; in lu_singletons()
217 iwork1[i] = Btp[i]; in lu_singletons()
227 put = iwork1[i]++; in lu_singletons()
253 col_pivot, pinv, qinv, iwork1, iwork2, rank, in lu_singletons()
258 col_pivot, pinv, qinv, iwork1, iwork2, rank, in lu_singletons()
267 col_pivot, pinv, qinv, iwork1, iwork2, rank, in lu_singletons()
[all …]
H A Dlu_solve_sparse.c54 lu_int *pattern_symb = this->iwork1; in lu_solve_sparse()
55 lu_int *pattern = this->iwork1 + m; in lu_solve_sparse()
163 lu_int *pattern_symb = this->iwork1; in lu_solve_sparse()
164 lu_int *pattern = this->iwork1 + m; in lu_solve_sparse()
H A Dlu_solve_for_update.c56 lu_int *pattern_symb = this->iwork1; in lu_solve_for_update()
57 lu_int *pattern = this->iwork1 + m; in lu_solve_for_update()
210 lu_int *pattern_symb = this->iwork1; in lu_solve_for_update()
211 lu_int *pattern = this->iwork1 + m; in lu_solve_for_update()
H A Dbasiclu_get_factors.c55 lu_int *colptr = this.iwork1; /* size m workspace */ in basiclu_get_factors()
103 lu_int *colptr = this.iwork1; /* size m workspace */ in basiclu_get_factors()
/dports/science/py-scipy/scipy-1.7.1/scipy/optimize/_highs/src/ipm/basiclu/src/
H A Dlu_build_factors.c153 lu_int *iwork1 = this->iwork1; in lu_build_factors() local
265 iwork1[i]++; in lu_build_factors()
273 put += iwork1[i]; in lu_build_factors()
275 iwork1[i]= Ltbegin_p[k]; in lu_build_factors()
291 assert(Lindex[iwork1[i]] == -1); in lu_build_factors()
322 iwork1[j]++; in lu_build_factors()
345 iwork1[j]++; in lu_build_factors()
375 nz = iwork1[j]; in lu_build_factors()
386 iwork1[j] = Ubegin[i]; in lu_build_factors()
396 put = iwork1[j]++; in lu_build_factors()
[all …]
H A Dlu_singletons.c159 lu_int *iwork1 = this->iwork1; in lu_singletons() local
160 lu_int *iwork2 = iwork1 + m; in lu_singletons()
195 memset(iwork1, 0, m*sizeof(lu_int)); /* row counts */ in lu_singletons()
205 iwork1[i]++; in lu_singletons()
216 put += iwork1[i]; in lu_singletons()
217 iwork1[i] = Btp[i]; in lu_singletons()
227 put = iwork1[i]++; in lu_singletons()
253 col_pivot, pinv, qinv, iwork1, iwork2, rank, in lu_singletons()
258 col_pivot, pinv, qinv, iwork1, iwork2, rank, in lu_singletons()
267 col_pivot, pinv, qinv, iwork1, iwork2, rank, in lu_singletons()
[all …]
H A Dlu_solve_sparse.c54 lu_int *pattern_symb = this->iwork1; in lu_solve_sparse()
55 lu_int *pattern = this->iwork1 + m; in lu_solve_sparse()
163 lu_int *pattern_symb = this->iwork1; in lu_solve_sparse()
164 lu_int *pattern = this->iwork1 + m; in lu_solve_sparse()
H A Dlu_solve_for_update.c56 lu_int *pattern_symb = this->iwork1; in lu_solve_for_update()
57 lu_int *pattern = this->iwork1 + m; in lu_solve_for_update()
210 lu_int *pattern_symb = this->iwork1; in lu_solve_for_update()
211 lu_int *pattern = this->iwork1 + m; in lu_solve_for_update()
H A Dbasiclu_get_factors.c55 lu_int *colptr = this.iwork1; /* size m workspace */ in basiclu_get_factors()
103 lu_int *colptr = this.iwork1; /* size m workspace */ in basiclu_get_factors()
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/selci/
H A Dtester.F50 iwork1 = selci_mptr(nfmax*nfmax)
55 $ iconf,ncold,ci,vc,iocc,itemp,numf,q(iwork1))
62 call selci_mkdele(numf, nroot, q(ide), vc, roots, q(iwork1),
76 call selci_mkdele(numf, nroot, q(ide), vc, roots, q(iwork1),
81 call selci_mkdele(numf, nroot, q(ide), vc, roots, q(iwork1),
127 junk = selci_mfree(iwork1)
H A Dci.F87 iwork1 = selci_mptr(max(nfmax*nfmax, nci))
93 $ q(ioconf), q(indxci), q(ihd), q(iwork1), q(iwork2),
/dports/science/nwchem-data/nwchem-7.0.2-release/src/selci/
H A Dtester.F50 iwork1 = selci_mptr(nfmax*nfmax)
55 $ iconf,ncold,ci,vc,iocc,itemp,numf,q(iwork1))
62 call selci_mkdele(numf, nroot, q(ide), vc, roots, q(iwork1),
76 call selci_mkdele(numf, nroot, q(ide), vc, roots, q(iwork1),
81 call selci_mkdele(numf, nroot, q(ide), vc, roots, q(iwork1),
127 junk = selci_mfree(iwork1)
H A Dci.F88 iwork1 = selci_mptr(max(nfmax*nfmax, nci))
94 $ q(ioconf), q(indxci), q(ihd), q(iwork1), q(iwork2),
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/peigs/src/c/
H A Dinv_it4.c84 Integer zbegin1, kk, zend, bb1 = *b1+1, bbn = *bn+1, *iwork1; local
104 iwork1 = iwork;
108 iwork1[i] = 0;
140 5* lsiz, wwork1 + 6* lsiz, vector[k], &kk, &ztz, &zbegin1, &zend, &j, iwork1 );
147 5* lsiz, wwork1 + 6* lsiz, vector[k], &kk, &ztz, &zbegin1, &zend, &j, iwork1 );
H A Dinv_it6.c85 Integer zbegin1, kk, zend, bb1 = *b1+1, bbn = *bn+1, *iwork1; local
103 iwork1 = (Integer *) malloc( 16* lsiz *sizeof(Integer));
107 iwork1[i] = 0;
144 vector[k] + *b1, &kk, &ztz, &zbegin1, &zend, &j, iwork1 );
156 free(iwork1);
H A Dinv_it44.c85 Integer zbegin1, kk, zend, bb1 = *b1 + 1, bbn = *bn +1, *iwork1; local
103 iwork1 = (Integer *) malloc( 8* l * sizeof(Integer));
141 5* *n, work + 6* *n, vector[k] + *b1, &kk, &ztz, &zbegin1, &zend, &j, iwork1 );
148 free(iwork1);
H A Dinv_it5.c78 Integer zbegin1, kk, zend, bb1 = *b1+1, bbn = *bn+1, *iwork1; local
101 iwork1 = iwork;
127 vector[k], &kk, &ztz, &zbegin1, &zend, &j, iwork1 );
/dports/science/nwchem-data/nwchem-7.0.2-release/src/peigs/src/c/
H A Dinv_it4.c84 Integer zbegin1, kk, zend, bb1 = *b1+1, bbn = *bn+1, *iwork1; local
104 iwork1 = iwork;
108 iwork1[i] = 0;
140 5* lsiz, wwork1 + 6* lsiz, vector[k], &kk, &ztz, &zbegin1, &zend, &j, iwork1 );
147 5* lsiz, wwork1 + 6* lsiz, vector[k], &kk, &ztz, &zbegin1, &zend, &j, iwork1 );
H A Dinv_it6.c85 Integer zbegin1, kk, zend, bb1 = *b1+1, bbn = *bn+1, *iwork1; local
103 iwork1 = (Integer *) malloc( 16* lsiz *sizeof(Integer));
107 iwork1[i] = 0;
144 vector[k] + *b1, &kk, &ztz, &zbegin1, &zend, &j, iwork1 );
156 free(iwork1);
H A Dinv_it44.c85 Integer zbegin1, kk, zend, bb1 = *b1 + 1, bbn = *bn +1, *iwork1; local
103 iwork1 = (Integer *) malloc( 8* l * sizeof(Integer));
141 5* *n, work + 6* *n, vector[k] + *b1, &kk, &ztz, &zbegin1, &zend, &j, iwork1 );
148 free(iwork1);
H A Dinv_it5.c78 Integer zbegin1, kk, zend, bb1 = *b1+1, bbn = *bn+1, *iwork1; local
101 iwork1 = iwork;
127 vector[k], &kk, &ztz, &zbegin1, &zend, &j, iwork1 );
/dports/math/R-cran-gss/gss/src/
H A Ddmudr0.f13 *1, ihwk2, igwk1, igwk2, ikwk, iwork1, iwork2, ijpvt, ipvtwk
38 iwork1 = ikwk + (n-n0) * (n-n0) * nq
39 iwork2 = iwork1 + n
46 *wk(ipvtwk), wk(ikwk), wk(iwork1), wk(iwork2), info)
/dports/math/R-cran-gss/gss/src/ratfor/
H A Ddmudr0.r18 igwk1, igwk2, ikwk, iwork1, iwork2, ijpvt, ipvtwk
40 iwork1 = ikwk + (n-n0) * (n-n0) * nq globalVar
41 iwork2 = iwork1 + n
52 wk(iwork1), wk(iwork2),_
/dports/cad/calculix-ccx/CalculiX/ccx_2.18/src/
H A Ddgmresmain.c26 *lrgw1,*ligw1,*iwork1,*nestart1,*iunit1,*ierr1=NULL; variable
73 rwork1=rwork;iwork1=iwork;nestart1=nestart; in dgmresmain()
112 ligw1,&rwork1[nestart1[*i]],iwork1)); in dgmres1mt()

12