d6
/
nxu
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

document gcd

This commit is contained in:
~d6 2021-12-30 22:57:36 -05:00
parent ea7b21a43d
commit ff6c2544d9
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
math32.tal
View File

@ -27,6 +27,7 @@
( div32 x** y** -> q** x / y ) ( div32 x** y** -> q** x / y )
( mod32 x** y** -> r** x % y ) ( mod32 x** y** -> r** x % y )
( divmod32 x** y** -> q** r** x / y, x % y ) ( divmod32 x** y** -> q** r** x / y, x % y )
( gcd32 x** y** -> z** gcd(x, y) )
( negate32 x** -> z** -x ) ( negate32 x** -> z** -x )
( lshift32 x** n^ -> z** x<<n ) ( lshift32 x** n^ -> z** x<<n )
( rshift32 x** n^ -> z** x>>n ) ( rshift32 x** n^ -> z** x>>n )
@ -53,7 +54,6 @@
( - mul32 memory, 12 bytes ) ( - mul32 memory, 12 bytes )
( - _divmod32 memory, 16 bytes ) ( - _divmod32 memory, 16 bytes )
%DEBUG { #ff #0e DEO }
%RTN { JMP2r } %RTN { JMP2r }
%TOR { ROT ROT } ( a b c -> c a b ) %TOR { ROT ROT } ( a b c -> c a b )
%COMPLEMENT32 { SWP2 #ffff EOR2 SWP2 #ffff EOR2 } %COMPLEMENT32 { SWP2 #ffff EOR2 SWP2 #ffff EOR2 }