> | restart; |
> | e:= x-> exp(-2*x); |
> | fsin := x-> Int(2*y/(Pi*(4+y^2))*sin(y*x), y=0..infinity); |
> | fcos := x -> Int(4/(Pi*(4+y*y))*cos(y*x), y=0..infinity); |
> | plot([e(x), fsin(x), fcos(x)], x=0..3, color = [black,black, blue]); |
> | plot(e(x), x=-3..3, color=black); |
> | plot(fcos(x), x=-3..3, color=black); |
> | plot(fsin(x), x=-3..3, color=black); |
> |