reza_ma

5 Reputation

One Badge

6 years, 361 days

MaplePrimes Activity


These are replies submitted by reza_ma

@Markiyan Hirnyk thank you 

W := (1.613785846*BesselJ(1., 3.84*sqrt(-3.000000000*x1+9.000000000))/sqrt(1.-.3333333333*x1)+.8530620159*BesselY(1., 3.84*sqrt(-3.000000000*x1+9.000000000))/sqrt(1.-.3333333333*x1)+0.2623734798e-4*BesselI(1., 3.84*sqrt(-3.000000000*x1+9.000000000))/sqrt(1.-.3333333333*x1)+6366.197722*BesselK(1., 3.84*sqrt(-3.000000000*x1+9.000000000))/sqrt(1.-.3333333333*x1))*(1.613785846*BesselJ(1., 3.84*sqrt(-3.000000000*x2+9.000000000))/sqrt(1.-.3333333333*x2)+.8530620159*BesselY(1., 3.84*sqrt(-3.000000000*x2+9.000000000))/sqrt(1.-.3333333333*x2)+0.2623734798e-4*BesselI(1., 3.84*sqrt(-3.000000000*x2+9.000000000))/sqrt(1.-.3333333333*x2)+6366.197722*BesselK(1., 3.84*sqrt(-3.000000000*x2+9.000000000))/sqrt(1.-.3333333333*x2));

Q := evalf(int(W*exp(-abs(x1-x2)), [x1 = -infinity .. infinity, x2 = -infinity .. infinity]));

Page 1 of 1