2.1.821 Problem 845

Solved as second order ode using Kovacic algorithm
Maple
Mathematica
Sympy

Internal problem ID [9993]
Book : Collection of Kovacic problems
Section : section 1
Problem number : 845
Date solved : Sunday, March 30, 2025 at 02:51:09 PM
CAS classification : [[_Emden, _Fowler]]

Solved as second order ode using Kovacic algorithm

Time used: 0.124 (sec)

Writing the ode as

(1)y6yx2=0(2)Ay+By+Cy=0

Comparing (1) and (2) shows that

A=1(3)B=0C=6x2

Applying the Liouville transformation on the dependent variable gives

z(x)=yeB2Adx

Then (2) becomes

(4)z(x)=rz(x)

Where r is given by

(5)r=st=2AB2BA+B24AC4A2

Substituting the values of A,B,C from (3) in the above and simplifying gives

(6)r=6x2

Comparing the above to (5) shows that

s=6t=x2

Therefore eq. (4) becomes

(7)z(x)=(6x2)z(x)

Equation (7) is now solved. After finding z(x) then y is found using the inverse transformation

y=z(x)eB2Adx

The first step is to determine the case of Kovacic algorithm this ode belongs to. There are 3 cases depending on the order of poles of r and the order of r at . The following table summarizes these cases.

Case

Allowed pole order for r

Allowed value for O()

1

{0,1,2,4,6,8,}

{,6,4,2,0,2,3,4,5,6,}

2

Need to have at least one pole that is either order 2 or odd order greater than 2. Any other pole order is allowed as long as the above condition is satisfied. Hence the following set of pole orders are all allowed. {1,2},{1,3},{2},{3},{3,4},{1,2,5}.

no condition

3

{1,2}

{2,3,4,5,6,7,}

Table 2.821: Necessary conditions for each Kovacic case

The order of r at is the degree of t minus the degree of s. Therefore

O()=deg(t)deg(s)=20=2

The poles of r in eq. (7) and the order of each pole are determined by solving for the roots of t=x2. There is a pole at x=0 of order 2. Since there is no odd order pole larger than 2 and the order at is 2 then the necessary conditions for case one are met. Since there is a pole of order 2 then necessary conditions for case two are met. Since pole order is not larger than 2 and the order at is 2 then the necessary conditions for case three are met. Therefore

L=[1,2,4,6,12]

Attempting to find a solution using case n=1.

Looking at poles of order 2. The partial fractions decomposition of r is

r=6x2

For the pole at x=0 let b be the coefficient of 1x2 in the partial fractions decomposition of r given above. Therefore b=6. Hence

[r]c=0αc+=12+1+4b=3αc=121+4b=2

Since the order of r at is 2 then [r]=0. Let b be the coefficient of 1x2 in the Laurent series expansion of r at . which can be found by dividing the leading coefficient of s by the leading coefficient of t from

r=st=6x2

Since the gcd(s,t)=1. This gives b=6. Hence

[r]=0α+=12+1+4b=3α=121+4b=2

The following table summarizes the findings so far for poles and for the order of r at where r is

r=6x2

pole c location pole order [r]c αc+ αc
0 2 0 3 2

Order of r at [r] α+ α
2 0 3 2

Now that the all [r]c and its associated αc± have been determined for all the poles in the set Γ and [r] and its associated α± have also been found, the next step is to determine possible non negative integer d from these using

d=αs()cΓαcs(c)

Where s(c) is either + or and s() is the sign of α±. This is done by trial over all set of families s=(s(c))cΓ until such d is found to work in finding candidate ω. Trying α=2 then

d=α(αc1)=2(2)=0

Since d an integer and d0 then it can be used to find ω using

ω=cΓ(s(c)[r]c+αcs(c)xc)+s()[r]

The above gives

ω=(()[r]c1+αc1xc1)+()[r]=2x+()(0)=2x=2x

Now that ω is determined, the next step is find a corresponding minimal polynomial p(x) of degree d=0 to solve the ode. The polynomial p(x) needs to satisfy the equation

(1A)p+2ωp+(ω+ω2r)p=0

Let

(2A)p(x)=1

Substituting the above in eq. (1A) gives

(0)+2(2x)(0)+((2x2)+(2x)2(6x2))=00=0

The equation is satisfied since both sides are zero. Therefore the first solution to the ode z=rz is

z1(x)=peωdx=e2xdx=1x2

The first solution to the original ode in y is found from

y1=z1e12BAdx

Since B=0 then the above reduces to

y1=z1=1x2

Which simplifies to

y1=1x2

The second solution y2 to the original ode is found using reduction of order

y2=y1eBAdxy12dx

Since B=0 then the above becomes

y2=y11y12dx=1x211x4dx=1x2(x55)

Therefore the solution is

y=c1y1+c2y2=c1(1x2)+c2(1x2(x55))

Will add steps showing solving for IC soon.

Maple. Time used: 0.003 (sec). Leaf size: 15
ode:=diff(diff(y(x),x),x) = 6/x^2*y(x); 
dsolve(ode,y(x), singsol=all);
 
y=c2x5+c1x2

Maple trace

Methods for second order ODEs: 
--- Trying classification methods --- 
trying a quadrature 
checking if the LODE has constant coefficients 
checking if the LODE is of Euler type 
<- LODE of Euler type successful
 

Maple step by step

Let’s solveddxddxy(x)=6y(x)x2Highest derivative means the order of the ODE is2ddxddxy(x)Group terms withy(x)on the lhs of the ODE and the rest on the rhs of the ODE; ODE is linearddxddxy(x)6y(x)x2=0Multiply by denominators of the ODE(ddxddxy(x))x26y(x)=0Make a change of variablest=ln(x)Substitute the change of variables back into the ODECalculate the1stderivative ofywith respect tox, using the chain ruleddxy(x)=(ddty(t))(ddxt(x))Compute derivativeddxy(x)=ddty(t)xCalculate the2ndderivative ofywith respect tox, using the chain ruleddxddxy(x)=(ddtddty(t))(ddxt(x))2+(ddxddxt(x))(ddty(t))Compute derivativeddxddxy(x)=ddtddty(t)x2ddty(t)x2Substitute the change of variables back into the ODE(ddtddty(t)x2ddty(t)x2)x26y(t)=0Simplifyddtddty(t)ddty(t)6y(t)=0Characteristic polynomial of ODEr2r6=0Factor the characteristic polynomial(r+2)(r3)=0Roots of the characteristic polynomialr=(2,3)1st solution of the ODEy1(t)=e2t2nd solution of the ODEy2(t)=e3tGeneral solution of the ODEy(t)=C1y1(t)+C2y2(t)Substitute in solutionsy(t)=C1e2t+C2e3tChange variables back usingt=ln(x)y(x)=C1x2+C2x3Simplifyy(x)=C1x2+C2x3
Mathematica. Time used: 0.012 (sec). Leaf size: 18
ode=D[y[x],{x,2}]==((4*(5/2)^2-1)/(4*x^2))*y[x]; 
ic={}; 
DSolve[{ode,ic},y[x],x,IncludeSingularSolutions->True]
 
y(x)c2x5+c1x2
Sympy. Time used: 0.049 (sec). Leaf size: 12
from sympy import * 
x = symbols("x") 
y = Function("y") 
ode = Eq(Derivative(y(x), (x, 2)) - 6*y(x)/x**2,0) 
ics = {} 
dsolve(ode,func=y(x),ics=ics)
 
y(x)=C1x2+C2x3