Dear all,
What is the error in this code?
G1[t_, s_] = s*(t - 1);
G2[t_, s_] = t*(s - 1);
G[t_, s_] = Piecewise[{{G1[t, s], 0 <= s <= t <= 1},
{G2[t, s], Inequality[0, Less, t, Less, s, LessEqual, 1]}}];
Manipulate[Plot3D[G[t, s], {s, 0, 1}, {t, 0, 1}],
FrameLabel \[RightArrow] "Graphic of the Green's function"]
Thanks,
Ramprasad.
What is the error in this code?
G1[t_, s_] = s*(t - 1);
G2[t_, s_] = t*(s - 1);
G[t_, s_] = Piecewise[{{G1[t, s], 0 <= s <= t <= 1},
{G2[t, s], Inequality[0, Less, t, Less, s, LessEqual, 1]}}];
Manipulate[Plot3D[G[t, s], {s, 0, 1}, {t, 0, 1}],
FrameLabel \[RightArrow] "Graphic of the Green's function"]
Thanks,
Ramprasad.