版博士V2.0程序
Вы не можете выбрать более 25 тем Темы должны начинаться с буквы или цифры, могут содержать дефисы(-) и должны содержать не более 35 символов.
 
 
 
 

22 строки
712 B

  1. import { pipe } from './function';
  2. import { getFunctorComposition, map } from './Functor';
  3. import { getLeft, getRight } from './Option';
  4. import * as S from './Separated';
  5. export function compact(F, G) {
  6. return function (fga) { return F.map(fga, G.compact); };
  7. }
  8. export function separate(F, C, G) {
  9. var _compact = compact(F, C);
  10. var _map = map(F, G);
  11. return function (fge) { return S.separated(_compact(pipe(fge, _map(getLeft))), _compact(pipe(fge, _map(getRight)))); };
  12. }
  13. /** @deprecated */
  14. export function getCompactableComposition(F, G) {
  15. var map = getFunctorComposition(F, G).map;
  16. return {
  17. map: map,
  18. compact: compact(F, G),
  19. separate: separate(F, G, G)
  20. };
  21. }