Browse code
(mandelbrot) Fixed issues
Devine Lu Linvega authored on 05/03/2023 03:39:07
Showing 1 changed files
| ... | ... |
@@ -92,11 +92,13 @@ JMP2r |
| 92 | 92 |
( r21' max is 7f7f, alo-bhi max is 7e81, max sum is fe00 ) |
| 93 | 93 |
ADD2 ( asign ahi-bhi* r21"* ) |
| 94 | 94 |
( The result we want is bits 27-12 due to the fixed point representation we use. ) |
| 95 |
- #04 SFT2 SWP2 #40 SFT2 ADD2 |
|
| 95 |
+ #04 SFT2 SWP2 #07ff min #40 SFT2 ADD2 |
|
| 96 | 96 |
( saturate to +/-7.fff ) |
| 97 |
- #7fff GTH2k [ JMP SWP2 NIP2 ] |
|
| 97 |
+ #7fff min |
|
| 98 | 98 |
STHr #01 NEQ ?&result-positive |
| 99 | 99 |
DUP2k EOR2 SWP2 SUB2 |
| 100 | 100 |
&result-positive |
| 101 | 101 |
JMP2r |
| 102 | 102 |
|
| 103 |
+@min ( x* y* -- min* ) |
|
| 104 |
+ GTH2k [ JMP SWP2 NIP2 ] JMP2r |