# Let call context decide...
multi max (*@args) { 
    if want~~Str { reduce {$^a gt $^b ?? $^a :: $^b} @args }
    else         { reduce {$^a > $^b ?? $^a :: $^b} @args }
}

# Let the user specify...
multi max (&compare, *@args) {
    reduce {compare($^a,$^b)>=0 ?? $^a :: $^b} @args;
}

$biggest_str    = ~max @values;
$biggest_num    = +max @values;
$biggest_num    =  max @values;        
$biggest_mag    =  max {abs $^a <=> abs $^b}  @values;
$biggest_lookup =  max {%hash{$^a} cmp %hash{$^b}  @values;