knot drawing Racket code