Back to Gallery
  • Remix
  • Share
  • New Entry
on 25 Oct 2021
  • 10
  • 123
  • 0
  • 0
  • 263
k=.1;
[x,y,z]=sphere(1000);
f=@(n)(x.^2+z.^2<n^2).*(y<0);
a=f(.3);
b=f(.2);
r=min(1.1,max(1,1+(abs(z)>k)/20-k*a+2*b));
surf(r.*x,r.*y,r.*z,min(3,max(0,(z<-k)+2*(z>k)-2*a+5*b)))
colormap([0 0 0;1 1 1;1 0 0;1 0.9 0.9])
shading interp
axis equal off
camlight headlight;
view([-10 20]);
Remix Tree