\def\sprefix#1{\def#1##1{\csname!\string#1\string##1\endcsname}}
\def\sdef#1#2{\expandafter\def\csname!\string#1\string#2\endcsname}
\def\slet#1#2{\expandafter\let\csname!\string#1\string#2\endcsname}
