git.iko.soy/rowtype-yoga/yoga-r3f
on main help sign in
rowtype-yoga/yoga-r3f/output/Data.Bifunctor.Join/index.js
74 lines 1.9 kB history raw
1// Generated by purs version 0.15.16
2import * as Control_Biapplicative from "../Control.Biapplicative/index.js";
3import * as Control_Biapply from "../Control.Biapply/index.js";
4import * as Data_Bifunctor from "../Data.Bifunctor/index.js";
5import * as Data_Show from "../Data.Show/index.js";
6var Join = function (x) {
7 return x;
8};
9var showJoin = function (dictShow) {
10 var show = Data_Show.show(dictShow);
11 return {
12 show: function (v) {
13 return "(Join " + (show(v) + ")");
14 }
15 };
16};
17var ordJoin = function (dictOrd) {
18 return dictOrd;
19};
20var newtypeJoin = {
21 Coercible0: function () {
22 return undefined;
23 }
24};
25var eqJoin = function (dictEq) {
26 return dictEq;
27};
28var bifunctorJoin = function (dictBifunctor) {
29 var bimap = Data_Bifunctor.bimap(dictBifunctor);
30 return {
31 map: function (f) {
32 return function (v) {
33 return bimap(f)(f)(v);
34 };
35 }
36 };
37};
38var biapplyJoin = function (dictBiapply) {
39 var biapply = Control_Biapply.biapply(dictBiapply);
40 var bifunctorJoin1 = bifunctorJoin(dictBiapply.Bifunctor0());
41 return {
42 apply: function (v) {
43 return function (v1) {
44 return biapply(v)(v1);
45 };
46 },
47 Functor0: function () {
48 return bifunctorJoin1;
49 }
50 };
51};
52var biapplicativeJoin = function (dictBiapplicative) {
53 var bipure = Control_Biapplicative.bipure(dictBiapplicative);
54 var biapplyJoin1 = biapplyJoin(dictBiapplicative.Biapply0());
55 return {
56 pure: function (a) {
57 return bipure(a)(a);
58 },
59 Apply0: function () {
60 return biapplyJoin1;
61 }
62 };
63};
64export {
65 Join,
66 newtypeJoin,
67 eqJoin,
68 ordJoin,
69 showJoin,
70 bifunctorJoin,
71 biapplyJoin,
72 biapplicativeJoin
73};
74//# sourceMappingURL=index.js.map