#! /usr/bin/env raku

use lib "lib";
use BinaryNode;

unit sub MAIN (Str $tree = "8 | 5 9 | 4 6", :v(:$verbose));

my $btree = BinaryNode.create($tree);

# say ": { $btree.raku }" if $verbose;

say 1 if $btree.min-max(:$verbose);