Home
last modified time | relevance | path

Searched refs:nrow_block (Results 1 – 25 of 48) sorted by relevance

12

/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/fm/
H A Dcp_fm_struct.F171 fmstruct%nrow_block = template_fmstruct%nrow_block
200 IF (PRESENT(nrow_block)) THEN
202 fmstruct%nrow_block = nrow_block
207 fmstruct%nrow_block = MAX(1, MIN(fmstruct%nrow_block, dumblock))
223 fmstruct%nrow_block = MIN(fmstruct%nrow_block, fmstruct%ncol_block)
224 fmstruct%ncol_block = fmstruct%nrow_block
269 fmstruct%nrow_block = fmstruct%nrow_global
451 IF (PRESENT(nrow_block)) nrow_block = fmstruct%nrow_block
573 ncol_global=ncol_global, nrow_block=nrow_block, &
647 nrow_block=nrow_block, &
[all …]
H A Dcp_fm_diag.F582 IF (matrix%matrix_struct%nrow_block /= matrix%matrix_struct%ncol_block) THEN
601 nb = matrix%matrix_struct%nrow_block
764 irow_local, ncol_block, nrow_block local
798 nrow_block = work%matrix_struct%nrow_block
818 iprow = indxg2p(irow_global, nrow_block, myprow, &
821 irow_local = indxg2l(irow_global, nrow_block, myprow, &
839 iprow = indxg2p(irow_global, nrow_block, myprow, &
842 irow_local = indxg2l(irow_global, nrow_block, myprow, &
H A Dcp_cfm_types.F658 nrow_block, ncol_block, nrow_local, ncol_local, & argument
664 nrow_block, nrow_global, & local
683 IF (PRESENT(nrow_block)) nrow_block = matrix%matrix_struct%nrow_block
712 indxl2g(i, matrix%matrix_struct%nrow_block, myprow, &
1104 src_block_tmp = (/send_dist%nrow_block, send_dist%ncol_block/)
1112 dest_block_tmp = (/recv_dist%nrow_block, recv_dist%ncol_block/)
H A Dcp_fm_diag_utils.F209 ncol_global, npcol, nrow_block, & local
218 nrow_block=nrow_block, ncol_block=ncol_block)
H A Dcp_fm_types.F622 nrow_block, nrow_global, nrow_local, & local
657 nrow_block=nrow_block, ncol_block=ncol_block, &
866 nrow_block, ncol_block, nrow_local, ncol_local, & argument
872 INTEGER, INTENT(OUT), OPTIONAL :: nrow_global, ncol_global, nrow_block, & local
902 ncol_global=ncol_global, nrow_block=nrow_block, &
1558 src_block_tmp = (/send_dist%nrow_block, send_dist%ncol_block/)
1566 dest_block_tmp = (/recv_dist%nrow_block, recv_dist%ncol_block/)
2192 nrow_block local
2209 nrow_block=nrow_block, para_env=para_env)
/dports/science/cp2k-data/cp2k-7.1.0/src/fm/
H A Dcp_fm_struct.F171 fmstruct%nrow_block = template_fmstruct%nrow_block
200 IF (PRESENT(nrow_block)) THEN
202 fmstruct%nrow_block = nrow_block
207 fmstruct%nrow_block = MAX(1, MIN(fmstruct%nrow_block, dumblock))
223 fmstruct%nrow_block = MIN(fmstruct%nrow_block, fmstruct%ncol_block)
224 fmstruct%ncol_block = fmstruct%nrow_block
269 fmstruct%nrow_block = fmstruct%nrow_global
451 IF (PRESENT(nrow_block)) nrow_block = fmstruct%nrow_block
573 ncol_global=ncol_global, nrow_block=nrow_block, &
647 nrow_block=nrow_block, &
[all …]
H A Dcp_fm_diag.F582 IF (matrix%matrix_struct%nrow_block /= matrix%matrix_struct%ncol_block) THEN
601 nb = matrix%matrix_struct%nrow_block
764 irow_local, ncol_block, nrow_block local
798 nrow_block = work%matrix_struct%nrow_block
818 iprow = indxg2p(irow_global, nrow_block, myprow, &
821 irow_local = indxg2l(irow_global, nrow_block, myprow, &
839 iprow = indxg2p(irow_global, nrow_block, myprow, &
842 irow_local = indxg2l(irow_global, nrow_block, myprow, &
H A Dcp_cfm_types.F658 nrow_block, ncol_block, nrow_local, ncol_local, & argument
664 nrow_block, nrow_global, & local
683 IF (PRESENT(nrow_block)) nrow_block = matrix%matrix_struct%nrow_block
712 indxl2g(i, matrix%matrix_struct%nrow_block, myprow, &
1104 src_block_tmp = (/send_dist%nrow_block, send_dist%ncol_block/)
1112 dest_block_tmp = (/recv_dist%nrow_block, recv_dist%ncol_block/)
H A Dcp_fm_diag_utils.F209 ncol_global, npcol, nrow_block, & local
218 nrow_block=nrow_block, ncol_block=ncol_block)
H A Dcp_fm_types.F629 nrow_block, nrow_global, nrow_local, & local
664 nrow_block=nrow_block, ncol_block=ncol_block, &
873 nrow_block, ncol_block, nrow_local, ncol_local, & argument
879 INTEGER, INTENT(OUT), OPTIONAL :: nrow_global, ncol_global, nrow_block, & local
909 ncol_global=ncol_global, nrow_block=nrow_block, &
1540 src_block_tmp = (/send_dist%nrow_block, send_dist%ncol_block/)
1548 dest_block_tmp = (/recv_dist%nrow_block, recv_dist%ncol_block/)
2174 nrow_block local
2191 nrow_block=nrow_block, para_env=para_env)
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/
H A Dqs_matrix_pools.F231 ncg, ncol_block, nmo, nrg, nrow_block, & local
239 nrow_block = cp_fm_struct_get_nrow_block()
349 nrow_block=nrow_block, &
382 nrow_block=nrow_block, &
396 nrow_block=nrow_block, &
427 nrow_block=nrow_block, &
443 nrow_block=nrow_block, &
476 nrow_block=nrow_block, &
490 nrow_block=nrow_block, &
520 nrow_block=nrow_block, &
[all …]
H A Dcp_dbcsr_operations.F143 INTEGER :: col, group, handle, ncol_block, ncol_global, nrow_block, nrow_global, row local
162 nrow_block = fm%matrix_struct%nrow_block
169 … nrow_block=nrow_block, ncol_block=ncol_block, & ! BLACS parameters
213 nfullrows_total, nrow_block local
233 nrow_block = fm%matrix_struct%nrow_block
241 nrow_block=nrow_block, ncol_block=ncol_block, &
1213 IF (nrow_block .EQ. 0) THEN
1217 nblkrows = nrows/nrow_block
1218 sz = MOD(nrows, nrow_block)
1222 row_blk_sizes = nrow_block
[all …]
H A Dmp2_ri_grad_util.F481 nrow_block=nrow_block, &
512 send_prow = cp_fm_indxg2p(iiB, nrow_block, dummy_proc, &
630 send_prow = cp_fm_indxg2p(iiB, nrow_block, dummy_proc, &
779 i_local = cp_fm_indxg2l(i_sub, nrow_block, dummy_proc, &
886 nrow_block=nrow_block, &
962 rec_prow = cp_fm_indxg2p(iiB, nrow_block, dummy_proc, &
1262 nrow_block=nrow_block, &
1289 send_prow = cp_fm_indxg2p(i_global, nrow_block, dummy_proc, &
1406 rec_prow = cp_fm_indxg2p(i_global, nrow_block, dummy_proc, &
1412 i_local = cp_fm_indxg2l(i_global, nrow_block, dummy_proc, &
[all …]
H A Drpa_communication.F126 nrow_block=nrow_block_s, &
139 nrow_block=nrow_block_d, &
376 nrow_block=nrow_block_s, &
389 nrow_block=nrow_block_d, &
674 nrow_block=nrow_block, &
701 send_prow = cp_fm_indxg2p(i_global, nrow_block, dummy_proc, &
802 rec_prow = cp_fm_indxg2p(i_global, nrow_block, dummy_proc, &
808 i_local = cp_fm_indxg2l(i_global, nrow_block, dummy_proc, &
827 rec_prow = cp_fm_indxg2p(i_global, nrow_block, dummy_proc, &
833 i_local = cp_fm_indxg2l(i_global, nrow_block, dummy_proc, &
[all …]
H A Dlibrary_tests.F1280 ncol_block_actual, ncol_global, nrow_block, nrow_block_actual, & local
1306 … section_vals_val_get(cp_fm_gemm_test_section, "nrow_block", i_rep_section=i_rep, i_val=nrow_block)
1329 WRITE (iw, '(T2,A,T50,I5,A,I5)') 'requested block size', nrow_block, ' by ', ncol_block
1354 … nrow_block=nrow_block, ncol_block=ncol_block, force_block=force_blocksize)
1355 … CALL cp_fm_struct_get(fmstruct_a, nrow_block=nrow_block_actual, ncol_block=ncol_block_actual)
1367 … nrow_block=nrow_block, ncol_block=ncol_block, force_block=force_blocksize)
1368 … CALL cp_fm_struct_get(fmstruct_b, nrow_block=nrow_block_actual, ncol_block=ncol_block_actual)
1377 … nrow_block=nrow_block, ncol_block=ncol_block, force_block=force_blocksize)
1378 … CALL cp_fm_struct_get(fmstruct_c, nrow_block=nrow_block_actual, ncol_block=ncol_block_actual)
H A Drt_propagation_types.F150 INTEGER :: i, j, nao, nrow_block, nspin local
186 CALL cp_fm_struct_get(ao_mo_fmstruct, nrow_block=nrow_block)
190 nrow_block=nrow_block, ncol_block=nrow_block, &
H A Dmp2_ri_grad.F1223 ncol_local_2a, npcol, npcol_1i, npcol_2a, nprow, nprow_1i, nprow_2a, nrow_block, & local
1284 nrow_block=nrow_block, &
1302 nrow_block=nrow_block_1i, &
1327 nrow_block=nrow_block_2a, &
1389 send_prow = cp_fm_indxg2p(i_global, nrow_block, dummy_proc, &
1391 i_local = cp_fm_indxg2l(i_global, nrow_block, dummy_proc, &
1419 send_prow = cp_fm_indxg2p(i_global, nrow_block, dummy_proc, &
1421 i_local = cp_fm_indxg2l(i_global, nrow_block, dummy_proc, &
1853 nrow_block=nrow_block, &
1865 nrow_block=nrow_block, &
[all …]
/dports/science/cp2k-data/cp2k-7.1.0/src/
H A Dqs_matrix_pools.F231 ncg, ncol_block, nmo, nrg, nrow_block, & local
239 nrow_block = cp_fm_struct_get_nrow_block()
349 nrow_block=nrow_block, &
382 nrow_block=nrow_block, &
396 nrow_block=nrow_block, &
427 nrow_block=nrow_block, &
443 nrow_block=nrow_block, &
476 nrow_block=nrow_block, &
490 nrow_block=nrow_block, &
520 nrow_block=nrow_block, &
[all …]
H A Dcp_dbcsr_operations.F163 nrow_block = fm%matrix_struct%nrow_block
170 … nrow_block=nrow_block, ncol_block=ncol_block, & ! BLACS parameters
215 nfullrows_total, nrow_block local
235 nrow_block = fm%matrix_struct%nrow_block
243 nrow_block=nrow_block, ncol_block=ncol_block, &
1204 nrow_block, ncol_block, group, pgrid, row_blk_sizes, col_blk_sizes) argument
1219 IF(nrow_block.EQ.0) THEN
1223 nblkrows = nrows / nrow_block
1224 sz = MOD(nrows, nrow_block)
1228 row_blk_sizes = nrow_block
[all …]
H A Dmp2_ri_grad_util.F481 nrow_block=nrow_block, &
512 send_prow = cp_fm_indxg2p(iiB, nrow_block, dummy_proc, &
630 send_prow = cp_fm_indxg2p(iiB, nrow_block, dummy_proc, &
779 i_local = cp_fm_indxg2l(i_sub, nrow_block, dummy_proc, &
886 nrow_block=nrow_block, &
962 rec_prow = cp_fm_indxg2p(iiB, nrow_block, dummy_proc, &
1262 nrow_block=nrow_block, &
1289 send_prow = cp_fm_indxg2p(i_global, nrow_block, dummy_proc, &
1406 rec_prow = cp_fm_indxg2p(i_global, nrow_block, dummy_proc, &
1412 i_local = cp_fm_indxg2l(i_global, nrow_block, dummy_proc, &
[all …]
H A Drpa_communication.F126 nrow_block=nrow_block_s, &
139 nrow_block=nrow_block_d, &
376 nrow_block=nrow_block_s, &
389 nrow_block=nrow_block_d, &
674 nrow_block=nrow_block, &
701 send_prow = cp_fm_indxg2p(i_global, nrow_block, dummy_proc, &
802 rec_prow = cp_fm_indxg2p(i_global, nrow_block, dummy_proc, &
808 i_local = cp_fm_indxg2l(i_global, nrow_block, dummy_proc, &
827 rec_prow = cp_fm_indxg2p(i_global, nrow_block, dummy_proc, &
833 i_local = cp_fm_indxg2l(i_global, nrow_block, dummy_proc, &
[all …]
H A Drt_propagation_types.F150 INTEGER :: i, j, nao, nrow_block, nspin local
186 CALL cp_fm_struct_get(ao_mo_fmstruct, nrow_block=nrow_block)
190 nrow_block=nrow_block, ncol_block=nrow_block, &
H A Dlibrary_tests.F1399 ncol_block_actual, ncol_global, nrow_block, nrow_block_actual, & local
1425 … section_vals_val_get(cp_fm_gemm_test_section, "nrow_block", i_rep_section=i_rep, i_val=nrow_block)
1448 WRITE (iw, '(T2,A,T50,I5,A,I5)') 'requested block size', nrow_block, ' by ', ncol_block
1473 … nrow_block=nrow_block, ncol_block=ncol_block, force_block=force_blocksize)
1474 … CALL cp_fm_struct_get(fmstruct_a, nrow_block=nrow_block_actual, ncol_block=ncol_block_actual)
1486 … nrow_block=nrow_block, ncol_block=ncol_block, force_block=force_blocksize)
1487 … CALL cp_fm_struct_get(fmstruct_b, nrow_block=nrow_block_actual, ncol_block=ncol_block_actual)
1496 … nrow_block=nrow_block, ncol_block=ncol_block, force_block=force_blocksize)
1497 … CALL cp_fm_struct_get(fmstruct_c, nrow_block=nrow_block_actual, ncol_block=ncol_block_actual)
H A Dmp2_ri_grad.F1216 ncol_local_2a, npcol, npcol_1i, npcol_2a, nprow, nprow_1i, nprow_2a, nrow_block, & local
1277 nrow_block=nrow_block, &
1295 nrow_block=nrow_block_1i, &
1320 nrow_block=nrow_block_2a, &
1382 send_prow = cp_fm_indxg2p(i_global, nrow_block, dummy_proc, &
1384 i_local = cp_fm_indxg2l(i_global, nrow_block, dummy_proc, &
1412 send_prow = cp_fm_indxg2p(i_global, nrow_block, dummy_proc, &
1414 i_local = cp_fm_indxg2l(i_global, nrow_block, dummy_proc, &
1846 nrow_block=nrow_block, &
1858 nrow_block=nrow_block, &
[all …]
/dports/math/freefem++/FreeFem-sources-4.6/3rdparty/dissection/src/Driver/
H A DC_DFullLDLt.cpp239 int nrow_block = D.nrowBlock(arg->i1_block, arg->i1_block); in C_dfull_gauss_b() local
252 for (int i = 0; i < nrow_block; i++) { in C_dfull_gauss_b()
254 a_diag[i + j * nrow_block] = a_diag[j + i * nrow_block]; in C_dfull_gauss_b()
286 ColumnMatrix<T> a_diag1(nrow_block, nrow_block); in C_dfull_gauss_b()
289 blas_copy<T>((nrow_block * nrow_block), in C_dfull_gauss_b()
293 blas_copy<T>((nrow_block * nrow_block), in C_dfull_gauss_b()
297 full_ldlt_permute<T, U>(&nn0, n0, nrow, a_diag, nrow_block, &pivot, in C_dfull_gauss_b()
302 full_ldu_permute<T, U>(&nn0, n0, nrow, a_diag, nrow_block, &pivot, in C_dfull_gauss_b()
326 full_ldlt_permute<T, U>(&nn0, n0, nrow, a_diag, nrow_block, &pivot, in C_dfull_gauss_b()
331 full_ldu_permute<T, U>(&nn0, n0, nrow, a_diag, nrow_block, &pivot, in C_dfull_gauss_b()

12