Searched refs:nwordrestart (Results 1 – 4 of 4) sorted by relevance
/dports/science/quantum-espresso/q-e-qe-6.7.0/TDDFPT/src/ |
H A D | lr_write_restart.f90 | 22 evc1,evc1_new,evc1_old,iunrestart, nwordrestart, & 169 nwordrestart = 2 * nbnd * npwx * npol * nksq 171 …CALL diropn ( iunrestart, 'restart_lanczos.'//trim(int_to_char(LR_polarization)), nwordrestart, ex… 173 CALL davcio(evc1(:,:,:,1),nwordrestart,iunrestart,1,1) 174 CALL davcio(evc1(:,:,:,2),nwordrestart,iunrestart,2,1) 175 CALL davcio(evc1_old(:,:,:,1),nwordrestart,iunrestart,3,1) 176 CALL davcio(evc1_old(:,:,:,2),nwordrestart,iunrestart,4,1)
|
H A D | lr_restart.f90 | 23 restart, nwordrestart, iunrestart,project,nbnd_total,F, & 188 nwordrestart = 2 * nbnd * npwx * npol * nksq 190 …CALL diropn ( iunrestart, 'restart_lanczos.'//trim(int_to_char(LR_polarization)), nwordrestart, ex… 192 CALL davcio(evc1(:,:,:,1),nwordrestart,iunrestart,1,-1) 193 CALL davcio(evc1(:,:,:,2),nwordrestart,iunrestart,2,-1) 194 CALL davcio(evc1_old(:,:,:,1),nwordrestart,iunrestart,3,-1) 195 CALL davcio(evc1_old(:,:,:,2),nwordrestart,iunrestart,4,-1)
|
H A D | lr_dav_routines.f90 | 246 USE lr_variables, ONLY : nwordrestart, iunrestart 292 nwordrestart = 2 * npwx * nbnd * nks * num_basis_max 295 CALL davcio(vec_b(:,:,:,:), nwordrestart, iunrestart, 1, 1) 305 nwordrestart = 2 * num_basis_max * num_basis_max 308 CALL davcio(M_C(:,:), nwordrestart, iunrestart, 1, 1) 309 CALL davcio(M_D(:,:), nwordrestart, iunrestart, 2, 1) 386 nwordrestart = 2 * npwx * nbnd * nks * num_basis_max 389 CALL davcio(vec_b(:,:,:,:), nwordrestart, iunrestart, 1, -1) 407 nwordrestart = 2 * num_basis_max * num_basis_max 410 CALL davcio(M_C(:,:), nwordrestart, iunrestart, 1, -1) [all …]
|
H A D | lr_variables.f90 | 26 INTEGER :: nwordd0psi, nwordrestart, n_ipol variable
|