Tag Info

New answers tagged

2

Try this: Clear["Global`*"]; m = 1; \[HBar] = 1; k = 1; V = -k/Sqrt[1 + x^2 + y^2]; A = 8; \[CapitalDelta] = 10^-3; SE[Etr_] := -\[HBar]^2/(2 m) \!\( \*SubsuperscriptBox[\(\[Del]\), \({x, y}\), \(2\)]\(\[Psi][x, y]\)\) + V \[Psi][x, y] - Etr \[Psi][x, y] == 0 \[CapitalOmega] = Disk[{0, 0}, A]; BC = DirichletCondition[\[Psi][x, y] == ...


0

You really do need to read a lot of documentation, but perhaps this wil get you started. It will at least show you some the things you need to look up in the documentation. First, Mathematica works in radians, not degrees, so conversion to radians must be done. The degree sign (°) is the conversion factor (π/180). It can be typed by Esc+deg+Esc p = {250 ...



Top 50 recent answers are included