3.563 \(\int \frac{e^x (1-\cos (x))}{1+\sin (x)} \, dx\)

Optimal. Leaf size=13 \[ -\frac{e^x \cos (x)}{\sin (x)+1} \]

[Out]

-((E^x*Cos[x])/(1 + Sin[x]))

_______________________________________________________________________________________

Rubi [A]  time = 0.0364646, antiderivative size = 13, normalized size of antiderivative = 1., number of steps used = 1, number of rules used = 1, integrand size = 16, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0.062 \[ -\frac{e^x \cos (x)}{\sin (x)+1} \]

Antiderivative was successfully verified.

[In]  Int[(E^x*(1 - Cos[x]))/(1 + Sin[x]),x]

[Out]

-((E^x*Cos[x])/(1 + Sin[x]))

_______________________________________________________________________________________

Rubi in Sympy [A]  time = 3.05096, size = 12, normalized size = 0.92 \[ - \frac{e^{x} \cos{\left (x \right )}}{\sin{\left (x \right )} + 1} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  rubi_integrate(exp(x)*(1-cos(x))/(1+sin(x)),x)

[Out]

-exp(x)*cos(x)/(sin(x) + 1)

_______________________________________________________________________________________

Mathematica [A]  time = 0.0596314, size = 23, normalized size = 1.77 \[ -\frac{e^x \left (\cot \left (\frac{x}{2}\right )-1\right )}{\cot \left (\frac{x}{2}\right )+1} \]

Antiderivative was successfully verified.

[In]  Integrate[(E^x*(1 - Cos[x]))/(1 + Sin[x]),x]

[Out]

-((E^x*(-1 + Cot[x/2]))/(1 + Cot[x/2]))

_______________________________________________________________________________________

Maple [B]  time = 0.091, size = 51, normalized size = 3.9 \[{1 \left ({{\rm e}^{x}}\tan \left ({\frac{x}{2}} \right ) +{{\rm e}^{x}} \left ( \tan \left ({\frac{x}{2}} \right ) \right ) ^{3}-{{\rm e}^{x}} \left ( \tan \left ({\frac{x}{2}} \right ) \right ) ^{2}-{{\rm e}^{x}} \right ) \left ( \left ( \tan \left ({\frac{x}{2}} \right ) \right ) ^{2}+1 \right ) ^{-1} \left ( 1+\tan \left ({\frac{x}{2}} \right ) \right ) ^{-1}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  int(exp(x)*(1-cos(x))/(1+sin(x)),x)

[Out]

(exp(x)*tan(1/2*x)+exp(x)*tan(1/2*x)^3-exp(x)*tan(1/2*x)^2-exp(x))/(tan(1/2*x)^2
+1)/(1+tan(1/2*x))

_______________________________________________________________________________________

Maxima [A]  time = 1.92338, size = 30, normalized size = 2.31 \[ -\frac{2 \, \cos \left (x\right ) e^{x}}{\cos \left (x\right )^{2} + \sin \left (x\right )^{2} + 2 \, \sin \left (x\right ) + 1} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate(-(cos(x) - 1)*e^x/(sin(x) + 1),x, algorithm="maxima")

[Out]

-2*cos(x)*e^x/(cos(x)^2 + sin(x)^2 + 2*sin(x) + 1)

_______________________________________________________________________________________

Fricas [A]  time = 0.214799, size = 32, normalized size = 2.46 \[ -\frac{{\left (\cos \left (x\right ) + 1\right )} e^{x} - e^{x} \sin \left (x\right )}{\cos \left (x\right ) + \sin \left (x\right ) + 1} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate(-(cos(x) - 1)*e^x/(sin(x) + 1),x, algorithm="fricas")

[Out]

-((cos(x) + 1)*e^x - e^x*sin(x))/(cos(x) + sin(x) + 1)

_______________________________________________________________________________________

Sympy [F]  time = 0., size = 0, normalized size = 0. \[ - \int \left (- \frac{e^{x}}{\sin{\left (x \right )} + 1}\right )\, dx - \int \frac{e^{x} \cos{\left (x \right )}}{\sin{\left (x \right )} + 1}\, dx \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate(exp(x)*(1-cos(x))/(1+sin(x)),x)

[Out]

-Integral(-exp(x)/(sin(x) + 1), x) - Integral(exp(x)*cos(x)/(sin(x) + 1), x)

_______________________________________________________________________________________

GIAC/XCAS [A]  time = 0.218446, size = 28, normalized size = 2.15 \[ \frac{e^{x} \tan \left (\frac{1}{2} \, x\right ) - e^{x}}{\tan \left (\frac{1}{2} \, x\right ) + 1} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate(-(cos(x) - 1)*e^x/(sin(x) + 1),x, algorithm="giac")

[Out]

(e^x*tan(1/2*x) - e^x)/(tan(1/2*x) + 1)