I have tried the following code, but it seems something is missing since I received the same message of: unbound symbol: "insert-tree" [insert-list]
