- /
-
Airship
on 14 Oct 2021
- 5
- 55
- 3
- 0
- 279
f=@(x,y,z)x^2+(y^2+z^2)/(.7-.1*x)^2-1;
figure(Color='c')
p=fimplicit(@(x,y)f(x,y,0));
h=@(x)fillmissing(x,'linear');
X=h(p.XData);
Y=h(p.YData);
fill(X,Y,'r');
hold on
fill3(X,X-X,Y,'r');
fimplicit3(f,FaceC='r',EdgeC='none')
axis equal off
view(-145,15)
light(Pos=[1 1 1]);
material dull
xlim([-.9 1]);