Home
last modified time | relevance | path

Searched refs:lrdrho (Results 1 – 21 of 21) sorted by relevance

/dports/science/quantum-espresso/q-e-qe-6.7.0/PHonon/PH/
H A Ddfile_star.f90100 USE units_ph, ONLY : lrdrho
211 CALL diropn(iudfile, source, lrdrho, exst)
218 CALL davcio( dfile_at(:,:,imode0+ipert), lrdrho, iudfile, imode0 + ipert, -1 )
379 CALL diropn (iudfile_rot, TRIM(dfile_rot_name), lrdrho, exst, descr%dir)
386 CALL davcio( dfile_rot(:,:,imode0), lrdrho, iudfile_rot, imode0, + 1 )
403 CALL diropn (iudfile_rot, TRIM(dfile_rot_name), lrdrho, exst, descr%dir)
410 CALL davcio( CONJG(dfile_rot(:,:,imode0)), lrdrho, iudfile_rot, imode0, + 1 )
H A Dset_dvscf.f9021 USE units_ph, ONLY : iudrho, lrdrho
39 call davcio_drho (derho (1, 1), lrdrho, iudrho, ipl, -1)
H A Dopenfilq.f9020 lrdrhous, lrebar, lrdrho, lint3paw, iuint3paw, &
155 lrdrho = 2 * dfftp%nr1x * dfftp%nr2x * dfftp%nr3x * nspin_mag
191 CALL diropn (iudvscf, fildvscf_rot, lrdrho, exst, dvscf_star%dir)
193 CALL diropn (iudvscf, fildvscf, lrdrho, exst )
H A Dpunch_plot_e.f9033 USE units_ph, ONLY : iudrho, lrdrho
75 CALL davcio_drho (aux (1,1,ipol), lrdrho, iudrho, ipol, - 1)
H A Del_opt.f9024 USE units_ph, ONLY : iudrho, lrdrho, lrdwf, iudwf
101 call davcio_drho (aux3 (1, ipa), lrdrho, iudrho, ipa, -1)
H A Dsolve_e_fpol.f9045 USE units_ph, ONLY : lrdwf, iudwf, iudrho, lrdrho
138 CALL diropn (iudrho, TRIM(fildrho)//'.E', lrdrho, exst)
318 if (fildrho.ne.' ') call davcio_drho(dvscfout(1,1,ipol),lrdrho, &
H A Dsolve_e.f9049 USE units_ph, ONLY : lrdwf, iudwf, lrdrho, iudrho
157 CALL diropn (iudrho, TRIM(fildrho)//'.E', lrdrho, exst)
357 if (fildrho.ne.' ') call davcio_drho(dvscfout(1,1,ipol),lrdrho, &
H A Ddvpsi_e2.f9028 USE units_ph, ONLY : lrdrho, iudrho, lrdwf, iudwf
166 call davcio_drho (aux3 (1, ipa), lrdrho, iudrho, ipa, -1)
H A Dsolve_linter.f9062 USE units_ph, ONLY : iudrho, lrdrho, iudwf, lrdwf, iubar, lrbar, &
231 CALL diropn (iudrho, filename, lrdrho, exst)
569 call davcio_drho (drhoscfh(1,1,ipert), lrdrho, iudrho, imode0+ipert, +1)
716 call davcio_drho ( dvscfin(1,1,ipert), lrdrho, iudvscf, imode0 + ipert, +1 )
H A Ddvscf_q2r.f90785 INTEGER :: lrdrho local
857 lrdrho = 2 * dfftp%nr1x * dfftp%nr2x * dfftp%nr3x * nspin_mag
952 CALL diropn(iudvscf, fildvscf, lrdrho, exst, tmp_dir_phq)
967 CALL davcio_drho(dvscf_p, lrdrho, iudvscf, imode, -1)
H A Dphcom.f90315 lrdrho, & ! the length of the deltarho files variable
H A Dep_matrix_element_wannier.f9025 USE units_ph, ONLY : iudyn, lrdrho, iudvscf
106 CALL davcio_drho ( dvscfin(1,1,ipert), lrdrho, iudvscf, &
H A Delphon.f9034 USE units_ph, ONLY : iudyn, lrdrho, iudvscf, iuint3paw, lint3paw
97 CALL davcio_drho ( dvscfin(1,1,ipert), lrdrho, iudvscf, &
/dports/science/quantum-espresso/q-e-qe-6.7.0/GWW/head/
H A Dopenfilq.f9023 lrdrhous, lrebar, lrdrho
129 lrdrho = 2 * dfftp%nr1x * dfftp%nr2x * dfftp%nr3x * nspin_mag
156 CALL diropn (iudvscf, fildvscf, lrdrho, exst)
H A Dsolve_head.f90208 CALL DIROPN (iudrho, TRIM(fildrho)//'.E', lrdrho, exst)
/dports/science/quantum-espresso/q-e-qe-6.7.0/TDDFPT/src/
H A Dlr_init_nfo.f9024 & lrdrho, nwordd0psi, iund0psi, iudwf, iu1dwf,&
102 lrdrho = 2 * dfftp%nr1x * dfftp%nr2x * dfftp%nr3x * nspin_mag
H A Dlr_variables.f9063 INTEGER :: lrdrho variable
H A Dlr_sternheimer.f9072 lrdrho, iudrho, n_ipol, lr_verbosity, &
/dports/science/quantum-espresso/q-e-qe-6.7.0/EPW/src/
H A Dio_epw.f901430 USE units_ph, ONLY : lrdrho
1473 unf_recl = unf_recl * lrdrho
1792 USE units_ph, ONLY : lrdrho, lint3paw
1814 lrdrho = 2 * dfftp%nr1x * dfftp%nr2x * dfftp%nr3x * nspin_mag
/dports/science/berkeleygw/BGW-2.0.0/MeanField/ESPRESSO/version-4.3.2/
H A Dpw2bgw.f901236 USE units_ph, ONLY : iudvscf, lrdrho
1339 CALL davcio_drho(dvscf, lrdrho, iudvscf, dfpt_mode, - 1 )
1934 USE units_ph, ONLY : iudvscf, lrdrho
1948 lrdrho = 2 * nr1x * nr2x * nr3x * nspin ! from PH/openfilq.f90
1958 CALL diropn (iudvscf, filename, lrdrho, exst, tmp_dir_ = tmp_dir_ph )
1969 unf_recl = DIRECT_IO_FACTOR * int(lrdrho, kind=kind(unf_recl))
/dports/science/quantum-espresso/q-e-qe-6.7.0/test-suite/not_epw_comp/
H A Delphon.f9034 USE units_ph, ONLY : iudyn, lrdrho, iudvscf, iuint3paw, lint3paw
80 CALL davcio_drho ( dvscfin(1,1,ipert), lrdrho, iudvscf, &