/dports/math/dbcsr/dbcsr-2.1.0/tests/ |
H A D | dbcsr_test_csr_conversions.F | 38 INTEGER :: nblkrows_total, nblkcols_total variable 88 nblkrows_total = FLOOR(rn*(max_blks_total)) + 1 93 ALLOCATE (rn_array(MAX(nblkcols_total, nblkrows_total))) 95 ALLOCATE (row_blk_sizes(nblkrows_total)) 96 ALLOCATE (row_dist(nblkrows_total)) 103 row_blk_sizes = FLOOR(rn_array(1:nblkrows_total)*(max_blk_size)) + 1 109 row_dist = FLOOR(rn_array(1:nblkrows_total)*npdims(1))
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/exts/dbcsr/tests/ |
H A D | dbcsr_test_csr_conversions.F | 38 INTEGER :: nblkrows_total, nblkcols_total variable 88 nblkrows_total = FLOOR(rn*(max_blks_total)) + 1 93 ALLOCATE (rn_array(MAX(nblkcols_total, nblkrows_total))) 95 ALLOCATE (row_blk_sizes(nblkrows_total)) 96 ALLOCATE (row_dist(nblkrows_total)) 103 row_blk_sizes = FLOOR(rn_array(1:nblkrows_total)*(max_blk_size)) + 1 109 row_dist = FLOOR(rn_array(1:nblkrows_total)*npdims(1))
|
/dports/math/dbcsr/dbcsr-2.1.0/examples/ |
H A D | dbcsr_example_1.F | 25 INTEGER :: group, numnodes, mynode, nblkrows_total, & variable 69 nblkrows_total = 4 74 ALLOCATE (row_blk_sizes(nblkrows_total), col_blk_sizes(nblkcols_total)) 80 CALL random_dist(row_dist, nblkrows_total, npdims(1))
|
H A D | dbcsr_example_2.F | 27 … nblkrows_total, nblkcols_total, node_holds_blk, max_nze, nze, & variable 72 nblkrows_total = 4 77 ALLOCATE (row_blk_sizes(nblkrows_total), col_blk_sizes(nblkcols_total)) 83 CALL random_dist(row_dist, nblkrows_total, npdims(1))
|
H A D | dbcsr_example_3.cpp | 69 int nblkrows_total = 4; in main() local 73 std::vector<int> row_blk_sizes(nblkrows_total, 2), col_blk_sizes(nblkcols_total, 2); in main() 76 auto row_dist = random_dist(nblkrows_total, dims[0]); in main() 95 for(int i = 0; i < nblkrows_total; i++) in main()
|
H A D | dbcsr_example_3.F | 27 nblkrows_total, nblkcols_total, & variable 73 nblkrows_total = 4 78 ALLOCATE (row_blk_sizes(nblkrows_total), col_blk_sizes(nblkcols_total)) 84 CALL random_dist(row_dist, nblkrows_total, npdims(1))
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/exts/dbcsr/examples/ |
H A D | dbcsr_example_1.F | 25 INTEGER :: group, numnodes, mynode, nblkrows_total, & variable 69 nblkrows_total = 4 74 ALLOCATE (row_blk_sizes(nblkrows_total), col_blk_sizes(nblkcols_total)) 80 CALL random_dist(row_dist, nblkrows_total, npdims(1))
|
H A D | dbcsr_example_2.F | 27 … nblkrows_total, nblkcols_total, node_holds_blk, max_nze, nze, & variable 72 nblkrows_total = 4 77 ALLOCATE (row_blk_sizes(nblkrows_total), col_blk_sizes(nblkcols_total)) 83 CALL random_dist(row_dist, nblkrows_total, npdims(1))
|
H A D | dbcsr_example_3.cpp | 64 int nblkrows_total = 4; in main() local 68 std::vector<int> row_blk_sizes(nblkrows_total, 2), col_blk_sizes(nblkcols_total, 2); in main() 70 auto row_dist = random_dist(nblkrows_total, dims[0]); in main() 89 for(int i = 0; i < nblkrows_total; i++) in main()
|
H A D | dbcsr_example_3.F | 27 nblkrows_total, nblkcols_total, & variable 73 nblkrows_total = 4 78 ALLOCATE (row_blk_sizes(nblkrows_total), col_blk_sizes(nblkcols_total)) 84 CALL random_dist(row_dist, nblkrows_total, npdims(1))
|
/dports/math/dbcsr/dbcsr-2.1.0/src/ops/ |
H A D | dbcsr_csr_conversions.F | 465 CALL dbcsr_get_info(brd_mat, nblkrows_total=nblkrows_total) 468 ALLOCATE (nfullcol_blkrow(nblkrows_total)) 654 CALL dbcsr_get_info(brd_mat, nblkrows_total=nblkrows_total) 655 ALLOCATE (nfullcol_blkrow(nblkrows_total)) 1354 nblkrows_total=nblkrows_total, & 1392 DO l = 1, nblkrows_total 1413 rdist_tmp(1:nblkrows_total) = numnodes - 1 1415 k = nblkrows_total 1425 ALLOCATE (rdist(nblkrows_total)) 1427 IF (numnodes .GT. nblkrows_total) THEN [all …]
|
H A D | dbcsr_io.F | 149 ebr = matrix%nblkrows_total 640 nblkrows_total = dbcsr_nblkrows_total(matrix) 674 linfo_size = 1 + nblkrows_total + 2*nblks 840 nblkrows_total = values(3) 846 row_blk_size => ginfo_vec(1:nblkrows_total) 898 1 + nblkrows_total + 2*val_data(1, j) 914 ALLOCATE (rowp((nblkrows_total + 1)*job_count)) 930 … rowp((i - 1)*(nblkrows_total + 1) + 1:i*(nblkrows_total + 1)) = linfo_vec(1:nblkrows_total + 1) 934 linfo_vec(nblkrows_total + 2:cur_blks + nblkrows_total + 1) 936 linfo_vec(cur_blks + nblkrows_total + 2:2*cur_blks + nblkrows_total + 1) [all …]
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/exts/dbcsr/src/ops/ |
H A D | dbcsr_csr_conversions.F | 524 CALL dbcsr_get_info(brd_mat, nblkrows_total=nblkrows_total) 527 ALLOCATE (nfullcol_blkrow(nblkrows_total)) 715 CALL dbcsr_get_info(brd_mat, nblkrows_total=nblkrows_total) 716 ALLOCATE (nfullcol_blkrow(nblkrows_total)) 1422 nblkrows_total=nblkrows_total, & 1460 DO l = 1, nblkrows_total 1481 rdist_tmp(1:nblkrows_total) = numnodes - 1 1483 k = nblkrows_total 1493 ALLOCATE (rdist(nblkrows_total)) 1495 IF (numnodes .GT. nblkrows_total) THEN [all …]
|
H A D | dbcsr_io.F | 149 ebr = matrix%nblkrows_total 641 nblkrows_total = dbcsr_nblkrows_total(matrix) 675 linfo_size = 1 + nblkrows_total + 2*nblks 842 nblkrows_total = values(3) 848 row_blk_size => ginfo_vec(1:nblkrows_total) 900 1 + nblkrows_total + 2*val_data(1, j) 916 ALLOCATE (rowp((nblkrows_total + 1)*job_count)) 932 … rowp((i - 1)*(nblkrows_total + 1) + 1:i*(nblkrows_total + 1)) = linfo_vec(1:nblkrows_total + 1) 936 linfo_vec(nblkrows_total + 2:cur_blks + nblkrows_total + 1) 938 linfo_vec(cur_blks + nblkrows_total + 2:2*cur_blks + nblkrows_total + 1) [all …]
|
/dports/science/latte/LATTE-1.2.2/src/ |
H A D | init_dbcsr.F90 | 92 nblkrows_total=(HDIM-1)/BLKSZ + BLKSZ 97 ALLOCATE(rbs(nblkrows_total)) 109 CALL myset_dist (row_dist_a, nblkrows_total, npdims(1))
|
/dports/math/dbcsr/dbcsr-2.1.0/src/dist/ |
H A D | dbcsr_dist_util.F | 384 meta(dbcsr_slot_nblkrows_total) = matrix%nblkrows_total 416 matrix%nblkrows_total = meta(dbcsr_slot_nblkrows_total) 478 DO br = 1, matrix%nblkrows_total 612 m%nblkrows_total, m%nblkcols_total, ", full ", & 619 n_full_blocks_total = INT(m%nblkrows_total, KIND=int_8)*INT(m%nblkcols_total, KIND=int_8) 621 IF (m%nblkrows_total /= m%nblkcols_total) & 623 n_full_blocks_total = INT(m%nblkrows_total, KIND=int_8)*(m%nblkrows_total + 1)/2 647 IF (SIZE(m%row_p) /= m%nblkrows_total + 1) & 664 IF (SIZE(row_blk_size) /= m%nblkrows_total) & 680 WRITE (*, 2047) m%row_p(1:m%nblkrows_total + 1) [all …]
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/exts/dbcsr/src/dist/ |
H A D | dbcsr_dist_util.F | 401 meta(dbcsr_slot_nblkrows_total) = matrix%nblkrows_total 436 matrix%nblkrows_total = meta(dbcsr_slot_nblkrows_total) 499 DO br = 1, matrix%nblkrows_total 633 m%nblkrows_total, m%nblkcols_total, ", full ", & 640 n_full_blocks_total = INT(m%nblkrows_total, KIND=int_8)*INT(m%nblkcols_total, KIND=int_8) 642 IF (m%nblkrows_total /= m%nblkcols_total) & 644 n_full_blocks_total = INT(m%nblkrows_total, KIND=int_8)*(m%nblkrows_total + 1)/2 668 IF (SIZE(m%row_p) /= m%nblkrows_total + 1) & 685 IF (SIZE(row_blk_size) /= m%nblkrows_total) & 701 WRITE (*, 2047) m%row_p(1:m%nblkrows_total + 1) [all …]
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
H A D | qs_fb_atomic_matrix_methods.F | 446 natoms_in_halo, nblkrows_total, nencode, ntasks_recv, ntasks_send, src local 480 nblkrows_total=nblkrows_total) 523 nblkrows_total) 541 nencode=nblkrows_total, & 641 natoms_in_halo, nblkrows_total, nencode, nhalos, ntasks_recv, ntasks_send, src local 675 nblkrows_total=nblkrows_total) 719 nblkrows_total) 738 nencode=nblkrows_total, &
|
H A D | qs_fb_filter_matrix_methods.F | 987 natoms_in_halo, nblkrows_total, & local 1044 nblkrows_total=nblkrows_total) 1060 nblkrows_total) 1072 nencode=nblkrows_total, & 1083 natoms_encode=nblkrows_total, & 1087 natoms_encode=nblkrows_total, & 1182 nblkrows_total=nblkrows_total) 1206 nblkrows_total) 1220 nencode=nblkrows_total, & 1232 natoms_encode=nblkrows_total, & [all …]
|
/dports/science/cp2k-data/cp2k-7.1.0/src/ |
H A D | qs_fb_atomic_matrix_methods.F | 446 natoms_in_halo, nblkrows_total, nencode, ntasks_recv, ntasks_send, src local 480 nblkrows_total=nblkrows_total) 523 nblkrows_total) 541 nencode=nblkrows_total, & 641 natoms_in_halo, nblkrows_total, nencode, nhalos, ntasks_recv, ntasks_send, src local 675 nblkrows_total=nblkrows_total) 719 nblkrows_total) 738 nencode=nblkrows_total, &
|
H A D | qs_fb_filter_matrix_methods.F | 987 natoms_in_halo, nblkrows_total, & local 1044 nblkrows_total=nblkrows_total) 1060 nblkrows_total) 1072 nencode=nblkrows_total, & 1083 natoms_encode=nblkrows_total, & 1087 natoms_encode=nblkrows_total, & 1182 nblkrows_total=nblkrows_total) 1206 nblkrows_total) 1220 nencode=nblkrows_total, & 1232 natoms_encode=nblkrows_total, & [all …]
|
H A D | rpa_util.F | 488 col_blk_size=col_blk_size, nblkrows_total=nblkrows_total) 491 ALLOCATE (mepos_P_from_RI_row(nblkrows_total)) 501 nblkrows_total=nblkrows_total, & 506 DO row = 1, nblkrows_total 1411 CALL dbcsr_get_info(mat_3c_overl_int(1, 1, 1)%matrix, nblkrows_total=nblkrows_total) 1445 DO iblk = 1, nblkrows_total 1463 DO iblk = 1, nblkrows_total 1515 nblkrows_total=nblkrows_total) 1517 nblkrows_total_max = nblkrows_total 1559 DO iblk = 1, nblkrows_total [all …]
|
/dports/math/dbcsr/dbcsr-2.1.0/src/tas/ |
H A D | dbcsr_tas_io.F | 50 INTEGER(KIND=int_8) :: nblkrows_total, nblkcols_total, nfullrows_total, & local 61 … CALL dbcsr_tas_get_info(matrix, nblkrows_total=nblkrows_total, nblkcols_total=nblkcols_total, & 70 WRITE (unit_nr_prv, "(I12,I12)", advance="no") nblkrows_total, nblkcols_total
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/exts/dbcsr/src/tas/ |
H A D | dbcsr_tas_io.F | 50 INTEGER(KIND=int_8) :: nblkrows_total, nblkcols_total, nfullrows_total, & local 61 … CALL dbcsr_tas_get_info(matrix, nblkrows_total=nblkrows_total, nblkcols_total=nblkcols_total, & 70 WRITE (unit_nr_prv, "(I12,I12)", advance="no") nblkrows_total, nblkcols_total
|
/dports/math/dbcsr/dbcsr-2.1.0/src/block/ |
H A D | dbcsr_index_operations.F | 550 reservation=m%nblkrows_total + 1) 665 nrows = matrix%nblkrows_total 787 INTEGER, INTENT(IN) :: nblkrows_total local 792 INTEGER, DIMENSION(1:nblkrows_total + 1), & 850 row_p(prev_row + 1:nblkrows_total + 1) = nblks 858 meta(dbcsr_slot_nblkrows_total) = nblkrows_total 892 nblkrows_total = meta(dbcsr_slot_nblkrows_total) 907 row_p(prev_row + 1:nblkrows_total + 1) = lr 1118 ntotal_rows = matrix%nblkrows_total 1187 IF (SIZE(matrix%row_p) - 1 /= matrix%nblkrows_total) & [all …]
|