Unknots

If you have any interesting unknots, please send them to me,
and I'll add them to this page.

Haken's unknots:
Jpeg files of pictures drawn by Haken of various unknots.
Copies of these were given to me by Cameron Gordon.
unknot1
unknot2
unknot3

The Knot Simplifier:
Description

Gridlink:
A manipulative implementation of Dynnikov's algorithm to untie
unknots called Gridlink has been made by Marc Culler. One needs
python to run this program. The easiest way to use this is to
cut and paste the commands given in the README file for Gridlink.

Here are some fun ones to untie (I haven't tried to input Haken's
unknots yet!):
Freedman's unknot:
K=Gridlink([(0,7,7,2,2,9,10,13,18,18,15,15,20,20,17,16,13,11,9,
17,16,21,21,14,14,19,19,12,11,8,3,3,6,6,1,1,4,5,8,10,12,4,5,0)])

Goeritz unknot:
K=Gridlink([(0,9,2,7,9,5,12,3,14,1,10,6,8,12,4,10,1,8,3,
11,5,14,7,0,15,2,13,4,11,15,6,13)])

Thistlethwaite's unknot:
W=Gridlink([(0,8,4,6,7,0,12,12,10,9,6,4,1,2,9,10,5,5,2,11,11,13,13,1,8,7,3,3)])

Suzuki unknot:
K=Gridlink([(0,1,8,3,5,5,1,7,3,2,7,9,10,0,4,4,6,11,11,8,9,10,2,6)])

Ochiai unknot:
W=Gridlink([(0,15,2,12,7,7,16,10,9,13,11,8,5,2,14,5,17,16,10,
11,4,4,6,1,3,14,1,17,8,9,12,6,15,3,13,0)])

Fred Curtis' conjectures on unknot equivalence