Riemann Surface: log(z)

Topic:
Surface

GGB script

Re(x, y) = log(sqrt(x*x + y*y)) Im(x, y) = atan2(y, x) t = Slider(0, 2, 0.1, 1, 150, false, true, false, false) RSRe = Surface(u*cos(v), u*sin(v), 0*(1-t/2)+Re(u*cos(v), u*sin(v))*(t/2), u, 0, 2, v, -pi, pi-pi/200) RSIm = Surface(u*cos(v), u*sin(v), Im(u*cos(v), u*sin(v)), u, 0, 3, v, -pi, pi-pi/200) Execute(Sequence( "B"+(i)+" = Surface(u*cos(v), u*sin(v),0*(1-t) + Im(u*cos(v), u*sin(v)) * If( 0 <= t <= 1, t, 1) + 0*(2-t)+2*pi*("+(i)+"-2)*(t-1), u, 0, 2, v, -pi, pi-pi/200)", i, 0, 4))