\( \DeclareMathOperator{\abs}{abs} \newcommand{\ensuremath}[1]{\mbox{$#1$}} \)

(%i1)

load(draw)$

(%i2)

explObj: explicit(sin(%pi*x)*cos(%pi*y), x, -1, 1, y, -1, 1)$

(%i3)

with_slider_draw3d(    f, [30, 60, 90, 120, 150, 180, 210, 240, 270, 300, 330, 360],    view = [60, f],    color=blue,    surface_hide=false,    explObj,    enhanced3d=[0.5, x, y, z], cbrange = [0.4, 0.6],    colorbox=false,    palette=gray,    wired_surface=true,    explObj )$

\[\tag{\%{}t3}\label{t3} \]

---

Created with wxMaxima.