- /
-
UFO
on 21 Oct 2021
- 3
- 85
- 0
- 0
- 280
l=@(n)linspace(0,n,100);
[a,t]=meshgrid(l(360),l(90));
c=cosd(t);
x=cosd(a);
y=sind(a);
z=f(t);
u=surf(x.*c,y.*c,z);
hold on;
t=t/45;
v=surf(x.*t,y.*t,-t);
s=@(p,c)set(p,'facecolor',c,'edgecolor','none');
s(u,'b');s(v,'y');
view(0,5);
light;
set([gcf gca],'color','k');
function z=f(t)
z=sind(t)/3;
z(t>65)=0.5;
end