Go to the source code of this file.
|
pure subroutine | rschrodint (sol, l, e, nr, r, vr, nn, p0, p1, q0, q1) |
|
pure real(8) function | poly3 (xa, ya, x) |
|
pure real(8) function | poly4i (xa, ya, x) |
|
◆ poly3()
pure real(8) function rschrodint::poly3 |
( |
real(8), dimension(3), intent(in) |
xa, |
|
|
real(8), dimension(3), intent(in) |
ya, |
|
|
real(8), intent(in) |
x |
|
) |
| |
|
private |
◆ poly4i()
pure real(8) function rschrodint::poly4i |
( |
real(8), dimension(4), intent(in) |
xa, |
|
|
real(8), dimension(4), intent(in) |
ya, |
|
|
real(8), intent(in) |
x |
|
) |
| |
|
private |
◆ rschrodint()
pure subroutine rschrodint |
( |
real(8), intent(in) |
sol, |
|
|
integer, intent(in) |
l, |
|
|
real(8), intent(in) |
e, |
|
|
integer, intent(in) |
nr, |
|
|
real(8), dimension(nr), intent(in) |
r, |
|
|
real(8), dimension(nr), intent(in) |
vr, |
|
|
integer, intent(out) |
nn, |
|
|
real(8), dimension(nr), intent(out) |
p0, |
|
|
real(8), dimension(nr), intent(out) |
p1, |
|
|
real(8), dimension(nr), intent(out) |
q0, |
|
|
real(8), dimension(nr), intent(out) |
q1 |
|
) |
| |