Searched refs:dummy_charge (Results 1 – 1 of 1) sorted by relevance
| /dports/science/quantum-espresso/q-e-qe-6.7.0/atomic/src/ |
| H A D | atomic_paw.f90 | 810 REAL(DP) :: dummy_charge,aux1(ndmx),aux2(ndmx),res1,res2 local
828 dummy_charge=int_0_inf_dr(rhovtot,pawset_%grid,pawset_%grid%mesh,2)
830 FPI*dummy_charge * pawset_%grid%r(1:pawset_%grid%mesh)
834 WRITE (stdout,'(4(A,1e15.7))') ' INT rho', dummy_charge,' INT V_H', &
|