La función recibe un árbol binaro (o árbol de búsqueda binaria) y una lista. Devuelve una lista con los elementos del árbol en orden ascendente.
Lista copiarAListaInOrder(ArBB a, Lista l){
if(!esvacioB(a)){
l = copiarAListaInOrder(izquierdoB(a),l);
l = cons(raiz(a),l);
l = PegaListas( copiarAListaInOrder(derechoB(a),l),l);
return l;
}else{
return vacia();
}
}
