% p = 1.000000, q = 0.000000

Draw=f
del all
unknot 44 1.041890
translate 0 0 -5.908846
coord /tmp/kp-hopf.dum
!fixit-hopf
delete all
Draw=t
clrf zf
disp
disp
clrf n
</tmp/kp-hopf.dum
gflush
