Searched defs:stress_local_x (Results 1 – 1 of 1) sorted by relevance
| /dports/science/quantum-espresso/q-e-qe-6.7.0/CPV/src/ |
| H A D | stress.f90 | 87 SUBROUTINE stress_local_x( deps, epseu, gagb, sfac, rhoe, drhoe, omega ) subroutine
99 REAL(DP), INTENT(IN) :: omega
100 REAL(DP), INTENT(OUT) :: deps(:)
101 REAL(DP), INTENT(IN) :: gagb(:,:)
102 COMPLEX(DP), INTENT(IN) :: rhoe(:)
103 COMPLEX(DP), INTENT(IN) :: drhoe(:,:)
104 COMPLEX(DP), INTENT(IN) :: sfac(:,:)
105 REAL(DP), INTENT(IN) :: epseu
107 INTEGER :: ig,k,is, ispin
108 COMPLEX(DP) :: dsvp, svp, depst(6)
[all …]
|