sub middle { return ($_[0] + $_[1]) / 2; }