Skip to main content
added 2 characters in body
Source Link
chris
  • 23.1k
  • 5
  • 62
  • 151

Maybe it is a syntax problem, since I haven't been using Mathematica for much time, but I haven't been able to find a similar example in internet.

I am just trying to solve analitically the Sturm-Liouville problem of Schrödinger equation for a particle in a 2D box $[0,1 ] \times [0,1]$. Id est:

$ - \frac{\hbar^2}{2m} \Delta \psi(x,y) = E \psi(x, y) $

$\psi(0,y) = \psi(1,y) = \psi(x,0) = \psi(x,1) = 0$

This is what I wrote:

eqn = 2*pi^2*z[x2* Pi^2 *z[x, y] + (D[z[x, y], {x, 2}] + D[z[x, y], {y, 2}]) == 0;
bc = {z[x, 0] == 0, z[x, 1] == 0, z[0, y] == 0, z[1, y] == 0};
sol = DSolve[{eqn, bc}, z[x, y], {x, y}]

And this is what I get:enter image description here

Maybe it is a syntax problem, since I haven't been using Mathematica for much time, but I haven't been able to find a similar example in internet.

I am just trying to solve analitically the Sturm-Liouville problem of Schrödinger equation for a particle in a 2D box $[0,1 ] \times [0,1]$. Id est:

$ - \frac{\hbar^2}{2m} \Delta \psi(x,y) = E \psi(x, y) $

$\psi(0,y) = \psi(1,y) = \psi(x,0) = \psi(x,1) = 0$

This is what I wrote:

eqn = 2*pi^2*z[x, y] + (D[z[x, y], {x, 2}] + D[z[x, y], {y, 2}]) == 0;
bc = {z[x, 0] == 0, z[x, 1] == 0, z[0, y] == 0, z[1, y] == 0};
sol = DSolve[{eqn, bc}, z[x, y], {x, y}]

And this is what I get:enter image description here

Maybe it is a syntax problem, since I haven't been using Mathematica for much time, but I haven't been able to find a similar example in internet.

I am just trying to solve analitically the Sturm-Liouville problem of Schrödinger equation for a particle in a 2D box $[0,1 ] \times [0,1]$. Id est:

$ - \frac{\hbar^2}{2m} \Delta \psi(x,y) = E \psi(x, y) $

$\psi(0,y) = \psi(1,y) = \psi(x,0) = \psi(x,1) = 0$

This is what I wrote:

eqn = 2* Pi^2 *z[x, y] + (D[z[x, y], {x, 2}] + D[z[x, y], {y, 2}]) == 0;
bc = {z[x, 0] == 0, z[x, 1] == 0, z[0, y] == 0, z[1, y] == 0};
sol = DSolve[{eqn, bc}, z[x, y], {x, y}]

And this is what I get:enter image description here

edited tags; edited title
Link

How to solve analiticallyanalytically a 2D Sturm-Liouville Problem?

Bumped by Community user

Maybe it is a syntax problem, since I haven't been using Mathematica for much time, but I haven't been able to find a similar example in internet.

I am just trying to solve analitically the Sturm-Liouville problem of Schrödinger equation for a particle in a 2D box $[0,1 ] \times [0,1]$. Id est:

$ - \frac{\hbar^2}{2m} \Delta \psi(x,y) = E \psi(x, y) $

$\psi(0,y) = \psi(1,y) = \psi(x,0) = \psi(x,1) = 0$

This is what I wrote:

eqn = E*z[x2*pi^2*z[x, y] - 0.5+ *(D[z[x, y], {x, 2}] + D[z[x, y], {y, 2}]) == 0;
solbc = DSolve[eqn, {z[x, 0] == 0, z[x, 1] == 0, z[0, y] == 0, z[1, y] == 0};
sol = DSolve[{eqn, bc}, z[x, y], {x, y}]

And this is what I get:

DSolve::dsvar: z[x,1]==0 cannot be used as a variable.

Do you know what can be the problem?enter image description here

Maybe it is a syntax problem, since I haven't been using Mathematica for much time, but I haven't been able to find a similar example in internet.

I am just trying to solve analitically the Sturm-Liouville problem of Schrödinger equation for a particle in a 2D box $[0,1 ] \times [0,1]$. This is what I wrote:

eqn = E*z[x, y] - 0.5 *(D[z[x, y], {x, 2}] + D[z[x, y], {y, 2}]) == 0;
sol = DSolve[eqn, z[x, 0] == 0, z[x, 1] == 0, z[0, y] == 0, z[1, y] == 0, z[x, y], {x, y}]

And this is what I get:

DSolve::dsvar: z[x,1]==0 cannot be used as a variable.

Do you know what can be the problem?

Maybe it is a syntax problem, since I haven't been using Mathematica for much time, but I haven't been able to find a similar example in internet.

I am just trying to solve analitically the Sturm-Liouville problem of Schrödinger equation for a particle in a 2D box $[0,1 ] \times [0,1]$. Id est:

$ - \frac{\hbar^2}{2m} \Delta \psi(x,y) = E \psi(x, y) $

$\psi(0,y) = \psi(1,y) = \psi(x,0) = \psi(x,1) = 0$

This is what I wrote:

eqn = 2*pi^2*z[x, y] + (D[z[x, y], {x, 2}] + D[z[x, y], {y, 2}]) == 0;
bc = {z[x, 0] == 0, z[x, 1] == 0, z[0, y] == 0, z[1, y] == 0};
sol = DSolve[{eqn, bc}, z[x, y], {x, y}]

And this is what I get:enter image description here

Source Link
Loading