2.1.402 Problem 414

Solved as second order ode using Kovacic algorithm
Maple
Mathematica
Sympy

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

Solved as second order ode using Kovacic algorithm

Time used: 0.270 (sec)

Writing the ode as

(1)3y+xy4y=0(2)Ay+By+Cy=0

Comparing (1) and (2) shows that

A=3(3)B=xC=4

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=x2+5436

Comparing the above to (5) shows that

s=x2+54t=36

Therefore eq. (4) becomes

(7)z(x)=(x236+32)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.402: 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)=02=2

There are no poles in r. Therefore the set of poles Γ is empty. 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. Therefore

L=[1]

Attempting to find a solution using case n=1.

Since the order of r at is Or()=2 then

v=Or()2=22=1

[r] is the sum of terms involving xi for 0iv in the Laurent series for r at . Therefore

[r]=i=0vaixi(8)=i=01aixi

Let a be the coefficient of xv=x1 in the above sum. The Laurent series of r at is

(9)rx6+92x2434x3+65614x588573516x7+3348078316x9271194342332x11+11506388523332x13+

Comparing Eq. (9) with Eq. (8) shows that

a=16

From Eq. (9) the sum up to v=1 gives

[r]=i=01aixi(10)=x6

Now we need to find b, where b be the coefficient of xv1=x0=1 in r minus the coefficient of same term but in ([r])2 where [r] was found above in Eq (10). Hence

([r])2=x236

This shows that the coefficient of 1 in the above is 0. Now we need to find the coefficient of 1 in r. How this is done depends on if v=0 or not. Since v=1 which is not zero, then starting r=st, we do long division and write this in the form

r=Q+Rt

Where Q is the quotient and R is the remainder. Then the coefficient of 1 in r will be the coefficient this term in the quotient. Doing long division gives

r=st=x2+5436=Q+R36=(x236+32)+(0)=x236+32

We see that the coefficient of the term 1x in the quotient is 32. Now b can be found.

b=(32)(0)=32

Hence

[r]=x6α+=12(bav)=12(32161)=4α=12(bav)=12(32161)=5

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

r=x236+32

Order of r at [r] α+ α
2 x6 4 5

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 α+=4, and since there are no poles, then

d=α+=4

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

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

Substituting the above values in the above results in

ω=(+)[r]=0+(x6)=x6=x6

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

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

Let

(2A)p(x)=x4+a3x3+a2x2+a1x+a0

Substituting the above in eq. (1A) gives

(12x2+6xa3+2a2)+2(x6)(4x3+3x2a3+2xa2+a1)+((16)+(x6)2(x236+32))=0a3x33+2(18a2)x23+(a1+6a3)x4a03+2a2=0

Solving for the coefficients ai in the above using method of undetermined coefficients gives

{a0=27,a1=0,a2=18,a3=0}

Substituting these coefficients in p(x) in eq. (2A) results in

p(x)=x4+18x2+27

Therefore the first solution to the ode z=rz is

z1(x)=peωdx=(x4+18x2+27)ex6dx=(x4+18x2+27)ex212=(x4+18x2+27)ex212

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

y1=z1e12BAdx=z1e12x3dx=z1ex212=z1(ex212)

Which simplifies to

y1=x4+18x2+27

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

y2=y1eBAdxy12dx

Substituting gives

y2=y1ex3dx(y1)2dx=y1ex26(y1)2dx=y1(ex26(x4+18x2+27)2dx)

Therefore the solution is

y=c1y1+c2y2=c1(x4+18x2+27)+c2(x4+18x2+27(ex26(x4+18x2+27)2dx))

Will add steps showing solving for IC soon.

Maple. Time used: 0.017 (sec). Leaf size: 48
ode:=3*diff(diff(y(x),x),x)+diff(y(x),x)*x-4*y(x) = 0; 
dsolve(ode,y(x), singsol=all);
 
y=6xc1(x2+15)ex26+(x4+18x2+27)(erf(6x6)6πc1+c2)

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) 
   Group is reducible, not completely reducible 
   Solution has integrals. Trying a special function solution free of integrals\ 
... 
   -> Trying a solution in terms of special functions: 
      -> Bessel 
      -> elliptic 
      -> Legendre 
      <- Kummer successful 
   <- special function solution successful 
      -> Trying to convert hypergeometric functions to elementary form... 
      <- elementary form is not straightforward to achieve - returning special \ 
function solution free of uncomputed integrals 
   <- Kovacics algorithm successful
 

Mathematica. Time used: 0.022 (sec). Leaf size: 43
ode=3*D[y[x],{x,2}]+x*D[y[x],x]-4*y[x]==0; 
ic={}; 
DSolve[{ode,ic},y[x],x,IncludeSingularSolutions->True]
 
y(x)c1ex26HermiteH(5,x6)+127c2(x4+18x2+27)
Sympy
from sympy import * 
x = symbols("x") 
y = Function("y") 
ode = Eq(x*Derivative(y(x), x) - 4*y(x) + 3*Derivative(y(x), (x, 2)),0) 
ics = {} 
dsolve(ode,func=y(x),ics=ics)
 
False