| /dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/util/ |
| H A D | output.f | 34 data kcol/8/
49 last = min(colhi,collow+kcol-1)
50 do 2 begin = collow,colhi,kcol
60 last = min(last+kcol,colhi)
111 data kcol/8/
127 do 2 begin = collow,colhi,kcol
137 last = min(last+kcol,colhi)
188 data kcol/8/
204 do 2 begin = collow,colhi,kcol
214 last = min(last+kcol,colhi)
[all …]
|
| /dports/science/nwchem-data/nwchem-7.0.2-release/src/util/ |
| H A D | output.f | 34 data kcol/8/
49 last = min(colhi,collow+kcol-1)
50 do 2 begin = collow,colhi,kcol
60 last = min(last+kcol,colhi)
111 data kcol/8/
127 do 2 begin = collow,colhi,kcol
137 last = min(last+kcol,colhi)
188 data kcol/8/
204 do 2 begin = collow,colhi,kcol
214 last = min(last+kcol,colhi)
[all …]
|
| /dports/x11-toolkits/xforms/xforms-1.2.4/image/ |
| H A D | image_convolve.c | 113 int kcol, in rgb_convolve() argument
124 k_halfw = kcol / 2; in rgb_convolve()
128 if ( krow == 3 && kcol == 3 ) in rgb_convolve()
221 k_halfw = kcol / 2; in gray_convolve()
225 if ( krow == 3 && kcol == 3 ) in gray_convolve()
285 int kcol ) in flimage_convolve() argument
313 krow = kcol = 3; in flimage_convolve()
319 krow = kcol = 3; in flimage_convolve()
325 krow, kcol ); in flimage_convolve()
380 int kcol ) in flimage_convolvea() argument
[all …]
|
| /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
184 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
187 J [ntriplets] = nn [kcol] ; in wathen()
188 X [ntriplets] = em (krow,kcol) ; in wathen()
245 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
249 GrB_PLUS_FP64, em (krow,kcol), in wathen()
289 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
293 em (krow,kcol), krow, kcol)) ; in wathen()
324 for (int kcol = 0 ; kcol < 8 ; kcol++) 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
184 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
187 J [ntriplets] = nn [kcol] ; in wathen()
188 X [ntriplets] = em (krow,kcol) ; in wathen()
245 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
249 GrB_PLUS_FP64, em (krow,kcol), in wathen()
289 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
293 em (krow,kcol), krow, kcol)) ; in wathen()
324 for (int kcol = 0 ; kcol < 8 ; kcol++) 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
184 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
187 J [ntriplets] = nn [kcol] ; in wathen()
188 X [ntriplets] = em (krow,kcol) ; in wathen()
245 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
249 GrB_PLUS_FP64, em (krow,kcol), in wathen()
289 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
293 em (krow,kcol), krow, kcol)) ; in wathen()
324 for (int kcol = 0 ; kcol < 8 ; kcol++) 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
184 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
187 J [ntriplets] = nn [kcol] ; in wathen()
188 X [ntriplets] = em (krow,kcol) ; in wathen()
245 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
249 GrB_PLUS_FP64, em (krow,kcol), in wathen()
289 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
293 em (krow,kcol), krow, kcol)) ; in wathen()
324 for (int kcol = 0 ; kcol < 8 ; kcol++) 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
184 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
187 J [ntriplets] = nn [kcol] ; in wathen()
188 X [ntriplets] = em (krow,kcol) ; in wathen()
245 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
249 GrB_PLUS_FP64, em (krow,kcol), in wathen()
289 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
293 em (krow,kcol), krow, kcol)) ; in wathen()
324 for (int kcol = 0 ; kcol < 8 ; kcol++) 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
184 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
187 J [ntriplets] = nn [kcol] ; in wathen()
188 X [ntriplets] = em (krow,kcol) ; in wathen()
245 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
249 GrB_PLUS_FP64, em (krow,kcol), in wathen()
289 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
293 em (krow,kcol), krow, kcol)) ; in wathen()
324 for (int kcol = 0 ; kcol < 8 ; kcol++) 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
184 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
187 J [ntriplets] = nn [kcol] ; in wathen()
188 X [ntriplets] = em (krow,kcol) ; in wathen()
245 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
249 GrB_PLUS_FP64, em (krow,kcol), in wathen()
289 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
293 em (krow,kcol), krow, kcol)) ; in wathen()
324 for (int kcol = 0 ; kcol < 8 ; kcol++) 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
184 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
187 J [ntriplets] = nn [kcol] ; in wathen()
188 X [ntriplets] = em (krow,kcol) ; in wathen()
245 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
249 GrB_PLUS_FP64, em (krow,kcol), in wathen()
289 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
293 em (krow,kcol), krow, kcol)) ; in wathen()
324 for (int kcol = 0 ; kcol < 8 ; kcol++) 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
184 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
187 J [ntriplets] = nn [kcol] ; in wathen()
188 X [ntriplets] = em (krow,kcol) ; in wathen()
245 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
249 GrB_PLUS_FP64, em (krow,kcol), in wathen()
289 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
293 em (krow,kcol), krow, kcol)) ; in wathen()
324 for (int kcol = 0 ; kcol < 8 ; kcol++) 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
184 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
187 J [ntriplets] = nn [kcol] ; in wathen()
188 X [ntriplets] = em (krow,kcol) ; in wathen()
245 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
249 GrB_PLUS_FP64, em (krow,kcol), in wathen()
289 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
293 em (krow,kcol), krow, kcol)) ; in wathen()
324 for (int kcol = 0 ; kcol < 8 ; kcol++) 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
184 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
187 J [ntriplets] = nn [kcol] ; in wathen()
188 X [ntriplets] = em (krow,kcol) ; in wathen()
245 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
249 GrB_PLUS_FP64, em (krow,kcol), in wathen()
289 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
293 em (krow,kcol), krow, kcol)) ; in wathen()
324 for (int kcol = 0 ; kcol < 8 ; kcol++) 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
184 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
187 J [ntriplets] = nn [kcol] ; in wathen()
188 X [ntriplets] = em (krow,kcol) ; in wathen()
245 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
249 GrB_PLUS_FP64, em (krow,kcol), in wathen()
289 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
293 em (krow,kcol), krow, kcol)) ; in wathen()
324 for (int kcol = 0 ; kcol < 8 ; kcol++) 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
184 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
187 J [ntriplets] = nn [kcol] ; in wathen()
188 X [ntriplets] = em (krow,kcol) ; in wathen()
245 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
249 GrB_PLUS_FP64, em (krow,kcol), in wathen()
289 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
293 em (krow,kcol), krow, kcol)) ; in wathen()
324 for (int kcol = 0 ; kcol < 8 ; kcol++) 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
184 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
187 J [ntriplets] = nn [kcol] ; in wathen()
188 X [ntriplets] = em (krow,kcol) ; in wathen()
245 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
249 GrB_PLUS_FP64, em (krow,kcol), in wathen()
289 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
293 em (krow,kcol), krow, kcol)) ; in wathen()
324 for (int kcol = 0 ; kcol < 8 ; kcol++) 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
184 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
187 J [ntriplets] = nn [kcol] ; in wathen()
188 X [ntriplets] = em (krow,kcol) ; in wathen()
245 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
249 GrB_PLUS_FP64, em (krow,kcol), in wathen()
289 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
293 em (krow,kcol), krow, kcol)) ; in wathen()
324 for (int kcol = 0 ; kcol < 8 ; kcol++) 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
184 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
187 J [ntriplets] = nn [kcol] ; in wathen()
188 X [ntriplets] = em (krow,kcol) ; in wathen()
245 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
249 GrB_PLUS_FP64, em (krow,kcol), in wathen()
289 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
293 em (krow,kcol), krow, kcol)) ; in wathen()
324 for (int kcol = 0 ; kcol < 8 ; kcol++) 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
184 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
187 J [ntriplets] = nn [kcol] ; in wathen()
188 X [ntriplets] = em (krow,kcol) ; in wathen()
245 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
249 GrB_PLUS_FP64, em (krow,kcol), in wathen()
289 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
293 em (krow,kcol), krow, kcol)) ; in wathen()
324 for (int kcol = 0 ; kcol < 8 ; kcol++) in wathen() local
326 double ex = e [krow][kcol] ; in wathen()
[all …]
|
| /dports/math/cgl/Cgl-releases-0.60.3/Cgl/src/CglProbing/ |
| H A D | CglProbing.cpp | 3805 for (CoinBigIndex jj =columnStart[kcol];jj<columnStart[kcol]+columnLength[kcol];jj++) { in probe()
3874 for (CoinBigIndex jj =columnStart[kcol];jj<columnStart[kcol]+columnLength[kcol];jj++) { in probe()
3990 for (CoinBigIndex jj =columnStart[kcol];jj<columnStart[kcol]+columnLength[kcol];jj++) { in probe()
4106 for (CoinBigIndex jj =columnStart[kcol];jj<columnStart[kcol]+columnLength[kcol];jj++) { in probe()
4251 for (CoinBigIndex jj =columnStart[kcol];jj<columnStart[kcol]+columnLength[kcol];jj++) { in probe()
4322 for (CoinBigIndex jj =columnStart[kcol];jj<columnStart[kcol]+columnLength[kcol];jj++) { in probe()
4438 for (CoinBigIndex jj =columnStart[kcol];jj<columnStart[kcol]+columnLength[kcol];jj++) { in probe()
6570 for (jj=columnStart[kcol];jj<columnStart[kcol]+columnLength[kcol];jj++) { in probeCliques()
6652 for (jj=columnStart[kcol];jj<columnStart[kcol]+columnLength[kcol];jj++) { in probeCliques()
8143 for (jj=columnStart[kcol];jj<columnStart[kcol]+columnLength[kcol];jj++) {
[all …]
|
| /dports/multimedia/opentoonz/opentoonz-1.5.0/thirdparty/superlu/SuperLU_4.1/SRC/ |
| H A D | ilu_dsnode_dfs.c | 34 const int kcol, /* in - end of the supernode */ in ilu_dsnode_dfs() argument
58 for (i = jcol; i <= kcol; i++) in ilu_dsnode_dfs()
65 if ( kmark != kcol ) in ilu_dsnode_dfs()
67 marker[krow] = kcol; in ilu_dsnode_dfs()
82 if ( jcol < kcol ) in ilu_dsnode_dfs()
83 for (i = jcol+1; i <= kcol; i++) xlsub[i] = nextl; in ilu_dsnode_dfs()
85 xsup[nsuper+1] = kcol + 1; in ilu_dsnode_dfs()
86 supno[kcol+1] = nsuper; in ilu_dsnode_dfs()
87 xlsub[kcol+1] = nextl; in ilu_dsnode_dfs()
|
| H A D | ilu_ssnode_dfs.c | 34 const int kcol, /* in - end of the supernode */ in ilu_ssnode_dfs() argument
58 for (i = jcol; i <= kcol; i++) in ilu_ssnode_dfs()
65 if ( kmark != kcol ) in ilu_ssnode_dfs()
67 marker[krow] = kcol; in ilu_ssnode_dfs()
82 if ( jcol < kcol ) in ilu_ssnode_dfs()
83 for (i = jcol+1; i <= kcol; i++) xlsub[i] = nextl; in ilu_ssnode_dfs()
85 xsup[nsuper+1] = kcol + 1; in ilu_ssnode_dfs()
86 supno[kcol+1] = nsuper; in ilu_ssnode_dfs()
87 xlsub[kcol+1] = nextl; in ilu_ssnode_dfs()
|
| H A D | ilu_zsnode_dfs.c | 34 const int kcol, /* in - end of the supernode */ in ilu_zsnode_dfs() argument
58 for (i = jcol; i <= kcol; i++) in ilu_zsnode_dfs()
65 if ( kmark != kcol ) in ilu_zsnode_dfs()
67 marker[krow] = kcol; in ilu_zsnode_dfs()
82 if ( jcol < kcol ) in ilu_zsnode_dfs()
83 for (i = jcol+1; i <= kcol; i++) xlsub[i] = nextl; in ilu_zsnode_dfs()
85 xsup[nsuper+1] = kcol + 1; in ilu_zsnode_dfs()
86 supno[kcol+1] = nsuper; in ilu_zsnode_dfs()
87 xlsub[kcol+1] = nextl; in ilu_zsnode_dfs()
|
| H A D | ilu_csnode_dfs.c | 34 const int kcol, /* in - end of the supernode */ in ilu_csnode_dfs() argument
58 for (i = jcol; i <= kcol; i++) in ilu_csnode_dfs()
65 if ( kmark != kcol ) in ilu_csnode_dfs()
67 marker[krow] = kcol; in ilu_csnode_dfs()
82 if ( jcol < kcol ) in ilu_csnode_dfs()
83 for (i = jcol+1; i <= kcol; i++) xlsub[i] = nextl; in ilu_csnode_dfs()
85 xsup[nsuper+1] = kcol + 1; in ilu_csnode_dfs()
86 supno[kcol+1] = nsuper; in ilu_csnode_dfs()
87 xlsub[kcol+1] = nextl; in ilu_csnode_dfs()
|