/dports/math/suitesparse-csparse/SuiteSparse-5.10.1/GraphBLAS/Demo/Source/ |
H A D | wathen.c | 127 #define em(krow,kcol) (e [krow][kcol] * RHO (i,j)) in wathen() argument 180 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 182 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 241 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 243 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 285 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 287 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 293 em (krow,kcol), krow, kcol)) ; in wathen() 322 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 326 double ex = e [krow][kcol] ; in wathen() [all …]
|
/dports/math/suitesparse-config/SuiteSparse-5.10.1/GraphBLAS/Demo/Source/ |
H A D | wathen.c | 127 #define em(krow,kcol) (e [krow][kcol] * RHO (i,j)) in wathen() argument 180 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 182 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 241 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 243 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 285 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 287 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 293 em (krow,kcol), krow, kcol)) ; in wathen() 322 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 326 double ex = e [krow][kcol] ; in wathen() [all …]
|
/dports/math/suitesparse-klu/SuiteSparse-5.10.1/GraphBLAS/Demo/Source/ |
H A D | wathen.c | 127 #define em(krow,kcol) (e [krow][kcol] * RHO (i,j)) in wathen() argument 180 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 182 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 241 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 243 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 285 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 287 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 293 em (krow,kcol), krow, kcol)) ; in wathen() 322 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 326 double ex = e [krow][kcol] ; in wathen() [all …]
|
/dports/math/suitesparse-graphblas/SuiteSparse-5.10.1/GraphBLAS/Demo/Source/ |
H A D | wathen.c | 127 #define em(krow,kcol) (e [krow][kcol] * RHO (i,j)) in wathen() argument 180 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 182 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 241 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 243 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 285 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 287 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 293 em (krow,kcol), krow, kcol)) ; in wathen() 322 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 326 double ex = e [krow][kcol] ; in wathen() [all …]
|
/dports/math/suitesparse-btf/SuiteSparse-5.10.1/GraphBLAS/Demo/Source/ |
H A D | wathen.c | 127 #define em(krow,kcol) (e [krow][kcol] * RHO (i,j)) in wathen() argument 180 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 182 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 241 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 243 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 285 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 287 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 293 em (krow,kcol), krow, kcol)) ; in wathen() 322 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 326 double ex = e [krow][kcol] ; in wathen() [all …]
|
/dports/math/suitesparse-amd/SuiteSparse-5.10.1/GraphBLAS/Demo/Source/ |
H A D | wathen.c | 127 #define em(krow,kcol) (e [krow][kcol] * RHO (i,j)) in wathen() argument 180 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 182 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 241 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 243 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 285 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 287 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 293 em (krow,kcol), krow, kcol)) ; in wathen() 322 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 326 double ex = e [krow][kcol] ; in wathen() [all …]
|
/dports/math/suitesparse-mongoose/SuiteSparse-5.10.1/GraphBLAS/Demo/Source/ |
H A D | wathen.c | 127 #define em(krow,kcol) (e [krow][kcol] * RHO (i,j)) in wathen() argument 180 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 182 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 241 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 243 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 285 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 287 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 293 em (krow,kcol), krow, kcol)) ; in wathen() 322 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 326 double ex = e [krow][kcol] ; in wathen() [all …]
|
/dports/math/suitesparse-rbio/SuiteSparse-5.10.1/GraphBLAS/Demo/Source/ |
H A D | wathen.c | 127 #define em(krow,kcol) (e [krow][kcol] * RHO (i,j)) in wathen() argument 180 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 182 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 241 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 243 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 285 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 287 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 293 em (krow,kcol), krow, kcol)) ; in wathen() 322 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 326 double ex = e [krow][kcol] ; in wathen() [all …]
|
/dports/math/suitesparse-ldl/SuiteSparse-5.10.1/GraphBLAS/Demo/Source/ |
H A D | wathen.c | 127 #define em(krow,kcol) (e [krow][kcol] * RHO (i,j)) in wathen() argument 180 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 182 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 241 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 243 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 285 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 287 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 293 em (krow,kcol), krow, kcol)) ; in wathen() 322 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 326 double ex = e [krow][kcol] ; in wathen() [all …]
|
/dports/math/suitesparse-cholmod/SuiteSparse-5.10.1/GraphBLAS/Demo/Source/ |
H A D | wathen.c | 127 #define em(krow,kcol) (e [krow][kcol] * RHO (i,j)) in wathen() argument 180 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 182 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 241 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 243 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 285 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 287 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 293 em (krow,kcol), krow, kcol)) ; in wathen() 322 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 326 double ex = e [krow][kcol] ; in wathen() [all …]
|
/dports/math/suitesparse-colamd/SuiteSparse-5.10.1/GraphBLAS/Demo/Source/ |
H A D | wathen.c | 127 #define em(krow,kcol) (e [krow][kcol] * RHO (i,j)) in wathen() argument 180 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 182 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 241 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 243 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 285 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 287 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 293 em (krow,kcol), krow, kcol)) ; in wathen() 322 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 326 double ex = e [krow][kcol] ; in wathen() [all …]
|
/dports/math/suitesparse-spqr/SuiteSparse-5.10.1/GraphBLAS/Demo/Source/ |
H A D | wathen.c | 127 #define em(krow,kcol) (e [krow][kcol] * RHO (i,j)) in wathen() argument 180 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 182 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 241 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 243 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 285 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 287 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 293 em (krow,kcol), krow, kcol)) ; in wathen() 322 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 326 double ex = e [krow][kcol] ; in wathen() [all …]
|
/dports/math/suitesparse-umfpack/SuiteSparse-5.10.1/GraphBLAS/Demo/Source/ |
H A D | wathen.c | 127 #define em(krow,kcol) (e [krow][kcol] * RHO (i,j)) in wathen() argument 180 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 182 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 241 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 243 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 285 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 287 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 293 em (krow,kcol), krow, kcol)) ; in wathen() 322 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 326 double ex = e [krow][kcol] ; in wathen() [all …]
|
/dports/math/suitesparse-slip_lu/SuiteSparse-5.10.1/GraphBLAS/Demo/Source/ |
H A D | wathen.c | 127 #define em(krow,kcol) (e [krow][kcol] * RHO (i,j)) in wathen() argument 180 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 182 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 241 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 243 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 285 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 287 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 293 em (krow,kcol), krow, kcol)) ; in wathen() 322 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 326 double ex = e [krow][kcol] ; in wathen() [all …]
|
/dports/math/suitesparse-camd/SuiteSparse-5.10.1/GraphBLAS/Demo/Source/ |
H A D | wathen.c | 127 #define em(krow,kcol) (e [krow][kcol] * RHO (i,j)) in wathen() argument 180 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 182 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 241 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 243 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 285 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 287 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 293 em (krow,kcol), krow, kcol)) ; in wathen() 322 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 326 double ex = e [krow][kcol] ; in wathen() [all …]
|
/dports/math/suitesparse-ccolamd/SuiteSparse-5.10.1/GraphBLAS/Demo/Source/ |
H A D | wathen.c | 127 #define em(krow,kcol) (e [krow][kcol] * RHO (i,j)) in wathen() argument 180 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 182 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 241 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 243 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 285 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 287 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 293 em (krow,kcol), krow, kcol)) ; in wathen() 322 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 326 double ex = e [krow][kcol] ; in wathen() [all …]
|
/dports/math/suitesparse-cxsparse/SuiteSparse-5.10.1/GraphBLAS/Demo/Source/ |
H A D | wathen.c | 127 #define em(krow,kcol) (e [krow][kcol] * RHO (i,j)) in wathen() argument 180 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 182 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 241 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 243 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 285 for (int krow = 0 ; krow < 8 ; krow++) nn [krow]-- ; in wathen() local 287 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 293 em (krow,kcol), krow, kcol)) ; in wathen() 322 for (int krow = 0 ; krow < 8 ; krow++) in wathen() local 326 double ex = e [krow][kcol] ; in wathen() [all …]
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/mrpt/fci/ |
H A D | fci_ograph.F | 10 integer iorb, irow, k, krow, kdead, isum, ir, 28 krow = irow + (k-1) 29 if (krow.le.nelec+1) then 30 karc(k,irow,iorb) = krow 31 kwt(krow,iorb+1) = kwt(krow,iorb+1) + 49 krow = irow + (k-1) 50 if (krow.gt.nelec+1) then 53 if (kwt(krow,iorb+1).eq.0) then 70 krow = irow - (k-1) 71 if (krow.gt.0) then [all …]
|
H A D | fci_mgraph.F | 13 integer nsoc, is, irow, k, nspt, krow, i, mdead, iwsum 34 krow = irow + (2-k) 35 marc(k,irow,is,nspt) = krow 36 mwt(krow,is+1,nspt)=mwt(krow,is+1,nspt) + 61 krow = irow + (2-k) 62 if(mwt(krow,is+1,nspt).eq.0) then 76 krow = irow-(2-k) 77 if(krow.gt.0) then 78 if(marc(k,krow,is-1,nspt).gt.0) then 79 marcwt(k,krow,is-1,nspt)=iwsum [all …]
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/mrpt/fci/ |
H A D | fci_ograph.F | 10 integer iorb, irow, k, krow, kdead, isum, ir, 28 krow = irow + (k-1) 29 if (krow.le.nelec+1) then 30 karc(k,irow,iorb) = krow 31 kwt(krow,iorb+1) = kwt(krow,iorb+1) + 49 krow = irow + (k-1) 50 if (krow.gt.nelec+1) then 53 if (kwt(krow,iorb+1).eq.0) then 70 krow = irow - (k-1) 71 if (krow.gt.0) then [all …]
|
H A D | fci_mgraph.F | 13 integer nsoc, is, irow, k, nspt, krow, i, mdead, iwsum 34 krow = irow + (2-k) 35 marc(k,irow,is,nspt) = krow 36 mwt(krow,is+1,nspt)=mwt(krow,is+1,nspt) + 61 krow = irow + (2-k) 62 if(mwt(krow,is+1,nspt).eq.0) then 76 krow = irow-(2-k) 77 if(krow.gt.0) then 78 if(marc(k,krow,is-1,nspt).gt.0) then 79 marcwt(k,krow,is-1,nspt)=iwsum [all …]
|
/dports/science/madness/madness-ebb3fd7/src/apps/moldft/fci/ |
H A D | fci_ograph.F | 10 integer iorb, irow, k, krow, kdead, isum, ir, 28 krow = irow + (k-1) 29 if (krow.le.nelec+1) then 30 karc(k,irow,iorb) = krow 31 kwt(krow,iorb+1) = kwt(krow,iorb+1) + 49 krow = irow + (k-1) 50 if (krow.gt.nelec+1) then 53 if (kwt(krow,iorb+1).eq.0) then 70 krow = irow - (k-1) 71 if (krow.gt.0) then [all …]
|
H A D | fci_mgraph.F | 13 integer nsoc, is, irow, k, nspt, krow, i, mdead, iwsum 34 krow = irow + (2-k) 35 marc(k,irow,is,nspt) = krow 36 mwt(krow,is+1,nspt)=mwt(krow,is+1,nspt) + 61 krow = irow + (2-k) 62 if(mwt(krow,is+1,nspt).eq.0) then 76 krow = irow-(2-k) 77 if(krow.gt.0) then 78 if(marc(k,krow,is-1,nspt).gt.0) then 79 marcwt(k,krow,is-1,nspt)=iwsum [all …]
|
/dports/x11-toolkits/xforms/xforms-1.2.4/image/ |
H A D | image_convolve.c | 112 int krow, in rgb_convolve() argument 123 int k_halfh = krow / 2, in rgb_convolve() 128 if ( krow == 3 && kcol == 3 ) in rgb_convolve() 220 int k_halfh = krow / 2, in gray_convolve() 225 if ( krow == 3 && kcol == 3 ) in gray_convolve() 284 int krow, in flimage_convolve() argument 313 krow = kcol = 3; in flimage_convolve() 319 krow = kcol = 3; in flimage_convolve() 325 krow, kcol ); in flimage_convolve() 379 int krow, in flimage_convolvea() argument [all …]
|
/dports/math/cgl/Cgl-releases-0.60.3/Cgl/src/CglKnapsackCover/ |
H A D | CglKnapsackCover.cpp | 484 xstar[krow.getIndices()[k]]= 1.0-xstar[krow.getIndices()[k]]; in generateCuts() 609 xstar[krow.getIndices()[k]]= 1.0-xstar[krow.getIndices()[k]]; in generateCuts() 682 xstar[krow.getIndices()[k]]= 1.0-xstar[krow.getIndices()[k]]; in generateCuts() 704 xstar[krow.getIndices()[k]]= 1.0-xstar[krow.getIndices()[k]]; in generateCuts() 722 xstar[krow.getIndices()[k]]= 1.0-xstar[krow.getIndices()[k]]; in generateCuts() 939 krow.clear(); in deriveAKnapsack() 1253 (1.0-xstar[krow.getIndices()[i]]) / (krow.getElements()[i]); in findLPMostViolatedMinCover() 1312 cover.insert(krow.getIndices()[i],krow.getElements()[i]); in findLPMostViolatedMinCover() 1655 atOne.insert(krow.getIndices()[i],krow.getElements()[i]); in findPseudoJohnAndEllisCover() 1659 unsat.insert(krow.getIndices()[i],krow.getElements()[i]) ; in findPseudoJohnAndEllisCover() [all …]
|