blob: 74b1c32183acdb3fb46758e5c3f7c062eb58a07a (
plain) (
tree)
|
|
TERM ORIG 1000
START ENT1 5
LDA 2000
MUL 2000
STX 2001
SRC 5
MUL 2001
SRC 5
DEC1 1
J1NZ 1005
MUL 2000
SRC 5
HLT 0
END START
* space = 12; time = 102u.
* time is 72u less than the time for 22.small.mixal.
* this solution uses successive squaring.
* discovered successive squaring in sicp. second edition. section 1.2.4.
|