Go to the source code of this file.
|
| subroutine | eveqnfvr (nmatp, ngp, vpc, h_, o_, evalfv, evecfv) |
| |
| elemental integer function | map (i, j) |
| |
◆ eveqnfvr()
| subroutine eveqnfvr |
( |
integer, intent(in) |
nmatp, |
|
|
integer, intent(in) |
ngp, |
|
|
real(8), dimension(3), intent(in) |
vpc, |
|
|
real(8), dimension(*), target |
h_, |
|
|
real(8), dimension(*), target |
o_, |
|
|
real(8), dimension(nstfv), intent(out) |
evalfv, |
|
|
complex(8), dimension(nmatmax,nstfv), intent(out) |
evecfv |
|
) |
| |
◆ map()
| elemental integer function eveqnfvr::map |
( |
integer, intent(in) |
i, |
|
|
integer, intent(in) |
j |
|
) |
| |