alias rps {
  if ($findtok(sppsrrrssrppprrpss,$1 $+ $2,1,8)) return $calc($v1 % 3)
  return -1