#http://mathworld.wolfram.com/HornTorus.html

vertices = D1:100 D2:100

u = from 0 to (PI*2) D1
v = from 0 to (PI*2) D2

x = (1 + cos(v))*cos(u)
y = sin(v)
z = (1 + cos(v))*sin(u)

a = 10

x = x*a
y = y*a
z = z*a