/dports/science/nwchem-data/nwchem-7.0.2-release/src/nwpw/nwpwlib/Parallel/ |
H A D | Parallel.F | 97 np_out = np_i 163 > + taskid_j*np_i 183 > + j*np_i 184 > + taskid_k*np_i*np_j) 253 np_out = np_i 350 > + taskid_j*np_i 370 > + j*np_i 390 > + taskid_j*np_i 391 > + k*np_i*np_j) 412 > + j*np_i [all …]
|
H A D | Parallel-tcgmsg.F | 44 np_i = np 83 np_i = np/ncolumns 90 do i=0,np_i-1 102 do i=0,np_i-1 168 np_i = np/(ncolumns*nzones) 177 do i=0,np_i-1 183 int_mb(procNd(1) + i + j*np_i + k*np_i*np_j) = icount 191 do i=0,np_i-1 201 > + j*np_i 864 mynp = np_i [all …]
|
H A D | Parallel-mpi.F | 124 np_i = np 171 np_i = np/ncolumns 177 do i=0,np_i-1 193 stupid_np_i = np_i 200 do i=0,np_i-1 237 do i=0,np_i-1 348 do i=0,np_i-1 354 int_mb(procNd(1) + i + j*np_i + k*np_i*np_j) = icount 366 stupid_np_i = np_i 374 do i=0,np_i-1 [all …]
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwpw/nwpwlib/Parallel/ |
H A D | Parallel-tcgmsg.F | 44 np_i = np 83 np_i = np/ncolumns 90 do i=0,np_i-1 102 do i=0,np_i-1 168 np_i = np/(ncolumns*nzones) 177 do i=0,np_i-1 183 int_mb(procNd(1) + i + j*np_i + k*np_i*np_j) = icount 191 do i=0,np_i-1 201 > + j*np_i 864 mynp = np_i [all …]
|
H A D | Parallel.F | 97 np_out = np_i 163 > + taskid_j*np_i 183 > + j*np_i 184 > + taskid_k*np_i*np_j) 253 np_out = np_i 350 > + taskid_j*np_i 370 > + j*np_i 390 > + taskid_j*np_i 391 > + k*np_i*np_j) 412 > + j*np_i [all …]
|
H A D | Parallel-mpi.F | 126 np_i = np 173 np_i = np/ncolumns 179 do i=0,np_i-1 195 stupid_np_i = np_i 202 do i=0,np_i-1 239 do i=0,np_i-1 350 do i=0,np_i-1 356 int_mb(procNd(1) + i + j*np_i + k*np_i*np_j) = icount 368 stupid_np_i = np_i 376 do i=0,np_i-1 [all …]
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwpw/nwpwlib/DMatrix/ |
H A D | DMatrix-tcgmsg.F | 52 integer np_i,np_j 98 integer np_i,np_j 142 integer np_i,np_j 194 if (np_i.gt.1) 257 integer np_i,np_j 324 if (np_i.gt.1) 386 integer np_i,np_j 453 if (np_i.gt.1) 516 integer np_i,np_j 553 if (np_i.gt.1) [all …]
|
H A D | DMatrix.F | 28 > np_i,np_j, 32 integer np_i,np_j 33 integer block_i(0:np_i-1),block_j(0:np_j-1) 39 call icopy(np_i,0,1,block_i,1) 45 i = mod(i+1,np_i) 67 > np_i,np_j, 79 integer np_i,np_j 100 > taskid_i,taskid_j,np_i,np_j,comm_i,comm_j, 114 > np_i,np_j, 124 > np_i,np_j, [all …]
|
H A D | DMatrix-mpi.F | 52 integer np_i,np_j 80 do i=1,np_i 243 integer np_i,np_j 272 do i=1,np_i 280 if (np_i.gt.1) then 615 integer np_i,np_j 754 integer np_i,np_j 907 integer np_i,np_j 1060 integer np_i,np_j 1222 integer np_i,np_j [all …]
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/nwpw/nwpwlib/DMatrix/ |
H A D | DMatrix-tcgmsg.F | 52 integer np_i,np_j 98 integer np_i,np_j 142 integer np_i,np_j 194 if (np_i.gt.1) 257 integer np_i,np_j 324 if (np_i.gt.1) 386 integer np_i,np_j 453 if (np_i.gt.1) 516 integer np_i,np_j 553 if (np_i.gt.1) [all …]
|
H A D | DMatrix.F | 28 > np_i,np_j, 32 integer np_i,np_j 33 integer block_i(0:np_i-1),block_j(0:np_j-1) 39 call icopy(np_i,0,1,block_i,1) 45 i = mod(i+1,np_i) 67 > np_i,np_j, 79 integer np_i,np_j 100 > taskid_i,taskid_j,np_i,np_j,comm_i,comm_j, 114 > np_i,np_j, 124 > np_i,np_j, [all …]
|
H A D | DMatrix-mpi.F | 52 integer np_i,np_j 80 do i=1,np_i 243 integer np_i,np_j 272 do i=1,np_i 280 if (np_i.gt.1) then 615 integer np_i,np_j 754 integer np_i,np_j 907 integer np_i,np_j 1060 integer np_i,np_j 1222 integer np_i,np_j [all …]
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwpw/nwpwlib/CMatrix/ |
H A D | CMatrix-tcgmsg.F | 51 integer np_i,np_j 97 integer np_i,np_j 141 integer np_i,np_j 193 if (np_i.gt.1) 256 integer np_i,np_j 323 if (np_i.gt.1) 385 integer np_i,np_j 422 if (np_i.gt.1) 489 integer np_i,np_j 636 integer np_i,np_j [all …]
|
H A D | CMatrix.F | 28 > np_i,np_j, 32 integer np_i,np_j 33 integer block_i(0:np_i-1),block_j(0:np_j-1) 39 call icopy(np_i,0,1,block_i,1) 45 i = mod(i+1,np_i) 67 > np_i,np_j, 79 integer np_i,np_j 94 > taskid_i,taskid_j,np_i,np_j,comm_i,comm_j, 105 > np_i,np_j, 115 > np_i,np_j, [all …]
|
H A D | CMatrix-mpi.F | 52 integer np_i,np_j 80 do i=1,np_i 243 integer np_i,np_j 272 do i=1,np_i 280 if (np_i.gt.1) then 609 integer np_i,np_j 746 integer np_i,np_j 900 integer np_i,np_j 1043 integer np_i,np_j 1198 integer np_i,np_j [all …]
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/nwpw/nwpwlib/CMatrix/ |
H A D | CMatrix-tcgmsg.F | 51 integer np_i,np_j 97 integer np_i,np_j 141 integer np_i,np_j 193 if (np_i.gt.1) 256 integer np_i,np_j 323 if (np_i.gt.1) 385 integer np_i,np_j 422 if (np_i.gt.1) 489 integer np_i,np_j 636 integer np_i,np_j [all …]
|
H A D | CMatrix.F | 28 > np_i,np_j, 32 integer np_i,np_j 33 integer block_i(0:np_i-1),block_j(0:np_j-1) 39 call icopy(np_i,0,1,block_i,1) 45 i = mod(i+1,np_i) 67 > np_i,np_j, 79 integer np_i,np_j 94 > taskid_i,taskid_j,np_i,np_j,comm_i,comm_j, 105 > np_i,np_j, 115 > np_i,np_j, [all …]
|
H A D | CMatrix-mpi.F | 52 integer np_i,np_j 80 do i=1,np_i 238 integer np_i,np_j 267 do i=1,np_i 275 if (np_i.gt.1) then 595 integer np_i,np_j 729 integer np_i,np_j 880 integer np_i,np_j 1007 integer np_i,np_j 1167 integer np_i,np_j [all …]
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwpw/nwpwlib/utilities/ |
H A D | task_paulsmatrix.F | 229 integer i,j,np_i,np_j,mapping,l 246 np_i = np 251 if (abs(i-j).lt.abs(np_i-np_j)) then 252 np_i = i 260 call Parallel2d_np_i(np_i) 271 write(luout,*) "np_i = ",np_i
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/nwpw/nwpwlib/utilities/ |
H A D | task_paulsmatrix.F | 229 integer i,j,np_i,np_j,mapping,l 246 np_i = np 251 if (abs(i-j).lt.abs(np_i-np_j)) then 252 np_i = i 260 call Parallel2d_np_i(np_i) 271 write(luout,*) "np_i = ",np_i
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwpw/pspw/lib/psi/ |
H A D | psi_dmatrix.F | 258 integer np_i,taskid_i,np_j local 263 call Parallel2d_np_i(np_i) 267 if (.not.BA_push_get(mt_dbl,np_i,'maxsum0',maxsum0(2),maxsum0(1))) 269 call dcopy(np_i,0.0d0,0,dbl_mb(maxsum0(1)),1) 285 call D3dB_Vector_SumAll(np_i,dbl_mb(maxsum0(1))) 288 do i = 1,np_i
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/nwpw/pspw/lib/psi/ |
H A D | psi_dmatrix.F | 258 integer np_i,taskid_i,np_j 263 call Parallel2d_np_i(np_i) 267 if (.not.BA_push_get(mt_dbl,np_i,'maxsum0',maxsum0(2),maxsum0(1))) 269 call dcopy(np_i,0.0d0,0,dbl_mb(maxsum0(1)),1) 285 call D3dB_Vector_SumAll(np_i,dbl_mb(maxsum0(1))) 288 do i = 1,np_i
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwpw/nwpwlib/D1dB/ |
H A D | Dne.F | 54 call Parallel2d_np_i(np_i) 106 i = mod(i+1,np_i) 123 do i=0,np_i-1 142 do i=0,np_i-1 165 i = mod(i+1,np_i) 959 > np_i,np_j, 1001 > np_i,np_j, 1097 > np_i,np_j, 1121 > np_i,np_j, 1221 > np_i,np_j, [all …]
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/nwpw/nwpwlib/D1dB/ |
H A D | Dne.F | 54 call Parallel2d_np_i(np_i) 106 i = mod(i+1,np_i) 123 do i=0,np_i-1 142 do i=0,np_i-1 165 i = mod(i+1,np_i) 959 > np_i,np_j, 1001 > np_i,np_j, 1097 > np_i,np_j, 1121 > np_i,np_j, 1221 > np_i,np_j, [all …]
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/nwpw/nwpwlib/Pneb/ |
H A D | Pneb.fh | 15 integer np_i,np_j,np_k 23 > np_i,np_j,np_k,
|