mirror of
https://github.com/ilyakooo0/urbit.git
synced 2025-01-04 13:19:48 +03:00
Restructured raws/rads:og for =^ result order, added /=pals= %ames .^
This commit is contained in:
parent
424fa7398d
commit
7e50755029
@ -1775,6 +1775,10 @@
|
||||
?~ gys ~
|
||||
=+ zet=zest:(ho:(~(um am [now fox]) our) his)
|
||||
[~ ?:(=(%show i.tyl) >zet< zet)]
|
||||
?: ?=([%pals ~] tyl)
|
||||
?. =(our his)
|
||||
~
|
||||
[~ pals:(~(um am [now fox]) our)]
|
||||
?. ?=([%life ~] tyl)
|
||||
=+ muc=$(tyl [%life ~])
|
||||
(perm our his ?~(muc 0 (,@ud u.muc)) tyl)
|
||||
|
@ -5394,7 +5394,7 @@
|
||||
++ rads :: random continuation
|
||||
|= b=@
|
||||
=+ r=(rad b)
|
||||
[+>.$(a (shas %og-s r)) r]
|
||||
[r +>.$(a (shas %og-s r))]
|
||||
++ raw :: random bits
|
||||
~/ %raw
|
||||
|= b=@ ^- @
|
||||
@ -5411,7 +5411,7 @@
|
||||
++ raws :: random bits continuation
|
||||
|= b=@
|
||||
=+ r=(raw b)
|
||||
[+>.$(a (shas %og-s r)) r]
|
||||
[r +>.$(a (shas %og-s r))]
|
||||
--
|
||||
++ shaz :: sha-512
|
||||
|= ruz=@ ^- @
|
||||
|
Loading…
Reference in New Issue
Block a user