#!/usr/bin/env ruby
eval '$m=Hash.new(p=1); $n=Hash.new(b=0); $h=Hash.new(z=0); $d=Hash.new(q=0);'+gets.chomp.gsub(/[a-z][a-z0-9]*|./,

     ' ' => 'p=1 if b==0; p=2 if z==1; $m[p]+=1 if b==2; q+=1 if z==3; $d[q]=$m[p] if z==3; p=1+rand(2) if b==4; b=-1 if b>4; putc $d[q] if z==4; z=0 if z>4;',
     '^' => 'b+=1 if b>2 or b==2;',
     '~' => 'b+=1 if b<2 or b==2;',
     '-' => 'z+=1 if b>2 or b==2;',
     '=' => 'z+=1 if b<2 or b==2;',
     ']' => '$m[p]=0;',
     '|' => 'q-=1 if $d[q]==$m[p];',
     '_' => '$m[p]+=$m[p] if b==2;',
     'v' => 'q+=1; $d[q]=STDIN.getbyte if !STDIN.eof;',
     '/' => '$d[q]=0; q-=1;',
     ';' => '(',
     '!' => ')while(($d[q]&=255)!=1);',
     ':' => ')while(($d[q]&=255)!=0);')
puts""