Argument and Principal argument
GGB script
t = Slider(-0.5, 2.5, 0.01, 1, 110, false, true, false, false)
t_0 = Slider(0, 1, 0.01, 1, 150, false, true, false, false)
a(x, y) = atan2(y,x) * t_0 + 0* (1 - t_0)
n = 2
m = 2
A = (n, m, a(n, m))
B = (n, m)
t_1 = Slider(0, 1, 0.01, 1, 150, false, true, false, false)
r = 7
s = 7
Execute(Sequence( "A"+(i)+" = Surface(x cos(y), x sin(y), a(x cos(y), x sin(y)) + 2*"+( -4 + i )+"*pi * t_1 + 0* (1-t_1) , x, 0.01, r, y, -π+0.001, π)", i, 1, s ))
Execute(Sequence( "B"+(i)+" = (n, m, a(n, m) + 2*"+( -4 + i )+"*pi * t_1 + 0* (1-t_1) )", i, 1, s ))