avltree.scm