2.1.119 Problem 121

Solved as second order ode using Kovacic algorithm
Maple
Mathematica
Sympy

Internal problem ID [9291]
Book : Collection of Kovacic problems
Section : section 1
Problem number : 121
Date solved : Sunday, March 30, 2025 at 02:31:37 PM
CAS classification : [[_2nd_order, _with_linear_symmetries]]

Solved as second order ode using Kovacic algorithm

Time used: 0.192 (sec)

Writing the ode as

(1)3x2(1+x)2y+(11x3+10x2x)y+(5x2+1)y=0(2)Ay+By+Cy=0

Comparing (1) and (2) shows that

A=3x2(1+x)2(3)B=11x3+10x2xC=5x2+1

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=536x2

Comparing the above to (5) shows that

s=5t=36x2

Therefore eq. (4) becomes

(7)z(x)=(536x2)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.119: 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=36x2. 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=536x2

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

[r]c=0αc+=12+1+4b=56αc=121+4b=16

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=536x2

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

[r]=0α+=12+1+4b=56α=121+4b=16

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

r=536x2

pole c location pole order [r]c αc+ αc
0 2 0 56 16

Order of r at [r] α+ α
2 0 56 16

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 α=16 then

d=α(αc1)=16(16)=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]=16x+()(0)=16x=16x

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(16x)(0)+((16x2)+(16x)2(536x2))=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=e16xdx=x1/6

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

y1=z1e12BAdx=z1e1211x3+10x2x3x2(1+x)2dx=z1eln(x)62ln(1+x)=z1(x1/6(1+x)2)

Which simplifies to

y1=x1/3(1+x)2

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

y2=y1eBAdxy12dx

Substituting gives

y2=y1e11x3+10x2x3x2(1+x)2dx(y1)2dx=y1eln(x)34ln(1+x)(y1)2dx=y1(3x1/3eln(x)34ln(1+x)(1+x)42)

Therefore the solution is

y=c1y1+c2y2=c1(x1/3(1+x)2)+c2(x1/3(1+x)2(3x1/3eln(x)34ln(1+x)(1+x)42))

Will add steps showing solving for IC soon.

Maple. Time used: 0.011 (sec). Leaf size: 19
ode:=3*x^2*(x+1)^2*diff(diff(y(x),x),x)-x*(-11*x^2-10*x+1)*diff(y(x),x)+(5*x^2+1)*y(x) = 0; 
dsolve(ode,y(x), singsol=all);
 
y=c2x1/3+c1x(1+x)2

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 
trying a symmetry of the form [xi=0, eta=F(x)] 
checking if the LODE is missing y 
-> Trying a Liouvillian solution using Kovacics algorithm 
   A Liouvillian solution exists 
   Reducible group (found an exponential solution) 
   Reducible group (found another exponential solution) 
<- Kovacics algorithm successful
 

Maple step by step

