Surface Slider Script


#
#  Range and divisions for u and v
#
Domain {{-1 1 10} {-1 1 10}}

#
#  f(u,v) = (u,v,2u^3-au-v^2)
#
Function {u v} {
  let (x,y,z) = (u, v, 2u^3 - a u - v^2)
}

#
#  Slider from 0 to 1 initially at 1
#
Slider a 0 1 1



[up]