QPMS
/
qpms
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Vzor integrálů byl blbě 

Former-commit-id: bea91548fa572125a6aa6dce99c68f7ed4898b1c
This commit is contained in:
Marek Nečada 2018-01-16 20:21:29 +00:00
parent 53f3e33a0b
commit 594075e837
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
besseltransforms/vzor.m
View File

@ -1,6 +1,6 @@
$Assumptions = k >= 0 && k0 >= 0 && c >= 0 && n >= 0 ; $Assumptions = k >= 0 && k0 >= 0 && c >= 0 && n >= 0 ;
Refine[Integrate[(1 - Exp[-c x])^\[Kappa] (k0 x)^(-q) Exp[ Refine[Integrate[(1 - Exp[-c x])^\[Kappa] (k0 x)^(-q) Exp[
I k0 x] x BesselJ[n, k x] Exp[-c x], {x, I k0 x] x BesselJ[n, k x], {x,
0, \[Infinity]}], {\[Kappa] == kk, q == qq, n == nn}] 0, \[Infinity]}], {\[Kappa] == kk, q == qq, n == nn}]
Series[%, {k, \[Infinity], 10}] Series[%, {k, \[Infinity], 10}]
Quit[ ] Quit[ ]