5 lines
139 B
Mathematica
5 lines
139 B
Mathematica
|
function y=bp4_fcn(t)
|
||
|
|
y=1/8*t*(ml_func([1,1.8],-t/2)*ml_func([1,1.2],-t/2)+...
|
||
|
|
ml_func([1,1.7],-t/2)*ml_func([1,1.3],-t/2));
|
||
|
|
end
|