Searched refs:nwordd0psi (Results 1 – 5 of 5) sorted by relevance
/dports/science/quantum-espresso/q-e-qe-6.7.0/TDDFPT/src/ |
H A D | lr_read_d0psi.f90 | 21 & lr_verbosity, nwordd0psi, iund0psi, eels 40 nwordd0psi = 2 * nbnd * npwx * npol * nksq 52 CALL diropn ( iund0psi, 'd0psi.'//trim(int_to_char(LR_polarization)), nwordd0psi, exst) 60 CALL diropn ( iund0psi, 'd0psi.'//trim(int_to_char(LR_polarization)), nwordd0psi, exst) 71 CALL diropn ( iund0psi, 'd0psi.'//trim(int_to_char(ip)), nwordd0psi, exst) 79 CALL diropn ( iund0psi, 'd0psi.'//trim(int_to_char(LR_polarization)), nwordd0psi, exst) 88 CALL davcio(d0psi(1,1,1,ip),nwordd0psi,iund0psi,1,-1) 98 CALL diropn ( iund0psi, 'd0psi2.'//trim(int_to_char(LR_polarization)), nwordd0psi, exst) 99 CALL davcio(d0psi2(1,1,1,1),nwordd0psi,iund0psi,1,-1)
|
H A D | lr_init_nfo.f90 | 24 & lrdrho, nwordd0psi, iund0psi, iudwf, iu1dwf,& 103 nwordd0psi = nbnd * npwx * npol * nksq 104 CALL open_buffer ( iundvpsi, 'dvpsi.', nwordd0psi, io_level, exst_mem, exst) 105 CALL open_buffer ( iudwf, 'dwf', nwordd0psi, io_level, exst_mem, exst) 106 CALL open_buffer ( iu1dwf, 'mwf', nwordd0psi, io_level, exst_mem, exst)
|
H A D | lr_solve_e.f90 | 28 USE lr_variables, ONLY : nwordd0psi, iund0psi,LR_polarization, test_case_no, & 147 nwordd0psi = 2 * nbnd * npwx * npol * nksq 156 & trim(int_to_char(LR_polarization)), nwordd0psi, exst) 158 & trim(int_to_char(ip)), nwordd0psi, exst) 160 CALL davcio(d0psi(1,1,1,ip),nwordd0psi,iund0psi,1,1) 171 & trim(int_to_char(LR_polarization)), nwordd0psi, exst) 172 CALL davcio(d0psi2(1,1,1,1),nwordd0psi,iund0psi,1,1)
|
H A D | lr_variables.f90 | 26 INTEGER :: nwordd0psi, nwordrestart, n_ipol variable
|
H A D | lr_sternheimer.f90 | 120 INTEGER :: ltaver, lintercall, incr, jpol, v_siz, nwordd0psi local
|