This equation is simple to DSolve in Mathematica, but I don't know how to use and understand solution.
DSolve[Y1''[x] - a2 Y1[x] - a1*X1[x] == 0, Y1[x], x]
$ \text{Y1}[x]\to e^{\sqrt{\text{a2}} x} C[1]+e^{-\sqrt{\text{a2}} x} C[2]+e^{-\sqrt{\text{a2}} x} \left(e^{2 \sqrt{\text{a2}} x} \int_1^x \frac{\text{a1} e^{-\sqrt{\text{a2}} K[1]} \text{X1}[K[1]]}{2 \sqrt{\text{a2}}} \, dK[1]+\int_1^x -\frac{\text{a1} e^{\sqrt{\text{a2}} K[2]} \text{X1}[K[2]]}{2 \sqrt{\text{a2}}} \, dK[2]\right) $
What is dK1 and dK2, how to solve integrals [1,x], and how to use this solution Y1[x] to find X1[x] in another equation
Derivative[2][X1][x] == Y1[x]
