2.8.5 Problem 5

Solved as higher order constant coeff ode
Maple
Mathematica
Sympy

Internal problem ID [18505]
Book : Elementary Differential Equations. By Thornton C. Fry. D Van Nostrand. NY. First Edition (1929)
Section : Chapter VII. Linear equations of order higher than the first. section 56. Problems at page 163
Problem number : 5
Date solved : Thursday, March 13, 2025 at 12:10:54 PM
CAS classification : [[_high_order, _missing_x]]

Solve

ya4y=0

Solved as higher order constant coeff ode

Time used: 0.035 (sec)

The characteristic equation is

a4+λ4=0

The roots of the above equation are

λ1=aλ2=aλ3=iaλ4=ia

Therefore the homogeneous solution is

yh(x)=eiaxc1+eiaxc2+eaxc3+eaxc4

The fundamental set of solutions for the homogeneous solution are the following

y1=eiaxy2=eiaxy3=eaxy4=eax

Maple. Time used: 0.008 (sec). Leaf size: 30
ode:=diff(diff(diff(diff(y(x),x),x),x),x)-a^4*y(x) = 0; 
dsolve(ode,y(x), singsol=all);
 
y(x)=c1eax+c2eax+c3sin(ax)+c4cos(ax)

Maple trace

`Methods for high order ODEs: 
--- Trying classification methods --- 
trying a quadrature 
checking if the LODE has constant coefficients 
<- constant coefficients successful`
 

Mathematica. Time used: 0.003 (sec). Leaf size: 53
ode=D[y[x],{x,4}]-a^2*y[x]==0; 
ic={}; 
DSolve[{ode,ic},y[x],x,IncludeSingularSolutions->True]
 
y(x)c2eax+c4eax+c1cos(ax)+c3sin(ax)
Sympy. Time used: 0.131 (sec). Leaf size: 32
from sympy import * 
x = symbols("x") 
a = symbols("a") 
y = Function("y") 
ode = Eq(-a**4*y(x) + Derivative(y(x), (x, 4)),0) 
ics = {} 
dsolve(ode,func=y(x),ics=ics)
 
y(x)=C1eax+C2eax+C3eiax+C4eiax