xxxxxxxxxx
var('u,v'); a,b,c=8,4,3
u_min,u_max,v_min,v_max=-.4,.4,-2*pi,2*pi
fx=a*cos(v)*sinh(u)-b*cos(c*v)*sinh(c*u)
fy=a*sin(v)*sinh(u)+b*sin(c*v)*sinh(c*u)
fz=cos(a*v)*cosh(a*u)
parametric_plot3d(
[fx,fy,fz],(u_min,u_max),(v_min,v_max),plotpoints=400,
color='crimson',opacity=.5,mesh=True,frame=False)
No comments:
Post a Comment