/dports/science/quantum-espresso/q-e-qe-6.7.0/PW/src/ |
H A D | cdiagh.f90 | 16 USE mp_bands, ONLY : nbgrp, me_bgrp, root_bgrp, intra_bgrp_comm 58 IF ( me_bgrp == root_bgrp ) THEN 87 CALL mp_bcast( e(1:n), root_bgrp, intra_bgrp_comm ) 88 CALL mp_bcast( v(1:ldh,1:n), root_bgrp, intra_bgrp_comm ) 90 CALL mp_bcast( e, root_bgrp, intra_bgrp_comm ) 91 CALL mp_bcast( v, root_bgrp, intra_bgrp_comm )
|
H A D | rdiagh.f90 | 16 USE mp_bands, ONLY : me_bgrp, root_bgrp, intra_bgrp_comm 52 IF ( me_bgrp == root_bgrp ) THEN 70 CALL mp_bcast( e, root_bgrp, intra_bgrp_comm ) 71 CALL mp_bcast( v, root_bgrp, intra_bgrp_comm )
|
H A D | io_rho_xml.f90 | 41 root_bgrp, intra_bgrp_comm 65 root_bgrp, intra_bgrp_comm, & 73 root_bgrp, intra_bgrp_comm, & 141 USE mp_bands, ONLY : root_bgrp, intra_bgrp_comm 164 root_bgrp, intra_bgrp_comm, & 171 root_bgrp, intra_bgrp_comm, &
|
H A D | remove_atomic_rho.f90 | 21 root_bgrp, intra_bgrp_comm 40 root_bgrp, intra_bgrp_comm, &
|
H A D | potinit.f90 | 48 USE mp_bands , ONLY : intra_bgrp_comm, root_bgrp 91 CALL read_rhog ( filename, root_bgrp, intra_bgrp_comm, & 113 CALL read_rhog ( filename, root_bgrp, intra_bgrp_comm, & 164 CALL read_rhog ( filename, root_bgrp, intra_bgrp_comm, &
|
H A D | update_pot.f90 | 396 USE mp_bands, ONLY : my_bgrp_id, root_bgrp_id, root_bgrp, & 481 root_bgrp, intra_bgrp_comm, dum, dum, dum, & 496 root_bgrp, intra_bgrp_comm, ig_l2g, 1, work(:,1:1) ) 505 root_bgrp, intra_bgrp_comm, dum, dum, dum, & 509 root_bgrp, intra_bgrp_comm, dum, dum, dum, & 530 root_bgrp, intra_bgrp_comm, ig_l2g, 1, work1(:,1:1) ) 534 root_bgrp, intra_bgrp_comm, ig_l2g, 1, work(:,1:1) ) 542 root_bgrp, intra_bgrp_comm, dum, dum, dum, & 546 root_bgrp, intra_bgrp_comm, dum, dum, dum, &
|
H A D | print_ks_energies.f90 | 58 USE mp_bands, ONLY : root_bgrp, intra_bgrp_comm, inter_bgrp_comm 83 CALL mp_bcast( ngk_g, root_bgrp, intra_bgrp_comm ) 84 CALL mp_bcast( ngk_g, root_bgrp, inter_bgrp_comm )
|
H A D | pw_restart_new.f90 | 741 USE mp_bands, ONLY : me_bgrp, root_bgrp, intra_bgrp_comm, & 763 IF ( my_bgrp_id == root_bgrp_id .AND. me_bgrp == root_bgrp ) THEN 843 filename, root_bgrp, intra_bgrp_comm, ik_g, tpiba*xk(:,ik), & 1194 USE mp_bands, ONLY : root_bgrp, intra_bgrp_comm 1278 CALL read_wfc( iunpun, filename, root_bgrp, intra_bgrp_comm, &
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/LAXlib/ |
H A D | rdiaghg.f90 | 34 INTEGER, INTENT(IN) :: me_bgrp, root_bgrp, intra_bgrp_comm local 51 IF ( me_bgrp == root_bgrp ) THEN 163 CALL MPI_BCAST( e, SIZE(e), MPI_DOUBLE_PRECISION, root_bgrp, intra_bgrp_comm, info ) 166 CALL MPI_BCAST( v, SIZE(v), MPI_DOUBLE_PRECISION, root_bgrp, intra_bgrp_comm, info ) 223 INTEGER, INTENT(IN) :: me_bgrp, root_bgrp, intra_bgrp_comm 266 IF ( me_bgrp == root_bgrp ) THEN 395 CALL MPI_BCAST( e_d(1), n, MPI_DOUBLE_PRECISION, root_bgrp, intra_bgrp_comm, info ) 398 CALL MPI_BCAST( v_d(1,1), ldh*m, MPI_DOUBLE_PRECISION, root_bgrp, intra_bgrp_comm, info ) 408 CALL MPI_BCAST( e_h, n, MPI_DOUBLE_PRECISION, root_bgrp, intra_bgrp_comm, info ) 411 CALL MPI_BCAST( v_h, ldh*m, MPI_DOUBLE_PRECISION, root_bgrp, intra_bgrp_comm, info )
|
H A D | cdiaghg.f90 | 38 INTEGER, INTENT(IN) :: me_bgrp, root_bgrp, intra_bgrp_comm local 57 IF ( me_bgrp == root_bgrp ) THEN 183 CALL MPI_BCAST( e, SIZE(e), MPI_DOUBLE_PRECISION, root_bgrp, intra_bgrp_comm, info ) 186 CALL MPI_BCAST( v, SIZE(v), MPI_DOUBLE_COMPLEX, root_bgrp, intra_bgrp_comm, info ) 248 INTEGER, INTENT(IN) :: me_bgrp, root_bgrp, intra_bgrp_comm 292 IF ( me_bgrp == root_bgrp ) THEN 459 CALL MPI_BCAST( e_d, n, MPI_DOUBLE_PRECISION, root_bgrp, intra_bgrp_comm, info ) 462 CALL MPI_BCAST( v_d, ldh*m, MPI_DOUBLE_COMPLEX, root_bgrp, intra_bgrp_comm, info ) 472 CALL MPI_BCAST( e_h, n, MPI_DOUBLE_PRECISION, root_bgrp, intra_bgrp_comm, info ) 475 CALL MPI_BCAST( v_h, ldh*m, MPI_DOUBLE_COMPLEX, root_bgrp, intra_bgrp_comm, info )
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/PHonon/Gamma/ |
H A D | dyndiar.f90 | 19 USE mp_bands, ONLY : me_bgrp, root_bgrp, intra_bgrp_comm 81 CALL diaghg (nat3, nmodes, dynout, m, nat3, w2, z, me_bgrp, root_bgrp, intra_bgrp_comm)
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/GWW/pw4gww/ |
H A D | o_rinitcgg.f90 | 25 USE mp_bands, ONLY : me_bgrp, root_bgrp, intra_bgrp_comm 122 …CALL diaghg( nstart, numwp, hr(:,:,1), sr, nstart, en, hr(:,:,2), me_bgrp, root_bgrp, intra_bgrp_c…
|
H A D | diago_cg.f90 | 23 USE mp_bands, ONLY : me_bgrp, root_bgrp, intra_bgrp_comm 159 …CALL diaghg( max_state, max_state, hr(:,:,1), sr, max_state, en, hr(:,:,2), me_bgrp, root_bgrp, in…
|
H A D | diago_cg_g.f90 | 23 USE mp_bands, ONLY : me_bgrp, root_bgrp, intra_bgrp_comm 152 …CALL diaghg( max_state, max_state, hr(:,:,1), sr, max_state, en, hr(:,:,2), me_bgrp, root_bgrp, in…
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/CPV/src/ |
H A D | ksstates.f90 | 146 root_bgrp_id, root_bgrp 180 ( file_name, root_bgrp, intra_bgrp_comm, &
|
H A D | wf.f90 | 1117 CALL mp_gather( gnx, bigg, ngppp, displs, root_bgrp, intra_bgrp_comm ) 1121 CALL mp_gather( gnn, bign, ngppp, displs, root_bgrp, intra_bgrp_comm ) 1267 CALL mp_bcast( indexplus, root_bgrp, intra_bgrp_comm ) 1268 CALL mp_bcast( indexminus, root_bgrp, intra_bgrp_comm ) 1269 CALL mp_bcast( tag, root_bgrp, intra_bgrp_comm ) 1270 CALL mp_bcast( tagp, root_bgrp, intra_bgrp_comm ) 2153 CALL mp_gather( gnx, bigg, ngdens, displs, root_bgrp,intra_bgrp_comm ) 2155 CALL mp_bcast( bigg, root_bgrp, intra_bgrp_comm ) 2167 CALL mp_bcast( bigrho, root_bgrp, intra_bgrp_comm ) 2761 IF ( me_bgrp == root_bgrp ) THEN [all …]
|
H A D | init.f90 | 44 USE mp_bands, ONLY : me_bgrp, root_bgrp, nproc_bgrp, nbgrp, & 283 use mp_global, only: nproc_bgrp, me_bgrp, intra_bgrp_comm, root_bgrp 332 CALL fft_box_allocate( dfftb, me_bgrp, root_bgrp, nproc_bgrp, intra_bgrp_comm, nat )
|
H A D | eigs0.f90 | 20 USE mp_global, only : intra_bgrp_comm, root_bgrp, me_bgrp 96 call mp_bcast( wr, root_bgrp, intra_bgrp_comm )
|
H A D | stress.f90 | 269 use mp_global, ONLY: me_bgrp, root_bgrp 349 use mp_global, ONLY: me_bgrp, root_bgrp 402 if ( me_bgrp == root_bgrp ) then
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/UtilXlib/ |
H A D | mp_bands_util.f90 | 24 INTEGER :: root_bgrp = 0 ! index of the root processor within a band group variable
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/Modules/ |
H A D | mp_exx.f90 | 13 USE mp_bands, ONLY : nbgrp, nproc_bgrp, me_bgrp, root_bgrp, my_bgrp_id, & 132 root_bgrp = root_egrp
|
H A D | mp_bands.f90 | 24 INTEGER :: root_bgrp = 0 ! index of the root processor within a band group variable
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/KS_Solvers/Davidson_RCI/ |
H A D | david_rci.f90 | 17 me_bgrp, root_bgrp 256 … CALL diaghg( nbase, nvec, hc, sc, nvecx, work%ew, vc, me_bgrp, root_bgrp, intra_bgrp_comm ) 429 CALL diaghg( nbase, nvec, hc, sc, nvecx, work%ew, vc, me_bgrp, root_bgrp, intra_bgrp_comm )
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/KS_Solvers/DENSE/ |
H A D | rotate_wfc_gamma.f90 | 20 me_bgrp, root_bgrp 118 CALL diaghg( nstart, nbnd, hr, sr, nstart, en, vr, me_bgrp, root_bgrp, intra_bgrp_comm )
|
H A D | rotate_wfc_k.f90 | 18 me_bgrp, root_bgrp 113 CALL diaghg( nstart, nbnd, hc, sc, nstart, en, vc, me_bgrp, root_bgrp, intra_bgrp_comm )
|