#include "ester-config.h"
|
subroutine | instruct |
|
subroutine | opacgn93 (z, xh, t6, r) |
|
subroutine | opac (izi, mzin, xh, t6, r) |
|
subroutine | t6rinterp (slr, slt) |
|
subroutine | readco |
|
function | quad (ic, i, x, y1, y2, y3, x1, x2, x3) |
|
subroutine | opaltab |
|
subroutine | spline (X, Y, N, Y2) |
|
subroutine | splint (XA, YA, N, Y2A, X, Y, YP) |
|
subroutine | fity |
|
subroutine | fitx |
|
subroutine | getd (F, N, D, FP1, FPN) |
|
subroutine | interp (FLT, FLRHO, G, DGDT, DGDRHO, IERR) |
|
subroutine | smooth |
|
subroutine getd |
( |
dimension(n) |
F, |
|
|
|
N, |
|
|
dimension(n) |
D, |
|
|
|
FP1, |
|
|
|
FPN |
|
) |
| |
subroutine interp |
( |
|
FLT, |
|
|
|
FLRHO, |
|
|
|
G, |
|
|
|
DGDT, |
|
|
|
DGDRHO, |
|
|
logical |
IERR |
|
) |
| |
subroutine opac |
( |
|
izi, |
|
|
|
mzin, |
|
|
|
xh, |
|
|
|
t6, |
|
|
|
r |
|
) |
| |
subroutine opacgn93 |
( |
|
z, |
|
|
|
xh, |
|
|
|
t6, |
|
|
|
r |
|
) |
| |
function quad |
( |
|
ic, |
|
|
|
i, |
|
|
|
x, |
|
|
|
y1, |
|
|
|
y2, |
|
|
|
y3, |
|
|
|
x1, |
|
|
|
x2, |
|
|
|
x3 |
|
) |
| |
subroutine spline |
( |
dimension(n) |
X, |
|
|
dimension(n) |
Y, |
|
|
|
N, |
|
|
dimension(n) |
Y2 |
|
) |
| |
subroutine splint |
( |
dimension(n) |
XA, |
|
|
dimension(n) |
YA, |
|
|
|
N, |
|
|
dimension(n) |
Y2A, |
|
|
|
X, |
|
|
|
Y, |
|
|
|
YP |
|
) |
| |
subroutine t6rinterp |
( |
|
slr, |
|
|
|
slt |
|
) |
| |