((s,1))&&a+=$s||x=(+ \*) a=$[a]${x[1$s 0]}
read -N1 s&&. ./$0||echo $[a]