f:{ /x:dowker notation, y:crossing signs
N::2*n:#x /n:number of crossings, N:twice n
s:1-2*!n#2 /s:all possible sets of smoothing signs for the crossings (n*(2^n) matrix of -1 1)
S:{(x,'1+|x;0 1+\:x:(0<x)|:/y,-1+x|-x)} /S:smoothe the crossing numbered x,y in dowker notation (x can be negative)
a:N!(x S'2*!n)@'/:+~y=s /generate all possible smoothed knots (results consist of neighbour pairs that form sets of disjoint unknots)