-

-
(0,0) init
>>vvv...XTBIT		(1,0) glue
 		(2,0) mult 8
 		(3,0) cf
C1>>		(4,0) 8x queue
 		(5,0) zeros
0>v>>...>>>>v		(6,0) ones
 		(7,0) push[1] 1
1v>>v...vvvv>		(8,0) mult 8
 		(9,0) cf
C1>>		(10,0) 8x queue
 		(11,0) zeros
0>v>>...>>>>v		(12,0) ones
 		(13,0) push[0] 1
 		(14,0) a:start
CYC2v...vvvv>		(15,0) halve C1
 		(16,0) C1 flow
C1>>		(17,0) halve que1
 		(18,0) zeros
0>v>>...>>>>v		(19,0) ones
 		(20,0) newdat
CYC3v...>>vv>		(21,0) halve C1
 		(22,0) C2 flow
C2>v>		(23,0) halve que2
 		(24,0) zeros
0>v>>...>>>>v		(25,0) ones
 		(26,0) branches
 		(27,0) halve C1
 		(28,0) C3 flow
C3>>		(29,0) halve que3
 		(30,0) zeros
 		(31,0) ones
 		(32,0) a:L:halt
 		(33,0) add no C
 		(34,0) remove queue / end
 		(35,0) rq2
 		(36,0) rq3
 		(37,0) a:R:create:0
NEXTI...vvv>>		(38,0) div by 4
 		(39,0) new counters
>>S2v...vvv>>		(40,0) keep queue
 		(41,0) zeros
0>v>>...>>>>v		(42,0) ones
 		(43,0) a:R:copy:0
C4v>>...v>END		(44,0) inst start
 		(45,0) loop till C1=0
 		(46,0) flow for even
EVEN>>		(47,0) double C2
 		(48,0) C2 flow
C2>>		(49,0) double C3
 		(50,0) C3 flow
C3>>		(51,0) keep queue
 		(52,0) zeros
0>v>>...>>>>v		(53,0) ones
 		(54,0) C4 flow
 		(55,0) a:R:fuse0:0
NEXTI...vvvv>		(56,0) C1 mult 8
 		(57,0) C1 flow
C1>>		(58,0) fuse as 0
 		(59,0) C2 flow
 		(60,0) keep queue
 		(61,0) zeros
0>v>>...>>>>v		(62,0) ones
 
(0,1)
 		(1,1)
 		(2,1)
 		(3,1)
 		(4,1)
 		(5,1)
 		(6,1)
 		(7,1)
 		(8,1)
 		(9,1)
 		(10,1)
 		(11,1)
 		(12,1)
 		(13,1)
 		(14,1)
 		(15,1)
 		(16,1)
 		(17,1)
 		(18,1)
 		(19,1)
 		(20,1)
 		(21,1)
 		(22,1)
 		(23,1)
 		(24,1)
 		(25,1)
 		(26,1)
 		(27,1)
 		(28,1)
 		(29,1)
 		(30,1)
 		(31,1)
 		(32,1)
 		(33,1)
 		(34,1)
 		(35,1)
 		(36,1)
 		(37,1)
 		(38,1)
 		(39,1)
 		(40,1)
 		(41,1)
 		(42,1)
 		(43,1)
 		(44,1)
 		(45,1)
 		(46,1)
 		(47,1)
 		(48,1)
 		(49,1)
 		(50,1)
 		(51,1)
 		(52,1)
 		(53,1)
 		(54,1)
 		(55,1)
 		(56,1)
 		(57,1)
 		(58,1)
 		(59,1)
 		(60,1)
 		(61,1)
 		(62,1)
 
(0,2)
 		(1,2)
 		(2,2)
vvvvv...vvvvv		(3,2)
 		(4,2)
 		(5,2)
 		(6,2)
1v>>v...>>>>v		(7,2)
 		(8,2)
vvvvv...vvvvv		(9,2)
 		(10,2)
 		(11,2)
 		(12,2)
