(define (acha-maior-ab uma-ab)
  (cond
    [(empty? uma-ab)
     0]
    [else
     (maior-entre-3 (nó-id uma-ab) (recursao (nó-dir uma-ab)) (recursao (nó-esq uma-ab)))]))