diff options
Diffstat (limited to 'wav.bqn')
| -rw-r--r-- | wav.bqn | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -66,7 +66,8 @@ _audioConvert β { _withInv_ β {F _π£_ G: {π:Fπ© ; πβΌ:Gπ©}} # Convert π-byte sequences to ints _int β { - b β 256 β (+β(bβΈΓ)ΛββββΏπβ₯β’) _withInv_ (β₯βββ>b|ββΓ·βbβ(βπ)) + b β 256 + (+β(bβΈΓ)ΛΛβ(-(bΓ·2)β€Β―1βΈβ)Β·βββΏπβ₯β’) _withInv_ (β₯βββ>b|ββΓ·βbβ(βπ)) } # Convert int to float _float β {eβΏmβΏbβπ # exponent and mantissa length in bits; bias |
