1 array 8 1
2 var 8
3 var 1
4 zero 1
5 one 1
6 ones 8
7 one 8
8 write 8 1 1 4 6
9 write 8 1 8 5 7
10 read 8 9 3
11 eq 1 2 10
12 root 1 11