$<.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}