diff options
| -rw-r--r-- | programs/fib.pal | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/programs/fib.pal b/programs/fib.pal index 4d3fb1b..941b949 100644 --- a/programs/fib.pal +++ b/programs/fib.pal | |||
| @@ -3,17 +3,15 @@ | |||
| 3 | *200 | 3 | *200 |
| 4 | 4 | ||
| 5 | LOOP, CLA | 5 | LOOP, CLA |
| 6 | TAD N | ||
| 7 | TAD NPLUS1 | ||
| 8 | DCA NPLUS2 | ||
| 9 | TAD NPLUS1 | 6 | TAD NPLUS1 |
| 10 | DCA N | 7 | MQL |
| 11 | TAD NPLUS2 | 8 | TAD N |
| 12 | DCA NPLUS1 | 9 | DCA NPLUS1 |
| 10 | MQA | ||
| 11 | DCA N | ||
| 13 | JMP LOOP | 12 | JMP LOOP |
| 14 | 13 | ||
| 15 | *300 | 14 | *300 |
| 16 | 15 | ||
| 17 | N, 0 | 16 | N, 0 |
| 18 | NPLUS1, 1 | 17 | NPLUS1, 1 |
| 19 | NPLUS2, 0 | ||
