plot1=parametric_plot3d(curve,(t,0,2*pi),color="#DC267F",thickness=2)+parametric_plot3d(surface,(t,0,2*pi),(r,0,1),color="gray",opacity=.75)+arrow3d(surface(r=0.5,t=pi/3),unit_normal(r=0.5,t=pi/3),color="#648FFF")+arrow3d(curve(t=0.5),curve(t=0.55),color="#DC267F")

    
    
    Evaluate
    

        

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




    

    

        

        Messages