Innovenergy_trunk/frontend/node_modules/fp-ts/es6/ValidationT.js

22 lines
746 B
JavaScript
Raw Normal View History

/**
* @since 2.0.0
*/
import { getApplicativeComposition } from './Applicative';
import * as E from './Either';
import * as _ from './internal';
/** @deprecated */
export function getValidationM(S, M) {
var A = getApplicativeComposition(M, E.getApplicativeValidation(S));
return {
map: A.map,
ap: A.ap,
of: A.of,
chain: function (ma, f) { return M.chain(ma, function (e) { return (_.isLeft(e) ? M.of(_.left(e.left)) : f(e.right)); }); },
alt: function (me, that) {
return M.chain(me, function (e1) {
return _.isRight(e1) ? M.of(e1) : M.map(that(), function (e2) { return (_.isLeft(e2) ? _.left(S.concat(e1.left, e2.left)) : e2); });
});
}
};
}