treeToBalancedTree :: Tree1c -> Tree1c
treeToBalancedTree tree = treeToBalancedTree'(makeList tree)
treeToBalancedTree :: Tree1c -> Tree1c
treeToBalancedTree tree = treeToBalancedTree'(makeList tree)
treeToBalancedTree tree = treeToBalancedTree'(makeList tree)