randomize shape a bit in test/copy.bqn

This commit is contained in:
dzaima 2022-04-25 03:13:58 +03:00
parent ab868a55f3
commit 103f334b3e

View File

@ -20,9 +20,14 @@ count ← 10000
eqlen 0
{𝕊:
n R 26+R 9
n R 25+R 9
shl 1+•_while_{(R 2)0=1|n÷2𝕩+1} 0
sh (n÷2shl)shl2
{𝕊: sh} (n=1) 0=R 2
! n ×´sh
v R vn
l
l sh
{𝕊: (v0261430) -˜ n R 2v171531}
{𝕊: ÷n R 0}
{𝕊: @+n R (v-5)256655361114112}