arc tan 0.0002 with buggy instruction at 01117 & 01120 00330: ..11.1.... keys -> rom address A=00002000000000 B=02000099999999 C=02000000000996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 00050: ...1...1.. 1 -> s1 A=00002000000000 B=02000099999999 C=02000000000996 D=03490600000994 M=00000000000000 P=c S=01....678.ab 00051: ..1.111.11 -> 00056 go to l00056 A=00002000000000 B=02000099999999 C=02000000000996 D=03490600000994 M=00000000000000 P=c S=01....678.ab 00056: ....1.111. l00056: 0 -> b[w] A=00002000000000 B=00000000000000 C=02000000000996 D=03490600000994 M=00000000000000 P=c S=01....678.ab 00057: ..1..1.... -> 01060 select rom 1 ; -> l01060 A=00002000000000 B=00000000000000 C=02000000000996 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01060: .11...111. c -> a[w] A=02000000000996 B=00000000000000 C=02000000000996 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01061: ...1.1.1.. if s1 = 0 A=02000000000996 B=00000000000000 C=02000000000996 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01062: ..1..1.111 -> 01045 then go to sqt11 A=02000000000996 B=00000000000000 C=02000000000996 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01063: 1.1..1.1.. if s10 = 0 A=02000000000996 B=00000000000000 C=02000000000996 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01064: .11.11.111 -> 01155 then go to l01155 A=02000000000996 B=00000000000000 C=02000000000996 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01065: .1.1.1.1.. if s5 = 0 A=02000000000996 B=00000000000000 C=02000000000996 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01066: ...1.1.111 -> 01025 then go to atn11 A=02000000000996 B=00000000000000 C=02000000000996 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01025: 1.111.111. atn11: 0 -> a[w] A=00000000000000 B=00000000000000 C=02000000000996 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01026: 11111...1. a + 1 -> a[p] A=01000000000000 B=00000000000000 C=02000000000996 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01027: .1..1..11. a -> b[m] A=01000000000000 B=01000000000000 C=02000000000996 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01030: 111.1..11. a exchange c[m] A=02000000000000 B=01000000000000 C=01000000000996 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01031: .1.11.1.1. atn12: c - 1 -> c[x] A=02000000000000 B=01000000000000 C=01000000000995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01032: 1.1..1..1. shift right b[wp] A=02000000000000 B=00100000000000 C=01000000000995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01033: .11.111.1. if c[xs] = 0 A=02000000000000 B=00100000000000 C=01000000000995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01034: ...11..111 -> 01031 then go to atn12 A=02000000000000 B=00100000000000 C=01000000000995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01035: 1.11.1..1. atn13: shift right a[wp] A=00200000000000 B=00100000000000 C=01000000000995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01036: .1111.1.1. c + 1 -> c[x] A=00200000000000 B=00100000000000 C=01000000000996 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01037: ...111.111 -> 01035 if no carry go to atn13 A=00200000000000 B=00100000000000 C=01000000000996 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01035: 1.11.1..1. atn13: shift right a[wp] A=00020000000000 B=00100000000000 C=01000000000996 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01036: .1111.1.1. c + 1 -> c[x] A=00020000000000 B=00100000000000 C=01000000000997 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01037: ...111.111 -> 01035 if no carry go to atn13 A=00020000000000 B=00100000000000 C=01000000000997 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01035: 1.11.1..1. atn13: shift right a[wp] A=00002000000000 B=00100000000000 C=01000000000997 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01036: .1111.1.1. c + 1 -> c[x] A=00002000000000 B=00100000000000 C=01000000000998 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01037: ...111.111 -> 01035 if no carry go to atn13 A=00002000000000 B=00100000000000 C=01000000000998 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01035: 1.11.1..1. atn13: shift right a[wp] A=00000200000000 B=00100000000000 C=01000000000998 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01036: .1111.1.1. c + 1 -> c[x] A=00000200000000 B=00100000000000 C=01000000000999 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01037: ...111.111 -> 01035 if no carry go to atn13 A=00000200000000 B=00100000000000 C=01000000000999 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01035: 1.11.1..1. atn13: shift right a[wp] A=00000020000000 B=00100000000000 C=01000000000999 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01036: .1111.1.1. c + 1 -> c[x] A=00000020000000 B=00100000000000 C=01000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01037: ...111.111 -> 01035 if no carry go to atn13 A=00000020000000 B=00100000000000 C=01000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01040: 1.11..111. shift right a[w] A=00000002000000 B=00100000000000 C=01000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01041: 1.1...111. shift right b[w] A=00000002000000 B=00010000000000 C=01000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01042: .1..1.1... c -> stack A=00000002000000 B=00010000000000 C=01000000000000 D=01000000000000 M=00000000000000 P=c S=01....678.ab 01043: 1...1.111. atn14: b exchange c[w] A=00000002000000 B=01000000000000 C=00010000000000 D=01000000000000 M=00000000000000 P=c S=01....678.ab 01044: .1.....111 -> 01101 go to atn18 A=00000002000000 B=01000000000000 C=00010000000000 D=01000000000000 M=00000000000000 P=c S=01....678.ab 01101: .1..1.111. atn18: a -> b[w] A=00000002000000 B=00000002000000 C=00010000000000 D=01000000000000 M=00000000000000 P=c S=01....678.ab prepare for cordic rotations 01102: 11.1.1..1. a - c -> a[wp] A=09990002000000 B=00000002000000 C=00010000000000 D=01000000000000 M=00000000000000 P=c S=01....678.ab 01103: ..111.1111 -> 01073 if no carry go to atn16 A=09990002000000 B=00000002000000 C=00010000000000 D=01000000000000 M=00000000000000 P=c S=01....678.ab KO, no rotation 10^-0 01104: .11.1.1... stack -> a A=01000000000000 B=00000002000000 C=00010000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01105: 1.11..111. shift right a[w] A=00100000000000 B=00000002000000 C=00010000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01106: 111.11..1. a exchange c[wp] A=00010000000000 B=00000002000000 C=00100000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01107: 11..1.111. a exchange b[w] A=00000002000000 B=00010000000000 C=00100000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01110: .1...1..1. shift left a[wp] A=00000020000000 B=00010000000000 C=00100000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01111: .1..1.1... c -> stack A=00000020000000 B=00010000000000 C=00100000000000 D=00100000000000 M=00000000000000 P=c S=01....678.ab 01112: 111111111. a + 1 -> a[s] A=10000020000000 B=00010000000000 C=00100000000000 D=00100000000000 M=00000000000000 P=c S=01....678.ab 01113: 111111111. a + 1 -> a[s] A=20000020000000 B=00010000000000 C=00100000000000 D=00100000000000 M=00000000000000 P=c S=01....678.ab 01114: ..1...1111 -> 01043 if no carry go to atn14 A=20000020000000 B=00010000000000 C=00100000000000 D=00100000000000 M=00000000000000 P=c S=01....678.ab 01043: 1...1.111. atn14: b exchange c[w] A=20000020000000 B=00100000000000 C=00010000000000 D=00100000000000 M=00000000000000 P=c S=01....678.ab 01044: .1.....111 -> 01101 go to atn18 A=20000020000000 B=00100000000000 C=00010000000000 D=00100000000000 M=00000000000000 P=c S=01....678.ab 01101: .1..1.111. atn18: a -> b[w] A=20000020000000 B=20000020000000 C=00010000000000 D=00100000000000 M=00000000000000 P=c S=01....678.ab try rotation 10^-1 01102: 11.1.1..1. a - c -> a[wp] A=29990020000000 B=20000020000000 C=00010000000000 D=00100000000000 M=00000000000000 P=c S=01....678.ab 01103: ..111.1111 -> 01073 if no carry go to atn16 A=29990020000000 B=20000020000000 C=00010000000000 D=00100000000000 M=00000000000000 P=c S=01....678.ab KO no rotation 10^-1 01104: .11.1.1... stack -> a A=00100000000000 B=20000020000000 C=00010000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01105: 1.11..111. shift right a[w] A=00010000000000 B=20000020000000 C=00010000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01106: 111.11..1. a exchange c[wp] A=00010000000000 B=20000020000000 C=00010000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01107: 11..1.111. a exchange b[w] A=20000020000000 B=00010000000000 C=00010000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01110: .1...1..1. shift left a[wp] A=20000200000000 B=00010000000000 C=00010000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01111: .1..1.1... c -> stack A=20000200000000 B=00010000000000 C=00010000000000 D=00010000000000 M=00000000000000 P=c S=01....678.ab 01112: 111111111. a + 1 -> a[s] A=30000200000000 B=00010000000000 C=00010000000000 D=00010000000000 M=00000000000000 P=c S=01....678.ab 01113: 111111111. a + 1 -> a[s] A=40000200000000 B=00010000000000 C=00010000000000 D=00010000000000 M=00000000000000 P=c S=01....678.ab 01114: ..1...1111 -> 01043 if no carry go to atn14 A=40000200000000 B=00010000000000 C=00010000000000 D=00010000000000 M=00000000000000 P=c S=01....678.ab 01043: 1...1.111. atn14: b exchange c[w] A=40000200000000 B=00010000000000 C=00010000000000 D=00010000000000 M=00000000000000 P=c S=01....678.ab 01044: .1.....111 -> 01101 go to atn18 A=40000200000000 B=00010000000000 C=00010000000000 D=00010000000000 M=00000000000000 P=c S=01....678.ab 01101: .1..1.111. atn18: a -> b[w] A=40000200000000 B=40000200000000 C=00010000000000 D=00010000000000 M=00000000000000 P=c S=01....678.ab try rotation 10^-2 01102: 11.1.1..1. a - c -> a[wp] A=49990200000000 B=40000200000000 C=00010000000000 D=00010000000000 M=00000000000000 P=c S=01....678.ab 01103: ..111.1111 -> 01073 if no carry go to atn16 A=49990200000000 B=40000200000000 C=00010000000000 D=00010000000000 M=00000000000000 P=c S=01....678.ab KO no rotation 10^-2 01104: .11.1.1... stack -> a A=00010000000000 B=40000200000000 C=00010000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01105: 1.11..111. shift right a[w] A=00001000000000 B=40000200000000 C=00010000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01106: 111.11..1. a exchange c[wp] A=00010000000000 B=40000200000000 C=00001000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01107: 11..1.111. a exchange b[w] A=40000200000000 B=00010000000000 C=00001000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01110: .1...1..1. shift left a[wp] A=40002000000000 B=00010000000000 C=00001000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01111: .1..1.1... c -> stack A=40002000000000 B=00010000000000 C=00001000000000 D=00001000000000 M=00000000000000 P=c S=01....678.ab 01112: 111111111. a + 1 -> a[s] A=50002000000000 B=00010000000000 C=00001000000000 D=00001000000000 M=00000000000000 P=c S=01....678.ab 01113: 111111111. a + 1 -> a[s] A=60002000000000 B=00010000000000 C=00001000000000 D=00001000000000 M=00000000000000 P=c S=01....678.ab 01114: ..1...1111 -> 01043 if no carry go to atn14 A=60002000000000 B=00010000000000 C=00001000000000 D=00001000000000 M=00000000000000 P=c S=01....678.ab 01043: 1...1.111. atn14: b exchange c[w] A=60002000000000 B=00001000000000 C=00010000000000 D=00001000000000 M=00000000000000 P=c S=01....678.ab 01044: .1.....111 -> 01101 go to atn18 A=60002000000000 B=00001000000000 C=00010000000000 D=00001000000000 M=00000000000000 P=c S=01....678.ab 01101: .1..1.111. atn18: a -> b[w] A=60002000000000 B=60002000000000 C=00010000000000 D=00001000000000 M=00000000000000 P=c S=01....678.ab try rotation 10^-3 01102: 11.1.1..1. a - c -> a[wp] A=69992000000000 B=60002000000000 C=00010000000000 D=00001000000000 M=00000000000000 P=c S=01....678.ab 01103: ..111.1111 -> 01073 if no carry go to atn16 A=69992000000000 B=60002000000000 C=00010000000000 D=00001000000000 M=00000000000000 P=c S=01....678.ab oops, no rataion 10^-3 01104: .11.1.1... stack -> a A=00001000000000 B=60002000000000 C=00010000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01105: 1.11..111. shift right a[w] A=00000100000000 B=60002000000000 C=00010000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01106: 111.11..1. a exchange c[wp] A=00010000000000 B=60002000000000 C=00000100000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01107: 11..1.111. a exchange b[w] A=60002000000000 B=00010000000000 C=00000100000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01110: .1...1..1. shift left a[wp] A=60020000000000 B=00010000000000 C=00000100000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01111: .1..1.1... c -> stack A=60020000000000 B=00010000000000 C=00000100000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01112: 111111111. a + 1 -> a[s] A=70020000000000 B=00010000000000 C=00000100000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01113: 111111111. a + 1 -> a[s] A=80020000000000 B=00010000000000 C=00000100000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01114: ..1...1111 -> 01043 if no carry go to atn14 A=80020000000000 B=00010000000000 C=00000100000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01043: 1...1.111. atn14: b exchange c[w] A=80020000000000 B=00000100000000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01044: .1.....111 -> 01101 go to atn18 A=80020000000000 B=00000100000000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01101: .1..1.111. atn18: a -> b[w] A=80020000000000 B=80020000000000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab try rotation 10^-4 01102: 11.1.1..1. a - c -> a[wp] A=80010000000000 B=80020000000000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01103: ..111.1111 -> 01073 if no carry go to atn16 A=80010000000000 B=80020000000000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab at last OK 01073: 11.111111. atn16: a - 1 -> a[s] 1 rotation 10^-4 A=70010000000000 B=80020000000000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01074: ..111.1.11 -> 01072 if no carry go to atn15 A=70010000000000 B=80020000000000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01072: 1.1..1..1. atn15: shift right b[wp] A=70010000000000 B=80002000000000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01073: 11.111111. atn16: a - 1 -> a[s] A=60010000000000 B=80002000000000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01074: ..111.1.11 -> 01072 if no carry go to atn15 A=60010000000000 B=80002000000000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01072: 1.1..1..1. atn15: shift right b[wp] A=60010000000000 B=80000200000000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01073: 11.111111. atn16: a - 1 -> a[s] A=50010000000000 B=80000200000000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01074: ..111.1.11 -> 01072 if no carry go to atn15 A=50010000000000 B=80000200000000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01072: 1.1..1..1. atn15: shift right b[wp] A=50010000000000 B=80000020000000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01073: 11.111111. atn16: a - 1 -> a[s] A=40010000000000 B=80000020000000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01074: ..111.1.11 -> 01072 if no carry go to atn15 A=40010000000000 B=80000020000000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01072: 1.1..1..1. atn15: shift right b[wp] A=40010000000000 B=80000002000000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01073: 11.111111. atn16: a - 1 -> a[s] A=30010000000000 B=80000002000000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01074: ..111.1.11 -> 01072 if no carry go to atn15 A=30010000000000 B=80000002000000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01072: 1.1..1..1. atn15: shift right b[wp] A=30010000000000 B=80000000200000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01073: 11.111111. atn16: a - 1 -> a[s] A=20010000000000 B=80000000200000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01074: ..111.1.11 -> 01072 if no carry go to atn15 A=20010000000000 B=80000000200000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01072: 1.1..1..1. atn15: shift right b[wp] A=20010000000000 B=80000000020000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01073: 11.111111. atn16: a - 1 -> a[s] A=10010000000000 B=80000000020000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01074: ..111.1.11 -> 01072 if no carry go to atn15 A=10010000000000 B=80000000020000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01072: 1.1..1..1. atn15: shift right b[wp] A=10010000000000 B=80000000002000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01073: 11.111111. atn16: a - 1 -> a[s] A=00010000000000 B=80000000002000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01074: ..111.1.11 -> 01072 if no carry go to atn15 A=00010000000000 B=80000000002000 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01072: 1.1..1..1. atn15: shift right b[wp] A=00010000000000 B=80000000000200 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01073: 11.111111. atn16: a - 1 -> a[s] A=90010000000000 B=80000000000200 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01074: ..111.1.11 -> 01072 if no carry go to atn15 A=90010000000000 B=80000000000200 C=00010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01075: .11111111. c + 1 -> c[s] A=90010000000000 B=80000000000200 C=10010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01076: 11..11..1. a exchange b[wp] A=90000000000200 B=80010000000000 C=10010000000000 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01077: .111.1..1. a + c -> c[wp] A=90000000000200 B=80010000000000 C=10010000000200 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01100: 11..1.111. a exchange b[w] A=80010000000000 B=90000000000200 C=10010000000200 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01101: .1..1.111. atn18: a -> b[w] A=80010000000000 B=80010000000000 C=10010000000200 D=00000100000000 M=00000000000000 P=c S=01....678.ab try another 01102: 11.1.1..1. a - c -> a[wp] A=89999999999800 B=80010000000000 C=10010000000200 D=00000100000000 M=00000000000000 P=c S=01....678.ab 01103: ..111.1111 -> 01073 if no carry go to atn16 A=89999999999800 B=80010000000000 C=10010000000200 D=00000100000000 M=00000000000000 P=c S=01....678.ab KO no way 01104: .11.1.1... stack -> a A=00000100000000 B=80010000000000 C=10010000000200 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01105: 1.11..111. shift right a[w] A=00000010000000 B=80010000000000 C=10010000000200 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01106: 111.11..1. a exchange c[wp] A=00010000000200 B=80010000000000 C=10000010000000 pq=10000 D=03490600000994 M=00000000000000 P=c S=01....678.ab only one cordic rotation 10^-4 01107: 11..1.111. a exchange b[w] A=80010000000000 B=00010000000200 C=10000010000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01110: .1...1..1. shift left a[wp] A=80100000000000 B=00010000000200 C=10000010000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01111: .1..1.1... c -> stack A=80100000000000 B=00010000000200 C=10000010000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab 01112: 111111111. a + 1 -> a[s] A=90100000000000 B=00010000000200 C=10000010000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab 01113: 111111111. a + 1 -> a[s] A=00100000000000 B=00010000000200 C=10000010000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab 01114: ..1...1111 -> 01043 if no carry go to atn14 A=00100000000000 B=00010000000200 C=10000010000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab End of part1 01115: ..11..111. 0 -> c[w] A=00100000000000 B=00010000000200 C=00000000000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab 01116: ....1.1.1. 0 -> b[x] A=00100000000000 B=00010000000000 C=00000000000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab Here the two buggy instructions ------------------------------- 01117: .1111...1. c + 1 -> c[p] A=00100000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab 01120: 1.11.111.1 -> 01267 jsb @267 A=00100000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab ------------------------------- 01267: .....111.. p - 1 -> p A=00100000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01270: ....1.11.. if p # 0 A=00100000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=00100000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab We divide A/B by repeated subtractions : A=00100000000000 B=00010000000000 01263: 11...1.11. div15: a - b -> a[ms] A=00090000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=00090000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] Y/X (A/B) A=00090000000000 B=00010000000000 C=01100000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab one time 01263: 11...1.11. div15: a - b -> a[ms] A=00080000000000 B=00010000000000 C=01100000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=00080000000000 B=00010000000000 C=01100000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] 2 times A=00080000000000 B=00010000000000 C=01200000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=00070000000000 B=00010000000000 C=01200000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=00070000000000 B=00010000000000 C=01200000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] 3 times A=00070000000000 B=00010000000000 C=01300000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=00060000000000 B=00010000000000 C=01300000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=00060000000000 B=00010000000000 C=01300000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] 4 times A=00060000000000 B=00010000000000 C=01400000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=00050000000000 B=00010000000000 C=01400000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=00050000000000 B=00010000000000 C=01400000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] 5 times A=00050000000000 B=00010000000000 C=01500000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=00040000000000 B=00010000000000 C=01500000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=00040000000000 B=00010000000000 C=01500000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] 6 times A=00040000000000 B=00010000000000 C=01600000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=00030000000000 B=00010000000000 C=01600000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=00030000000000 B=00010000000000 C=01600000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] 7 times A=00030000000000 B=00010000000000 C=01700000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=00020000000000 B=00010000000000 C=01700000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=00020000000000 B=00010000000000 C=01700000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] 8 times A=00020000000000 B=00010000000000 C=01800000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=00010000000000 B=00010000000000 C=01800000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=00010000000000 B=00010000000000 C=01800000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] 9 times A=00010000000000 B=00010000000000 C=01900000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=00000000000000 B=00010000000000 C=01900000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=00000000000000 B=00010000000000 C=01900000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] 10 times ! A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=99990000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab ------------------------------------------------------------------------ 01264: 1.11..1.11 -> 01262 if no carry go to div14 overflow A=99990000000000 B=00010000000000 C=01000000000000 we lost one digit D=10000010000000 M=00000000000000 P=b S=01....678.ab the result flaws 01265: 111..1.11. a + b -> a[ms] 1 instead of 2 A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01266: .1...1.11. shift left a[ms] A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=b S=01....678.ab 01267: .....111.. p - 1 -> p A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=a S=01....678.ab 01270: ....1.11.. if p # 0 A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=a S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=a S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=99990000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=a S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=99990000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=a S=01....678.ab 01265: 111..1.11. a + b -> a[ms] A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=a S=01....678.ab 01266: .1...1.11. shift left a[ms] A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=a S=01....678.ab 01267: .....111.. p - 1 -> p A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=9 S=01....678.ab 01270: ....1.11.. if p # 0 A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=9 S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=9 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=99990000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=9 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=99990000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=9 S=01....678.ab 01265: 111..1.11. a + b -> a[ms] A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=9 S=01....678.ab 01266: .1...1.11. shift left a[ms] A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=9 S=01....678.ab 01267: .....111.. p - 1 -> p A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=8 S=01....678.ab 01270: ....1.11.. if p # 0 A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=8 S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=8 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=99990000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=8 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=99990000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=8 S=01....678.ab 01265: 111..1.11. a + b -> a[ms] A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=8 S=01....678.ab 01266: .1...1.11. shift left a[ms] A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=8 S=01....678.ab 01267: .....111.. p - 1 -> p A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=7 S=01....678.ab 01270: ....1.11.. if p # 0 A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=7 S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=7 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=99990000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=7 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=99990000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=7 S=01....678.ab 01265: 111..1.11. a + b -> a[ms] A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=7 S=01....678.ab 01266: .1...1.11. shift left a[ms] A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=7 S=01....678.ab 01267: .....111.. p - 1 -> p A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=6 S=01....678.ab 01270: ....1.11.. if p # 0 A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=6 S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=6 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=99990000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=6 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=99990000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=6 S=01....678.ab 01265: 111..1.11. a + b -> a[ms] A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=6 S=01....678.ab 01266: .1...1.11. shift left a[ms] A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=6 S=01....678.ab 01267: .....111.. p - 1 -> p A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=5 S=01....678.ab 01270: ....1.11.. if p # 0 A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=5 S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=5 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=99990000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=5 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=99990000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=5 S=01....678.ab 01265: 111..1.11. a + b -> a[ms] A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=5 S=01....678.ab 01266: .1...1.11. shift left a[ms] A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=5 S=01....678.ab 01267: .....111.. p - 1 -> p A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=4 S=01....678.ab 01270: ....1.11.. if p # 0 A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=4 S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=4 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=99990000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=4 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=99990000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=4 S=01....678.ab 01265: 111..1.11. a + b -> a[ms] A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=4 S=01....678.ab 01266: .1...1.11. shift left a[ms] A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=4 S=01....678.ab 01267: .....111.. p - 1 -> p A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=3 S=01....678.ab 01270: ....1.11.. if p # 0 A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=3 S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=3 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=99990000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=3 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=99990000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=3 S=01....678.ab 01265: 111..1.11. a + b -> a[ms] A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=3 S=01....678.ab 01266: .1...1.11. shift left a[ms] A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=3 S=01....678.ab 01267: .....111.. p - 1 -> p A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=2 S=01....678.ab 01270: ....1.11.. if p # 0 A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=2 S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=2 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=99990000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=2 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=99990000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=2 S=01....678.ab 01265: 111..1.11. a + b -> a[ms] A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=2 S=01....678.ab 01266: .1...1.11. shift left a[ms] A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=2 S=01....678.ab 01267: .....111.. p - 1 -> p A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=1 S=01....678.ab 01270: ....1.11.. if p # 0 A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=1 S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=1 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=99990000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=1 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=99990000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=1 S=01....678.ab 01265: 111..1.11. a + b -> a[ms] A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=1 S=01....678.ab 01266: .1...1.11. shift left a[ms] A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=1 S=01....678.ab 01267: .....111.. p - 1 -> p A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=0 S=01....678.ab 01270: ....1.11.. if p # 0 A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=0 S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=0 S=01....678.ab 01272: ..1.11.111 -> 01055 go to tnm12 A=00000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=0 S=01....678.ab 01055: .11...111. tnm12: c -> a[w] A=01000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=0 S=01....678.ab 01056: ..1...1.1. b -> c[x] A=01000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=0 S=01....678.ab 01057: 11..1.1111 -> 01313 go to add15 A=01000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=0 S=01....678.ab 01313: .1...1.... -> 02314 add15: select rom 2 ; -> nrm21 A=01000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=0 S=01....678.ab 02314: 1.1111111. nrm21: 0 -> a[s] A=01000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=0 S=01....678.ab 02315: 11....11.. 12 -> p A=01000000000000 B=00010000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab 02316: ....1.111. 0 -> b[w] A=01000000000000 B=00000000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab 02317: 1..11...1. nrm23: if a[p] >= 1 A=01000000000000 B=00000000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab 02320: 11.1.11.11 -> 02326 then go to nrm24 A=01000000000000 B=00000000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab 02326: .1..1.1.1. nrm24: a -> b[x] A=01000000000000 B=00000000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab 02327: 111...111. a + b -> a[w] A=01000000000000 B=00000000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab 02330: 1..111111. if a[s] >= 1 A=01000000000000 B=00000000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab 02331: 11...11111 -> 02307 then go to mpy28 A=01000000000000 B=00000000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab 02332: 111.1..11. a exchange c[m] A=01000000000000 B=00000000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab 02333: .11...111. c -> a[w] A=01000000000000 B=00000000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab 02334: ....1.111. 0 -> b[w] A=01000000000000 B=00000000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab 02335: 11....11.. nrm27: 12 -> p A=01000000000000 B=00000000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab 02336: .1111.1.11 -> 02172 go to nrm26 A=01000000000000 B=00000000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab 02172: ..1..1.1.. nrm26: if s2 = 0 A=01000000000000 B=00000000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab 02173: 1..1.1..11 -> 02224 then go to rtn21 A=01000000000000 B=00000000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab 02224: ..1..1.... -> 01225 rtn21: select rom 1 ; -> rtn11 A=01000000000000 B=00000000000000 C=01000000000000 result in C=1 D=10000010000000 M=00000000000000 P=c S=01....678.ab 01225: ...1.1.1.. rtn11: if s1 = 0 A=01000000000000 B=00000000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab 01226: 11.11.1.11 -> 01332 then go to rtn12 A=01000000000000 B=00000000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab 01227: ....11.... return A=01000000000000 B=00000000000000 C=01000000000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab 01121: .1.11...1. c - 1 -> c[p] A=01000000000000 B=00000000000000 C=00000000000000 D=10000010000000 M=00000000000000 P=c S=01....678.ab 01122: .11.1.1... stack -> a A=10000010000000 B=00000000000000 C=00000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01123: 111.1.111. a exchange c[w] A=00000000000000 B=00000000000000 C=10000010000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01124: .1....11.. 4 -> p A=00000000000000 B=00000000000000 C=10000010000000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01125: 1.1..1...1 -> 01244 jsb pqo13 A=00000000000000 B=00000000000000 C=10000010000000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01244: .1...1.... -> 02245 pqo13: select rom 2 ; -> l02245 A=00000000000000 B=00000000000000 C=10000010000000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 02245: .11.11.111 -> 02155 go to pqo23 A=00000000000000 B=00000000000000 C=10000010000000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 02155: 1...1.111. pqo23: b exchange c[w] A=00000000000000 B=10000010000000 C=00000000000000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 02156: ..11..111. 0 -> c[w] A=00000000000000 B=10000010000000 C=00000000000000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 02157: .1.11..11. c - 1 -> c[m] A=00000000000000 B=10000010000000 C=09999999999000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 02160: ..1..1.1.. if s2 = 0 A=00000000000000 B=10000010000000 C=09999999999000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 02161: .111.11.11 -> 02166 then go to pqo28 A=00000000000000 B=10000010000000 C=09999999999000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000000000000 B=10000010000000 C=09999999999000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000000000000 B=10000010000000 C=09999999999000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000000000000 B=10000010000000 C=09999999969000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000000000000 B=10000010000000 C=09999999969000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000000000000 B=10000010000000 C=09999999969000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000000000000 B=10000010000000 C=09999999966000 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000000000000 B=10000010000000 C=09999999966000 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000000000000 B=10000010000000 C=09999999966000 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000000000000 B=10000010000000 C=09999999966600 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000000000000 B=10000010000000 C=09999999966600 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000000000000 B=10000010000000 C=09999999966600 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02170: 1..1..111. shift right c[w] A=00000000000000 B=10000010000000 C=00999999996660 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02171: 1..1..111. pqo24: shift right c[w] A=00000000000000 B=10000010000000 C=00099999999666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02172: ..1..1.1.. nrm26: if s2 = 0 A=00000000000000 B=10000010000000 C=00099999999666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02173: 1..1.1..11 -> 02224 then go to rtn21 A=00000000000000 B=10000010000000 C=00099999999666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02224: ..1..1.... -> 01225 rtn21: select rom 1 ; -> rtn11 A=00000000000000 B=10000010000000 C=00099999999666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01225: ...1.1.1.. rtn11: if s1 = 0 A=00000000000000 B=10000010000000 C=00099999999666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01226: 11.11.1.11 -> 01332 then go to rtn12 A=00000000000000 B=10000010000000 C=00099999999666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01227: ....11.... return A=00000000000000 B=10000010000000 C=00099999999666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01126: .11...11.. 6 -> p A=00000000000000 B=10000010000000 C=00099999999666 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01127: 1..11.11.1 -> 01233 jsb pmu11 A=00000000000000 B=10000010000000 C=00099999999666 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01233: .1...1.... -> 02234 pmu11: select rom 2 ; -> pmu21 A=00000000000000 B=10000010000000 C=00099999999666 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02234: 1.11..111. pmu21: shift right a[w] A=00000000000000 B=10000010000000 C=00099999999666 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02235: 1...1.111. pmu22: b exchange c[w] A=00000000000000 B=00099999999666 C=10000010000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02236: 1.1.....11 -> 02240 go to pmu24 A=00000000000000 B=00099999999666 C=10000010000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02240: .1.111111. pmu24: c - 1 -> c[s] A=00000000000000 B=00099999999666 C=00000010000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02241: 1..1111111 -> 02237 if no carry go to pmu23 A=00000000000000 B=00099999999666 C=00000010000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02237: 111...111. pmu23: a + b -> a[w] A=00099999999666 B=00099999999666 C=00000010000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02240: .1.111111. pmu24: c - 1 -> c[s] A=00099999999666 B=00099999999666 C=90000010000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02241: 1..1111111 -> 02237 if no carry go to pmu23 A=00099999999666 B=00099999999666 C=90000010000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02242: 111.1.111. a exchange c[w] A=90000010000000 B=00099999999666 C=00099999999666 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02243: .1...1.11. shift left a[ms] A=00000100000000 B=00099999999666 C=00099999999666 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02244: 111.1.111. a exchange c[w] A=00099999999666 B=00099999999666 C=00000100000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02245: .11.11.111 -> 02155 go to pqo23 A=00099999999666 B=00099999999666 C=00000100000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02155: 1...1.111. pqo23: b exchange c[w] A=00099999999666 B=00000100000000 C=00099999999666 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02156: ..11..111. 0 -> c[w] A=00099999999666 B=00000100000000 C=00000000000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02157: .1.11..11. c - 1 -> c[m] A=00099999999666 B=00000100000000 C=09999999999000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02160: ..1..1.1.. if s2 = 0 A=00099999999666 B=00000100000000 C=09999999999000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02161: .111.11.11 -> 02166 then go to pqo28 A=00099999999666 B=00000100000000 C=09999999999000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00099999999666 B=00000100000000 C=09999999999000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00099999999666 B=00000100000000 C=09999999999000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00099999999666 B=00000100000000 C=09999996999000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00099999999666 B=00000100000000 C=09999996999000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00099999999666 B=00000100000000 C=09999996999000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00099999999666 B=00000100000000 C=09999996699000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00099999999666 B=00000100000000 C=09999996699000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00099999999666 B=00000100000000 C=09999996699000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00099999999666 B=00000100000000 C=09999996669000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00099999999666 B=00000100000000 C=09999996669000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00099999999666 B=00000100000000 C=09999996669000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00099999999666 B=00000100000000 C=09999996666000 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00099999999666 B=00000100000000 C=09999996666000 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00099999999666 B=00000100000000 C=09999996666000 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00099999999666 B=00000100000000 C=09999996666600 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00099999999666 B=00000100000000 C=09999996666600 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00099999999666 B=00000100000000 C=09999996666600 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02170: 1..1..111. shift right c[w] A=00099999999666 B=00000100000000 C=00999999666660 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02171: 1..1..111. pqo24: shift right c[w] A=00099999999666 B=00000100000000 C=00099999966666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02172: ..1..1.1.. nrm26: if s2 = 0 A=00099999999666 B=00000100000000 C=00099999966666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02173: 1..1.1..11 -> 02224 then go to rtn21 A=00099999999666 B=00000100000000 C=00099999966666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02224: ..1..1.... -> 01225 rtn21: select rom 1 ; -> rtn11 A=00099999999666 B=00000100000000 C=00099999966666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01225: ...1.1.1.. rtn11: if s1 = 0 A=00099999999666 B=00000100000000 C=00099999966666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01226: 11.11.1.11 -> 01332 then go to rtn12 A=00099999999666 B=00000100000000 C=00099999966666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01227: ....11.... return A=00099999999666 B=00000100000000 C=00099999966666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01130: 1.....11.. 8 -> p A=00099999999666 B=00000100000000 C=00099999966666 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 01131: 1..11.11.1 -> 01233 jsb pmu11 A=00099999999666 B=00000100000000 C=00099999966666 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 01233: .1...1.... -> 02234 pmu11: select rom 2 ; -> pmu21 A=00099999999666 B=00000100000000 C=00099999966666 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02234: 1.11..111. pmu21: shift right a[w] A=00009999999966 B=00000100000000 C=00099999966666 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02235: 1...1.111. pmu22: b exchange c[w] A=00009999999966 B=00099999966666 C=00000100000000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02236: 1.1.....11 -> 02240 go to pmu24 A=00009999999966 B=00099999966666 C=00000100000000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02240: .1.111111. pmu24: c - 1 -> c[s] A=00009999999966 B=00099999966666 C=90000100000000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02241: 1..1111111 -> 02237 if no carry go to pmu23 A=00009999999966 B=00099999966666 C=90000100000000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02242: 111.1.111. a exchange c[w] A=90000100000000 B=00099999966666 C=00009999999966 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02243: .1...1.11. shift left a[ms] A=00001000000000 B=00099999966666 C=00009999999966 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02244: 111.1.111. a exchange c[w] A=00009999999966 B=00099999966666 C=00001000000000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02245: .11.11.111 -> 02155 go to pqo23 A=00009999999966 B=00099999966666 C=00001000000000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02155: 1...1.111. pqo23: b exchange c[w] A=00009999999966 B=00001000000000 C=00099999966666 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02156: ..11..111. 0 -> c[w] A=00009999999966 B=00001000000000 C=00000000000000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02157: .1.11..11. c - 1 -> c[m] A=00009999999966 B=00001000000000 C=09999999999000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02160: ..1..1.1.. if s2 = 0 A=00009999999966 B=00001000000000 C=09999999999000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02161: .111.11.11 -> 02166 then go to pqo28 A=00009999999966 B=00001000000000 C=09999999999000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00009999999966 B=00001000000000 C=09999999999000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00009999999966 B=00001000000000 C=09999999999000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00009999999966 B=00001000000000 C=09999699999000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00009999999966 B=00001000000000 C=09999699999000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00009999999966 B=00001000000000 C=09999699999000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00009999999966 B=00001000000000 C=09999669999000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00009999999966 B=00001000000000 C=09999669999000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00009999999966 B=00001000000000 C=09999669999000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00009999999966 B=00001000000000 C=09999666999000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00009999999966 B=00001000000000 C=09999666999000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00009999999966 B=00001000000000 C=09999666999000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00009999999966 B=00001000000000 C=09999666699000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00009999999966 B=00001000000000 C=09999666699000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00009999999966 B=00001000000000 C=09999666699000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00009999999966 B=00001000000000 C=09999666669000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00009999999966 B=00001000000000 C=09999666669000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00009999999966 B=00001000000000 C=09999666669000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00009999999966 B=00001000000000 C=09999666666000 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00009999999966 B=00001000000000 C=09999666666000 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00009999999966 B=00001000000000 C=09999666666000 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00009999999966 B=00001000000000 C=09999666666600 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00009999999966 B=00001000000000 C=09999666666600 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00009999999966 B=00001000000000 C=09999666666600 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02170: 1..1..111. shift right c[w] A=00009999999966 B=00001000000000 C=00999966666660 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02171: 1..1..111. pqo24: shift right c[w] A=00009999999966 B=00001000000000 C=00099996666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02172: ..1..1.1.. nrm26: if s2 = 0 A=00009999999966 B=00001000000000 C=00099996666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02173: 1..1.1..11 -> 02224 then go to rtn21 A=00009999999966 B=00001000000000 C=00099996666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02224: ..1..1.... -> 01225 rtn21: select rom 1 ; -> rtn11 A=00009999999966 B=00001000000000 C=00099996666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01225: ...1.1.1.. rtn11: if s1 = 0 A=00009999999966 B=00001000000000 C=00099996666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01226: 11.11.1.11 -> 01332 then go to rtn12 A=00009999999966 B=00001000000000 C=00099996666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01227: ....11.... return A=00009999999966 B=00001000000000 C=00099996666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01132: ..1...11.. 2 -> p A=00009999999966 B=00001000000000 C=00099996666666 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 01133: 1....11... load constant 8 A=00009999999966 B=00001000000000 C=00099996666866 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01134: 1.1...11.. 10 -> p A=00009999999966 B=00001000000000 C=00099996666866 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01135: 1..11.11.1 -> 01233 jsb pmu11 A=00009999999966 B=00001000000000 C=00099996666866 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01233: .1...1.... -> 02234 pmu11: select rom 2 ; -> pmu21 A=00009999999966 B=00001000000000 C=00099996666866 D=03490600000994 M=00000000000000 P=a S=01....678.ab 02234: 1.11..111. pmu21: shift right a[w] A=00000999999996 B=00001000000000 C=00099996666866 D=03490600000994 M=00000000000000 P=a S=01....678.ab 02235: 1...1.111. pmu22: b exchange c[w] A=00000999999996 B=00099996666866 C=00001000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 02236: 1.1.....11 -> 02240 go to pmu24 A=00000999999996 B=00099996666866 C=00001000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 02240: .1.111111. pmu24: c - 1 -> c[s] A=00000999999996 B=00099996666866 C=90001000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 02241: 1..1111111 -> 02237 if no carry go to pmu23 A=00000999999996 B=00099996666866 C=90001000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 02242: 111.1.111. a exchange c[w] A=90001000000000 B=00099996666866 C=00000999999996 D=03490600000994 M=00000000000000 P=a S=01....678.ab 02243: .1...1.11. shift left a[ms] A=00010000000000 B=00099996666866 C=00000999999996 D=03490600000994 M=00000000000000 P=a S=01....678.ab 02244: 111.1.111. a exchange c[w] A=00000999999996 B=00099996666866 C=00010000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 02245: .11.11.111 -> 02155 go to pqo23 A=00000999999996 B=00099996666866 C=00010000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 02155: 1...1.111. pqo23: b exchange c[w] A=00000999999996 B=00010000000000 C=00099996666866 D=03490600000994 M=00000000000000 P=a S=01....678.ab 02156: ..11..111. 0 -> c[w] A=00000999999996 B=00010000000000 C=00000000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 02157: .1.11..11. c - 1 -> c[m] A=00000999999996 B=00010000000000 C=09999999999000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 02160: ..1..1.1.. if s2 = 0 A=00000999999996 B=00010000000000 C=09999999999000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 02161: .111.11.11 -> 02166 then go to pqo28 A=00000999999996 B=00010000000000 C=09999999999000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000999999996 B=00010000000000 C=09999999999000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000999999996 B=00010000000000 C=09999999999000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000999999996 B=00010000000000 C=09969999999000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000999999996 B=00010000000000 C=09969999999000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000999999996 B=00010000000000 C=09969999999000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000999999996 B=00010000000000 C=09966999999000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000999999996 B=00010000000000 C=09966999999000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000999999996 B=00010000000000 C=09966999999000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000999999996 B=00010000000000 C=09966699999000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000999999996 B=00010000000000 C=09966699999000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000999999996 B=00010000000000 C=09966699999000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000999999996 B=00010000000000 C=09966669999000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000999999996 B=00010000000000 C=09966669999000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000999999996 B=00010000000000 C=09966669999000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000999999996 B=00010000000000 C=09966666999000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000999999996 B=00010000000000 C=09966666999000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000999999996 B=00010000000000 C=09966666999000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000999999996 B=00010000000000 C=09966666699000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000999999996 B=00010000000000 C=09966666699000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000999999996 B=00010000000000 C=09966666699000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000999999996 B=00010000000000 C=09966666669000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000999999996 B=00010000000000 C=09966666669000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000999999996 B=00010000000000 C=09966666669000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000999999996 B=00010000000000 C=09966666666000 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000999999996 B=00010000000000 C=09966666666000 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000999999996 B=00010000000000 C=09966666666000 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000999999996 B=00010000000000 C=09966666666600 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000999999996 B=00010000000000 C=09966666666600 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000999999996 B=00010000000000 C=09966666666600 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02170: 1..1..111. shift right c[w] A=00000999999996 B=00010000000000 C=00996666666660 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02171: 1..1..111. pqo24: shift right c[w] A=00000999999996 B=00010000000000 C=00099666666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02172: ..1..1.1.. nrm26: if s2 = 0 A=00000999999996 B=00010000000000 C=00099666666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02173: 1..1.1..11 -> 02224 then go to rtn21 A=00000999999996 B=00010000000000 C=00099666666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02224: ..1..1.... -> 01225 rtn21: select rom 1 ; -> rtn11 A=00000999999996 B=00010000000000 C=00099666666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01225: ...1.1.1.. rtn11: if s1 = 0 A=00000999999996 B=00010000000000 C=00099666666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01226: 11.11.1.11 -> 01332 then go to rtn12 A=00000999999996 B=00010000000000 C=00099666666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01227: ....11.... return A=00000999999996 B=00010000000000 C=00099666666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01136: 1...111..1 -> 01216 jsb atcd1 A=00000999999996 B=00010000000000 C=00099666666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01216: .11...11.. atcd1: 6 -> p A=00000999999996 B=00010000000000 C=00099666666666 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01217: 1....11... load constant 8 A=00000999999996 B=00010000000000 C=00099668666666 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01220: .11..11... load constant 6 A=00000999999996 B=00010000000000 C=00099668666666 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01221: .1.1.11... load constant 5 A=00000999999996 B=00010000000000 C=00099668656666 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01222: ..1..11... load constant 2 A=00000999999996 B=00010000000000 C=00099668652666 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 01223: .1...11... load constant 4 A=00000999999996 B=00010000000000 C=00099668652466 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01224: 1..1.11... load constant 9 A=00000999999996 B=00010000000000 C=00099668652496 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 01225: ...1.1.1.. rtn11: if s1 = 0 A=00000999999996 B=00010000000000 C=00099668652496 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 01226: 11.11.1.11 -> 01332 then go to rtn12 A=00000999999996 B=00010000000000 C=00099668652496 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 01227: ....11.... return A=00000999999996 B=00010000000000 C=00099668652496 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 01137: 1..11.11.1 -> 01233 jsb pmu11 A=00000999999996 B=00010000000000 C=00099668652496 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 01233: .1...1.... -> 02234 pmu11: select rom 2 ; -> pmu21 A=00000999999996 B=00010000000000 C=00099668652496 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 02234: 1.11..111. pmu21: shift right a[w] A=00000099999999 B=00010000000000 C=00099668652496 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 02235: 1...1.111. pmu22: b exchange c[w] A=00000099999999 B=00099668652496 C=00010000000000 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 02236: 1.1.....11 -> 02240 go to pmu24 A=00000099999999 B=00099668652496 C=00010000000000 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 02240: .1.111111. pmu24: c - 1 -> c[s] A=00000099999999 B=00099668652496 C=90010000000000 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 02241: 1..1111111 -> 02237 if no carry go to pmu23 A=00000099999999 B=00099668652496 C=90010000000000 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 02242: 111.1.111. a exchange c[w] A=90010000000000 B=00099668652496 C=00000099999999 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 02243: .1...1.11. shift left a[ms] A=00100000000000 B=00099668652496 C=00000099999999 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 02244: 111.1.111. a exchange c[w] A=00000099999999 B=00099668652496 C=00100000000000 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 02245: .11.11.111 -> 02155 go to pqo23 A=00000099999999 B=00099668652496 C=00100000000000 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 02155: 1...1.111. pqo23: b exchange c[w] A=00000099999999 B=00100000000000 C=00099668652496 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 02156: ..11..111. 0 -> c[w] A=00000099999999 B=00100000000000 C=00000000000000 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 02157: .1.11..11. c - 1 -> c[m] A=00000099999999 B=00100000000000 C=09999999999000 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 02160: ..1..1.1.. if s2 = 0 A=00000099999999 B=00100000000000 C=09999999999000 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 02161: .111.11.11 -> 02166 then go to pqo28 A=00000099999999 B=00100000000000 C=09999999999000 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=00100000000000 C=09999999999000 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=00100000000000 C=09999999999000 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=00100000000000 C=09999999999006 D=03490600000994 M=00000000000000 P=f S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=00100000000000 C=09999999999006 D=03490600000994 M=00000000000000 P=f S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=00100000000000 C=09999999999006 D=03490600000994 M=00000000000000 P=f S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=00100000000000 C=09999999999006 D=03490600000994 M=00000000000000 P=e S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=00100000000000 C=09999999999006 D=03490600000994 M=00000000000000 P=e S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=00100000000000 C=09999999999006 D=03490600000994 M=00000000000000 P=e S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=00100000000000 C=09999999999006 D=03490600000994 M=00000000000000 P=d S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=00100000000000 C=09999999999006 D=03490600000994 M=00000000000000 P=d S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=00100000000000 C=09999999999006 D=03490600000994 M=00000000000000 P=d S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=00100000000000 C=69999999999006 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=00100000000000 C=69999999999006 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=00100000000000 C=69999999999006 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=00100000000000 C=66999999999006 D=03490600000994 M=00000000000000 P=b S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=00100000000000 C=66999999999006 D=03490600000994 M=00000000000000 P=b S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=00100000000000 C=66999999999006 D=03490600000994 M=00000000000000 P=b S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=00100000000000 C=66699999999006 D=03490600000994 M=00000000000000 P=a S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=00100000000000 C=66699999999006 D=03490600000994 M=00000000000000 P=a S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=00100000000000 C=66699999999006 D=03490600000994 M=00000000000000 P=a S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=00100000000000 C=66669999999006 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=00100000000000 C=66669999999006 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=00100000000000 C=66669999999006 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=00100000000000 C=66666999999006 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=00100000000000 C=66666999999006 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=00100000000000 C=66666999999006 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=00100000000000 C=66666699999006 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=00100000000000 C=66666699999006 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=00100000000000 C=66666699999006 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=00100000000000 C=66666669999006 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=00100000000000 C=66666669999006 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=00100000000000 C=66666669999006 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=00100000000000 C=66666666999006 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=00100000000000 C=66666666999006 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=00100000000000 C=66666666999006 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=00100000000000 C=66666666699006 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=00100000000000 C=66666666699006 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=00100000000000 C=66666666699006 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=00100000000000 C=66666666669006 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=00100000000000 C=66666666669006 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=00100000000000 C=66666666669006 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=00100000000000 C=66666666666006 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=00100000000000 C=66666666666006 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=00100000000000 C=66666666666006 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=00100000000000 C=66666666666606 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=00100000000000 C=66666666666606 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=00100000000000 C=66666666666606 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02170: 1..1..111. shift right c[w] A=00000099999999 B=00100000000000 C=06666666666660 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02171: 1..1..111. pqo24: shift right c[w] A=00000099999999 B=00100000000000 C=00666666666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02172: ..1..1.1.. nrm26: if s2 = 0 A=00000099999999 B=00100000000000 C=00666666666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02173: 1..1.1..11 -> 02224 then go to rtn21 A=00000099999999 B=00100000000000 C=00666666666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02224: ..1..1.... -> 01225 rtn21: select rom 1 ; -> rtn11 A=00000099999999 B=00100000000000 C=00666666666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01225: ...1.1.1.. rtn11: if s1 = 0 A=00000099999999 B=00100000000000 C=00666666666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01226: 11.11.1.11 -> 01332 then go to rtn12 A=00000099999999 B=00100000000000 C=00666666666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01227: ....11.... return A=00000099999999 B=00100000000000 C=00666666666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01140: 11..11...1 -> 01314 jsb atc1 A=00000099999999 B=00100000000000 C=00666666666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01314: ..11..111. atc1: 0 -> c[w] A=00000099999999 B=00100000000000 C=00000000000000 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01315: 1.11..11.. 11 -> p A=00000099999999 B=00100000000000 C=00000000000000 D=03490600000994 M=00000000000000 P=b S=01....678.ab 01316: .111.11... load constant 7 ; load pi/4 A=00000099999999 B=00100000000000 C=00700000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01317: 1....11... load constant 8 A=00000099999999 B=00100000000000 C=00780000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01320: .1.1.11... load constant 5 A=00000099999999 B=00100000000000 C=00785000000000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 01321: ..11.11... load constant 3 A=00000099999999 B=00100000000000 C=00785300000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01322: 1..1.11... load constant 9 A=00000099999999 B=00100000000000 C=00785390000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01323: 1....11... load constant 8 A=00000099999999 B=00100000000000 C=00785398000000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01324: ...1.11... load constant 1 A=00000099999999 B=00100000000000 C=00785398100000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01325: .11..11... load constant 6 A=00000099999999 B=00100000000000 C=00785398160000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01326: ..11.11... load constant 3 A=00000099999999 B=00100000000000 C=00785398163000 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 01327: .1.1.11... load constant 5 A=00000099999999 B=00100000000000 C=00785398163500 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01330: 11....11.. 12 -> p A=00000099999999 B=00100000000000 C=00785398163500 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01331: ....11.... return A=00000099999999 B=00100000000000 C=00785398163500 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01141: .1....111. shift left a[w] A=00000999999990 B=00100000000000 C=00785398163500 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01142: 1..11.11.1 -> 01233 jsb pmu11 A=00000999999990 B=00100000000000 C=00785398163500 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01233: .1...1.... -> 02234 pmu11: select rom 2 ; -> pmu21 A=00000999999990 B=00100000000000 C=00785398163500 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02234: 1.11..111. pmu21: shift right a[w] A=00000099999999 B=00100000000000 C=00785398163500 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02235: 1...1.111. pmu22: b exchange c[w] A=00000099999999 B=00785398163500 C=00100000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02236: 1.1.....11 -> 02240 go to pmu24 A=00000099999999 B=00785398163500 C=00100000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02240: .1.111111. pmu24: c - 1 -> c[s] A=00000099999999 B=00785398163500 C=90100000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02241: 1..1111111 -> 02237 if no carry go to pmu23 A=00000099999999 B=00785398163500 C=90100000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02242: 111.1.111. a exchange c[w] A=90100000000000 B=00785398163500 C=00000099999999 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02243: .1...1.11. shift left a[ms] A=01000000000000 B=00785398163500 C=00000099999999 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02244: 111.1.111. a exchange c[w] A=00000099999999 B=00785398163500 C=01000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02245: .11.11.111 -> 02155 go to pqo23 A=00000099999999 B=00785398163500 C=01000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02155: 1...1.111. pqo23: b exchange c[w] A=00000099999999 B=01000000000000 C=00785398163500 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02156: ..11..111. 0 -> c[w] A=00000099999999 B=01000000000000 C=00000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02157: .1.11..11. c - 1 -> c[m] A=00000099999999 B=01000000000000 C=09999999999000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02160: ..1..1.1.. if s2 = 0 A=00000099999999 B=01000000000000 C=09999999999000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02161: .111.11.11 -> 02166 then go to pqo28 A=00000099999999 B=01000000000000 C=09999999999000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=01000000000000 C=09999999999000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=01000000000000 C=09999999999000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=01000000000000 C=06999999999000 D=03490600000994 M=00000000000000 P=b S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=01000000000000 C=06999999999000 D=03490600000994 M=00000000000000 P=b S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=01000000000000 C=06999999999000 D=03490600000994 M=00000000000000 P=b S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=01000000000000 C=06699999999000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=01000000000000 C=06699999999000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=01000000000000 C=06699999999000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=01000000000000 C=06669999999000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=01000000000000 C=06669999999000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=01000000000000 C=06669999999000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=01000000000000 C=06666999999000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=01000000000000 C=06666999999000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=01000000000000 C=06666999999000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=01000000000000 C=06666699999000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=01000000000000 C=06666699999000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=01000000000000 C=06666699999000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=01000000000000 C=06666669999000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=01000000000000 C=06666669999000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=01000000000000 C=06666669999000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=01000000000000 C=06666666999000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=01000000000000 C=06666666999000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=01000000000000 C=06666666999000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=01000000000000 C=06666666699000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=01000000000000 C=06666666699000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=01000000000000 C=06666666699000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=01000000000000 C=06666666669000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=01000000000000 C=06666666669000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=01000000000000 C=06666666669000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=01000000000000 C=06666666666000 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=01000000000000 C=06666666666000 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=01000000000000 C=06666666666000 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 02165: .11..11... pqo27: load constant 6 A=00000099999999 B=01000000000000 C=06666666666600 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02166: ...11.11.. pqo28: if p # 1 A=00000099999999 B=01000000000000 C=06666666666600 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02167: .111.1.111 -> 02165 then go to pqo27 A=00000099999999 B=01000000000000 C=06666666666600 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02170: 1..1..111. shift right c[w] A=00000099999999 B=01000000000000 C=00666666666660 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02171: 1..1..111. pqo24: shift right c[w] A=00000099999999 B=01000000000000 C=00066666666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02172: ..1..1.1.. nrm26: if s2 = 0 A=00000099999999 B=01000000000000 C=00066666666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02173: 1..1.1..11 -> 02224 then go to rtn21 A=00000099999999 B=01000000000000 C=00066666666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02224: ..1..1.... -> 01225 rtn21: select rom 1 ; -> rtn11 A=00000099999999 B=01000000000000 C=00066666666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01225: ...1.1.1.. rtn11: if s1 = 0 A=00000099999999 B=01000000000000 C=00066666666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01226: 11.11.1.11 -> 01332 then go to rtn12 A=00000099999999 B=01000000000000 C=00066666666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01227: ....11.... return A=00000099999999 B=01000000000000 C=00066666666666 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01143: ..1...111. b -> c[w] A=00000099999999 B=01000000000000 C=01000000000000 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01144: 11..1.11.1 -> 01313 jsb add15 A=00000099999999 B=01000000000000 C=01000000000000 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01313: .1...1.... -> 02314 add15: select rom 2 ; -> nrm21 A=00000099999999 B=01000000000000 C=01000000000000 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02314: 1.1111111. nrm21: 0 -> a[s] A=00000099999999 B=01000000000000 C=01000000000000 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 02315: 11....11.. 12 -> p A=00000099999999 B=01000000000000 C=01000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02316: ....1.111. 0 -> b[w] A=00000099999999 B=00000000000000 C=01000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02317: 1..11...1. nrm23: if a[p] >= 1 A=00000099999999 B=00000000000000 C=01000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02320: 11.1.11.11 -> 02326 then go to nrm24 A=00000099999999 B=00000000000000 C=01000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02321: .1....111. shift left a[w] A=00000999999990 B=00000000000000 C=01000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02322: .1.11.1.1. c - 1 -> c[x] A=00000999999990 B=00000000000000 C=01000000000999 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02323: 1..11.111. if a[w] >= 1 A=00000999999990 B=00000000000000 C=01000000000999 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02324: 11..111111 -> 02317 then go to nrm23 A=00000999999990 B=00000000000000 C=01000000000999 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02317: 1..11...1. nrm23: if a[p] >= 1 A=00000999999990 B=00000000000000 C=01000000000999 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02320: 11.1.11.11 -> 02326 then go to nrm24 A=00000999999990 B=00000000000000 C=01000000000999 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02321: .1....111. shift left a[w] A=00009999999900 B=00000000000000 C=01000000000999 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02322: .1.11.1.1. c - 1 -> c[x] A=00009999999900 B=00000000000000 C=01000000000998 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02323: 1..11.111. if a[w] >= 1 A=00009999999900 B=00000000000000 C=01000000000998 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02324: 11..111111 -> 02317 then go to nrm23 A=00009999999900 B=00000000000000 C=01000000000998 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02317: 1..11...1. nrm23: if a[p] >= 1 A=00009999999900 B=00000000000000 C=01000000000998 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02320: 11.1.11.11 -> 02326 then go to nrm24 A=00009999999900 B=00000000000000 C=01000000000998 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02321: .1....111. shift left a[w] A=00099999999000 B=00000000000000 C=01000000000998 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02322: .1.11.1.1. c - 1 -> c[x] A=00099999999000 B=00000000000000 C=01000000000997 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02323: 1..11.111. if a[w] >= 1 A=00099999999000 B=00000000000000 C=01000000000997 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02324: 11..111111 -> 02317 then go to nrm23 A=00099999999000 B=00000000000000 C=01000000000997 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02317: 1..11...1. nrm23: if a[p] >= 1 A=00099999999000 B=00000000000000 C=01000000000997 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02320: 11.1.11.11 -> 02326 then go to nrm24 A=00099999999000 B=00000000000000 C=01000000000997 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02321: .1....111. shift left a[w] A=00999999990000 B=00000000000000 C=01000000000997 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02322: .1.11.1.1. c - 1 -> c[x] A=00999999990000 B=00000000000000 C=01000000000996 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02323: 1..11.111. if a[w] >= 1 A=00999999990000 B=00000000000000 C=01000000000996 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02324: 11..111111 -> 02317 then go to nrm23 A=00999999990000 B=00000000000000 C=01000000000996 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02317: 1..11...1. nrm23: if a[p] >= 1 A=00999999990000 B=00000000000000 C=01000000000996 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02320: 11.1.11.11 -> 02326 then go to nrm24 A=00999999990000 B=00000000000000 C=01000000000996 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02321: .1....111. shift left a[w] A=09999999900000 B=00000000000000 C=01000000000996 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02322: .1.11.1.1. c - 1 -> c[x] A=09999999900000 B=00000000000000 C=01000000000995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02323: 1..11.111. if a[w] >= 1 A=09999999900000 B=00000000000000 C=01000000000995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02324: 11..111111 -> 02317 then go to nrm23 A=09999999900000 B=00000000000000 C=01000000000995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02317: 1..11...1. nrm23: if a[p] >= 1 A=09999999900000 B=00000000000000 C=01000000000995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02320: 11.1.11.11 -> 02326 then go to nrm24 A=09999999900000 B=00000000000000 C=01000000000995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02326: .1..1.1.1. nrm24: a -> b[x] A=09999999900000 B=00000000000000 C=01000000000995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02327: 111...111. a + b -> a[w] A=09999999900000 B=00000000000000 C=01000000000995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02330: 1..111111. if a[s] >= 1 A=09999999900000 B=00000000000000 C=01000000000995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02331: 11...11111 -> 02307 then go to mpy28 A=09999999900000 B=00000000000000 C=01000000000995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02332: 111.1..11. a exchange c[m] A=01000000000000 B=00000000000000 C=09999999900995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02333: .11...111. c -> a[w] A=09999999900995 B=00000000000000 C=09999999900995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02334: ....1.111. 0 -> b[w] A=09999999900995 B=00000000000000 C=09999999900995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02335: 11....11.. nrm27: 12 -> p A=09999999900995 B=00000000000000 C=09999999900995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02336: .1111.1.11 -> 02172 go to nrm26 A=09999999900995 B=00000000000000 C=09999999900995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02172: ..1..1.1.. nrm26: if s2 = 0 A=09999999900995 B=00000000000000 C=09999999900995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02173: 1..1.1..11 -> 02224 then go to rtn21 A=09999999900995 B=00000000000000 C=09999999900995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02224: ..1..1.... -> 01225 rtn21: select rom 1 ; -> rtn11 A=09999999900995 B=00000000000000 C=09999999900995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01225: ...1.1.1.. rtn11: if s1 = 0 A=09999999900995 B=00000000000000 C=09999999900995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01226: 11.11.1.11 -> 01332 then go to rtn12 A=09999999900995 B=00000000000000 C=09999999900995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01227: ....11.... return A=09999999900995 B=00000000000000 C=09999999900995 D=03490600000994 M=00000000000000 P=c S=01....678.ab Normalized =9.999999900995 9.999 10^-5 Next converting to degrees 01145: 11..11...1 -> 01314 jsb atc1 A=09999999900995 B=00000000000000 C=09999999900995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01314: ..11..111. atc1: 0 -> c[w] A=09999999900995 B=00000000000000 C=00000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01315: 1.11..11.. 11 -> p A=09999999900995 B=00000000000000 C=00000000000000 D=03490600000994 M=00000000000000 P=b S=01....678.ab 01316: .111.11... load constant 7 ; load pi/4 A=09999999900995 B=00000000000000 C=00700000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01317: 1....11... load constant 8 A=09999999900995 B=00000000000000 C=00780000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01320: .1.1.11... load constant 5 A=09999999900995 B=00000000000000 C=00785000000000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 01321: ..11.11... load constant 3 A=09999999900995 B=00000000000000 C=00785300000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01322: 1..1.11... load constant 9 A=09999999900995 B=00000000000000 C=00785390000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01323: 1....11... load constant 8 A=09999999900995 B=00000000000000 C=00785398000000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01324: ...1.11... load constant 1 A=09999999900995 B=00000000000000 C=00785398100000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01325: .11..11... load constant 6 A=09999999900995 B=00000000000000 C=00785398160000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01326: ..11.11... load constant 3 A=09999999900995 B=00000000000000 C=00785398163000 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 01327: .1.1.11... load constant 5 A=09999999900995 B=00000000000000 C=00785398163500 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01330: 11....11.. 12 -> p A=09999999900995 B=00000000000000 C=00785398163500 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01331: ....11.... return A=09999999900995 B=00000000000000 C=00785398163500 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01146: 1.1.1.111. c + c -> c[w] A=09999999900995 B=00000000000000 C=01570796327000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01147: 1.1..11..1 -> 01246 jsb div11 A=09999999900995 B=00000000000000 C=01570796327000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01246: .1.1..1.1. div11: a - c -> c[x] A=09999999900995 B=00000000000000 C=01570796327995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01247: .1...1.... -> 02250 select rom 2 ; -> l02250 A=09999999900995 B=00000000000000 C=01570796327995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02250: .1.1.1111. a - c -> c[s] A=09999999900995 B=00000000000000 C=01570796327995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02251: 1.1.1.1111 -> 02253 if no carry go to div22 A=09999999900995 B=00000000000000 C=01570796327995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02253: 11..1..11. div22: a exchange b[m] A=00000000000995 B=09999999900000 C=01570796327995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02254: 1.111.111. 0 -> a[w] A=00000000000000 B=09999999900000 C=01570796327995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02255: 11..1.11.. if p # 12 A=00000000000000 B=09999999900000 C=01570796327995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02256: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=09999999900000 C=01570796327995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02257: ...11..11. if c[m] >= 1 A=00000000000000 B=09999999900000 C=01570796327995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02260: 1.11.11.11 -> 02266 then go to div23 A=00000000000000 B=09999999900000 C=01570796327995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02266: 1...11..1. div23: b exchange c[wp] A=00000000000000 B=01570796327995 C=09999999900000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02267: 111.1..11. a exchange c[m] A=09999999900000 B=01570796327995 C=00000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02270: ..1..1.... -> 01271 select rom 1 ; -> l01271 A=09999999900000 B=01570796327995 C=00000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=09999999900000 B=01570796327995 C=00000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=08429203573000 B=01570796327995 C=00000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=08429203573000 B=01570796327995 C=00000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=08429203573000 B=01570796327995 C=01000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=06858407246000 B=01570796327995 C=01000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=06858407246000 B=01570796327995 C=01000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=06858407246000 B=01570796327995 C=02000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=05287610919000 B=01570796327995 C=02000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=05287610919000 B=01570796327995 C=02000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=05287610919000 B=01570796327995 C=03000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=03716814592000 B=01570796327995 C=03000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=03716814592000 B=01570796327995 C=03000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=03716814592000 B=01570796327995 C=04000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=02146018265000 B=01570796327995 C=04000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=02146018265000 B=01570796327995 C=04000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=02146018265000 B=01570796327995 C=05000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=00575221938000 B=01570796327995 C=05000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=00575221938000 B=01570796327995 C=05000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=00575221938000 B=01570796327995 C=06000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=99004425611000 B=01570796327995 C=06000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=99004425611000 B=01570796327995 C=06000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01265: 111..1.11. a + b -> a[ms] A=00575221938000 B=01570796327995 C=06000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01266: .1...1.11. shift left a[ms] A=05752219380000 B=01570796327995 C=06000000000000 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01267: .....111.. p - 1 -> p A=05752219380000 B=01570796327995 C=06000000000000 D=03490600000994 M=00000000000000 P=b S=01....678.ab 01270: ....1.11.. if p # 0 A=05752219380000 B=01570796327995 C=06000000000000 D=03490600000994 M=00000000000000 P=b S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=05752219380000 B=01570796327995 C=06000000000000 D=03490600000994 M=00000000000000 P=b S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=04181423053000 B=01570796327995 C=06000000000000 D=03490600000994 M=00000000000000 P=b S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=04181423053000 B=01570796327995 C=06000000000000 D=03490600000994 M=00000000000000 P=b S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=04181423053000 B=01570796327995 C=06100000000000 D=03490600000994 M=00000000000000 P=b S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=02610626726000 B=01570796327995 C=06100000000000 D=03490600000994 M=00000000000000 P=b S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=02610626726000 B=01570796327995 C=06100000000000 D=03490600000994 M=00000000000000 P=b S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=02610626726000 B=01570796327995 C=06200000000000 D=03490600000994 M=00000000000000 P=b S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=01039830399000 B=01570796327995 C=06200000000000 D=03490600000994 M=00000000000000 P=b S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=01039830399000 B=01570796327995 C=06200000000000 D=03490600000994 M=00000000000000 P=b S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=01039830399000 B=01570796327995 C=06300000000000 D=03490600000994 M=00000000000000 P=b S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=99469034072000 B=01570796327995 C=06300000000000 D=03490600000994 M=00000000000000 P=b S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=99469034072000 B=01570796327995 C=06300000000000 D=03490600000994 M=00000000000000 P=b S=01....678.ab 01265: 111..1.11. a + b -> a[ms] A=01039830399000 B=01570796327995 C=06300000000000 D=03490600000994 M=00000000000000 P=b S=01....678.ab 01266: .1...1.11. shift left a[ms] A=10398303990000 B=01570796327995 C=06300000000000 D=03490600000994 M=00000000000000 P=b S=01....678.ab 01267: .....111.. p - 1 -> p A=10398303990000 B=01570796327995 C=06300000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01270: ....1.11.. if p # 0 A=10398303990000 B=01570796327995 C=06300000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=10398303990000 B=01570796327995 C=06300000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=08827507663000 B=01570796327995 C=06300000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=08827507663000 B=01570796327995 C=06300000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=08827507663000 B=01570796327995 C=06310000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=07256711336000 B=01570796327995 C=06310000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=07256711336000 B=01570796327995 C=06310000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=07256711336000 B=01570796327995 C=06320000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=05685915009000 B=01570796327995 C=06320000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=05685915009000 B=01570796327995 C=06320000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=05685915009000 B=01570796327995 C=06330000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=04115118682000 B=01570796327995 C=06330000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=04115118682000 B=01570796327995 C=06330000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=04115118682000 B=01570796327995 C=06340000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=02544322355000 B=01570796327995 C=06340000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=02544322355000 B=01570796327995 C=06340000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=02544322355000 B=01570796327995 C=06350000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=00973526028000 B=01570796327995 C=06350000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=00973526028000 B=01570796327995 C=06350000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=00973526028000 B=01570796327995 C=06360000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=99402729701000 B=01570796327995 C=06360000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=99402729701000 B=01570796327995 C=06360000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01265: 111..1.11. a + b -> a[ms] A=00973526028000 B=01570796327995 C=06360000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01266: .1...1.11. shift left a[ms] A=09735260280000 B=01570796327995 C=06360000000000 D=03490600000994 M=00000000000000 P=a S=01....678.ab 01267: .....111.. p - 1 -> p A=09735260280000 B=01570796327995 C=06360000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01270: ....1.11.. if p # 0 A=09735260280000 B=01570796327995 C=06360000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=09735260280000 B=01570796327995 C=06360000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=08164463953000 B=01570796327995 C=06360000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=08164463953000 B=01570796327995 C=06360000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=08164463953000 B=01570796327995 C=06361000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=06593667626000 B=01570796327995 C=06361000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=06593667626000 B=01570796327995 C=06361000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=06593667626000 B=01570796327995 C=06362000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=05022871299000 B=01570796327995 C=06362000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=05022871299000 B=01570796327995 C=06362000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=05022871299000 B=01570796327995 C=06363000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=03452074972000 B=01570796327995 C=06363000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=03452074972000 B=01570796327995 C=06363000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=03452074972000 B=01570796327995 C=06364000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=01881278645000 B=01570796327995 C=06364000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=01881278645000 B=01570796327995 C=06364000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=01881278645000 B=01570796327995 C=06365000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=00310482318000 B=01570796327995 C=06365000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=00310482318000 B=01570796327995 C=06365000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=00310482318000 B=01570796327995 C=06366000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=98739685991000 B=01570796327995 C=06366000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=98739685991000 B=01570796327995 C=06366000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01265: 111..1.11. a + b -> a[ms] A=00310482318000 B=01570796327995 C=06366000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01266: .1...1.11. shift left a[ms] A=03104823180000 B=01570796327995 C=06366000000000 D=03490600000994 M=00000000000000 P=9 S=01....678.ab 01267: .....111.. p - 1 -> p A=03104823180000 B=01570796327995 C=06366000000000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 01270: ....1.11.. if p # 0 A=03104823180000 B=01570796327995 C=06366000000000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=03104823180000 B=01570796327995 C=06366000000000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=01534026853000 B=01570796327995 C=06366000000000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=01534026853000 B=01570796327995 C=06366000000000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=01534026853000 B=01570796327995 C=06366100000000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=99963230526000 B=01570796327995 C=06366100000000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=99963230526000 B=01570796327995 C=06366100000000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 01265: 111..1.11. a + b -> a[ms] A=01534026853000 B=01570796327995 C=06366100000000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 01266: .1...1.11. shift left a[ms] A=15340268530000 B=01570796327995 C=06366100000000 D=03490600000994 M=00000000000000 P=8 S=01....678.ab 01267: .....111.. p - 1 -> p A=15340268530000 B=01570796327995 C=06366100000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01270: ....1.11.. if p # 0 A=15340268530000 B=01570796327995 C=06366100000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=15340268530000 B=01570796327995 C=06366100000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=13769472203000 B=01570796327995 C=06366100000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=13769472203000 B=01570796327995 C=06366100000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=13769472203000 B=01570796327995 C=06366110000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=12198675876000 B=01570796327995 C=06366110000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=12198675876000 B=01570796327995 C=06366110000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=12198675876000 B=01570796327995 C=06366120000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=10627879549000 B=01570796327995 C=06366120000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=10627879549000 B=01570796327995 C=06366120000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=10627879549000 B=01570796327995 C=06366130000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=09057083222000 B=01570796327995 C=06366130000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=09057083222000 B=01570796327995 C=06366130000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=09057083222000 B=01570796327995 C=06366140000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=07486286895000 B=01570796327995 C=06366140000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=07486286895000 B=01570796327995 C=06366140000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=07486286895000 B=01570796327995 C=06366150000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=05915490568000 B=01570796327995 C=06366150000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=05915490568000 B=01570796327995 C=06366150000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=05915490568000 B=01570796327995 C=06366160000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=04344694241000 B=01570796327995 C=06366160000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=04344694241000 B=01570796327995 C=06366160000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=04344694241000 B=01570796327995 C=06366170000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=02773897914000 B=01570796327995 C=06366170000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=02773897914000 B=01570796327995 C=06366170000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=02773897914000 B=01570796327995 C=06366180000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=01203101587000 B=01570796327995 C=06366180000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=01203101587000 B=01570796327995 C=06366180000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=01203101587000 B=01570796327995 C=06366190000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=99632305260000 B=01570796327995 C=06366190000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=99632305260000 B=01570796327995 C=06366190000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01265: 111..1.11. a + b -> a[ms] A=01203101587000 B=01570796327995 C=06366190000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01266: .1...1.11. shift left a[ms] A=12031015870000 B=01570796327995 C=06366190000000 D=03490600000994 M=00000000000000 P=7 S=01....678.ab 01267: .....111.. p - 1 -> p A=12031015870000 B=01570796327995 C=06366190000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01270: ....1.11.. if p # 0 A=12031015870000 B=01570796327995 C=06366190000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=12031015870000 B=01570796327995 C=06366190000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=10460219543000 B=01570796327995 C=06366190000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=10460219543000 B=01570796327995 C=06366190000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=10460219543000 B=01570796327995 C=06366191000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=08889423216000 B=01570796327995 C=06366191000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=08889423216000 B=01570796327995 C=06366191000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=08889423216000 B=01570796327995 C=06366192000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=07318626889000 B=01570796327995 C=06366192000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=07318626889000 B=01570796327995 C=06366192000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=07318626889000 B=01570796327995 C=06366193000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=05747830562000 B=01570796327995 C=06366193000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=05747830562000 B=01570796327995 C=06366193000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=05747830562000 B=01570796327995 C=06366194000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=04177034235000 B=01570796327995 C=06366194000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=04177034235000 B=01570796327995 C=06366194000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=04177034235000 B=01570796327995 C=06366195000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=02606237908000 B=01570796327995 C=06366195000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=02606237908000 B=01570796327995 C=06366195000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=02606237908000 B=01570796327995 C=06366196000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=01035441581000 B=01570796327995 C=06366196000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=01035441581000 B=01570796327995 C=06366196000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=01035441581000 B=01570796327995 C=06366197000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=99464645254000 B=01570796327995 C=06366197000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=99464645254000 B=01570796327995 C=06366197000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01265: 111..1.11. a + b -> a[ms] A=01035441581000 B=01570796327995 C=06366197000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01266: .1...1.11. shift left a[ms] A=10354415810000 B=01570796327995 C=06366197000000 D=03490600000994 M=00000000000000 P=6 S=01....678.ab 01267: .....111.. p - 1 -> p A=10354415810000 B=01570796327995 C=06366197000000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01270: ....1.11.. if p # 0 A=10354415810000 B=01570796327995 C=06366197000000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=10354415810000 B=01570796327995 C=06366197000000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=08783619483000 B=01570796327995 C=06366197000000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=08783619483000 B=01570796327995 C=06366197000000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=08783619483000 B=01570796327995 C=06366197100000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=07212823156000 B=01570796327995 C=06366197100000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=07212823156000 B=01570796327995 C=06366197100000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=07212823156000 B=01570796327995 C=06366197200000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=05642026829000 B=01570796327995 C=06366197200000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=05642026829000 B=01570796327995 C=06366197200000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=05642026829000 B=01570796327995 C=06366197300000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=04071230502000 B=01570796327995 C=06366197300000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=04071230502000 B=01570796327995 C=06366197300000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=04071230502000 B=01570796327995 C=06366197400000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=02500434175000 B=01570796327995 C=06366197400000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=02500434175000 B=01570796327995 C=06366197400000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=02500434175000 B=01570796327995 C=06366197500000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=00929637848000 B=01570796327995 C=06366197500000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=00929637848000 B=01570796327995 C=06366197500000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=00929637848000 B=01570796327995 C=06366197600000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=99358841521000 B=01570796327995 C=06366197600000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=99358841521000 B=01570796327995 C=06366197600000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01265: 111..1.11. a + b -> a[ms] A=00929637848000 B=01570796327995 C=06366197600000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01266: .1...1.11. shift left a[ms] A=09296378480000 B=01570796327995 C=06366197600000 D=03490600000994 M=00000000000000 P=5 S=01....678.ab 01267: .....111.. p - 1 -> p A=09296378480000 B=01570796327995 C=06366197600000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01270: ....1.11.. if p # 0 A=09296378480000 B=01570796327995 C=06366197600000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=09296378480000 B=01570796327995 C=06366197600000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=07725582153000 B=01570796327995 C=06366197600000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=07725582153000 B=01570796327995 C=06366197600000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=07725582153000 B=01570796327995 C=06366197610000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=06154785826000 B=01570796327995 C=06366197610000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=06154785826000 B=01570796327995 C=06366197610000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=06154785826000 B=01570796327995 C=06366197620000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=04583989499000 B=01570796327995 C=06366197620000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=04583989499000 B=01570796327995 C=06366197620000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=04583989499000 B=01570796327995 C=06366197630000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=03013193172000 B=01570796327995 C=06366197630000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=03013193172000 B=01570796327995 C=06366197630000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=03013193172000 B=01570796327995 C=06366197640000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=01442396845000 B=01570796327995 C=06366197640000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=01442396845000 B=01570796327995 C=06366197640000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=01442396845000 B=01570796327995 C=06366197650000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=99871600518000 B=01570796327995 C=06366197650000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=99871600518000 B=01570796327995 C=06366197650000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01265: 111..1.11. a + b -> a[ms] A=01442396845000 B=01570796327995 C=06366197650000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01266: .1...1.11. shift left a[ms] A=14423968450000 B=01570796327995 C=06366197650000 D=03490600000994 M=00000000000000 P=4 S=01....678.ab 01267: .....111.. p - 1 -> p A=14423968450000 B=01570796327995 C=06366197650000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01270: ....1.11.. if p # 0 A=14423968450000 B=01570796327995 C=06366197650000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=14423968450000 B=01570796327995 C=06366197650000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=12853172123000 B=01570796327995 C=06366197650000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=12853172123000 B=01570796327995 C=06366197650000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=12853172123000 B=01570796327995 C=06366197651000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=11282375796000 B=01570796327995 C=06366197651000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=11282375796000 B=01570796327995 C=06366197651000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=11282375796000 B=01570796327995 C=06366197652000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=09711579469000 B=01570796327995 C=06366197652000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=09711579469000 B=01570796327995 C=06366197652000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=09711579469000 B=01570796327995 C=06366197653000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=08140783142000 B=01570796327995 C=06366197653000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=08140783142000 B=01570796327995 C=06366197653000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=08140783142000 B=01570796327995 C=06366197654000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=06569986815000 B=01570796327995 C=06366197654000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=06569986815000 B=01570796327995 C=06366197654000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=06569986815000 B=01570796327995 C=06366197655000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=04999190488000 B=01570796327995 C=06366197655000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=04999190488000 B=01570796327995 C=06366197655000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=04999190488000 B=01570796327995 C=06366197656000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=03428394161000 B=01570796327995 C=06366197656000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=03428394161000 B=01570796327995 C=06366197656000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=03428394161000 B=01570796327995 C=06366197657000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=01857597834000 B=01570796327995 C=06366197657000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=01857597834000 B=01570796327995 C=06366197657000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=01857597834000 B=01570796327995 C=06366197658000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=00286801507000 B=01570796327995 C=06366197658000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=00286801507000 B=01570796327995 C=06366197658000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=00286801507000 B=01570796327995 C=06366197659000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=98716005180000 B=01570796327995 C=06366197659000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=98716005180000 B=01570796327995 C=06366197659000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01265: 111..1.11. a + b -> a[ms] A=00286801507000 B=01570796327995 C=06366197659000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01266: .1...1.11. shift left a[ms] A=02868015070000 B=01570796327995 C=06366197659000 D=03490600000994 M=00000000000000 P=3 S=01....678.ab 01267: .....111.. p - 1 -> p A=02868015070000 B=01570796327995 C=06366197659000 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 01270: ....1.11.. if p # 0 A=02868015070000 B=01570796327995 C=06366197659000 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=02868015070000 B=01570796327995 C=06366197659000 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=01297218743000 B=01570796327995 C=06366197659000 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=01297218743000 B=01570796327995 C=06366197659000 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=01297218743000 B=01570796327995 C=06366197659100 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=99726422416000 B=01570796327995 C=06366197659100 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=99726422416000 B=01570796327995 C=06366197659100 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 01265: 111..1.11. a + b -> a[ms] A=01297218743000 B=01570796327995 C=06366197659100 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 01266: .1...1.11. shift left a[ms] A=12972187430000 B=01570796327995 C=06366197659100 D=03490600000994 M=00000000000000 P=2 S=01....678.ab 01267: .....111.. p - 1 -> p A=12972187430000 B=01570796327995 C=06366197659100 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01270: ....1.11.. if p # 0 A=12972187430000 B=01570796327995 C=06366197659100 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=12972187430000 B=01570796327995 C=06366197659100 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=11401391103000 B=01570796327995 C=06366197659100 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=11401391103000 B=01570796327995 C=06366197659100 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=11401391103000 B=01570796327995 C=06366197659110 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=09830594776000 B=01570796327995 C=06366197659110 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=09830594776000 B=01570796327995 C=06366197659110 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=09830594776000 B=01570796327995 C=06366197659120 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=08259798449000 B=01570796327995 C=06366197659120 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=08259798449000 B=01570796327995 C=06366197659120 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=08259798449000 B=01570796327995 C=06366197659130 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=06689002122000 B=01570796327995 C=06366197659130 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=06689002122000 B=01570796327995 C=06366197659130 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=06689002122000 B=01570796327995 C=06366197659140 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=05118205795000 B=01570796327995 C=06366197659140 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=05118205795000 B=01570796327995 C=06366197659140 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=05118205795000 B=01570796327995 C=06366197659150 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=03547409468000 B=01570796327995 C=06366197659150 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=03547409468000 B=01570796327995 C=06366197659150 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=03547409468000 B=01570796327995 C=06366197659160 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=01976613141000 B=01570796327995 C=06366197659160 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=01976613141000 B=01570796327995 C=06366197659160 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=01976613141000 B=01570796327995 C=06366197659170 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=00405816814000 B=01570796327995 C=06366197659170 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=00405816814000 B=01570796327995 C=06366197659170 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01262: .1111...1. div14: c + 1 -> c[p] A=00405816814000 B=01570796327995 C=06366197659180 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01263: 11...1.11. div15: a - b -> a[ms] A=98835020487000 B=01570796327995 C=06366197659180 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01264: 1.11..1.11 -> 01262 if no carry go to div14 A=98835020487000 B=01570796327995 C=06366197659180 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01265: 111..1.11. a + b -> a[ms] A=00405816814000 B=01570796327995 C=06366197659180 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01266: .1...1.11. shift left a[ms] A=04058168140000 B=01570796327995 C=06366197659180 D=03490600000994 M=00000000000000 P=1 S=01....678.ab 01267: .....111.. p - 1 -> p A=04058168140000 B=01570796327995 C=06366197659180 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 01270: ....1.11.. if p # 0 A=04058168140000 B=01570796327995 C=06366197659180 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 01271: 1.11..1111 -> 01263 then go to div15 A=04058168140000 B=01570796327995 C=06366197659180 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 01272: ..1.11.111 -> 01055 go to tnm12 A=04058168140000 B=01570796327995 C=06366197659180 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 01055: .11...111. tnm12: c -> a[w] A=06366197659180 B=01570796327995 C=06366197659180 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 01056: ..1...1.1. b -> c[x] A=06366197659180 B=01570796327995 C=06366197659995 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 01057: 11..1.1111 -> 01313 go to add15 A=06366197659180 B=01570796327995 C=06366197659995 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 01313: .1...1.... -> 02314 add15: select rom 2 ; -> nrm21 A=06366197659180 B=01570796327995 C=06366197659995 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 02314: 1.1111111. nrm21: 0 -> a[s] A=06366197659180 B=01570796327995 C=06366197659995 D=03490600000994 M=00000000000000 P=0 S=01....678.ab 02315: 11....11.. 12 -> p A=06366197659180 B=01570796327995 C=06366197659995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02316: ....1.111. 0 -> b[w] A=06366197659180 B=00000000000000 C=06366197659995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02317: 1..11...1. nrm23: if a[p] >= 1 A=06366197659180 B=00000000000000 C=06366197659995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02320: 11.1.11.11 -> 02326 then go to nrm24 A=06366197659180 B=00000000000000 C=06366197659995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02326: .1..1.1.1. nrm24: a -> b[x] A=06366197659180 B=00000000000180 C=06366197659995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02327: 111...111. a + b -> a[w] A=06366197659360 B=00000000000180 C=06366197659995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02330: 1..111111. if a[s] >= 1 A=06366197659360 B=00000000000180 C=06366197659995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02331: 11...11111 -> 02307 then go to mpy28 A=06366197659360 B=00000000000180 C=06366197659995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02332: 111.1..11. a exchange c[m] A=06366197659360 B=00000000000180 C=06366197659995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02333: .11...111. c -> a[w] A=06366197659995 B=00000000000180 C=06366197659995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02334: ....1.111. 0 -> b[w] A=06366197659995 B=00000000000000 C=06366197659995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02335: 11....11.. nrm27: 12 -> p A=06366197659995 B=00000000000000 C=06366197659995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02336: .1111.1.11 -> 02172 go to nrm26 A=06366197659995 B=00000000000000 C=06366197659995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02172: ..1..1.1.. nrm26: if s2 = 0 A=06366197659995 B=00000000000000 C=06366197659995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02173: 1..1.1..11 -> 02224 then go to rtn21 A=06366197659995 B=00000000000000 C=06366197659995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 02224: ..1..1.... -> 01225 rtn21: select rom 1 ; -> rtn11 A=06366197659995 B=00000000000000 C=06366197659995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01225: ...1.1.1.. rtn11: if s1 = 0 A=06366197659995 B=00000000000000 C=06366197659995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01226: 11.11.1.11 -> 01332 then go to rtn12 A=06366197659995 B=00000000000000 C=06366197659995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01227: ....11.... return A=06366197659995 B=00000000000000 C=06366197659995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01150: 1..1.1.1.. if s9 = 0 A=06366197659995 B=00000000000000 C=06366197659995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01151: .11.11..11 -> 01154 then go to l01154 A=06366197659995 B=00000000000000 C=06366197659995 D=03490600000994 M=00000000000000 P=c S=01....678.ab 01154: ...11..1.. l01154: 0 -> s1 A=06366197659995 B=00000000000000 C=06366197659995 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 01155: ..11..111. l01155: 0 -> c[w] A=06366197659995 B=00000000000000 C=00000000000000 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 01156: .1.11...1. c - 1 -> c[p] A=06366197659995 B=00000000000000 C=09000000000000 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 01157: .1111.1.1. c + 1 -> c[x] A=06366197659995 B=00000000000000 C=09000000000001 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 01160: ...1.1.1.. if s1 = 0 A=06366197659995 B=00000000000000 C=09000000000001 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 01161: 1.1..1.111 -> 01245 then go to mpy11 A=06366197659995 B=00000000000000 C=09000000000001 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 01245: .1...1.... -> 02246 mpy11: select rom 2 ; -> mpy21 A=06366197659995 B=00000000000000 C=09000000000001 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02246: ..11..11.. mpy21: 3 -> p A=06366197659995 B=00000000000000 C=09000000000001 D=03490600000994 M=00000000000000 P=3 S=0.....678.ab 02247: .111..1.1. mpy22: a + c -> c[x] A=06366197659995 B=00000000000000 C=09000000000996 D=03490600000994 M=00000000000000 P=3 S=0.....678.ab 02250: .1.1.1111. a - c -> c[s] A=06366197659995 B=00000000000000 C=09000000000996 D=03490600000994 M=00000000000000 P=3 S=0.....678.ab 02251: 1.1.1.1111 -> 02253 if no carry go to div22 A=06366197659995 B=00000000000000 C=09000000000996 D=03490600000994 M=00000000000000 P=3 S=0.....678.ab 02253: 11..1..11. div22: a exchange b[m] A=00000000000995 B=06366197659000 C=09000000000996 D=03490600000994 M=00000000000000 P=3 S=0.....678.ab 02254: 1.111.111. 0 -> a[w] A=00000000000000 B=06366197659000 C=09000000000996 D=03490600000994 M=00000000000000 P=3 S=0.....678.ab 02255: 11..1.11.. if p # 12 A=00000000000000 B=06366197659000 C=09000000000996 D=03490600000994 M=00000000000000 P=3 S=0.....678.ab 02256: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=06366197659000 C=09000000000996 D=03490600000994 M=00000000000000 P=3 S=0.....678.ab 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=06366197659000 C=09000000009996 D=03490600000994 M=00000000000000 P=3 S=0.....678.ab 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=06366197659000 C=09000000009996 D=03490600000994 M=00000000000000 P=3 S=0.....678.ab 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=06366197659000 C=09000000009996 D=03490600000994 M=00000000000000 P=3 S=0.....678.ab 02310: ....1111.. p + 1 -> p A=00000000000000 B=06366197659000 C=09000000009996 D=03490600000994 M=00000000000000 P=4 S=0.....678.ab 02311: 11.11.11.. if p # 13 A=00000000000000 B=06366197659000 C=09000000009996 D=03490600000994 M=00000000000000 P=4 S=0.....678.ab 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=06366197659000 C=09000000009996 D=03490600000994 M=00000000000000 P=4 S=0.....678.ab 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=06366197659000 C=09000000099996 D=03490600000994 M=00000000000000 P=4 S=0.....678.ab 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=06366197659000 C=09000000099996 D=03490600000994 M=00000000000000 P=4 S=0.....678.ab 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=06366197659000 C=09000000099996 D=03490600000994 M=00000000000000 P=4 S=0.....678.ab 02310: ....1111.. p + 1 -> p A=00000000000000 B=06366197659000 C=09000000099996 D=03490600000994 M=00000000000000 P=5 S=0.....678.ab 02311: 11.11.11.. if p # 13 A=00000000000000 B=06366197659000 C=09000000099996 D=03490600000994 M=00000000000000 P=5 S=0.....678.ab 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=06366197659000 C=09000000099996 D=03490600000994 M=00000000000000 P=5 S=0.....678.ab 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=06366197659000 C=09000000999996 D=03490600000994 M=00000000000000 P=5 S=0.....678.ab 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=06366197659000 C=09000000999996 D=03490600000994 M=00000000000000 P=5 S=0.....678.ab 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=06366197659000 C=09000000999996 D=03490600000994 M=00000000000000 P=5 S=0.....678.ab 02310: ....1111.. p + 1 -> p A=00000000000000 B=06366197659000 C=09000000999996 D=03490600000994 M=00000000000000 P=6 S=0.....678.ab 02311: 11.11.11.. if p # 13 A=00000000000000 B=06366197659000 C=09000000999996 D=03490600000994 M=00000000000000 P=6 S=0.....678.ab 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=06366197659000 C=09000000999996 D=03490600000994 M=00000000000000 P=6 S=0.....678.ab 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=06366197659000 C=09000009999996 D=03490600000994 M=00000000000000 P=6 S=0.....678.ab 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=06366197659000 C=09000009999996 D=03490600000994 M=00000000000000 P=6 S=0.....678.ab 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=06366197659000 C=09000009999996 D=03490600000994 M=00000000000000 P=6 S=0.....678.ab 02310: ....1111.. p + 1 -> p A=00000000000000 B=06366197659000 C=09000009999996 D=03490600000994 M=00000000000000 P=7 S=0.....678.ab 02311: 11.11.11.. if p # 13 A=00000000000000 B=06366197659000 C=09000009999996 D=03490600000994 M=00000000000000 P=7 S=0.....678.ab 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=06366197659000 C=09000009999996 D=03490600000994 M=00000000000000 P=7 S=0.....678.ab 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=06366197659000 C=09000099999996 D=03490600000994 M=00000000000000 P=7 S=0.....678.ab 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=06366197659000 C=09000099999996 D=03490600000994 M=00000000000000 P=7 S=0.....678.ab 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=06366197659000 C=09000099999996 D=03490600000994 M=00000000000000 P=7 S=0.....678.ab 02310: ....1111.. p + 1 -> p A=00000000000000 B=06366197659000 C=09000099999996 D=03490600000994 M=00000000000000 P=8 S=0.....678.ab 02311: 11.11.11.. if p # 13 A=00000000000000 B=06366197659000 C=09000099999996 D=03490600000994 M=00000000000000 P=8 S=0.....678.ab 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=06366197659000 C=09000099999996 D=03490600000994 M=00000000000000 P=8 S=0.....678.ab 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=06366197659000 C=09000999999996 D=03490600000994 M=00000000000000 P=8 S=0.....678.ab 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=06366197659000 C=09000999999996 D=03490600000994 M=00000000000000 P=8 S=0.....678.ab 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=06366197659000 C=09000999999996 D=03490600000994 M=00000000000000 P=8 S=0.....678.ab 02310: ....1111.. p + 1 -> p A=00000000000000 B=06366197659000 C=09000999999996 D=03490600000994 M=00000000000000 P=9 S=0.....678.ab 02311: 11.11.11.. if p # 13 A=00000000000000 B=06366197659000 C=09000999999996 D=03490600000994 M=00000000000000 P=9 S=0.....678.ab 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=06366197659000 C=09000999999996 D=03490600000994 M=00000000000000 P=9 S=0.....678.ab 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=06366197659000 C=09009999999996 D=03490600000994 M=00000000000000 P=9 S=0.....678.ab 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=06366197659000 C=09009999999996 D=03490600000994 M=00000000000000 P=9 S=0.....678.ab 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=06366197659000 C=09009999999996 D=03490600000994 M=00000000000000 P=9 S=0.....678.ab 02310: ....1111.. p + 1 -> p A=00000000000000 B=06366197659000 C=09009999999996 D=03490600000994 M=00000000000000 P=a S=0.....678.ab 02311: 11.11.11.. if p # 13 A=00000000000000 B=06366197659000 C=09009999999996 D=03490600000994 M=00000000000000 P=a S=0.....678.ab 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=06366197659000 C=09009999999996 D=03490600000994 M=00000000000000 P=a S=0.....678.ab 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=06366197659000 C=09099999999996 D=03490600000994 M=00000000000000 P=a S=0.....678.ab 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=06366197659000 C=09099999999996 D=03490600000994 M=00000000000000 P=a S=0.....678.ab 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=06366197659000 C=09099999999996 D=03490600000994 M=00000000000000 P=a S=0.....678.ab 02310: ....1111.. p + 1 -> p A=00000000000000 B=06366197659000 C=09099999999996 D=03490600000994 M=00000000000000 P=b S=0.....678.ab 02311: 11.11.11.. if p # 13 A=00000000000000 B=06366197659000 C=09099999999996 D=03490600000994 M=00000000000000 P=b S=0.....678.ab 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=06366197659000 C=09099999999996 D=03490600000994 M=00000000000000 P=b S=0.....678.ab 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=06366197659000 C=09999999999996 D=03490600000994 M=00000000000000 P=b S=0.....678.ab 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=06366197659000 C=09999999999996 D=03490600000994 M=00000000000000 P=b S=0.....678.ab 02307: 1.11..111. mpy28: shift right a[w] A=00000000000000 B=06366197659000 C=09999999999996 D=03490600000994 M=00000000000000 P=b S=0.....678.ab 02310: ....1111.. p + 1 -> p A=00000000000000 B=06366197659000 C=09999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02311: 11.11.11.. if p # 13 A=00000000000000 B=06366197659000 C=09999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02312: 11...1.111 -> 02305 then go to mpy27 A=00000000000000 B=06366197659000 C=09999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02305: .1.11...1. mpy27: c - 1 -> c[p] A=00000000000000 B=06366197659000 C=08999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02306: 11...1..11 -> 02304 if no carry go to myp26 A=00000000000000 B=06366197659000 C=08999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02304: 111...111. myp26: a + b -> a[w] A=06366197659000 B=06366197659000 C=08999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02305: .1.11...1. mpy27: c - 1 -> c[p] A=06366197659000 B=06366197659000 C=07999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02306: 11...1..11 -> 02304 if no carry go to myp26 A=06366197659000 B=06366197659000 C=07999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02304: 111...111. myp26: a + b -> a[w] A=12732395318000 B=06366197659000 C=07999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02305: .1.11...1. mpy27: c - 1 -> c[p] A=12732395318000 B=06366197659000 C=06999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02306: 11...1..11 -> 02304 if no carry go to myp26 A=12732395318000 B=06366197659000 C=06999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02304: 111...111. myp26: a + b -> a[w] A=19098592977000 B=06366197659000 C=06999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02305: .1.11...1. mpy27: c - 1 -> c[p] A=19098592977000 B=06366197659000 C=05999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02306: 11...1..11 -> 02304 if no carry go to myp26 A=19098592977000 B=06366197659000 C=05999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02304: 111...111. myp26: a + b -> a[w] A=25464790636000 B=06366197659000 C=05999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02305: .1.11...1. mpy27: c - 1 -> c[p] A=25464790636000 B=06366197659000 C=04999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02306: 11...1..11 -> 02304 if no carry go to myp26 A=25464790636000 B=06366197659000 C=04999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02304: 111...111. myp26: a + b -> a[w] A=31830988295000 B=06366197659000 C=04999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02305: .1.11...1. mpy27: c - 1 -> c[p] A=31830988295000 B=06366197659000 C=03999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02306: 11...1..11 -> 02304 if no carry go to myp26 A=31830988295000 B=06366197659000 C=03999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02304: 111...111. myp26: a + b -> a[w] A=38197185954000 B=06366197659000 C=03999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02305: .1.11...1. mpy27: c - 1 -> c[p] A=38197185954000 B=06366197659000 C=02999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02306: 11...1..11 -> 02304 if no carry go to myp26 A=38197185954000 B=06366197659000 C=02999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02304: 111...111. myp26: a + b -> a[w] A=44563383613000 B=06366197659000 C=02999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02305: .1.11...1. mpy27: c - 1 -> c[p] A=44563383613000 B=06366197659000 C=01999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02306: 11...1..11 -> 02304 if no carry go to myp26 A=44563383613000 B=06366197659000 C=01999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02304: 111...111. myp26: a + b -> a[w] A=50929581272000 B=06366197659000 C=01999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02305: .1.11...1. mpy27: c - 1 -> c[p] A=50929581272000 B=06366197659000 C=00999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02306: 11...1..11 -> 02304 if no carry go to myp26 A=50929581272000 B=06366197659000 C=00999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02304: 111...111. myp26: a + b -> a[w] A=57295778931000 B=06366197659000 C=00999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02305: .1.11...1. mpy27: c - 1 -> c[p] A=57295778931000 B=06366197659000 C=09999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02306: 11...1..11 -> 02304 if no carry go to myp26 A=57295778931000 B=06366197659000 C=09999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02307: 1.11..111. mpy28: shift right a[w] A=05729577893100 B=06366197659000 C=09999999999996 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02310: ....1111.. p + 1 -> p A=05729577893100 B=06366197659000 C=09999999999996 D=03490600000994 M=00000000000000 P=d S=0.....678.ab 02311: 11.11.11.. if p # 13 A=05729577893100 B=06366197659000 C=09999999999996 D=03490600000994 M=00000000000000 P=d S=0.....678.ab 02312: 11...1.111 -> 02305 then go to mpy27 A=05729577893100 B=06366197659000 C=09999999999996 D=03490600000994 M=00000000000000 P=d S=0.....678.ab 02313: .1111.1.1. c + 1 -> c[x] A=05729577893100 B=06366197659000 C=09999999999997 D=03490600000994 M=00000000000000 P=d S=0.....678.ab 02314: 1.1111111. nrm21: 0 -> a[s] A=05729577893100 B=06366197659000 C=09999999999997 D=03490600000994 M=00000000000000 P=d S=0.....678.ab 02315: 11....11.. 12 -> p A=05729577893100 B=06366197659000 C=09999999999997 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02316: ....1.111. 0 -> b[w] A=05729577893100 B=00000000000000 C=09999999999997 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02317: 1..11...1. nrm23: if a[p] >= 1 A=05729577893100 B=00000000000000 C=09999999999997 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02320: 11.1.11.11 -> 02326 then go to nrm24 A=05729577893100 B=00000000000000 C=09999999999997 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02326: .1..1.1.1. nrm24: a -> b[x] A=05729577893100 B=00000000000100 C=09999999999997 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02327: 111...111. a + b -> a[w] A=05729577893200 B=00000000000100 C=09999999999997 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02330: 1..111111. if a[s] >= 1 A=05729577893200 B=00000000000100 C=09999999999997 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02331: 11...11111 -> 02307 then go to mpy28 A=05729577893200 B=00000000000100 C=09999999999997 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02332: 111.1..11. a exchange c[m] A=09999999999200 B=00000000000100 C=05729577893997 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02333: .11...111. c -> a[w] A=05729577893997 B=00000000000100 C=05729577893997 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02334: ....1.111. 0 -> b[w] A=05729577893997 B=00000000000000 C=05729577893997 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02335: 11....11.. nrm27: 12 -> p A=05729577893997 B=00000000000000 C=05729577893997 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02336: .1111.1.11 -> 02172 go to nrm26 A=05729577893997 B=00000000000000 C=05729577893997 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02172: ..1..1.1.. nrm26: if s2 = 0 A=05729577893997 B=00000000000000 C=05729577893997 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02173: 1..1.1..11 -> 02224 then go to rtn21 A=05729577893997 B=00000000000000 C=05729577893997 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 02224: ..1..1.... -> 01225 rtn21: select rom 1 ; -> rtn11 A=05729577893997 B=00000000000000 C=05729577893997 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 01225: ...1.1.1.. rtn11: if s1 = 0 A=05729577893997 B=00000000000000 C=05729577893997 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 01226: 11.11.1.11 -> 01332 then go to rtn12 A=05729577893997 B=00000000000000 C=05729577893997 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 01332: .....1.... -> 00333 rtn12: select rom 0 ; -> l00333 A=05729577893997 B=00000000000000 C=05729577893997 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 00333: .1.111.1.1 -> 00135 l00333: jsb of13 A=05729577893997 B=00000000000000 C=05729577893997 D=03490600000994 M=00000000000000 P=c S=0.....678.ab 00135: ....11.1.. of13: clear status A=05729577893997 B=00000000000000 C=05729577893997 D=03490600000994 M=00000000000000 P=c S=............ 00136: .11...111. c -> a[w] A=05729577893997 B=00000000000000 C=05729577893997 D=03490600000994 M=00000000000000 P=c S=............ 00137: 11....11.. of14: 12 -> p A=05729577893997 B=00000000000000 C=05729577893997 D=03490600000994 M=00000000000000 P=c S=............ 00140: .1..1.1.1. a -> b[x] A=05729577893997 B=00000000000997 C=05729577893997 D=03490600000994 M=00000000000000 P=c S=............ 00141: .11...1.1. c -> a[x] A=05729577893997 B=00000000000997 C=05729577893997 D=03490600000994 M=00000000000000 P=c S=............ 00142: .11.111.1. if c[xs] = 0 A=05729577893997 B=00000000000997 C=05729577893997 D=03490600000994 M=00000000000000 P=c S=............ 00143: .11.1...11 -> 00150 then go to of15 A=05729577893997 B=00000000000997 C=05729577893997 D=03490600000994 M=00000000000000 P=c S=............ 00144: ..1.1.1.1. 0 - c -> c[x] A=05729577893997 B=00000000000997 C=05729577893003 D=03490600000994 M=00000000000000 P=c S=............ 00145: .1.1111.1. c - 1 -> c[xs] A=05729577893997 B=00000000000997 C=05729577893903 D=03490600000994 M=00000000000000 P=c S=............ 00146: .1.1.11111 -> 00127 if no carry go to of11 A=05729577893997 B=00000000000997 C=05729577893903 D=03490600000994 M=00000000000000 P=c S=............ 00147: .1.1..11.. 5 -> p A=05729577893997 B=00000000000997 C=05729577893903 D=03490600000994 M=00000000000000 P=5 S=............ 00150: 111.1.1.1. of15: a exchange c[x] A=05729577893903 B=00000000000997 C=05729577893997 D=03490600000994 M=00000000000000 P=5 S=............ 00151: .1...1.1.. if s4 = 0 A=05729577893903 B=00000000000997 C=05729577893997 D=03490600000994 M=00000000000000 P=5 S=............ 00152: .1....1.11 -> 00102 then go to l00102 A=05729577893903 B=00000000000997 C=05729577893997 D=03490600000994 M=00000000000000 P=5 S=............ 00102: .1..1.111. l00102: a -> b[w] A=05729577893903 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=5 S=............ 00103: 1.11111.1. 0 -> a[xs] A=05729577893003 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=5 S=............ 00104: .1...1.11. shift left a[ms] A=57295778930003 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=5 S=............ 00105: 11.11.1.1. l00105: a - 1 -> a[x] A=57295778930002 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=5 S=............ 00106: 111.....11 -> 00340 if no carry go to l00340 A=57295778930002 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=5 S=............ 00340: 1.11.1.11. l00340: shift right a[ms] A=05729577893002 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=5 S=............ 00341: .....111.. p - 1 -> p A=05729577893002 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=4 S=............ 00342: ..1.1.11.. if p # 2 A=05729577893002 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=4 S=............ 00343: .1...1.111 -> 00105 then go to l00105 A=05729577893002 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=4 S=............ 00105: 11.11.1.1. l00105: a - 1 -> a[x] A=05729577893001 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=4 S=............ 00106: 111.....11 -> 00340 if no carry go to l00340 A=05729577893001 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=4 S=............ 00340: 1.11.1.11. l00340: shift right a[ms] A=00572957789001 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=4 S=............ 00341: .....111.. p - 1 -> p A=00572957789001 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=3 S=............ 00342: ..1.1.11.. if p # 2 A=00572957789001 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=3 S=............ 00343: .1...1.111 -> 00105 then go to l00105 A=00572957789001 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=3 S=............ 00105: 11.11.1.1. l00105: a - 1 -> a[x] A=00572957789000 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=3 S=............ 00106: 111.....11 -> 00340 if no carry go to l00340 A=00572957789000 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=3 S=............ 00340: 1.11.1.11. l00340: shift right a[ms] A=00057295778000 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=3 S=............ 00341: .....111.. p - 1 -> p A=00057295778000 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=2 S=............ 00342: ..1.1.11.. if p # 2 A=00057295778000 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=2 S=............ 00343: .1...1.111 -> 00105 then go to l00105 A=00057295778000 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=2 S=............ 00344: 11....11.. 12 -> p A=00057295778000 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=c S=............ 00345: 1.111.111. 0 -> a[w] A=00000000000000 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=c S=............ 00346: 1.1111.11. l00346: 0 -> a[ms] A=00000000000000 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=c S=............ 00347: 11111...1. a + 1 -> a[p] A=01000000000000 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=c S=............ 00350: 11111...1. a + 1 -> a[p] A=02000000000000 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=c S=............ 00351: ..1...11.. 2 -> p A=02000000000000 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=2 S=............ 00352: ....1111.. l00352: p + 1 -> p A=02000000000000 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=3 S=............ 00353: 11.11...1. a - 1 -> a[p] A=02000000009000 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=3 S=............ 00354: 111.111111 -> 00357 if no carry go to l00357 A=02000000009000 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=3 S=............ 00355: ........1. if b[p] = 0 A=02000000009000 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=3 S=............ 00356: 111.1.1.11 -> 00352 then go to l00352 A=02000000009000 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=3 S=............ 00357: 11111...1. l00357: a + 1 -> a[p] A=02000000000000 B=05729577893903 C=05729577893997 D=03490600000994 M=00000000000000 P=3 S=............ 00360: 11..1.111. a exchange b[w] A=05729577893903 B=02000000000000 C=05729577893997 D=03490600000994 M=00000000000000 P=3 S=............ 00361: ....11.... return A=05729577893903 B=02000000000000 C=05729577893997 D=03490600000994 M=00000000000000 P=3 S=............ 00334: .111...1.. 1 -> s7 A=05729577893903 B=02000000000000 C=05729577893997 D=03490600000994 M=00000000000000 P=3 S=.......7.... 00335: 1111.111.1 -> 00367 fst2zx: jsb dsp1 A=05729577893903 B=02000000000000 C=05729577893997 D=03490600000994 M=00000000000000 P=3 S=.......7.... 00367: 1.1.1..1.. dsp1: 0 -> s10 A=05729577893903 B=02000000000000 C=05729577893997 D=03490600000994 M=00000000000000 P=3 S=.......7....