Searched refs:l_symb (Results 1 – 1 of 1) sorted by relevance
/dports/science/quantum-espresso/q-e-qe-6.7.0/PP/src/ |
H A D | write_hamiltonians.f90 | 176 CHARACTER :: l_symb(4) local 177 DATA l_symb/'s','p','d','f'/ 239 …WRITE(iunsystem,'(a3,i3,a2,i2,i4,4x,7i2)') atm(ityp(block_atom(i))), block_atom(i), l_symb(block_l…
|