View source for Drawing MorseLink Presentations

riclierle
{{Manual TOC Sidebar}}

KnotTheory` can also draw knots and links via their [[MorseLink Presentations|Morse link presentations]]:

{{Startup Note}}
<!--$$?DrawMorseLink$$-->
<!--Robot Land, no human edits to "END"-->
{{HelpAndAbout|
n  = 1 |
n1 = 2 |
in = <nowiki>DrawMorseLink</nowiki> |
out= <nowiki>DrawMorseLink[L] returns a drawing of the knot or link L as a "Morse Link". For diagrams with a large number of crossings, it may be helpful to use one or both of the options as in DrawMorseLink[L, Gap -> g, ArrowSize -> as ], with 0 < as, g < 1, where g controls the amount of white space at each crossing, and as controls the size of the orientation arrows.</nowiki> |
about= <nowiki>DrawMorseLink was written by Siddarth Sankaran at the University of Toronto in the summer of 2005.</nowiki>}}
<!--END-->

For example, here is the 11-crossing alternating link [[L11a548]]:

<!--$$Show[DrawMorseLink[Link[11, Alternating, 548]]]$$-->
<!--Robot Land, no human edits to "END"-->
{{Graphics|
n  = 4 |
in = <nowiki>Show[DrawMorseLink[Link[11, Alternating, 548]]]</nowiki> |
img= Drawing_MorseLink_Presentations_Out_3.gif |
out= <nowiki>-Graphics-</nowiki>}}
<!--END-->

There are two options available for this program. Adding the option ''Gap -> g'', where ''g'' is between 0 and 1, changes the amount of white space in each crossing; increasing g increases the white space, making large diagrams more visible. The option ''ArrowSize -> as'' (where ''as'' is between 0 and 1) alters the size of the orientation arrows. 
Here is the same drawing as above, but this time the orientation arrows are gone and the crossings are more clear:

<!--$$Show[DrawMorseLink[
  Link[11, Alternating, 548],
  ArrowSize -> 0, Gap -> 0.65
]]$$-->
<!--Robot Land, no human edits to "END"-->
{{Graphics|
n  = 6 |
in = <nowiki>Show[DrawMorseLink[
  Link[11, Alternating, 548],
  ArrowSize -> 0, Gap -> 0.65
]]</nowiki> |
img= Drawing_MorseLink_Presentations_Out_5.gif |
out= <nowiki>-Graphics-</nowiki>}}
<!--END-->