(Debug) In[]:=
DSolve[{(y''[x])^2*y'[x](P1+I*k*y[x])^2,z''[x]-I*R2*z[x]P1,y[1]0,z[-1]0,y[0]z[0],mu1*(y'[0])^(3/2)mu2*z'[0]},{y,z},x]//Quiet
(*ThebelowequationsareobtainedaftersolvingabovedifferenialequationswithconstantsofintegrationA,B,A1,B1*)
In[]:=
3/2
1
Times[6]+Times[3]
Power[2]Power[2]Hypergeometric2F1[4]Power[2]Plus[3]
Times[3]
Power[2]Power[2]Hypergeometric2F1[4]Power[2]Plus[3]
Times[3]
