blob: fd2a35d00ad0754315fb1d8b1d4b80078797766f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
// 08.05.30
function Out=PointonCurve(T,PtL)
Eps=10^(-4);
N=Trunc(T+Eps);
S=max(T-N,0);
// PtL=Plt;
if N==size(PtL,1)
Out=PtL(N,:);
else
Pa=PtL(N,:);;
Pb=PtL(N+1,:);
Out=(1-S)*Pa+S*Pb;
end
endfunction
|