2.1.61 Problem 63

Solved as second order ode using Kovacic algorithm
Maple
Mathematica
Sympy

Internal problem ID [9231]
Book : Collection of Kovacic problems
Section : section 1
Problem number : 63
Date solved : Friday, April 25, 2025 at 06:00:25 PM
CAS classification : [[_2nd_order, _with_linear_symmetries]]

Solve

(x28x+14)y8(x4)y+20y=0

Solved as second order ode using Kovacic algorithm

Time used: 0.325 (sec)

Writing the ode as

(1)(x28x+14)y+(8x+32)y+20y=0(2)Ay+By+Cy=0

Comparing (1) and (2) shows that

A=x28x+14(3)B=8x+32C=20

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=48(x28x+14)2

Comparing the above to (5) shows that

s=48t=(x28x+14)2

Therefore eq. (4) becomes

(7)z(x)=(48(x28x+14)2)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.61: 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)=40=4

The poles of r in eq. (7) and the order of each pole are determined by solving for the roots of t=(x28x+14)2. There is a pole at x=4+2 of order 2. There is a pole at x=42 of order 2. Since there is no odd order pole larger than 2 and the order at is 4 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 4 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=6(x4+2)2+6(x42)2+32x4+232x42

For the pole at x=4+2 let b be the coefficient of 1(x42)2 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

For the pole at x=42 let b be the coefficient of 1(x4+2)2 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 4>2 then

[r]=0α+=0α=1

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

r=48(x28x+14)2

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

Order of r at [r] α+ α
4 0 0 1

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

d=α(αc1+αc2+)=1(1)=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]c2+αc2+xc2)+()[r]=2x42+3x4+2+()(0)=2x42+3x4+2=x452x28x+14

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(2x42+3x4+2)(0)+((2(x42)23(x4+2)2)+(2x42+3x4+2)2(48(x28x+14)2))=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=e(2x42+3x4+2)dx=(x4+2)3(x+4+2)2

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

y1=z1e12BAdx=z1e128x+32x28x+14dx=z1e2ln(x28x+14)=z1((x28x+14)2)

Which simplifies to

y1=(x28x+14)2(x4+2)3(x+4+2)2

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

y2=y1eBAdxy12dx

Substituting gives

y2=y1e8x+32x28x+14dx(y1)2dx=y1e4ln(x28x+14)(y1)2dx=y1(1x4+216(x4+2)3645(x4+2)5+162(x4+2)4+42(x4+2)2)

Therefore the solution is

y=c1y1+c2y2=c1((x28x+14)2(x4+2)3(x+4+2)2)+c2((x28x+14)2(x4+2)3(x+4+2)2(1x4+216(x4+2)3645(x4+2)5+162(x4+2)4+42(x4+2)2))

Will add steps showing solving for IC soon.

Maple. Time used: 0.004 (sec). Leaf size: 55
ode:=(x^2-8*x+14)*diff(diff(y(x),x),x)-8*(x-4)*diff(y(x),x)+20*y(x) = 0; 
dsolve(ode,y(x), singsol=all);
 
y=c1x5+c2x4+4(35c14c2)x3+20(56c1+5c2)x2+4(875c172c2)x+4032c1+1604c25

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) 
<- Kovacics algorithm successful
 

Maple step by step

Let’s solve(x28x+14)(ddxddxy(x))8(x4)(ddxy(x))+20y(x)=0Highest derivative means the order of the ODE is2ddxddxy(x)Isolate 2nd derivativeddxddxy(x)=20y(x)x28x+14+8(x4)(ddxy(x))x28x+14Group terms withy(x)on the lhs of the ODE and the rest on the rhs of the ODE; ODE is linearddxddxy(x)8(x4)(ddxy(x))x28x+14+20y(x)x28x+14=0Check to see ifx0is a regular singular pointDefine functions[P2(x)=8(x4)x28x+14,P3(x)=20x28x+14](x4+2)P2(x)is analytic atx=42((x4+2)P2(x))|x=42=0(x4+2)2P3(x)is analytic atx=42((x4+2)2P3(x))|x=42=0x=42is a regular singular pointCheck to see ifx0is a regular singular pointx0=42Multiply by denominators(x28x+14)(ddxddxy(x))+(8x+32)(ddxy(x))+20y(x)=0Change variables usingx=u+42so that the regular singular point is atu=0(u22u2)(ddudduy(u))+(8u+82)(dduy(u))+20y(u)=0Assume series solution fory(u)y(u)=k=0akuk+rRewrite ODE with series expansionsConvertum(dduy(u))to series expansion form=0..1um(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=1..2um(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 expansions22r(r5)a0u1+r+(k=0(22(k+1+r)(k+r4)ak+1+ak(k+r4)(k+r5))uk+r)=0a0cannot be 0 by assumption, giving the indicial equation22r(r5)=0Values of r that satisfy the indicial equationr{0,5}Each term in the series must be 0, giving the recursion relation(k+r4)(2ak+1(k+1+r)2+ak(k+r5))=0Recursion relation that defines series solution to ODEak+1=ak(k+r5)24(k+1+r)Recursion relation forr=0; series terminates atk=5ak+1=ak(k5)24(k+1)Apply recursion relation fork=0a1=5a024Apply recursion relation fork=1a2=a122Express in terms ofa0a2=5a04Apply recursion relation fork=2a3=a224Express in terms ofa0a3=5a0216Apply recursion relation fork=3a4=a328Express in terms ofa0a4=5a064Apply recursion relation fork=4a5=a4220Express in terms ofa0a5=a02256Terminating series solution of the ODE forr=0. Use reduction of order to find the second linearly independent solutiony(u)=a0(15u24+5u2452u316+5u4642u5256)Revert the change of variablesu=x4+2[y(x)=a0((x5+20x4180x3+880x22260x+2384)2256+5x41285x38+125x23245x4+40132)]Recursion relation forr=5ak+1=akk24(k+6)Solution forr=5[y(u)=k=0akuk+5,ak+1=akk24(k+6)]Revert the change of variablesu=x4+2[y(x)=k=0ak(x4+2)k+5,ak+1=akk24(k+6)]Combine solutions and rename parameters[y(x)=a0((x5+20x4180x3+880x22260x+2384)2256+5x41285x38+125x23245x4+40132)+(k=0bk(x4+2)k+5),bk+1=bkk24(k+6)]
Mathematica. Time used: 0.094 (sec). Leaf size: 77
ode=(x^2-8*x+14)*D[y[x],{x,2}]+8*(x-4)*D[y[x],x]+20*y[x]==0; 
ic={}; 
DSolve[{ode,ic},y[x],x,IncludeSingularSolutions->True]
 
y(x)c1P12i(i+31)3(x42)+c2Q12i(i+31)3(x42)(x28x+14)3/2
Sympy
from sympy import * 
x = symbols("x") 
y = Function("y") 
ode = Eq((32 - 8*x)*Derivative(y(x), x) + (x**2 - 8*x + 14)*Derivative(y(x), (x, 2)) + 20*y(x),0) 
ics = {} 
dsolve(ode,func=y(x),ics=ics)
 
False