I am trying to solve a really horrible system of equations. I did it successfully for case with discretization on 4 parts, now I tried to do the same for case of discretization on 10 parts and... well, nothings seems to work.

NDSolve[]

simply... doesn't do anything. I attached my whole code in a mathematica file simply because the differential equations are very very long and rather complicated - I don't want to spam the whole post with an unreadable equations.

I highly appreciate all the help! I am bit lost here.

Attachments: