elias/strudel-docker
1
0
Fork 0
mirror of https://github.com/eliasstepanik/strudel-docker.git synced 2026-01-25 12:38:35 +00:00
Code Issues Packages Projects Releases Wiki Activity

Add binary composers

Browse Source
This commit is contained in:
alex 2022-04-30 19:12:24 +01:00
parent dcbe24d45c
commit e40bdad6c3
1 changed files with 29 additions and 23 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

52
packages/core/pattern.mjs
View File

@ -599,23 +599,23 @@ export class Pattern {
return this._zoom(0, t)._slow(t); return this._zoom(0, t)._slow(t);
} }
struct(...binary_pats) { // struct(...binary_pats) {
// Re structure the pattern according to a binary pattern (false values are dropped) // // Re structure the pattern according to a binary pattern (false values are dropped)
const binary_pat = sequence(binary_pats); // const binary_pat = sequence(binary_pats);
return binary_pat // return binary_pat
.fmap((b) => (val) => b ? val : undefined) // .fmap((b) => (val) => b ? val : undefined)
.appLeft(this) // .appLeft(this)
._removeUndefineds(); // ._removeUndefineds();
} // }
mask(...binary_pats) { // mask(...binary_pats) {
// Only let through parts of pattern corresponding to true values in the given binary pattern // // Only let through parts of pattern corresponding to true values in the given binary pattern
const binary_pat = sequence(binary_pats); // const binary_pat = sequence(binary_pats);
return binary_pat // return binary_pat
.fmap((b) => (val) => b ? val : undefined) // .fmap((b) => (val) => b ? val : undefined)
.appRight(this) // .appRight(this)
._removeUndefineds(); // ._removeUndefineds();
} // }
_color(color) { _color(color) {
return this._withContext((context) => ({ ...context, color })); return this._withContext((context) => ({ ...context, color }));
@ -826,7 +826,7 @@ function _composeOp(a, b, func) {
const composers = { const composers = {
set: (a, b) => b, set: (a, b) => b,
keep: (a, b) => a, keep: (a, b) => a,
keepif: (a, b) => b ? a : undefined, keepif: (a, b) => (b ? a : undefined),
add: (a, b) => a + b, add: (a, b) => a + b,
sub: (a, b) => a - b, sub: (a, b) => a - b,
mul: (a, b) => a * b, mul: (a, b) => a * b,
@ -865,23 +865,29 @@ for (const [what, op] of Object.entries(composers)) {
}; };
if (how === 'Squeeze') { if (how === 'Squeeze') {
// support 'squeezeIn' longhand // support 'squeezeIn' longhand
Pattern.prototype[what + "SqueezeIn"] = Pattern.prototype[what + how]; Pattern.prototype[what + 'SqueezeIn'] = Pattern.prototype[what + how];
} }
if (how === 'In') { if (how === 'In') {
// default how to 'in', e.g. add == addIn // default how to 'in', e.g. add == addIn
Pattern.prototype[what] = Pattern.prototype[what + how]; Pattern.prototype[what] = Pattern.prototype[what + how];
} } else {
else {
// default what to 'set', e.g. squeeze = setSqueeze // default what to 'set', e.g. squeeze = setSqueeze
if (what === 'set') { if (what === 'set') {
Pattern.prototype[how.toLowerCase()] = Pattern.prototype[what + how]; Pattern.prototype[how.toLowerCase()] = Pattern.prototype[what + how];
} }
} }
} }
} }
Pattern.prototype.reset = Pattern.prototype.keepTrig; // binary composers
Pattern.prototype.restart = Pattern.prototype.keepTrigZero; Pattern.prototype.struct = Pattern.keepifOut;
Pattern.prototype.structAll = Pattern.keepOut;
Pattern.prototype.mask = Pattern.keepifIn;
Pattern.prototype.maskAll = Pattern.keepIn;
Pattern.prototype.reset = Pattern.prototype.keepifTrig;
Pattern.prototype.resetAll = Pattern.prototype.keepTrig;
Pattern.prototype.restart = Pattern.prototype.keepifTrigZero;
Pattern.prototype.restartAll = Pattern.prototype.keepTrigZero;
// methods of Pattern that get callable factories // methods of Pattern that get callable factories
Pattern.prototype.patternified = [ Pattern.prototype.patternified = [