绘制一个无限势阱（双阱）

Question

我一直在试图绘制一个具有3个区域的分段势函数的双阱势图，但是我的代码没有正确地绘制我正在寻找的东西。

这是我走到这一步：

正如你可以在这两个势阱之间的屏障中间看到的情节开始。它应该在vL之前的障碍开始，但不是。任何帮助都可以，谢谢！

Answer 1

刮正粘贴到一个空新鲜的笔记本电脑和评估

L = 1; 
bWidth = L/5; 
v0 = 50; 
vL = 4; 
vD = 6; 
v[x_] := 1 /; x < 0; 
v[x_] := 1 /; x > L; 
v[x_] := v0 /; (L - bWidth)/2 < x < (L + bWidth)/2; 
v[x_] := vL /; 0 < x < (L - bWidth)/2; 
v[x_] := vD /; (L + bWidth)/2 < x < L; 
Plot[v[x], {x, -.25, 1.25}, PlotRange -> All]