elias/strudel
1
0
Fork 0
mirror of https://github.com/eliasstepanik/strudel.git synced 2026-01-11 21:58:37 +00:00
Code Issues Packages Projects Releases Wiki Activity

undegrade, sometimes, sometimesBy, sometimesByPre, often, rarely, almostNever, almostAlways, never, always

Browse Source
This commit is contained in:
alex 2022-04-16 12:18:44 +01:00
parent dca8b46abf
commit 8abbaf2e56
1 changed files with 36 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

38
packages/core/signal.mjs
View File

@ -1,5 +1,5 @@
import { Hap } from './hap.mjs';
import { Pattern, fastcat, reify, silence } from './pattern.mjs';
import { Pattern, fastcat, reify, silence, stack } from './pattern.mjs';
import Fraction from './fraction.mjs';
import { id } from './util.mjs';
@ -101,4 +101,38 @@ Pattern.prototype._degrade = function () {
return this._degradeBy(0.5);
};
Pattern.prototype.patternified.push('degradeBy', 'degrade');
Pattern.prototype._undegradeBy = function (x) {
return this._degradeByWith(rand.fmap((r) => 1 - r), x);
};
Pattern.prototype._undegrade = function () {
return this._undegradeBy(0.5);
};
Pattern.prototype._sometimesBy = function (x, func) {
return stack(this._degradeBy(x), func(this._undegradeBy(1-x)));
};
Pattern.prototype.sometimesBy = function (patx, func) {
const pat = this;
return reify(patx).fmap((x) => pat._sometimesBy(x, func)).innerJoin();
};
Pattern.prototype._sometimesByPre = function (x, func) {
return stack(this._degradeBy(x), func(this).undegradeBy(1-x));
};
Pattern.prototype.sometimesByPre = function (patx, func) {
const pat = this;
return reify(patx).fmap((x) => pat._sometimesByPre(x, func)).innerJoin();
};
Pattern.prototype.sometimes = function (func) {
return this._sometimesBy(0.5, func);
};
Pattern.prototype.sometimesPre = function (func) {
return this._sometimesByPre(0.5, func);
};
Pattern.prototype.patternified.push('degradeBy', 'undegradeBy');