<<KnotTheory`

CleanMV[L_] := (
MultivariableAlexander[L][t] /. {
t[1] ->u, t[2] ->v, t[3] -> w, t[4] -> x, t[5] -> y
}
)

CleanMV /@ AllLinks[]

TeXMV[L_] := "<math>"<>ToString[CleanMV[L], TeXForm]<>"</math>"

?AllLinks

TeXMV /@ AllLinks[6]

CreateWikiConnection[
"http://katlas.math.toronto.edu/w/index.php",
uid="DrorsRobot",
InputString["Password for "<>uid<>"?"]
];

WikiUserName[]

MVAUpload[L_] := WikiSetPageText[
"Data:"<>NameString[L]<>"/Multivariable_Alexander",
TeXMV[L]
]

MVAUpload[Link["L6a4"]]

MVAUpload /@ AllLinks[]