UNPKG

@zkochan/pnpm

Version:

Fast, disk space efficient package manager

51 lines (43 loc) 1.7 kB
var _curry2 = /*#__PURE__*/require('./internal/_curry2'); var _map = /*#__PURE__*/require('./internal/_map'); var curryN = /*#__PURE__*/require('./curryN'); var max = /*#__PURE__*/require('./max'); var pluck = /*#__PURE__*/require('./pluck'); var reduce = /*#__PURE__*/require('./reduce'); /** * Accepts a converging function and a list of branching functions and returns * a new function. When invoked, this new function is applied to some * arguments, each branching function is applied to those same arguments. The * results of each branching function are passed as arguments to the converging * function to produce the return value. * * @func * @memberOf R * @since v0.4.2 * @category Function * @sig ((x1, x2, ...) -> z) -> [((a, b, ...) -> x1), ((a, b, ...) -> x2), ...] -> (a -> b -> ... -> z) * @param {Function} after A function. `after` will be invoked with the return values of * `fn1` and `fn2` as its arguments. * @param {Array} functions A list of functions. * @return {Function} A new function. * @see R.useWith * @example * * var average = R.converge(R.divide, [R.sum, R.length]) * average([1, 2, 3, 4, 5, 6, 7]) //=> 4 * * var strangeConcat = R.converge(R.concat, [R.toUpper, R.toLower]) * strangeConcat("Yodel") //=> "YODELyodel" * * @symb R.converge(f, [g, h])(a, b) = f(g(a, b), h(a, b)) */ var converge = /*#__PURE__*/_curry2(function converge(after, fns) { return curryN(reduce(max, 0, pluck('length', fns)), function () { var args = arguments; var context = this; return after.apply(context, _map(function (fn) { return fn.apply(context, args); }, fns)); }); }); module.exports = converge;