(define-struct arbol(hizq hdere))
          (define arbolA(make-arbol 3(make-arbol 2(make-arbol 10(make-arbol 1(make-arbol 5 empty empty))
                                                              (make-arbol 4 empty empty))
                                                 (make-arbol 3 empty empty))
                                    (make-arbol 15(make-arbol 6 empty empty))
                                    (make-arbol 9 (make-arbol 3 (make arbol 7 empty empty)))
                                    (make-arbol 2 empty empty))
            (make-arbol 1(make-arbol 10 empty empty))
            (make-arbol 12 (make-arbol 10 empty empty)))