/dports/math/dbcsr/dbcsr-2.1.0/tests/ |
H A D | dbcsr_test_csr_conversions.F | 40 INTEGER, DIMENSION(:), POINTER :: col_dist, row_dist variable 96 ALLOCATE (row_dist(nblkrows_total)) 109 row_dist = FLOOR(rn_array(1:nblkrows_total)*npdims(1)) 113 …ke_random_dbcsr_matrix(matrix_a, group, col_blk_sizes, row_blk_sizes, col_dist, row_dist, sparsity) 175 col_blk_sizes, row_blk_sizes, col_dist, row_dist, sparsity) argument 179 row_dist local 190 …CALL dbcsr_distribution_new(dist, group=group, row_dist=row_dist, col_dist=col_dist, reuse_arrays=…
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/exts/dbcsr/tests/ |
H A D | dbcsr_test_csr_conversions.F | 40 INTEGER, DIMENSION(:), POINTER :: col_dist, row_dist variable 96 ALLOCATE (row_dist(nblkrows_total)) 109 row_dist = FLOOR(rn_array(1:nblkrows_total)*npdims(1)) 113 …ke_random_dbcsr_matrix(matrix_a, group, col_blk_sizes, row_blk_sizes, col_dist, row_dist, sparsity) 175 col_blk_sizes, row_blk_sizes, col_dist, row_dist, sparsity) argument 179 row_dist local 190 …CALL dbcsr_distribution_new(dist, group=group, row_dist=row_dist, col_dist=col_dist, reuse_arrays=…
|
/dports/science/cp2k-data/cp2k-7.1.0/src/dbcsrx/ |
H A D | dbcsr_vector.F | 122 CALL dbcsr_distribution_get(dist, npcols=npcols, row_dist=row_dist) 127 CALL dbcsr_distribution_new(dist_col_vec, template=dist, row_dist=row_dist, col_dist=col_dist) 167 row_dist(1) = 0 169 CALL dbcsr_distribution_new(dist_row_vec, template=dist, row_dist=row_dist, col_dist=col_dist) 179 DEALLOCATE (row_dist, row_blk_size) 206 CALL dbcsr_distribution_get(dist, npcols=npcols, row_dist=row_dist) 213 CALL dbcsr_distribution_new(dist_col_vec, template=dist, row_dist=row_dist, col_dist=col_dist) 256 row_dist(i+1) = i 258 CALL dbcsr_distribution_new(dist_row_vec, template=dist, row_dist=row_dist, col_dist=col_dist) 643 CALL dbcsr_distribution_get(dist_rep_col, row_dist=row_dist) [all …]
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/dbcsrx/ |
H A D | dbcsr_vector.F | 121 CALL dbcsr_distribution_get(dist, npcols=npcols, row_dist=row_dist) 126 CALL dbcsr_distribution_new(dist_col_vec, template=dist, row_dist=row_dist, col_dist=col_dist) 166 row_dist(1) = 0 168 CALL dbcsr_distribution_new(dist_row_vec, template=dist, row_dist=row_dist, col_dist=col_dist) 178 DEALLOCATE (row_dist, row_blk_size) 204 CALL dbcsr_distribution_get(dist, npcols=npcols, row_dist=row_dist) 211 CALL dbcsr_distribution_new(dist_col_vec, template=dist, row_dist=row_dist, col_dist=col_dist) 254 row_dist(i + 1) = i 256 CALL dbcsr_distribution_new(dist_row_vec, template=dist, row_dist=row_dist, col_dist=col_dist) 264 DEALLOCATE (row_dist, row_blk_Size) [all …]
|
/dports/math/dbcsr/dbcsr-2.1.0/examples/ |
H A D | dbcsr_example_1.F | 28 INTEGER, DIMENSION(:), POINTER :: col_dist, row_dist variable 80 CALL random_dist(row_dist, nblkrows_total, npdims(1)) 85 …CALL dbcsr_distribution_new(dist, group=group, row_dist=row_dist, col_dist=col_dist, reuse_arrays=…
|
H A D | dbcsr_example_2.F | 30 INTEGER, DIMENSION(:), POINTER :: col_dist, row_dist variable 83 CALL random_dist(row_dist, nblkrows_total, npdims(1)) 88 …CALL dbcsr_distribution_new(dist, group=group, row_dist=row_dist, col_dist=col_dist, reuse_arrays=…
|
H A D | dbcsr_example_3.F | 31 INTEGER, DIMENSION(:), POINTER :: col_dist, row_dist variable 84 CALL random_dist(row_dist, nblkrows_total, npdims(1)) 89 …CALL dbcsr_distribution_new(dist, group=group, row_dist=row_dist, col_dist=col_dist, reuse_arrays=…
|
H A D | dbcsr_example_3.cpp | 76 auto row_dist = random_dist(nblkrows_total, dims[0]); in main() local 82 row_dist.data(), row_dist.size(), in main()
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/exts/dbcsr/examples/ |
H A D | dbcsr_example_1.F | 28 INTEGER, DIMENSION(:), POINTER :: col_dist, row_dist variable 80 CALL random_dist(row_dist, nblkrows_total, npdims(1)) 85 …CALL dbcsr_distribution_new(dist, group=group, row_dist=row_dist, col_dist=col_dist, reuse_arrays=…
|
H A D | dbcsr_example_2.F | 30 INTEGER, DIMENSION(:), POINTER :: col_dist, row_dist variable 83 CALL random_dist(row_dist, nblkrows_total, npdims(1)) 88 …CALL dbcsr_distribution_new(dist, group=group, row_dist=row_dist, col_dist=col_dist, reuse_arrays=…
|
H A D | dbcsr_example_3.F | 31 INTEGER, DIMENSION(:), POINTER :: col_dist, row_dist variable 84 CALL random_dist(row_dist, nblkrows_total, npdims(1)) 89 …CALL dbcsr_distribution_new(dist, group=group, row_dist=row_dist, col_dist=col_dist, reuse_arrays=…
|
H A D | dbcsr_example_3.cpp | 70 auto row_dist = random_dist(nblkrows_total, dims[0]); in main() local 76 row_dist.data(), row_dist.size(), in main()
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
H A D | cp_dbcsr_operations.F | 434 row_dist => row_dist_data(:, 1) 441 row_dist=row_dist, & 601 CALL dbcsr_distribution_get(dist, row_dist=row_dist) 604 row_dist=row_dist, col_dist=col_dist) 727 CALL dbcsr_distribution_get(sparse_dist, npcols=npcols, row_dist=row_dist) 730 row_dist=row_dist, col_dist=col_dist_left) 896 NULLIFY (row_dist, col_dist) 904 row_dist=row_dist, col_dist=col_dist, & 949 row_dist=row_dist) 954 row_dist=row_dist, col_dist=col_dist) [all …]
|
/dports/science/cp2k-data/cp2k-7.1.0/src/ |
H A D | cp_dbcsr_operations.F | 439 row_dist => row_dist_data(:, 1) 446 row_dist=row_dist, & 607 CALL dbcsr_distribution_get(dist, row_dist=row_dist) 610 row_dist=row_dist, col_dist=col_dist) 733 CALL dbcsr_distribution_get(sparse_dist, npcols=npcols, row_dist=row_dist) 736 row_dist=row_dist, col_dist=col_dist_left) 902 NULLIFY (row_dist, col_dist) 910 row_dist=row_dist, col_dist=col_dist, & 955 row_dist=row_dist) 960 row_dist=row_dist, col_dist=col_dist) [all …]
|
/dports/math/dbcsr/dbcsr-2.1.0/src/ |
H A D | dbcsr.h | 29 … void c_dbcsr_distribution_new_aux(void** dist, MPI_Fint* fcomm, int* row_dist, int row_dist_size, 32 … inline void c_dbcsr_distribution_new(void** dist, MPI_Comm comm, int* row_dist, int row_dist_size, in c_dbcsr_distribution_new() argument 36 … c_dbcsr_distribution_new_aux(dist, &fcomm, row_dist, row_dist_size, col_dist, col_dist_size); in c_dbcsr_distribution_new()
|
H A D | dbcsr_api_c.F | 68 INTEGER, POINTER :: col_dist(:), row_dist(:) local 72 row_dist => c_row_dist 74 CALL dbcsr_distribution_new(dist, group=fcomm, row_dist=row_dist, &
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/exts/dbcsr/src/ |
H A D | dbcsr.h | 29 … void c_dbcsr_distribution_new_aux(void** dist, MPI_Fint* fcomm, int* row_dist, int row_dist_size, 32 … inline void c_dbcsr_distribution_new(void** dist, MPI_Comm comm, int* row_dist, int row_dist_size, in c_dbcsr_distribution_new() argument 36 … c_dbcsr_distribution_new_aux(dist, &fcomm, row_dist, row_dist_size, col_dist, col_dist_size); in c_dbcsr_distribution_new()
|
H A D | dbcsr_api_c.F | 68 INTEGER, POINTER :: col_dist(:), row_dist(:) local 72 row_dist => c_row_dist 74 CALL dbcsr_distribution_new(dist, group=fcomm, row_dist=row_dist, &
|
/dports/databases/grass7/grass-7.8.6/display/d.grid/ |
H A D | plotborder.c | 11 double row_dist, colm_dist; in plot_border() local 16 row_dist = D_d_to_u_row(0.) - D_d_to_u_row(1.); in plot_border() 60 window.north - row_dist - (window.north - in plot_border() 70 window.north - row_dist - (window.north - in plot_border() 80 window.north - row_dist - (window.north - in plot_border()
|
/dports/math/dbcsr/dbcsr-2.1.0/src/dist/ |
H A D | dbcsr_dist_methods.F | 70 SUBROUTINE dbcsr_distribution_new_template(dist, template, group, pgrid, row_dist, col_dist, & argument 80 INTEGER, DIMENSION(:), INTENT(IN), POINTER, CONTIGUOUS :: row_dist, col_dist 101 row_dist_block=row_dist, & 234 SUBROUTINE dbcsr_distribution_get(dist, row_dist, col_dist, & argument 240 INTEGER, DIMENSION(:), OPTIONAL, POINTER :: row_dist, col_dist local 249 IF (PRESENT(row_dist)) row_dist => array_data(dist%d%row_dist_block) 299 FUNCTION dbcsr_distribution_row_dist(dist) RESULT(row_dist) 301 INTEGER, DIMENSION(:), POINTER, CONTIGUOUS :: row_dist 305 row_dist => array_data(dist%d%row_dist_block)
|
H A D | dbcsr_dist_operations.F | 80 row_dist, col_dist) RESULT(process) 93 INTEGER, DIMENSION(:), INTENT(IN) :: row_dist, col_dist local 100 process = pgrid(row_dist(row), col_dist(col)) 102 process = pgrid(row_dist(col), col_dist(row)) 578 INTEGER, DIMENSION(:), POINTER :: itmp, row_dist local 587 row_dist => dbcsr_distribution_row_dist(dist) 590 DO el = 1, SIZE(row_dist) 591 prow = row_dist(el) 602 CALL find_all_local_elements(dist%d%other_l_rows, row_dist, nprows)
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/exts/dbcsr/src/dist/ |
H A D | dbcsr_dist_methods.F | 70 SUBROUTINE dbcsr_distribution_new_template(dist, template, group, pgrid, row_dist, col_dist, & argument 80 INTEGER, DIMENSION(:), INTENT(IN), POINTER, CONTIGUOUS :: row_dist, col_dist 101 row_dist_block=row_dist, & 235 SUBROUTINE dbcsr_distribution_get(dist, row_dist, col_dist, & argument 241 INTEGER, DIMENSION(:), OPTIONAL, POINTER :: row_dist, col_dist local 250 IF (PRESENT(row_dist)) row_dist => array_data(dist%d%row_dist_block) 300 FUNCTION dbcsr_distribution_row_dist(dist) RESULT(row_dist) 302 INTEGER, DIMENSION(:), POINTER, CONTIGUOUS :: row_dist 306 row_dist => array_data(dist%d%row_dist_block)
|
H A D | dbcsr_dist_operations.F | 80 row_dist, col_dist) RESULT(process) 93 INTEGER, DIMENSION(:), INTENT(IN) :: row_dist, col_dist local 100 process = pgrid(row_dist(row), col_dist(col)) 102 process = pgrid(row_dist(col), col_dist(row)) 605 INTEGER, DIMENSION(:), POINTER :: itmp, row_dist local 614 row_dist => dbcsr_distribution_row_dist(dist) 617 DO el = 1, SIZE(row_dist) 618 prow = row_dist(el) 629 CALL find_all_local_elements(dist%d%other_l_rows, row_dist, nprows)
|
/dports/math/dbcsr/dbcsr-2.1.0/src/tas/ |
H A D | dbcsr_tas_base.F | 181 DBCSR_ASSERT(matrix%nblkrows == dist%row_dist%nmrowcol) 213 nrows = INT(dist%row_dist%nmrowcol) 383 IF (row_dist%nmrowcol >= col_dist%nmrowcol) THEN 385 nsplit = INT((row_dist%nmrowcol - 1)/col_dist%nmrowcol + 1) 416 nrows = INT(row_dist%nmrowcol) 423 row_dist_vec(row) = row_dist%dist(INT(row, KIND=int_8)) 432 ALLOCATE (dist%row_dist, source=row_dist) 475 pcoord(1) = matrix%dist%row_dist%dist(row) 503 pcoord(1) = matrix%dist%row_dist%dist(row_s) 511 pcoord(1) = matrix%dist%row_dist%dist(row_s) [all …]
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/exts/dbcsr/src/tas/ |
H A D | dbcsr_tas_base.F | 180 DBCSR_ASSERT(matrix%nblkrows == dist%row_dist%nmrowcol) 212 nrows = INT(dist%row_dist%nmrowcol) 384 IF (row_dist%nmrowcol >= col_dist%nmrowcol) THEN 386 nsplit = INT((row_dist%nmrowcol - 1)/col_dist%nmrowcol + 1) 417 nrows = INT(row_dist%nmrowcol) 424 row_dist_vec(row) = row_dist%dist(INT(row, KIND=int_8)) 433 ALLOCATE (dist%row_dist, source=row_dist) 476 pcoord(1) = matrix%dist%row_dist%dist(row) 504 pcoord(1) = matrix%dist%row_dist%dist(row_s) 512 pcoord(1) = matrix%dist%row_dist%dist(row_s) [all …]
|