26.5.5 problem Exercise 11.5, page 97

Internal problem ID [6978]
Book : Ordinary Differential Equations, By Tenenbaum and Pollard. Dover, NY 1963
Section : Chapter 2. Special types of differential equations of the first kind. Lesson 11, Bernoulli Equations
Problem number : Exercise 11.5, page 97
Date solved : Tuesday, September 30, 2025 at 04:07:33 PM
CAS classification : [_linear]

\begin{align*} r^{\prime }&=\left (r+{\mathrm e}^{-\theta }\right ) \tan \left (\theta \right ) \end{align*}
Maple. Time used: 0.001 (sec). Leaf size: 28
ode:=diff(r(theta),theta) = (r(theta)+exp(-theta))*tan(theta); 
dsolve(ode,r(theta), singsol=all);
 
\[ r = \frac {\left (-\sin \left (\theta \right )-\cos \left (\theta \right )\right ) {\mathrm e}^{-\theta }+2 c_1}{2 \cos \left (\theta \right )} \]
Mathematica. Time used: 0.058 (sec). Leaf size: 28
ode=D[ r[\[Theta]], \[Theta] ]==(r[\[Theta]]+Exp[-\[Theta]])*Tan[\[Theta]]; 
ic={}; 
DSolve[{ode,ic},r[\[Theta]],\[Theta],IncludeSingularSolutions->True]
 
\begin{align*} r(\theta )&\to \sec (\theta ) \left (\int _1^{\theta }e^{-K[1]} \sin (K[1])dK[1]+c_1\right ) \end{align*}
Sympy. Time used: 3.455 (sec). Leaf size: 26
from sympy import * 
theta = symbols("theta") 
r = Function("r") 
ode = Eq((-r(theta) - exp(-theta))*tan(theta) + Derivative(r(theta), theta),0) 
ics = {} 
dsolve(ode,func=r(theta),ics=ics)
 
\[ - \int r{\left (\theta \right )} \cos {\left (\theta \right )} \tan {\left (\theta \right )}\, d\theta - \int e^{- \theta } \cos {\left (\theta \right )} \tan {\left (\theta \right )}\, d\theta = C_{1} \]