4 lines
122 B
Text
4 lines
122 B
Text
|
forwardDifference(x(1),n) :=
|
||
|
|
x when n = 0 or size(x) = 1 else
|
||
|
|
forwardDifference(tail(x) - x[1 ... size(x) - 1], n - 1);
|