Home
last modified time | relevance | path

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 Dlr_read_d0psi.f9021 & 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 Dlr_init_nfo.f9024 & 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 Dlr_solve_e.f9028 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 Dlr_variables.f9026 INTEGER :: nwordd0psi, nwordrestart, n_ipol variable
H A Dlr_sternheimer.f90120 INTEGER :: ltaver, lintercall, incr, jpol, v_siz, nwordd0psi local