Question: Please help me on solving Navier Stokes equations.

3 equations are: diff(u_r(r,theta),r)+2/r*u_r(r,theta)+1/r*diff(u_theta(r,theta),theta)+cos(theta)/sin(theta)/r*u_theta(r,theta)=0; -diff(p(r,theta),r)+mu*(diff(u_r(r,theta),r,r)+2/r*diff(u_r(r,theta),r)-2/r^2*u_r(r,theta)+1/r^2*diff(u_r(r,theta),theta,theta)+cos(theta)/sin(theta)/r^2*diff(u_r(r,theta),theta)-2/r^2*diff(u_theta(r,theta),theta)-2*cos(theta)/sin(theta)/r^2*u_theta(r,theta))=0; -1/r*diff(p(r,theta),theta)+mu*(diff(u_theta(r,theta),r,r)+2/r*diff(u_theta(r,theta),r)-1/(r^2*sin(theta)^2)*u_theta(r,theta)+1/r^2*diff(u_theta(r,theta),theta,theta)+cos(theta)/sin(theta)/r^2*diff(u_theta(r,theta),theta)+2/r^2*diff(u_r(r,theta),theta))=0; 4 IBCs are: u_r(a,theta)=0; u_theta(a,theta)=0; u_r(infinity,theta)=u_0*cos(theta); u_theta(infinity,theta)=-u_0*sin(theta); I have been solving them for over one month already, please somebody help me.
Please Wait...