Searched refs:k_rap (Results 1 – 1 of 1) sorted by relevance
| /dports/science/quantum-espresso/q-e-qe-6.7.0/PP/src/ |
| H A D | plotband.f90 | 30 real, ALLOCATABLE :: e_rap(:,:), k_rap(:,:) variable
102 ALLOCATE(k_rap(3,nks))
146 READ(21,*,end=20,err=20) (k_rap(i,n),i=1,3), high_symmetry(n)
148 IF (abs(k(1,n)-k_rap(1,n))+abs(k(2,n)-k_rap(2,n))+ &
149 abs(k(3,n)-k_rap(3,n)) > eps ) THEN
154 DEALLOCATE(k_rap)
512 DEALLOCATE(k_rap)
|