@$rs = reverse sort numerically @$rs ;
  @a   = ($sa, reverse sort numerically @a) ;
  @b   = ($sb, reverse sort numerically @b) ;