s/ //g
s/\(.*\)+\(.*\)/|\1|\2|/
:l
/^|[0-9]/ s/^\(|.*\)\(.\)\(|.*|.*\)/\2\1\3/
/|.*|[0-9].*|/ s/\(.*|.*|.*\)\([0-9]\)\(|.*\)/\2\1\3/
s/^\(.\)0/\1/
s/^\(.\)9/\18-/
s/^\(.\)8/\17-/
s/^\(.\)7/\16-/
s/^\(.\)6/\15-/
s/^\(.\)5/\14-/
s/^\(.\)4/\13-/
s/^\(.\)3/\12-/
s/^\(.\)2/\11-/
s/^\(.\)1/\1-/
s/^0//
s/^9/8-/
s/^8/7-/
s/^7/6-/
s/^6/5-/
s/^5/4-/
s/^4/3-/
s/^3/2-/
s/^2/1-/
s/^1/-/
s/\(.*\)+$/-\1/
s/^----------\(-*\)/\1+/
s/^-/1/
s/^1-/2/
s/^2-/3/
s/^3-/4/
s/^4-/5/
s/^5-/6/
s/^6-/7/
s/^7-/8/
s/^8-/9/
s/^|/0|/
s/^+|/0+|/
s/^\(.\)\(.*|\)\(.*\)/\2\1\3/
s/^+\(.*|\)\(.*\)/\1\2+/
/^|||/ !b l
s/^|||//
s/\(.*\)+/1\1/