(define arbol-eje1 (make-arbol 1
                                             (make-arbol 9
                                                         (make-arbol 0
                                                                    (make-arbol 8 empty empty)
                                                                    (make-arbol 3 empty empty))
                                                         (make-arbol 2
                                                                     (make-arbol 2 empty empty)
                                                                     (make-arbol 7 empty empty)))
                                             (make-arbol 1
                                                         (make-arbol 6 empty empty)
                                                         (make-arbol 4
                                                                     (make-arbol 3 empty empty)
                                                                     (make-arbol 1 empty empty)))))
(define arbol-eje2 (make-arbol 60
                               (make-arbol 41
                                           (make-arbol 16 empty
                                                       (make-arbol 25 empty empty))
                                           (make-arbol 53
                                                       (make-arbol 46
                                                                   (make-arbol 42 empty empty)
                                                                   empty)
                                                       (make-arbol 55 empty empty)))
                               (make-arbol 74
                                           (make-arbol 65
                                                       (make-arbol 63
                                                                   (make-arbol 62 empty empty)
                                                                   (make-arbol 64 empty empty))
                                                       (make-arbol 70 empty empty))
                                           empty)))