Go to the source code of this file.
|
subroutine | rfpts (np, vpl, rfmt, rfir, fp) |
|
subroutine | rfpt (ip) |
|
pure real(8) function | poly4 (xa, ya, x) |
|
◆ poly4()
pure real(8) function rfpts::poly4 |
( |
real(8), dimension(4), intent(in) |
xa, |
|
|
real(8), dimension(4), intent(in) |
ya, |
|
|
real(8), intent(in) |
x |
|
) |
| |
|
private |
◆ rfpt()
subroutine rfpts::rfpt |
( |
integer, intent(in) |
ip | ) |
|
◆ rfpts()
subroutine rfpts |
( |
integer, intent(in) |
np, |
|
|
real(8), dimension(3,np), intent(in) |
vpl, |
|
|
real(8), dimension(npmtmax,natmtot), intent(in) |
rfmt, |
|
|
real(8), dimension(ngtot), intent(in) |
rfir, |
|
|
real(8), dimension(np), intent(out) |
fp |
|
) |
| |