search

rtoy / maxima

A Clone of Maxima's repo
Other
0 stars 0 forks source link

Fredholm Integral Equation #801

Open rtoy opened 4 months ago

rtoy commented 4 months ago

Imported from SourceForge on 2024-07-03 11:30:59 Created by danielvolinski on 2021-01-11 16:16:11 Original: https://sourceforge.net/p/maxima/bugs/3702

The following code is not able to find any solution to the following Fredholm integral equation:

load("inteqn")$
assume(x>0)$
Eq:y(x)-(4/π)*'integrate(sin(x)*(sin(t)²/t)*y(t),t,0,∞)=0;
iesol:ieqn(Eq,y(x),all)$

Except there is a solution for this integral equation:

define(sol(x),(4/π)*c*sin(x));
subst([y(t)=sol(t)],Eq);
%,integrate,expand;
vsol:solve(%,y(x)),expand;
forget(x>0)$

c is arbitrary.

Daniel Volinski

rtoy commented 4 months ago

Imported from SourceForge on 2024-07-03 11:31:00 Created by robert_dodier on 2021-01-23 04:07:45 Original: https://sourceforge.net/p/maxima/bugs/3702/#0ee1