hacklab/strudel
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Pretty code now

Browse source
This commit is contained in:
Martyn Eggleton 2026-06-21 13:49:11 +01:00
parent 2b2646a768
commit 6870b04fb2
No known key found for this signature in database
1 changed files with 31 additions and 26 deletions
Download patch file Download diff file Expand all files Collapse all files

19
packages/core/pattern.mjs
View file

@ -4133,7 +4133,6 @@ Pattern.prototype.worklet = function (src, ...inputs) {
export const worklet = (...args) => pure({}).worklet(...args);
/**
* Creates a pattern of numbers in base b from a number or pattern of numbers
* limited to d digits long from the right
@ -4155,9 +4154,12 @@ export const base = (n, b = 10, d=0) => {
b = reify(b);
d = reify(d);
return d.withValue(e => {
return b.withValue(c => {
return n.withValue(v => {
return d
.withValue((e) => {
return b
.withValue((c) => {
return n
.withValue((v) => {
let digits = [];
let value = v;
while (value > 0) {
@ -4179,7 +4181,10 @@ export const base = (n, b = 10, d=0) => {
*/
}
return sequence(digits);
}).squeezeJoin();
}).squeezeJoin();
}).squeezeJoin();
})
.squeezeJoin();
})
.squeezeJoin();
})
.squeezeJoin();
};