I have the following code that makes a 3D plot, with 3 Mesh functions drawn on top of it:
um = 1;
Potential[V0_, k_, w_, x_, z_] := V0*(Sin[k z]^2)*Exp[(-2 x^2)/w^2]
Plot3D[Potential[1, (2 \[Pi])/(0.725 um), 1 um, x, z], {x, -2.1 um,
2.1 um}, {z, -1.1 um, 1.1 um}, PlotRange -> Full,
AxesLabel -> MaTeX /@ {"x/\\sigma"}, PlotPoints -> 50,
Mesh -> {{0, 0.5, 1}, {2}, {2}},
MeshStyle -> {{Red, Blue, Green}, {Red}, {Blue}}, Boxed -> False,
Axes -> {True, False, False}, PlotStyle -> Cyan,
Ticks -> {Table[i, {i, -2, 2, 1}]}]
How can I make the three Mesh functions have different colours?
I tried the MeshStyle -> {{Red, Blue, Green}, {Red}, {Blue}}
but all 3 functions end up Green...