% Intersection d'un cylindre et d'un conoïde de Plücker.
% Dépend du modèle <b>scene3d.mod</b>.

[
    C:=cylindre(M(0,0,-5),10*vecK,3,50), 
    b:=2,
    CP:=GetSurface( M(u,v,2*b*u*v/(sqr(u)+sqr(v))),-5+5*i,-5+5*i,30+30*i),
    L:=curveTube([3*exp(i*t),b*sin(2*t)],0.15,-pi,pi,50,15),
    Build3D([1, Rgb(0.74,0.73,1), C],
         [1, Rgb(0.74,1,0.73), CP],
         [1, red, L]
    ),
    Display3D()
]