Lines Matching defs:chargeps
10 subroutine chargeps(rho_i,phi_i,nwf_i,ll_i,jj_i,oc_i,iswf_i) subroutine
23 nwf_i, & ! input: the number of wavefunctions
24 iswf_i(nwfsx),& ! input: their spin
25 ll_i(nwfsx) ! input: their angular momentum
28 jj_i(nwfsx), & ! input: their total angular momentum
29 oc_i(nwfsx), & ! input: the occupation
30 phi_i(ndmx,nwfsx), & ! input: the functions to add
31 rho_i(ndmx,2) ! output: the (nspin) components of the charge
34 is, & ! counter on spin
35 n,n1,n2,& ! counters on beta and mesh function
36 ns,nst,ikl ! counter on wavefunctions
39 work(nwfsx), & ! auxiliary variable for becp
40 int_0_inf_dr,& ! integration function
41 gi(ndmx) ! used to compute the integrals