このディレクトリの索引

ラグランジェ補間(Lx,Ly,_x,_y) :- ラグランジェ補間(Lx,Ly,Lx,Ly,_x,0,_y). ラグランジェ補間([],[],_,_,_,Y,Y). ラグランジェ補間([_xi|R1],[_yi|R2],Lx,Ly,X,Y_1,Y) :- ラグランジェ補間(Lx,_xi,R1,X,1,Y_2), Y_3 is Y_1 + Y_2 * _yi, ラグランジェ補間(R1,R2,Lx,Ly,X,Y_3,Y). ラグランジェ補間([],_,_,_,Y,Y) :- !. ラグランジェ補間([_xj|R1],_xi,R,X,Y_1,Y) :- 'R1とRが一致しない時に、Y_2 is Y_1 * ((X - _xj) / (_xi - _xj)) を計算する'([_xj|R1],_xi,R,X,Y_1,Y). 'R1とRが一致しない時に、Y_2 is Y_1 * ((X - _xj) / (_xi - _xj)) を計算する'([_xj|R],_xi,R,X,Y_1,Y) :- ラグランジェ補間(R,_xi,R,X,Y_1,Y),!. 'R1とRが一致しない時に、Y_2 is Y_1 * ((X - _xj) / (_xi - _xj)) を計算する'([_xj|R1],_xi,R,X,Y_1,Y) :- Y_2 is Y_1 * ((X - _xj) / (_xi - _xj)), ラグランジェ補間(R1,_xi,R,X,Y_2,Y).