mirror of
https://github.com/swc-project/swc.git
synced 2024-12-25 14:43:33 +03:00
48 lines
1.5 KiB
TypeScript
48 lines
1.5 KiB
TypeScript
// Loaded from https://deno.land/x/ramda@v0.27.2/source/ap.js
|
|
|
|
|
|
import _concat from './internal/_concat.js';
|
|
import _curry2 from './internal/_curry2.js';
|
|
import _reduce from './internal/_reduce.js';
|
|
import map from './map.js';
|
|
|
|
|
|
/**
|
|
* ap applies a list of functions to a list of values.
|
|
*
|
|
* Dispatches to the `ap` method of the second argument, if present. Also
|
|
* treats curried functions as applicatives.
|
|
*
|
|
* @func
|
|
* @memberOf R
|
|
* @since v0.3.0
|
|
* @category Function
|
|
* @sig [a -> b] -> [a] -> [b]
|
|
* @sig Apply f => f (a -> b) -> f a -> f b
|
|
* @sig (r -> a -> b) -> (r -> a) -> (r -> b)
|
|
* @param {*} applyF
|
|
* @param {*} applyX
|
|
* @return {*}
|
|
* @example
|
|
*
|
|
* R.ap([R.multiply(2), R.add(3)], [1,2,3]); //=> [2, 4, 6, 4, 5, 6]
|
|
* R.ap([R.concat('tasty '), R.toUpper], ['pizza', 'salad']); //=> ["tasty pizza", "tasty salad", "PIZZA", "SALAD"]
|
|
*
|
|
* // R.ap can also be used as S combinator
|
|
* // when only two functions are passed
|
|
* R.ap(R.concat, R.toUpper)('Ramda') //=> 'RamdaRAMDA'
|
|
* @symb R.ap([f, g], [a, b]) = [f(a), f(b), g(a), g(b)]
|
|
*/
|
|
var ap = _curry2(function ap(applyF, applyX) {
|
|
return (
|
|
typeof applyX['fantasy-land/ap'] === 'function'
|
|
? applyX['fantasy-land/ap'](applyF)
|
|
: typeof applyF.ap === 'function'
|
|
? applyF.ap(applyX)
|
|
: typeof applyF === 'function'
|
|
? function(x) { return applyF(x)(applyX(x)); }
|
|
: _reduce(function(acc, f) { return _concat(acc, map(f, applyX)); }, [], applyF)
|
|
);
|
|
});
|
|
export default ap;
|