5ce5316a33 2021-03-01 jeff@gridfini: y:=e^(-x)*sin (x);
5ce5316a33 2021-03-01 jeff@gridfini: int (y, x, 0, infinity);
5ce5316a33 2021-03-01 jeff@gridfini: int (e^(-x)*sin (x), x, 0, infinity);
5ce5316a33 2021-03-01 jeff@gridfini: y;
5ce5316a33 2021-03-01 jeff@gridfini: df (y, x);
5ce5316a33 2021-03-01 jeff@gridfini: int (y, x);
5ce5316a33 2021-03-01 jeff@gridfini: g:=ws;
5ce5316a33 2021-03-01 jeff@gridfini: gup:=limit (g, x, infinity);
5ce5316a33 2021-03-01 jeff@gridfini: glw:=sub (x=0, g);
5ce5316a33 2021-03-01 jeff@gridfini: f:=gup-glw;
5ce5316a33 2021-03-01 jeff@gridfini: end;