s"\w"{&_}"g
:
s"\([^{}]*\)\([+-]}[*/-]\|[*/]}/\)"(\1)\2"
s"\([^{}]*\)\([+-]}{[^}]*}[*/]\)"(\1)\2"
s".}{\([^}]*\).}\([^{]\)"\2\1\2}"
t
s"{\|.}""g