1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
|
jn(3,4);
0.1320342093678868 ;
j0(1);
0.7651977429270344 ;
bessel(2,3);
0.1289432631185581-5.717744444379852e-08*%i;
(assume(p>0),true);
true$
(assume(4*p+a>0),true);
true$
specint(t^(1/2)*%e^(-a*t/4)*%e^(-p*t),t);
sqrt(%pi)/(2*(p+a/4)^(3/2));
specint(t^(3/4)*%e^(-t^2/2/b)*%e^(-p*t),t);
3*gamma(3/4)*b^(7/8)*%e^(b*p^2/4)*(8*sqrt(%pi)*%m[-5/8,-1/4](b*p^2/2)/(3*2^
(5/8)*gamma(3/8)*b^(1/4)*sqrt(p))-2^(3/8)*sqrt(%pi)*%m[-5/8,1/4](b*p^2/2)/
(gamma(7/8)*b^(1/4)*sqrt(p)))/4 $
specint(t^(-1/2)*%e^(-2*a^(1/2)*t^(1/2))*%e^(-p*t),t);
sqrt(2)*%e^(a/(2*p))*(sqrt(%pi)*%e^(a/(2*p))/sqrt(2)-sqrt(2)*sqrt(%pi)*erf
(sqrt(a)/sqrt(p))*%e^(a/(2*p))/2)/sqrt(p) $
radcan(specint(sin(a*t)*cosh(b*t^2)*%e^(-p*t),t));
-%e^-((p^2+2*%i*a*p+a^2)/(4*b))*(sqrt(%pi)*%e^((2*%i*a*p+a^2)/(2*b))*erf((%i
*p+a)/(2*sqrt(b)))-sqrt(%pi)*%e^(a^2/(2*b))*erf((%i*p-a)/(2*sqrt(b)))+sqrt
(%pi)*%i*%e^((p^2+2*%i*a*p)/(2*b))*erf((p+%i*a)/(2*sqrt(b)))-sqrt(%pi)*%i*%e
^(p^2/(2*b))*erf((p-%i*a)/(2*sqrt(b)))+(sqrt(%pi)*%i-sqrt(%pi)*%i*%e^(%i*a
*p/b))*%e^(p^2/(2*b))-sqrt(%pi)*%e^((2*%i*a*p+a^2)/(2*b))+sqrt(%pi)*%e^(a^2/
(2*b)))/(8*sqrt(b)) $
specint(t^(1/2)*%j[1](2*a^(1/2)*t^(1/2))*%e^(-p*t),t);
sqrt(a)*%e^-(a/p)/p^2$
specint(t^2*%j[1](a*t)*%e^(-p*t),t);
3*a/((a^2/p^2+1)^(5/2)*p^4) ;
specint(t*hstruve[1](t)*%e^(-p*t),t);
16*(2*p*sqrt(p^2+1)+2*p^2)/(9*%pi^(3/2)*p^4*(2*p*sqrt(p^2+1)+2*p^2+1)) $
radcan(specint(t^(3/2)*hstruve[1](t^(1/2))*%e^(-p*t),t));
%e^-(1/(4*p))*((140*p^(3/2)+10*sqrt(p))*%e^(1/(4*p))+140*sqrt(%pi)*%i*erf(%i/
(2*sqrt(p)))*p^2+20*sqrt(%pi)*%i*erf(%i/(2*sqrt(p)))*p+5*sqrt(%pi)*%i*erf
(%i/(2*sqrt(p))))/(8*%pi*p^4) $
specint(t*%ibes[0](a*t/2)*%ibes[1](a*t/2)*%e^(-p*t),t);
%ibes[0](a*t/2)*%ibes[1](a*t/2)/p^2 $
specint(t^(3/4)*%j[1/2](t)*%j[1/4](t)*%e^(-p*t),t);
2*%i*(1/(2*%i/p+1)^(3/4)-1/(1-2*%i/p)^(3/4))/(2^(3/4)*gamma(1/4)*p^(3/2)) $
specint(t^(5/2)*%y[1/2](t^(1/2))^2*%e^(-p*t),t);
-12*((-3*sqrt(%pi)*%i*erf(%i/sqrt(p))*p^(5/2)*%e^-(1/p)/8-sqrt(%pi)*%i*erf
(%i/sqrt(p))*p^(3/2)*%e^-(1/p)/2-sqrt(%pi)*%i*erf(%i/sqrt(p))*sqrt(p)*%e^-
(1/p)/2-3*p^2/4-p/2)/p^2+2*(sqrt(%pi)*%i*erf(%i/sqrt(p))*p^(3/2)*%e^-(1/p)/4
+sqrt(%pi)*%i*erf(%i/sqrt(p))*sqrt(p)*%e^-(1/p)/2+p/2)/p-sqrt(%pi)*%i*erf
(%i/sqrt(p))*sqrt(p)*%e^-(1/p)/2)/(%pi*p^4) $
specint(t^(1/2)*%j[1/2](t^(1/2))^2*%e^(-p*t),t);
-%i*erf(%i/sqrt(p))*%e^-(1/p)/(sqrt(%pi)*p^(3/2)) $
specint(t^(1/2)*%ibes[1](t)*%e^(-p*t),t);
sqrt(%pi)*%ibes[1](t)/(2*p^(3/2)) $
specint( t*%h[2/3,1](t^(1/2))*%e^(-p*t),t);
-4*%i*gamma(1/3)*%m[-3/2,1/3](-1/(4*p))*%e^-(1/(8*p))/(3*(-1)^(5/6)*sqrt(3)
*gamma(2/3)*p^(3/2))+4*gamma(1/3)*%m[-3/2,1/3](-1/(4*p))*%e^-(1/(8*p))/(3*(
-1)^(5/6)*gamma(2/3)*p^(3/2))-8*%i*gamma(2/3)*%m[-3/2,-1/3](-1/(4*p))*%e^-
(1/(8*p))/(3*(-1)^(1/6)*sqrt(3)*gamma(1/3)*p^(3/2)) $
specint( t^(1/2)*%h[3/4,2](t)*%e^(-p*t),t);
5*%i*gamma(1/4)*%p[-3/2,-3/4](1/sqrt(1/p^2+1))*(1/p^4-1)^(3/8)*p^(9/4)/(18*(
-1)^(1/4)*sqrt(2)*gamma(3/4)^2)+5*gamma(1/4)*%p[-3/2,-3/4](1/sqrt(1/p^2+1))*
(1/p^4-1)^(3/8)*p^(9/4)/(18*(-1)^(1/4)*sqrt(2)*gamma(3/4)^2)+4*%i*gamma(3/4)
*%p[-3/2,3/4](1/sqrt(1/p^2+1))*p^(3/4)/((-1)^(3/4)*gamma(1/4)^2*(1/p^4-1)^
(3/8)) $
specint( t^(3/2)*%h[1/2,1](t)*%e^(-p*t),t);
4/(sqrt(2)*sqrt(%pi)*(1/p^2+1)^2*p^3)-sqrt(2)*%i*(1/(1/p^2+1)-1/((1/p^2+1)^2
*p^2))/(sqrt(%pi)*p^2) $
specint( t^(3/2)*%y[1](a*t)*%e^(-t),t);
15*%i*(1/(a^2+1)-1)^(3/4)*(1/(sqrt(a^2+1)+1)^(3/2)+1/(1-sqrt(a^2+1))^(3/2))/
(16*sqrt(a^2+1)) $
specint( t^2*%j[1](a*t)*%e^(-p*t),t);
3*a/((a^2/p^2+1)^(5/2)*p^4) $
specint(t^(1/2)*%j[1](2*a^(1/2)*t^(1/2))*%e^(-p*t),t);
sqrt(a)*%e^-(a/p)/p^2 $
specint( t^(3/2)*%m[1/2,1](t)*%e^(-p*t),t);
6*(1/(1-1/(p+1/2))+1/((p+1/2)*(1-1/(p+1/2))^2))/(p+1/2)^4 ;
(assume(p>a),true);
true;
specint(%e^(a*t)*t^2*erf(t^(1/2))*%e^(-p*t),t);
15*(1/sqrt(1/(p-a)+1)-1/((p-a)*(1/(p-a)+1)^(3/2))+3/(4*(p-a)^2*(1/(p-a)+1)^
(5/2)))/(4*(p-a)^(7/2)) ;
|