1v>>v...>>>>v		(13,2)
1v>>v...>>>>v		(14,2)
 		(15,2)
S1vvvv		(16,2)
 		(17,2)
 		(18,2)
 		(19,2)
1v>>v...>>>>v		(20,2)
 		(21,2)
S1vvvv		(22,2)
 		(23,2)
 		(24,2)
 		(25,2)
1v>>v...>>>>v		(26,2)
ONENE...vvvv>		(27,2)
S1vvvv		(28,2)
 		(29,2)
 		(30,2)
 		(31,2)
1v>>v...>>>>v		(32,2)
 		(33,2)
 		(34,2)
 		(35,2)
 		(36,2)
 		(37,2)
 		(38,2)
S1vv		(39,2)
 		(40,2)
 		(41,2)
 		(42,2)
1v>>v...>>>>v		(43,2)
 		(44,2)
 		(45,2) halve counter
vvvv		(46,2)
 		(47,2)
S2vvv...vvvvv		(48,2)
 		(49,2)
S3vvv...vvvvv		(50,2)
 		(51,2)
 		(52,2)
 		(53,2)
1v>>v...>>>>v		(54,2) normal cycle
C4v>>...v>END		(55,2)
 		(56,2)
S1vvv...vvvvv		(57,2)
 		(58,2)
0>v>>...>>>>v		(59,2)
 		(60,2)
 		(61,2)
 		(62,2)
1v>>v...>>>>v
(0,3)
 		(1,3)
 		(2,3)
 		(3,3)
 		(4,3)
 		(5,3)
 		(6,3)
 		(7,3)
 		(8,3)
 		(9,3)
 		(10,3)
 		(11,3)
 		(12,3)
 		(13,3)
 		(14,3)
 		(15,3)
 		(16,3)
 		(17,3)
 		(18,3)
 		(19,3)
 		(20,3)
 		(21,3)
 		(22,3)
 		(23,3)
 		(24,3)
 		(25,3)
 		(26,3)
 		(27,3)
 		(28,3)
 		(29,3)
 		(30,3)
 		(31,3)
 		(32,3)
 		(33,3)
 		(34,3)
 		(35,3)
 		(36,3)
 		(37,3)
 		(38,3)
 		(39,3)
 		(40,3)
 		(41,3)
 		(42,3)
 		(43,3)
 		(44,3)
 		(45,3)
 		(46,3)
 		(47,3)
 		(48,3)
 		(49,3)
 		(50,3)
 		(51,3)
 		(52,3)
 		(53,3)
 		(54,3)
 		(55,3)
 		(56,3)
 		(57,3)
 		(58,3)
 		(59,3)
 		(60,3)
 		(61,3)
 		(62,3)
 
(0,4)
 		(1,4)
 		(2,4)
 		(3,4)
 		(4,4)
 		(5,4)
 		(6,4)
 		(7,4)
 		(8,4)
 		(9,4)
 		(10,4)
 		(11,4)
 		(12,4)
 		(13,4)
 		(14,4)
 		(15,4)
 		(16,4)
 		(17,4)
 		(18,4)
0>v>>...>>>>v		(19,4)
 		(20,4)
 		(21,4)
 		(22,4)
 		(23,4)
 		(24,4)
0>v>>...>>>>v		(25,4)
 		(26,4)
 		(27,4)
 		(28,4)
C3>>		(29,4)
 		(30,4)
 		(31,4)
 		(32,4)
 		(33,4)
 		(34,4)
 		(35,4)
 		(36,4)
 		(37,4)
 		(38,4)
 		(39,4)
 		(40,4)
 		(41,4)
 		(42,4)
 		(43,4)
 		(44,4)
 		(45,4)
 		(46,4) flow for odd/0
ZERON...vvvv>		(47,4)
 		(48,4)
C2F>>		(49,4)
 		(50,4)
C3F>>		(51,4)
 		(52,4)
