<>; ++$d{$_} for @a=map$_+0,<>; $x>$d{$_}+$d{$_+1} or $x=$d{$_}+$d{$_+1} for @a; print$x;