Go to the source code of this file.
|
subroutine | genppts (tfbz, nsym, sym, ngridp, npptnr, epslat, bvec, boxl, nppt, ipvip, ipvipnr, ivp, vpl, vpc, wppt, wpptnr) |
|
pure subroutine | i3mtrv (a, x, y) |
|
◆ genppts()
subroutine genppts |
( |
logical, intent(in) |
tfbz, |
|
|
integer, intent(in) |
nsym, |
|
|
integer, dimension(3,3,*), intent(in) |
sym, |
|
|
integer, dimension(3), intent(in) |
ngridp, |
|
|
integer, intent(in) |
npptnr, |
|
|
real(8), intent(in) |
epslat, |
|
|
real(8), dimension(3,3), intent(in) |
bvec, |
|
|
real(8), dimension(3,0:3), intent(in) |
boxl, |
|
|
integer, intent(out) |
nppt, |
|
|
integer, dimension(0:ngridp(1)-1,0:ngridp(2)-1,0:ngridp(3)-1), intent(out) |
ipvip, |
|
|
integer, dimension(0:ngridp(1)-1,0:ngridp(2)-1,0:ngridp(3)-1), intent(out) |
ipvipnr, |
|
|
integer, dimension(3,npptnr), intent(out) |
ivp, |
|
|
real(8), dimension(3,npptnr), intent(out) |
vpl, |
|
|
real(8), dimension(3,npptnr), intent(out) |
vpc, |
|
|
real(8), dimension(npptnr), intent(out) |
wppt, |
|
|
real(8), intent(out) |
wpptnr |
|
) |
| |
◆ i3mtrv()
pure subroutine genppts::i3mtrv |
( |
integer, dimension(3,3), intent(in) |
a, |
|
|
real(8), dimension(3), intent(in) |
x, |
|
|
real(8), dimension(3), intent(out) |
y |
|
) |
| |
|
private |