Items tagged with hermite

Hello,

I would like to understand this code which has been discussed in the forum a moment ago.

http://www.mapleprimes.com/posts/120138-Exact-Cubic-Hermite-Spline

Here the Maple code :

alec_modified_hermit.mw

Does somebody know the theoric developpements to this code ?

May you help me to add comments so as to facilitate the link with the theory ? One line in front of each procedure should be enough for me to understand. For the moment, I didn't manage to match it with the theory.

When I would understand this code, I would like in a second step compare the result with Catmull-Rom splines.

Thanks a lot for your help.

 @acer : I think this subject may interest you

 

use the formula provided in

http://en.wikipedia.org/wiki/Hermite_polynomials

and run in Maple

Restart;
with(SumTools):
Hn := n!*Summation(((-1)^(n/2-l))/((2*l)!*(n/2-l)!)*((2*x)^(2*l)),l=0..n/2);
genfun := Summation(Hn/n!*z^n,n=0..infinity);

but result is not exp(2*x*t - t^2)

Following Christopher2222 request, I wrote the following procedures for "exact" cubic Hermite spline interpolation,

p:=proc(x0,p0,m0,x1,p1,m1,x)
local t,d;
d:=x1-x0;
t:=(x-x0)/d;
p0+(d*m0+(3*(p1-p0)-d*(2*m0+m1)+(2*(p0-p1)+d*(m0+m1))*t)*t)*t
end:

pb:=proc(x0,p0,x1,p1,m1,x)
local t,d;
d:=x1-x0;
t:=(x-x0)/d;
p0+(2*(p1-p0)-d*m1+(p0-p1+d*m1)*t)*t
end:

pe:=proc(x0,p0,m0,x1,p1,x...
Page 1 of 1