|
My own (x,y)-data |
Please specify the number of your data: 4<=n<=200
Please write here your data, each point on a new line, the two values separated by comma or
blank, no parentheses
|
|
Synthetic data |
Choose a function:
|
f(x) = cos(40 π x), entier, derivatives growing fast
|
|
f(x) = exp(sin( π x)) entier
|
|
f(x) = 1/(1+sin(2 π x)2), singular at x=arsinh(-1)/(2 π sqrt(-1))
|
|
Specification of a function of your own:
Please type the evaluation program of your function here
using FORTRAN rules.
Your final statement must be
fu= some expression you computed before or just here depending on x
You may use the constants pi, e(=exp(1)), sqrt2(=1.414...),
the integer variables i,j,k, the logicals bool1,bool2,bool3
and the double precision variables sum,h1,h2,h3,h4,y(100),z(100),a(100,100)
which are all intialized with zero resp. .false. .
The routine has the parameters x
(double, input) and fu (double out). never change x!.
first is a local integer and set 0 before calling the function the
first time.
You may use this in order to initialize some local data and set it 1
afterwards to avoid multiple such initialization. Your settings of the local
variables are preserved during program execution.
|
Specify the number of interpolation points here:
n =
Wichtig : 4 <= n <= 200 !
Specify the interval for the x-data:
|