$<.map{|l|def abs(n)n.abs end def negate(n)-n end l=l.tr"$<","" 99.times{l.sub!(/(\w+) >>> ([^>]+?) 1/,'\2 \1 1')} p eval l}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page