Searched defs:wannier_startup (Results 1 – 1 of 1) sorted by relevance
/dports/science/quantum-espresso/q-e-qe-6.7.0/CPV/src/ |
H A D | wannier.f90 | 195 SUBROUTINE wannier_startup( ibrav, alat, a1, a2, a3, b1, b2, b3 ) subroutine 207 INTEGER :: ibrav 208 REAL(DP) :: a1(3), a2(3), a3(3) 209 REAL(DP) :: b1(3), b2(3), b3(3) 210 REAL(DP) :: alat 211 CHARACTER(LEN=256) :: fname 213 INTEGER :: i local 249 WRITE( stdout, * ) "wannier_startup IBRAV SELECTED:",ibrav argument 294 END SUBROUTINE wannier_startup argument
|