Excuse me, I forgot the definition of fun: fun(x,y):= GiveSLogPhi(x,y,0.5+%i,10000,100)$ > > > > draw3d( > > explicit(fun, r,-1,1,i,-1,1), > > contour = map); > Now it should work. -- Mario