1 ilt((s/((s+2)^2+12))*(s/((s+2)^2+12))*4*%pi*(1-exp(-2*s))/(s^2+16*%pi^2),s,t);
2 scanmap(factor,(integrate(exp(-%i*xi*t)*sin(4*2*%pi*t),t,0,1)));
3 integrate(exp(%i*xi*t)*d18*((%i*xi)/((%i*xi+2)^2+12)),xi,-inf,inf);
4 plot2d (realpart(d60),[t,1,3]);
5 plot2d (realpart(((%i*xi)/((%i*xi+2)^2+12))),[xi,0,8]);
6 plot2d ((4*s/((s+4)^2+16)),[s,0,8]);