return  ($va->[0] <=> $vb->[0])
                        or ($va->[1] cmp $vb->[1]);

##</code><code>##

                return  ($va->[0] <=> $vb->[0])
                        || ($va->[1] cmp $vb->[1]);