t = Slider(-0.5, 2.5, 0.01, 1, 110, false, true, false, false)[br]t_0 = Slider(0, 1, 0.01, 1, 150, false, true, false, false)[br]a(x, y) = atan2(y,x) * t_0 + 0* (1 - t_0)[br][br]n = 2[br]m = 2[br][br]A = (n, m, a(n, m))[br]B = (n, m)[br][br]t_1 = Slider(0, 1, 0.01, 1, 150, false, true, false, false)[br]r = 7[br]s = 7[br][br]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 ))[br][br]Execute(Sequence( "B"+(i)+" = (n, m, a(n, m) + 2*"+( -4 + i )+"*pi * t_1 + 0* (1-t_1) )", i, 1, s ))