/dports/science/quantum-espresso/q-e-qe-6.7.0/TDDFPT/src/ |
H A D | lr_apply_liouvillian_eels.f90 | 49 INTEGER :: i,j,ir, ibnd, ig, ia, ios, is, incr, v_siz, ipol local 81 v_siz = dffts%nnr_tg 83 ALLOCATE( tg_dvrssc(v_siz,nspin_mag) ) 84 ALLOCATE( tg_psic(v_siz,npol) ) 205 CALL cft_wave_tg(ik, evc, tg_psic, 1, v_siz, ibnd, nbnd_occ(ikk) ) 209 CALL apply_dpot(v_siz, tg_psic, tg_dvrssc, 1) 213 CALL cft_wave_tg(ik,dvpsi, tg_psic,-1, v_siz, ibnd, nbnd_occ(ikk))
|
H A D | lr_dvpsi_eels.f90 | 51 INTEGER :: ibnd, ig, ios, incr, v_siz local 71 v_siz = dffts%nnr_tg 73 ALLOCATE( tg_psic(v_siz,npol) ) 98 CALL cft_wave_tg(ik, evc, tg_psic, 1, v_siz, ibnd, nbnd_occ(ikk) ) 101 CALL cft_wave_tg(ik, dvpsi1, tg_psic, -1, v_siz, ibnd, nbnd_occ(ikk))
|
H A D | lr_sternheimer.f90 | 120 INTEGER :: ltaver, lintercall, incr, jpol, v_siz, nwordd0psi local 193 v_siz = dffts%nnr_tg 194 ALLOCATE( tg_dv ( v_siz, nspin_mag ) ) 195 ALLOCATE( tg_psic( v_siz, npol ) ) 367 CALL cft_wave_tg (ik, evc, tg_psic, 1, v_siz, ibnd, & 369 CALL apply_dpot(v_siz, tg_psic, tg_dv, 1) 370 CALL cft_wave_tg (ik, aux2, tg_psic, -1, v_siz, ibnd, &
|
H A D | lr_apply_liouvillian.f90 | 332 INTEGER :: v_siz, incr, ioff local 393 v_siz = dffts%nnr_tg 397 ALLOCATE( tg_dvrss(1:v_siz) )
|
H A D | lr_calc_dens.f90 | 364 INTEGER :: v_siz, incr, ir3, ioff, ioff_tg, nxyp, idx local 375 v_siz = dffts%nnr_tg 379 ALLOCATE( tg_rho( v_siz ) )
|
H A D | lr_read_wf.f90 | 123 INTEGER :: v_siz, incr, ioff, j local 232 v_siz = dffts%nnr_tg
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/PW/src/ |
H A D | vloc_psi.f90 | 48 INTEGER :: v_siz, idx, ioff local 58 v_siz = dffts%nnr_tg 60 ALLOCATE( tg_v ( v_siz ) ) 61 ALLOCATE( tg_psic( v_siz ) ) 258 INTEGER :: v_siz, idx local 266 v_siz = dffts%nnr_tg 268 ALLOCATE( tg_v ( v_siz ) ) 269 ALLOCATE( tg_psic( v_siz ) ) 425 INTEGER :: v_siz, idx, ioff local 436 v_siz = dffts%nnr_tg [all …]
|
H A D | sum_band.f90 | 265 INTEGER :: npw, idx, ioff, ioff_tg, nxyp, incr, v_siz, j, ir3 local 281 v_siz = dffts%nnr_tg 283 ALLOCATE( tg_psi( v_siz ) ) 284 ALLOCATE( tg_rho( v_siz ) ) 509 INTEGER :: idx, ioff, ioff_tg, nxyp, incr, v_siz, j, ir3 local 528 v_siz = dffts%nnr_tg 531 ALLOCATE( tg_psi_nc( v_siz, npol ) ) 532 ALLOCATE( tg_rho_nc( v_siz, nspin_mag ) ) 534 ALLOCATE( tg_psi( v_siz ) ) 535 ALLOCATE( tg_rho( v_siz ) )
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/LR_Modules/ |
H A D | incdrhoscf.f90 | 54 INTEGER :: ibnd, ir, ir3, ig, incr, v_siz, idx, ioff, ioff_tg, nxyp local 72 v_siz = dffts%nnr_tg 74 ALLOCATE( tg_psi( v_siz ) ) 75 ALLOCATE( tg_dpsi( v_siz ) ) 76 ALLOCATE( tg_drho( v_siz ) )
|
H A D | incdrhoscf_nc.f90 | 62 INTEGER :: ibnd, jbnd, ir, ir3, ig, incr, v_siz, idx, ioff, ioff_tg, nxyp local 81 v_siz = dffts%nnr_tg 83 ALLOCATE( tg_psi( v_siz, npol ) ) 84 ALLOCATE( tg_dpsi( v_siz, npol ) ) 85 ALLOCATE( tg_drho( v_siz, nspin_mag ) )
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/PHonon/PH/ |
H A D | solve_e.f90 | 98 integer :: ltaver, lintercall, incr, jpol, v_siz local 147 v_siz = dffts%nnr_tg 148 ALLOCATE( tg_dv ( v_siz, nspin_mag ) ) 149 ALLOCATE( tg_psic( v_siz, npol ) ) 238 call cft_wave_tg (ik, evc, tg_psic, 1, v_siz, ibnd, nbnd_occ (ikk) ) 239 call apply_dpot(v_siz, tg_psic, tg_dv, 1) 240 call cft_wave_tg (ik, aux2, tg_psic, -1, v_siz, ibnd, nbnd_occ (ikk))
|
H A D | solve_linter.f90 | 148 v_siz, & ! size of the potential local 200 v_siz = dffts%nnr_tg 201 ALLOCATE( tg_dv ( v_siz, nspin_mag ) ) 202 ALLOCATE( tg_psic( v_siz, npol ) ) 358 call cft_wave_tg (ik, evc, tg_psic, 1, v_siz, ibnd, nbnd_occ (ikk) ) 359 call apply_dpot(v_siz, tg_psic, tg_dv, 1) 360 call cft_wave_tg (ik, aux2, tg_psic, -1, v_siz, ibnd, nbnd_occ (ikk))
|
H A D | elphon.f90 | 370 INTEGER :: v_siz, incr local 398 v_siz = dffts%nnr_tg 399 ALLOCATE( tg_dv ( v_siz, nspin_mag ) ) 400 ALLOCATE( tg_psic( v_siz, npol ) ) 492 CALL cft_wave_tg (ik, evc, tg_psic, 1, v_siz, ibnd, nbnd ) 493 CALL apply_dpot(v_siz, tg_psic, tg_dv, 1) 494 CALL cft_wave_tg (ik, aux2, tg_psic, -1, v_siz, ibnd, nbnd)
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/HP/src/ |
H A D | hp_solve_linear_system.f90 | 117 v_siz, & ! size of the potential local 179 v_siz = dffts%nnr_tg 180 ALLOCATE( tg_dv ( v_siz, nspin_mag ) ) 181 ALLOCATE( tg_psic( v_siz, npol ) ) 265 CALL cft_wave_tg (ik, evc, tg_psic, 1, v_siz, ibnd, nbnd_occ(ikk) ) 266 CALL apply_dpot(v_siz, tg_psic, tg_dv, 1) 267 CALL cft_wave_tg (ik, aux2, tg_psic, -1, v_siz, ibnd, nbnd_occ(ikk))
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/PP/src/ |
H A D | sum_band_kin.f90 | 178 INTEGER :: npw, idx, ioff, ioff_tg, nxyp, incr, v_siz, j, ir3 local 271 INTEGER :: idx, ioff, ioff_tg, nxyp, incr, v_siz, j, ir3 local
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/test-suite/not_epw_comp/ |
H A D | elphon.f90 | 343 INTEGER :: v_siz, incr local 365 v_siz = dffts%nnr_tg 366 ALLOCATE( tg_dv ( v_siz, nspin_mag ) ) 367 ALLOCATE( tg_psic( v_siz, npol ) ) 458 CALL cft_wave_tg (ik, evc, tg_psic, 1, v_siz, ibnd, nbnd ) 459 CALL apply_dpot(v_siz, tg_psic, tg_dv, 1) 460 CALL cft_wave_tg (ik, aux2, tg_psic, -1, v_siz, ibnd, nbnd)
|