0>v>>...>>>>v		(53,4)
 		(54,4)
 		(55,4)
 		(56,4)
 		(57,4)
 		(58,4)
 		(59,4)
 		(60,4)
 		(61,4)
 		(62,4)
 
(0,5)
 		(1,5)
 		(2,5)
 		(3,5)
 		(4,5)
 		(5,5)
 		(6,5)
 		(7,5)
 		(8,5)
 		(9,5)
 		(10,5)
 		(11,5)
 		(12,5)
 		(13,5)
 		(14,5)
 		(15,5)
 		(16,5)
 		(17,5)
 		(18,5)
 		(19,5)
 		(20,5)
 		(21,5)
 		(22,5)
 		(23,5)
 		(24,5)
 		(25,5)
 		(26,5)
 		(27,5)
 		(28,5)
 		(29,5)
 		(30,5)
 		(31,5)
 		(32,5)
 		(33,5)
 		(34,5)
 		(35,5)
 		(36,5)
 		(37,5)
 		(38,5)
 		(39,5)
 		(40,5)
 		(41,5)
 		(42,5)
 		(43,5)
 		(44,5)
 		(45,5)
 		(46,5)
 		(47,5)
 		(48,5)
 		(49,5)
 		(50,5)
 		(51,5)
 		(52,5)
 		(53,5)
 		(54,5)
 		(55,5)
 		(56,5)
 		(57,5)
 		(58,5)
 		(59,5)
 		(60,5)
 		(61,5)
 		(62,5)
 
(0,6)
 		(1,6)
 		(2,6)
 		(3,6)
 		(4,6)
 		(5,6)
 		(6,6)
 		(7,6)
 		(8,6)
 		(9,6)
 		(10,6)
 		(11,6)
 		(12,6)
 		(13,6)
 		(14,6)
 		(15,6)
 		(16,6)
 		(17,6)
 		(18,6)
 		(19,6)
 		(20,6)
 		(21,6)
 		(22,6)
 		(23,6)
 		(24,6)
 		(25,6)
 		(26,6)
ZERON...vvvvv		(27,6)
 		(28,6)
 		(29,6)
 		(30,6)
0>v>>...>>>>v		(31,6)
 		(32,6)
 		(33,6)
 		(34,6)
 		(35,6)
 		(36,6)
 		(37,6)
 		(38,6)
 		(39,6)
 		(40,6)
 		(41,6)
 		(42,6)
 		(43,6)
 		(44,6)
 		(45,6)
 		(46,6)
 		(47,6)
 		(48,6)
 		(49,6)
 		(50,6)
 		(51,6)
 		(52,6)
 		(53,6)
 		(54,6) end cycle
 		(55,6)
 		(56,6)
 		(57,6)
 		(58,6)
 		(59,6)
 		(60,6)
 		(61,6)
 		(62,6)
 
(0,7)
 		(1,7)
 		(2,7)
 		(3,7)
 		(4,7)
 		(5,7)
 		(6,7)
 		(7,7)
 		(8,7)
 		(9,7)
 		(10,7)
 		(11,7)
 		(12,7)
 		(13,7)
 		(14,7)
 		(15,7)
 		(16,7)
 		(17,7)
 		(18,7)
 		(19,7)
 		(20,7)
 		(21,7)
 		(22,7)
 		(23,7)
 		(24,7)
 		(25,7)
 		(26,7)
 		(27,7)
 		(28,7)
 		(29,7)
 		(30,7)
 		(31,7)
 		(32,7)
 		(33,7)
 		(34,7)
 		(35,7)
 		(36,7)
 		(37,7)
 		(38,7)
 		(39,7)
 		(40,7)
 		(41,7)
 		(42,7)
 		(43,7)
 		(44,7)
 		(45,7)
 		(46,7)
 		(47,7)
 		(48,7)
 		(49,7)
 		(50,7)
 		(51,7)
 		(52,7)
 		(53,7)
 		(54,7)
 		(55,7)
 		(56,7)
 		(57,7)
 		(58,7)
 		(59,7)
 		(60,7)
 		(61,7)
 		(62,7)