Surface Drawing as Art Objects 2

xxxxxxxxxx

 

1

var('u,v'); a,b=7,4

2

u_min,u_max=-pi,pi; v_min,v_max=-pi,pi

3

f_x=cos(a*u)*sinh(v)/(1+cosh(u)*cosh(v))

4

f_y=sin(b*u)*sinh(v)/(1+cosh(u)*cosh(v))

5

f_z=sinh(u)*cosh(v)/(1+cosh(u)*cosh(v))

6

parametric_plot3d(

7

    [f_x,f_y,f_z],(u_min,u_max),(v_min,v_max),

8

    plotpoints=100,color='steelblue',opacity=.7,

9

    mesh=True,frame=False)

Language: Sage Gap GP HTML Macaulay2 Maxima Octave Python R Singular

---

Messages