Skip to main content
. 2019 May 11;21(5):485. doi: 10.3390/e21050485
assume(gamma>0);
Cauchy(x,gamma) := gamma/(%pi∗(x∗∗2+gamma∗∗2));
assume(alpha>0);
assume(alpha<1);
h(x,y,alpha) := (x∗y)/((1-alpha)∗y+alpha∗x);
assume(gamma1>0);
assume(gamma2>0);
m(x,alpha) := ratsimp(h(Cauchy(x,gamma1),Cauchy(x,gamma2),alpha));
/∗ calculate Z ∗/
integrate(m(x,alpha),x,-inf,inf);