init component
This commit is contained in:
16
node_modules/fp-ts/es6/Choice.js
generated
vendored
Normal file
16
node_modules/fp-ts/es6/Choice.js
generated
vendored
Normal file
@@ -0,0 +1,16 @@
|
||||
import { identity } from './function';
|
||||
export function split(P, C) {
|
||||
return function (pab, pcd) { return C.compose(P.right(pcd), P.left(pab)); };
|
||||
}
|
||||
export function fanIn(P, C) {
|
||||
var splitPC = split(P, C);
|
||||
return function (pac, pbc) {
|
||||
return C.compose(P.promap(C.id(), function (cc) { return (cc._tag === 'Left' ? cc.left : cc.right); }, identity), splitPC(pac, pbc));
|
||||
};
|
||||
}
|
||||
export function splitChoice(F) {
|
||||
return split(F, F);
|
||||
}
|
||||
export function fanin(F) {
|
||||
return fanIn(F, F);
|
||||
}
|
||||
Reference in New Issue
Block a user