Advertisement
kirbyfan64sos

Output of a BF compiler when given mandel.b

May 29th, 2015
404
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Ruby 84.11 KB | None | 0 0
  1. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;
  2. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;while tape[i] != 0 do tape[i]-=1;i-=1;tape[i]+=1;tape[i]+=1;i-=1;i-=1;i-=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;i-=1;tape[i]+=1;tape[i]+=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;i-=1;tape[i]-=1;tape[i]-=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;while tape[i] != 0 do while tape[i] != 0 do
  3. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;tape[i]+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;end;tape[i]+=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;
  4. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;while tape[i] != 0 do tape[i]-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;
  5. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;
  6. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;while tape[i] != 0 do tape[i]-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;while tape[i] != 0 do tape[i]-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;
  7. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;while tape[i] != 0 do while tape[i] != 0 do tape[i]-=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;
  8. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;tape[i]+=1;i+=1;i+=1;i+=1;tape[i]+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;
  9. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;tape[i]+=1;i+=1;i+=1;i+=1;tape[i]+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  10. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;while tape[i] != 0 do while tape[i] != 0 do
  11. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;tape[i]+=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;end;tape[i]+=1;while tape[i] != 0 do
  12. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;while tape[i] != 0 do
  13. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;tape[i]-=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;end;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]+=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  14. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;while tape[i] != 0 do i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  15. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;while tape[i] != 0 do i-=1;while tape[i] != 0 do tape[i]-=1;end;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;while tape[i] != 0 do i+=1;tape[i]-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;tape[i]+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;end;i+=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;
  16. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;
  17. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]+=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;
  18. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i+=1;i+=1;
  19. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i-=1;while tape[i] != 0 do tape[i]-=1;end;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;while tape[i] != 0 do i+=1;tape[i]-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;tape[i]+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;
  20. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;end;i+=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;
  21. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;while tape[i] != 0 do while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;
  22. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  23. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;end;tape[i]+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;
  24. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;tape[i]+=1;i+=1;end;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;end;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;i+=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;
  25. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i+=1;end;end;tape[i]+=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  26. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;tape[i]+=1;i-=1;i-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;
  27. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;end;i+=1;i+=1;end;i-=1;i-=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;end;end;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;tape[i]+=1;i-=1;i-=1;i-=1;tape[i]-=1;
  28. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;
  29. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;tape[i]+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  30. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;while tape[i] != 0 do while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;tape[i]+=1;i-=1;while tape[i] != 0 do tape[i]-=1;
  31. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;end;tape[i]+=1;while tape[i] != 0 do i-=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;
  32. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;end;i+=1;
  33. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]+=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;
  34. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i-=1;while tape[i] != 0 do tape[i]-=1;end;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;
  35. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;while tape[i] != 0 do i+=1;tape[i]-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;tape[i]+=1;i+=1;end;i-=1;i-=1;i-=1;end;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;end;i+=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;
  36. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;
  37. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;tape[i]+=1;
  38. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;end;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]+=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i-=1;
  39. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i-=1;while tape[i] != 0 do tape[i]-=1;
  40. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;end;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;while tape[i] != 0 do i+=1;tape[i]-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;tape[i]+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;end;i+=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;
  41. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;
  42. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;end;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;
  43. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;
  44. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;while tape[i] != 0 do while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;end;tape[i]+=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;
  45. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do
  46. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;tape[i]-=1;end;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;tape[i]+=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;
  47. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;tape[i]-=1;i-=1;tape[i]+=1;i-=1;end;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;tape[i]+=1;i+=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;end;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;
  48. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;tape[i]-=1;i-=1;i-=1;end;tape[i]+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;
  49. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;tape[i]+=1;i+=1;end;end;tape[i]+=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;end;tape[i]+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]-=1;i+=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;end;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;
  50. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i+=1;end;end;tape[i]+=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  51. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;tape[i]+=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;tape[i]-=1;i-=1;i-=1;end;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;
  52. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;tape[i]+=1;i+=1;while tape[i] != 0 do i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;end;i+=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  53. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;end;i+=1;i+=1;
  54. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;tape[i]+=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;tape[i]-=1;i-=1;end;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;tape[i]+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;
  55. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i+=1;while tape[i] != 0 do i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;end;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  56. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;end;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;end;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;
  57. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;end;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  58. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;while tape[i] != 0 do i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;end;i+=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  59. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  60. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;i+=1;end;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;
  61. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;tape[i]+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;while tape[i] != 0 do
  62. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;tape[i]+=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;end;tape[i]+=1;
  63. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;while tape[i] != 0 do i-=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;
  64. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;end;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]+=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  65. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;while tape[i] != 0 do i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do
  66. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;while tape[i] != 0 do i+=1;tape[i]-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;tape[i]+=1;i+=1;end;i-=1;i-=1;i-=1;end;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;end;i+=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do
  67. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;
  68. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;while tape[i] != 0 do while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  69. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;end;tape[i]+=1;while tape[i] != 0 do i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;end;tape[i]+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  70. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;tape[i]+=1;i+=1;end;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;end;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;i+=1;while tape[i] != 0 do tape[i]-=1;
  71. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i+=1;end;end;tape[i]+=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;while tape[i] != 0 do i-=1;i-=1;
  72. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;tape[i]+=1;i-=1;i-=1;i-=1;
  73. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i+=1;while tape[i] != 0 do i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;tape[i]+=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;
  74. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;tape[i]+=1;i-=1;i-=1;end;i+=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;end;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;tape[i]+=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;end;i-=1;
  75. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;end;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;tape[i]+=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;tape[i]-=1;i-=1;i-=1;end;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;end;i-=1;i-=1;
  76. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i+=1;while tape[i] != 0 do i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;tape[i]+=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;tape[i]+=1;i-=1;end;i-=1;end;i+=1;while tape[i] != 0 do tape[i]-=1;i+=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;
  77. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;end;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;tape[i]+=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;end;i+=1;while tape[i] != 0 do tape[i]-=1;i+=1;tape[i]+=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  78. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  79. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;
  80. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;end;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;tape[i]+=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;tape[i]-=1;i-=1;tape[i]+=1;i-=1;i-=1;end;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;
  81. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;end;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;end;tape[i]+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]-=1;i+=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;end;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;
  82. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;tape[i]+=1;i+=1;end;end;tape[i]+=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;tape[i]-=1;i-=1;i-=1;end;tape[i]+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;end;i+=1;
  83. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i+=1;end;end;tape[i]+=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;
  84. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;tape[i]+=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;tape[i]-=1;i-=1;end;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;tape[i]+=1;
  85. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i+=1;while tape[i] != 0 do i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;end;i-=1;end;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]-=1;
  86. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;end;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;end;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;
  87. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;end;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;
  88. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;tape[i]+=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;tape[i]-=1;i-=1;i-=1;end;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i+=1;while tape[i] != 0 do i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]-=1;
  89. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;end;i+=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;while tape[i] != 0 do
  90. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;tape[i]-=1;i-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;end;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;
  91. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;
  92. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;end;i+=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  93. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  94. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;end;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;
  95. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;tape[i]+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;
  96. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;end;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;tape[i]+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;while tape[i] != 0 do while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;
  97. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;i-=1;i-=1;end;tape[i]+=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;end;tape[i]+=1;while tape[i] != 0 do i-=1;tape[i]+=1;i-=1;i-=1;
  98. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;tape[i]+=1;
  99. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;end;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]+=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i-=1;
  100. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i-=1;while tape[i] != 0 do tape[i]-=1;
  101. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;end;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;while tape[i] != 0 do i+=1;tape[i]-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;tape[i]+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;end;i+=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;
  102. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;while tape[i] != 0 do i-=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;
  103. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]+=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;
  104. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;
  105. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i-=1;while tape[i] != 0 do tape[i]-=1;end;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;while tape[i] != 0 do i+=1;tape[i]-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;tape[i]+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;end;i+=1;tape[i]+=1;
  106. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;
  107. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;while tape[i] != 0 do while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;
  108. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;
  109. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;end;tape[i]+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  110. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;end;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;tape[i]+=1;i+=1;end;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;end;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;i+=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;
  111. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i+=1;end;end;tape[i]+=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;
  112. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;tape[i]-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;end;i+=1;i+=1;end;i-=1;i-=1;end;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;
  113. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;end;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;print tape[i].chr;i-=1;i-=1;end;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;print tape[i].chr;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;i-=1;i-=1;while tape[i] != 0 do
  114. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  115. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;while tape[i] != 0 do tape[i]-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  116. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;
  117. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;
  118. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i-=1;i-=1;while tape[i] != 0 do i-=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;
  119. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;
  120. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i-=1;while tape[i] != 0 do tape[i]-=1;end;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;while tape[i] != 0 do i+=1;tape[i]-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;end;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;tape[i]+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i+=1;
  121. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i+=1;i+=1;i+=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;
  122. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i-=1;while tape[i] != 0 do tape[i]-=1;end;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;while tape[i] != 0 do i+=1;tape[i]-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;end;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;tape[i]+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;
  123. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i+=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;while tape[i] != 0 do tape[i]-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;
  124. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;
  125. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;tape[i]+=1;i+=1;end;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;
  126. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;
  127. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i+=1;end;end;tape[i]+=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  128. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;i+=1;i+=1;i+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;while tape[i] != 0 do tape[i]-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  129. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;end;end;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;print tape[i].chr;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;while tape[i] != 0 do tape[i]-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;
  130. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  131. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;while tape[i] != 0 do tape[i]-=1;end;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;
  132. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  133. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i-=1;while tape[i] != 0 do i-=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;
  134. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;end;i+=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i-=1;while tape[i] != 0 do tape[i]-=1;end;i+=1;tape[i]-=1;
  135. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;while tape[i] != 0 do i+=1;tape[i]-=1;i-=1;tape[i]-=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;end;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;tape[i]+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i+=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  136. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i+=1;i+=1;i+=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;
  137. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i-=1;while tape[i] != 0 do tape[i]-=1;end;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;while tape[i] != 0 do i+=1;tape[i]-=1;i-=1;tape[i]-=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;end;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;tape[i]+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;
  138. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i+=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;while tape[i] != 0 do tape[i]-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;
  139. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;tape[i]+=1;i+=1;
  140. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;
  141. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;tape[i]+=1;i+=1;end;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;
  142. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;tape[i]-=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;
  143. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i-=1;i-=1;i-=1;end;i-=1;while tape[i] != 0 do tape[i]-=1;end;tape[i]+=1;i+=1;end;end;tape[i]+=1;i-=1;while tape[i] != 0 do tape[i]-=1;i+=1;while tape[i] != 0 do i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;while tape[i] != 0 do tape[i]-=1;end;i+=1;i+=1;i+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;tape[i]+=1;
  144. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;tape[i]+=1;while tape[i] != 0 do tape[i]-=1;while tape[i] != 0 do tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;end;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;i-=1;tape[i]-=1;i+=1;i+=1;i+=1;i+=1;i+=1;i+=1;while tape[i] != 0 do i+=1;i+=1;i+=1;i+=1;
  145. if !defined?tape then require "io\x2Fconsole";tape=[0]*9999;i=0;end;i+=1;i+=1;i+=1;i+=1;i+=1;end;end;i-=1;i-=1;i-=1;end;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement