git.iko.soy/rowtype-yoga/psfp
on 148366a help sign in
rowtype-yoga/psfp/client/dce-output/Control.Semigroupoid/index.js
28 lines 667 B history raw
1// Generated by purs version 0.13.6
2"use strict";
3var Semigroupoid = function (compose) {
4 this.compose = compose;
5};
6var semigroupoidFn = new Semigroupoid(function (f) {
7 return function (g) {
8 return function (x) {
9 return f(g(x));
10 };
11 };
12});
13var compose = function (dict) {
14 return dict.compose;
15};
16var composeFlipped = function (dictSemigroupoid) {
17 return function (f) {
18 return function (g) {
19 return compose(dictSemigroupoid)(g)(f);
20 };
21 };
22};
23module.exports = {
24 compose: compose,
25 Semigroupoid: Semigroupoid,
26 composeFlipped: composeFlipped,
27 semigroupoidFn: semigroupoidFn
28};