s/(/(+/g
:
s/+[^+)]/<&0123456789((>/
s/<+\(.\).*\1\(.\).*>/\2+/
t
s/+\(+*\))/)\1/
t