anarchy golf - the source code

Branching Computations by llhuii

while 1:
 a=[0]
 for C in input():
  b,*c=1,
  for i in a:c+=i-1,i+1;b*=i
  a=[a[1:],a[:-1],[sum(a)],[b],c][ord(C)//2%5]
 print(a)

Note that non-ascii characters in the above source code will be escaped (such as \x9f).