special=(#S"^~<=>|-,;:!?/.()[]{}*&%+")*Ct(Cp()*Cc"special"*C(
      (P"&&"+P"++"+P"--"+P"||")+
      (S"!%&*+-/=^|"*P"="^-1)+
      (P"<"*P"<"^-1*P"="^-1)+
      (P">"*P">"^-2*P"="^-1)+
      S"(),.:;?[]{}~"
   ));