Question: how I can pdsolve these equations?

how I can pdsolve these equations?

moadelat.mw


 

NULL

restart

f1 := -3*(diff(theta(r, z), z))+(diff(r*(diff(theta(r, z), r)), r))/r+diff(theta(r, z), z, z)+2*((diff(theta(r, z), r))*(diff(sigma(r, z), r))+(diff(sigma(r, z), z))*(diff(theta(r, z), z)))+4*((diff(theta(r, z), r))^2+(diff(theta(r, z), z))^2) = 0; f2 := -3*(diff(sigma(r, z), z))+2*((diff(r*(diff(sigma(r, z), r)), r))/r+diff(sigma(r, z), z, z))+(diff(r*(diff(theta(r, z), r)), r))/r+diff(theta(r, z), z, z) = 0

-3*(diff(theta(r, z), z))+(diff(theta(r, z), r)+r*(diff(diff(theta(r, z), r), r)))/r+diff(diff(theta(r, z), z), z)+2*(diff(theta(r, z), r))*(diff(sigma(r, z), r))+2*(diff(sigma(r, z), z))*(diff(theta(r, z), z))+4*(diff(theta(r, z), r))^2+4*(diff(theta(r, z), z))^2 = 0

 

-3*(diff(sigma(r, z), z))+2*(diff(sigma(r, z), r)+r*(diff(diff(sigma(r, z), r), r)))/r+2*(diff(diff(sigma(r, z), z), z))+(diff(theta(r, z), r)+r*(diff(diff(theta(r, z), r), r)))/r+diff(diff(theta(r, z), z), z) = 0

(1)

f3 := sigma(r, 0) = 1, theta(r, 0) = 1, (D[2](theta))(r, 1) = 0, (D[2](sigma))(r, 1) = 0, (D[1](theta))(0, z) = 0, (D[1](sigma))(0, z) = 0, sigma(1, z) = 1, theta(1, z) = 1

sigma(r, 0) = 1, theta(r, 0) = 1, (D[2](theta))(r, 1) = 0, (D[2](sigma))(r, 1) = 0, (D[1](theta))(0, z) = 0, (D[1](sigma))(0, z) = 0, sigma(1, z) = 1, theta(1, z) = 1

(2)

``


 

Download moadelat.mw

Please Wait...