Rolfsen Splice Base - Revision history

Scott at 19:55, 23 June 2006

2006-06-23T19:55:24Z

← Older revision		Revision as of 15:55, 23 June 2006
Line 12:		Line 12:
	If[others === {}, "", StringJoin[("[["<>NameString[#]<>"]], ")& /@ others]]		If[others === {}, "", StringJoin[("[["<>NameString[#]<>"]], ")& /@ others]]
	*> \|		*> \|
	khovanov_table = <TabularKh[Kh[K][q, t], KnotSignature[K]+{1,-1}]> \|
	coloured_jones_2 = <ColouredJones[K, 2][q]> \|		coloured_jones_2 = <ColouredJones[K, 2][q]> \|
	coloured_jones_3 = <ColouredJones[K, 3][q]> \|		coloured_jones_3 = <ColouredJones[K, 3][q]> \|

2006-06-23T18:31:01Z

← Older revision		Revision as of 14:31, 23 June 2006
Line 4:		Line 4:
	n = <n> \|		n = <n> \|
	k = <k> \|		k = <k> \|
	braid_table = <* BraidPlot[CollapseBraid[BR[K]], Mode -> "Wiki", Images -> {"BraidPart0.gif", "BraidPart1.gif",
	"BraidPart2.gif", "BraidPart3.gif", "BraidPart4.gif"}] *> \|
	same_alexander = <* alex = Alexander[K][t];		same_alexander = <* alex = Alexander[K][t];
	others = DeleteCases[Select[AllKnots[], (alex === Alexander[#][t])&], K];		others = DeleteCases[Select[AllKnots[], (alex === Alexander[#][t])&], K];

2006-06-23T18:22:33Z

← Older revision		Revision as of 14:22, 23 June 2006
Line 4:		Line 4:
	n = <n> \|		n = <n> \|
	k = <k> \|		k = <k> \|
	KnotilusURL = <KnotilusURL[K]> \|
	braid_table = <* BraidPlot[CollapseBraid[BR[K]], Mode -> "Wiki", Images -> {"BraidPart0.gif", "BraidPart1.gif",		braid_table = <* BraidPlot[CollapseBraid[BR[K]], Mode -> "Wiki", Images -> {"BraidPart0.gif", "BraidPart1.gif",
	"BraidPart2.gif", "BraidPart3.gif", "BraidPart4.gif"}] *> \|		"BraidPart2.gif", "BraidPart3.gif", "BraidPart4.gif"}] *> \|
	braid_crossings = <Crossings[BR[K]]> \|
	braid_width = <First[BR[K]]> \|
	braid_index = <BraidIndex[K]> \|
	same_alexander = <* alex = Alexander[K][t];		same_alexander = <* alex = Alexander[K][t];
	others = DeleteCases[Select[AllKnots[], (alex === Alexander[#][t])&], K];		others = DeleteCases[Select[AllKnots[], (alex === Alexander[#][t])&], K];

2005-09-18T21:08:05Z

@@ Line 24: / Line 24: @@
 coloured_jones_5 = <*ColouredJones[K, 5][q]*> |
 coloured_jones_6 = <*ColouredJones[K, 6][q]*> |
-coloured_jones_7 = <*ColouredJones[K, 7][q]*> |
+coloured_jones_7 = <*ColouredJones[K, 7][q]*>

2005-09-01T17:33:32Z

← Older revision		Revision as of 13:33, 1 September 2005
Line 32:		Line 32:
	</tr>		</tr>
	<tr valign=top><td colspan=2><InOut[1]; KnotTheoryWelcomeMessage[]></td></tr>		<tr valign=top><td colspan=2><InOut[1]; KnotTheoryWelcomeMessage[]></td></tr>
		⚫	</table>
	<InOut["PD[``]", K]>		<InOut["PD[``]", K]>
	<InOut["GaussCode[``]", K]>		<InOut["GaussCode[``]", K]>
Line 60:		Line 61:
	<* If[ColouredJones[K, 2] === NotAvailable, "",		<* If[ColouredJones[K, 2] === NotAvailable, "",
	InOut["ColouredJones[``, 2][q]", K]		InOut["ColouredJones[``, 2][q]", K]
	] *>		] *> }}
⚫	</table> }}

2005-08-31T22:26:11Z

← Older revision		Revision as of 18:26, 31 August 2005
Line 40:		Line 40:
	<GraphicsBox[NameString[K]<>"_ML.gif", "Show[DrawMorseLink[`1`]]", K]>		<GraphicsBox[NameString[K]<>"_ML.gif", "Show[DrawMorseLink[`1`]]", K]>
	<*InOut[		<*InOut[
	" (#[``]&) /@ {		" (#[``]&) /@ {\n
	SymmetryType, UnknottingNumber, ThreeGenus,		SymmetryType, UnknottingNumber, ThreeGenus,\n
	BridgeIndex, SuperBridgeIndex, NakanishiIndex		BridgeIndex, SuperBridgeIndex, NakanishiIndex\n
	}", K		}", K
	]*>		]*>

2005-08-31T22:25:05Z

← Older revision		Revision as of 18:25, 31 August 2005
Line 40:		Line 40:
	<GraphicsBox[NameString[K]<>"_ML.gif", "Show[DrawMorseLink[`1`]]", K]>		<GraphicsBox[NameString[K]<>"_ML.gif", "Show[DrawMorseLink[`1`]]", K]>
	<*InOut[		<*InOut[
	"(#[``]&) /@ {~~SymmetryType, UnknottingNumber, ThreeGenus, BridgeIndex, SuperBridgeIndex, NakanishiIndex}", K~~		" (#[``]&) /@ {
			SymmetryType, UnknottingNumber, ThreeGenus,
			BridgeIndex, SuperBridgeIndex, NakanishiIndex
			}", K
	]*>		]*>
	<InOut["alex = Alexander[``][t]", K]>		<InOut["alex = Alexander[``][t]", K]>

2005-08-31T01:17:20Z

2005-08-30T21:54:23Z

@@ Line 1: / Line 1: @@
 <!-- <* (* -->{{Splice Template Notice}}<!-- *) *> -->
 {{Rolfsen Knot Page|
 n = <*n*> |

2005-08-30T19:03:42Z

@@ Line 1: / Line 1: @@
-<!-- <* (* -->{{Splice Template Notice}}<!-- *) *> --> <!--
+<!-- <* (* -->{{Splice Template Notice}}<!-- *) *> -->
 {{Rolfsen Knot Page|
 n = <*n*> |