Let’s solve3x2(1+x)2(ddxddxy(x))x(11x210x+1)(ddxy(x))+(5x2+1)y(x)=0Highest derivative means the order of the ODE is2ddxddxy(x)Isolate 2nd derivativeddxddxy(x)=(5x2+1)y(x)3x2(1+x)2(ddxy(x))(11x1)3(1+x)xGroup terms withy(x)on the lhs of the ODE and the rest on the rhs of the ODE; ODE is linearddxddxy(x)+(ddxy(x))(11x1)3(1+x)x+(5x2+1)y(x)3x2(1+x)2=0Check to see ifx0is a regular singular pointDefine functions[P2(x)=11x13(1+x)x,P3(x)=5x2+13x2(1+x)2](1+x)P2(x)is analytic atx=1((1+x)P2(x))|x=1=4(1+x)2P3(x)is analytic atx=1((1+x)2P3(x))|x=1=2x=1is a regular singular pointCheck to see ifx0is a regular singular pointx0=1Multiply by denominators3x2(1+x)2(ddxddxy(x))+x(1+x)(11x1)(ddxy(x))+(5x2+1)y(x)=0Change variables usingx=u1so that the regular singular point is atu=0(3u46u3+3u2)(ddudduy(u))+(11u323u2+12u)(dduy(u))+(5u210u+6)y(u)=0Assume series solution fory(u)y(u)=k=0akuk+rRewrite ODE with series expansionsConvertumy(u)to series expansion form=0..2umy(u)=k=0akuk+r+mShift index usingk>kmumy(u)=k=makmuk+rConvertum(dduy(u))to series expansion form=1..3um(dduy(u))=k=0ak(k+r)uk+r1+mShift index usingk>k+1mum(dduy(u))=k=1+mak+1m(k+1m+r)uk+rConvertum(ddudduy(u))to series expansion form=2..4um(ddudduy(u))=k=0ak(k+r)(k+r1)uk+r2+mShift index usingk>k+2mum(ddudduy(u))=k=2+mak+2m(k+2m+r)(k+1m+r)uk+rRewrite ODE with series expansions3a0(2+r)(1+r)ur+(3a1(3+r)(2+r)a0(2+r)(5+6r))u1+r+(k=2(3ak(k+r+2)(k+r+1)ak1(k+r+1)(6k1+6r)+ak2(3k1+3r)(k+r1))uk+r)=0a0cannot be 0 by assumption, giving the indicial equation3(2+r)(1+r)=0Values of r that satisfy the indicial equationr{2,1}Each term must be 03a1(3+r)(2+r)a0(2+r)(5+6r)=0Solve for the dependent coefficient(s)a1=a0(5+6r)3(3+r)Each term in the series must be 0, giving the recursion relation3(ak+ak22ak1)k2+(6(ak+ak22ak1)r+9ak4ak25ak1)k+3(ak+ak22ak1)r2+(9ak4ak25ak1)r+6ak+ak2+ak1=0Shift index usingk>k+23(ak+2+ak2ak+1)(k+2)2+(6(ak+2+ak2ak+1)r+9ak+24ak5ak+1)(k+2)+3(ak+2+ak2ak+1)r2+(9ak+24ak5ak+1)r+6ak+2+ak+ak+1=0Recursion relation that defines series solution to ODEak+2=3k2ak6k2ak+1+6krak12krak+1+3r2ak6r2ak+1+8kak29kak+1+8rak29rak+1+5ak33ak+13(k2+2kr+r2+7k+7r+12)Recursion relation forr=2ak+2=3k2ak6k2ak+14kak5kak+1+ak+ak+13(k2+3k+2)Solution forr=2[y(u)=k=0akuk2,ak+2=3k2ak6k2ak+14kak5kak+1+ak+ak+13(k2+3k+2),a1=7a03]Revert the change of variablesu=1+x[y(x)=k=0ak(1+x)k2,ak+2=3k2ak6k2ak+14kak5kak+1+ak+ak+13(k2+3k+2),a1=7a03]Recursion relation forr=1ak+2=3k2ak6k2ak+1+2kak17kak+110ak+13(k2+5k+6)Solution forr=1[y(u)=k=0akuk1,ak+2=3k2ak6k2ak+1+2kak17kak+110ak+13(k2+5k+6),a1=a06]Revert the change of variablesu=1+x[y(x)=k=0ak(1+x)k1,ak+2=3k2ak6k2ak+1+2kak17kak+110ak+13(k2+5k+6),a1=a06]Combine solutions and rename parameters[y(x)=(k=0ak(1+x)k2)+(k=0bk(1+x)k1),ak+2=3k2ak6k2ak+14kak5kak+1+ak+ak+13(k2+3k+2),a1=7a03,bk+2=3k2bk6k2bk+1+2kbk17kbk+110bk+13(k2+5k+6),b1=b06]
Mathematica. Time used: 0.242 (sec). Leaf size: 58
ode=3*x^2*(1+x)^2*D[y[x],{x,2}]-x*(1-10*x-11*x^2)*D[y[x],x]+(1+5*x^2)*y[x]==0; 
ic={}; 
DSolve[{ode,ic},y[x],x,IncludeSingularSolutions->True]
 
y(x)12x6(3c2x2/3+2c1)exp(121x(4K[1]+113K[1])dK[1])
Sympy
from sympy import * 
x = symbols("x") 
y = Function("y") 
ode = Eq(3*x**2*(x + 1)**2*Derivative(y(x), (x, 2)) - x*(-11*x**2 - 10*x + 1)*Derivative(y(x), x) + (5*x**2 + 1)*y(x),0) 
ics = {} 
dsolve(ode,func=y(x),ics=ics)
 
False