10 lines
229 B
Text
10 lines
229 B
Text
multiplier(n1,n2)={
|
|
x -> n1 * n2 * x
|
|
};
|
|
|
|
test()={
|
|
my(x = 2.0, xi = 0.5, y = 4.0, yi = 0.25, z = x + y, zi = 1.0 / ( x + y ));
|
|
print(multiplier(x,xi)(0.5));
|
|
print(multiplier(y,yi)(0.5));
|
|
print(multiplier(z,zi)(0.5));
|
|
};
|