% Demo of `mangle' command.

reset all

alert "Ken Millett's `mangling' operation" Cool! "Go ahead"

reset slider

scale = .517

cyl = .05
mode cb

unknot 50 7
nap 2

mangle 300 55 1 1

rot x 5
rot x 5
rot x 5
rot x 5
rot x 5
rot x 5
rot x 5
rot x 5

rot x 5
rot x 5
rot x 5
rot x 5
rot x 5
rot x 5
rot x 5
rot x 5
rot x 5
rot x 5
rot x 5
rot x 5
rot x 5

rot x 5
rot x 5
rot x 5

rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5



rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5


rot x 5
rot x 5
rot x 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5



rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5


rot x 5
rot x 5
rot x 5

anim scale .517 1.4 30 log

mangle 222 55 1 1

rot x 5
rot x 5
rot x 5
rot x 5
rot x 5
rot x 5
rot x 5
rot x 5

rot x 5
rot x 5
rot x 5
rot x 5
rot x 5
rot x 5
rot x 5
rot x 5
rot x 5
rot x 5
rot x 5
rot x 5
rot x 5

rot x 5
rot x 5
rot x 5

rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5



rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5


rot x 5
rot x 5
rot x 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5
rot y 5



rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5
rot z 5


rot x 5
rot x 5
rot x 5


