       Why can't I solve this ODE set?

• To: mathgroup at smc.vnet.net
• Subject: [mg132736] Why can't I solve this ODE set?
• From: Neo Sherrington <sh785144557 at gmail.com>
• Date: Mon, 19 May 2014 02:04:51 -0400 (EDT)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• Delivered-to: l-mathgroup@wolfram.com
• Delivered-to: mathgroup-outx@smc.vnet.net
• Delivered-to: mathgroup-newsendx@smc.vnet.net

```I tried to use Mathematica to solve this OED set:
DSolve[{y''[r] + (1/r + 2 I p) y'[r] + (-2 h + 2/r - m^2/r^2 - p^2) y[r] ==
2 a z[r],
z''[r] + (1/r - 2 I p) z'[r] + (-2 h + 2/r - m^2/r^2 - p^2) z[r] ==
2 a y[r]},{y,z}r] .
But as I input it, nothing works. Mathematica just give back the same equations to me. Interestingly, either of the 2 equations can be solved separately, including the other in its expression. I mean:
DSolve[y''[r] + (1/r + 2 I p) y'[r] + (-2 h + 2/r - m^2/r^2 - p^2) y[
r] == 2 a z[r], y[r], r]
DSolve[z''[r] + (1/r - 2 I p) z'[r] + (-2 h + 2/r - m^2/r^2 - p^2) z[
r] == 2 a y[r], z[r], r] /. y[r] -> % .