/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/peigs/ctof/ |
H A D | mxm25_f.c | 61 Integer me, nvecsQ, nvecsW, nvecsZ; local 74 nvecsQ = count_list( me, mapQ, n1); 79 matW =(DoublePrecision **)( work + nvecsQ); 80 matZ =(DoublePrecision **)( work + nvecsQ + nvecsW); 82 dscrat =(DoublePrecision *)( work + nvecsQ + nvecsW + nvecsZ ); 84 for( i = 0; i < nvecsQ; i++ )
|
H A D | choleski_f.c | 54 Integer me, nvecsQ; local 124 nvecsQ = count_list( me, mapQ, n); 126 if( nvecsQ < 1) { 131 dscrat =(DoublePrecision *)( work + nvecsQ );
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/peigs/ctof/ |
H A D | mxm25_f.c | 61 Integer me, nvecsQ, nvecsW, nvecsZ; local 74 nvecsQ = count_list( me, mapQ, n1); 79 matW =(DoublePrecision **)( work + nvecsQ); 80 matZ =(DoublePrecision **)( work + nvecsQ + nvecsW); 82 dscrat =(DoublePrecision *)( work + nvecsQ + nvecsW + nvecsZ ); 84 for( i = 0; i < nvecsQ; i++ )
|
H A D | choleski_f.c | 54 Integer me, nvecsQ; local 124 nvecsQ = count_list( me, mapQ, n); 126 if( nvecsQ < 1) { 131 dscrat =(DoublePrecision *)( work + nvecsQ );
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/peigs/src/c/ |
H A D | mxm25.c | 132 Integer jj, i, nvecsQ, nvecsW, l1, l2; local 176 nvecsQ = fil_mapvec_( &me, &l1, mapQ, mapvecQ ); 178 iscrat += nvecsQ; 182 if ( nvecsW + nvecsQ == 0 ) 277 for ( jndx = 0; jndx < nvecsQ; jndx++ ){ 282 for ( indx = 0; indx < nvecsQ; indx++ ) 292 for (jndx = 0; jndx < nvecsQ; jndx++ ){ 305 isize = nvecsQ*l2; 337 nvecsQ = isize; 368 nvecsQ = isize; [all …]
|
H A D | mxm88.c | 122 Integer nvecsW, nvecsQ, j, iQ; local 208 nvecsQ = count_list( me, mapQ, n); 211 for ( j = 0; j < nvecsQ; j++ ) 262 nvecsQ = fil_mapvec_( &me, &ll, mapQ, mapvecQ ); 263 iscrat += nvecsQ; 269 if (( nvecsQ == 0 ) && ( nvecsW == 0 ))
|
H A D | pdspeval.c | 264 mapZ_0, nvecsQ, nvecsA, nvecsZ, nvecsZ2, local 584 nvecsQ = nvecsA; 596 d_scrat += nvecsQ * msize; 617 buff_ptr += nvecsQ; 631 for (indx = 0; indx < nvecsQ; indx++) 638 if (nvecsA + nvecsQ > 0) {
|
H A D | memreq_eval.c | 108 Integer nvecsA, nvecsQ, nvecsQ_max, nvecsZ, nvecsZ_max, nvecsB; local 238 nvecsQ = nvecsA; 334 d_pdspevx += ( nvecsQ + 2 ) * msize; 339 ptr_pdspevx = nvecsQ + ptr_pstein;
|
H A D | pdspevx.c | 268 mapZ_0, nvecsQ, nvecsA, nvecsZ, nvecsZ2, local 629 nvecsQ = nvecsA; 644 d_scrat += nvecsQ * msize; 659 buff_ptr += nvecsQ; 681 for (indx = 0; indx < nvecsQ; indx++){ 692 if (nvecsA + nvecsQ > 0) { 1114 if (nvecsQ + nvecsZ > 0) {
|
H A D | memreq2.c | 109 Integer nvecsA, nvecsQ, nvecsQ_max, nvecsZ, nvecsZ_max, nvecsB; local 239 nvecsQ = nvecsA; 388 d_pdspevx += ( nvecsQ + 2 ) * msize; 394 ptr_pdspevx = nvecsQ + ptr_pstein;
|
H A D | memreq.c | 109 Integer nvecsA, nvecsQ, nvecsQ_max, nvecsZ, nvecsZ_max, nvecsB; local 239 nvecsQ = nvecsA; 388 d_pdspevx += ( nvecsQ + 2 ) * msize; 394 ptr_pdspevx = nvecsQ + ptr_pstein;
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/peigs/src/c/ |
H A D | mxm25.c | 132 Integer jj, i, nvecsQ, nvecsW, l1, l2; local 176 nvecsQ = fil_mapvec_( &me, &l1, mapQ, mapvecQ ); 178 iscrat += nvecsQ; 182 if ( nvecsW + nvecsQ == 0 ) 277 for ( jndx = 0; jndx < nvecsQ; jndx++ ){ 282 for ( indx = 0; indx < nvecsQ; indx++ ) 292 for (jndx = 0; jndx < nvecsQ; jndx++ ){ 305 isize = nvecsQ*l2; 337 nvecsQ = isize; 368 nvecsQ = isize; [all …]
|
H A D | mxm88.c | 122 Integer nvecsW, nvecsQ, j, iQ; local 208 nvecsQ = count_list( me, mapQ, n); 211 for ( j = 0; j < nvecsQ; j++ ) 262 nvecsQ = fil_mapvec_( &me, &ll, mapQ, mapvecQ ); 263 iscrat += nvecsQ; 269 if (( nvecsQ == 0 ) && ( nvecsW == 0 ))
|
H A D | pdspeval.c | 264 mapZ_0, nvecsQ, nvecsA, nvecsZ, nvecsZ2, local 584 nvecsQ = nvecsA; 596 d_scrat += nvecsQ * msize; 617 buff_ptr += nvecsQ; 631 for (indx = 0; indx < nvecsQ; indx++) 638 if (nvecsA + nvecsQ > 0) {
|
H A D | memreq_eval.c | 108 Integer nvecsA, nvecsQ, nvecsQ_max, nvecsZ, nvecsZ_max, nvecsB; local 238 nvecsQ = nvecsA; 334 d_pdspevx += ( nvecsQ + 2 ) * msize; 339 ptr_pdspevx = nvecsQ + ptr_pstein;
|
H A D | pdspevx.c | 268 mapZ_0, nvecsQ, nvecsA, nvecsZ, nvecsZ2, local 629 nvecsQ = nvecsA; 644 d_scrat += nvecsQ * msize; 659 buff_ptr += nvecsQ; 681 for (indx = 0; indx < nvecsQ; indx++){ 692 if (nvecsA + nvecsQ > 0) { 1114 if (nvecsQ + nvecsZ > 0) {
|
H A D | memreq2.c | 109 Integer nvecsA, nvecsQ, nvecsQ_max, nvecsZ, nvecsZ_max, nvecsB; local 239 nvecsQ = nvecsA; 388 d_pdspevx += ( nvecsQ + 2 ) * msize; 394 ptr_pdspevx = nvecsQ + ptr_pstein;
|
H A D | memreq.c | 109 Integer nvecsA, nvecsQ, nvecsQ_max, nvecsZ, nvecsZ_max, nvecsB; local 239 nvecsQ = nvecsA; 388 d_pdspevx += ( nvecsQ + 2 ) * msize; 394 ptr_pdspevx = nvecsQ + ptr_pstein;
|