((0 0 9 24) ((procedure 1 (turn-left turn-left turn-left step)) (procedure start (put-mark 1 put-mark))))