@fncts/base 0.0.20 → 0.0.21

package/_mjs/data/Struct/api.mjs

@@ -14,80 +14,92 @@ export function makeStruct(a) {
   return Struct.get(a);
 }
 /**
- * @tsplus fluent fncts.Struct set
+ * @tsplus pipeable fncts.Struct set
  */
 
-export function set_(self, key, value) {
-  return Struct.get({ ...self,
-    [key]: value
-  });
+export function set(key, value) {
+  return self => {
+    return Struct.get({ ...self,
+      [key]: value
+    });
+  };
 }
 /**
- * @tsplus fluent fncts.Struct hmap
+ * @tsplus pipeable fncts.Struct hmap
  */
 
-export function hmap_(self, fs) {
-  const keys = keys_1(self);
-  const out = {};
+export function hmap(fs) {
+  return self => {
+    const keys = keys_1(self);
+    const out = {};
 
-  for (const key of keys) {
-    out[key] = fs[key](self[key]);
-  }
+    for (const key of keys) {
+      out[key] = fs[key](self[key]);
+    }
 
-  return out;
+    return out;
+  };
 }
 /**
- * @tsplus fluent fncts.Struct modify
+ * @tsplus pipeable fncts.Struct modify
  */
 
-export function modify_(self, key, f) {
-  return Struct.get({ ...self,
-    [key]: f(self[key])
-  });
+export function modify(key, f) {
+  return self => {
+    return Struct.get({ ...self,
+      [key]: f(self[key])
+    });
+  };
 }
 /**
- * @tsplus fluent fncts.Struct pick
+ * @tsplus pipeable fncts.Struct pick
  */
 
-export function pick_(self, keys) {
-  const out = {};
+export function pick(keys) {
+  return self => {
+    const out = {};
 
-  for (const key of keys) {
-    out[key] = self[key];
-  }
+    for (const key of keys) {
+      out[key] = self[key];
+    }
 
-  return Struct.get(out);
+    return Struct.get(out);
+  };
 }
 /**
- * @tsplus fluent fncts.Struct omit
+ * @tsplus pipeable fncts.Struct omit
  */
 
-export function omit_(self, keys) {
-  const newKeys = tsplus_module_4.difference_(tsplus_module_2.asImmutableArray(keys), tsplus_module_2.asImmutableArray(keys_1(self)), tsplus_module_3.mkEq({
-    equals: (x, y) => x === y
-  }));
-  const out = {};
+export function omit(keys) {
+  return self => {
+    const newKeys = tsplus_module_4.difference(tsplus_module_2.asImmutableArray(keys_1(self)), tsplus_module_3.mkEq({
+      equals: (x, y) => x === y
+    }))(tsplus_module_2.asImmutableArray(keys));
+    const out = {};
 
-  for (const key of newKeys) {
-    out[key] = self[key];
-  }
+    for (const key of newKeys) {
+      out[key] = self[key];
+    }
 
-  return Struct.get(out);
+    return Struct.get(out);
+  };
 }
 /**
- * @tsplus fluent fncts.Struct map
+ * @tsplus pipeable fncts.Struct map
  */
 
-export function map_(self, f) {
-  const out = {};
-  const keys = Object.keys(self);
+export function map(f) {
+  return self => {
+    const out = {};
+    const keys = Object.keys(self);
 
-  for (let i = 0; i < keys.length; i++) {
-    const k = keys[i];
-    out[k] = f(self[k]);
-  }
+    for (let i = 0; i < keys.length; i++) {
+      const k = keys[i];
+      out[k] = f(self[k]);
+    }
 
-  return Struct.get(out);
+    return Struct.get(out);
+  };
 }
 /**
  * @tsplus getter fncts.Struct keys

package/_mjs/data/Struct/api.mjs.map

@@ -1 +1 @@
-{"version":3,"file":"api.mjs","mappings":";;;;aA8GgBA,IAAI;AA5GpB,SAASC,EAAT,QAAmB,uBAAnB;AAEA,SAASC,MAAT,QAAuB,kBAAvB;AAgBA;;;;;AAIA,OAAM,SAAUC,UAAV,CAAwBC,CAAxB,EAA4B;EAChC,OAAOF,MAAM,CAACG,GAAP,CAAWD,CAAX,CAAP;AACD;AAED;;;;AAGA,OAAM,SAAUE,IAAV,CACJC,IADI,EAEJC,GAFI,EAGJC,KAHI,EAGI;EAER,OAAOP,MAAM,CAACG,GAAP,CAAW,EAAE,GAAGE,IAAL;IAAqB,CAACC,GAAD,GAAOC;EAA5B,CAAX,CAAP;AACD;AAED;;;;AAGA,OAAM,SAAUC,KAAV,CACJH,IADI,EAEJI,EAFI,EAEC;EAEL,MAAMX,IAAI,UAAGO,IAAH,CAAV;EACA,MAAMK,GAAG,GAAI,EAAb;;EACA,KAAK,MAAMJ,GAAX,IAAkBR,IAAlB,EAAwB;IACtBY,GAAG,CAACJ,GAAD,CAAH,GAAWG,EAAE,CAACH,GAAD,CAAF,CAAqBD,IAAI,CAAWC,GAAX,CAAzB,CAAX;EACD;;EACD,OAAOI,GAAP;AACD;AAED;;;;AAGA,OAAM,SAAUC,OAAV,CACJN,IADI,EAEJC,GAFI,EAGJM,CAHI,EAGa;EAEjB,OAAOZ,MAAM,CAACG,GAAP,CAAW,EAAE,GAAGE,IAAL;IAAqB,CAACC,GAAD,GAAOM,CAAC,CAACP,IAAI,CAAWC,GAAX,CAAL;EAA7B,CAAX,CAAP;AACD;AAED;;;;AAGA,OAAM,SAAUO,KAAV,CACJR,IADI,EAEJP,IAFI,EAEQ;EAEZ,MAAMY,GAAG,GAAG,EAAZ;;EACA,KAAK,MAAMJ,GAAX,IAAkBR,IAAlB,EAAwB;IACtBY,GAAG,CAACJ,GAAD,CAAH,GAAWD,IAAI,CAAWC,GAAX,CAAf;EACD;;EACD,OAAON,MAAM,CAACG,GAAP,CAAWO,GAAX,CAAP;AACD;AAED;;;;AAGA,OAAM,SAAUI,KAAV,CACJT,IADI,EAEJP,IAFI,EAEQ;EAEZ,MAAMiB,OAAO,GAAGC,oEAAIC,wCAA6BZ,IAA7B,EAAJ,EAA6Da,qBAAG;IAAEC,MAAM,EAAE,CAACC,CAAD,EAAIC,CAAJ,KAAUD,CAAC,KAAKC;EAA1B,CAAH,CAA7D,CAAhB;EACA,MAAMX,GAAG,GAAO,EAAhB;;EACA,KAAK,MAAMJ,GAAX,IAAkBS,OAAlB,EAA2B;IACzBL,GAAG,CAACJ,GAAD,CAAH,GAAWD,IAAI,CAAWC,GAAX,CAAf;EACD;;EACD,OAAON,MAAM,CAACG,GAAP,CAAWO,GAAX,CAAP;AACD;AAED;;;;AAGA,OAAM,SAAUY,IAAV,CAAqBjB,IAArB,EAAsCO,CAAtC,EAA6D;EACjE,MAAMF,GAAG,GAAI,EAAb;EACA,MAAMZ,IAAI,GAAGyB,MAAM,CAACzB,IAAP,CAAYO,IAAZ,CAAb;;EACA,KAAK,IAAImB,CAAC,GAAG,CAAb,EAAgBA,CAAC,GAAG1B,IAAI,CAAC2B,MAAzB,EAAiCD,CAAC,EAAlC,EAAsC;IACpC,MAAME,CAAC,GAAG5B,IAAI,CAAC0B,CAAD,CAAd;IACAd,GAAG,CAACgB,CAAD,CAAH,GAAUd,CAAC,CAACP,IAAI,CAAWqB,CAAX,CAAL,CAAX;EACD;;EACD,OAAO1B,MAAM,CAACG,GAAP,CAAWO,GAAX,CAAP;AACD;AAED;;;;AAGA,gBAAmCL,IAAnC,EAAkD;EAChD,OAAoBkB,MAAM,CAACzB,IAAP,CAAYO,IAAZ,CAApB;AACD;AAED;;;;;;AAIA,OAAM,SAAUsB,SAAV,CAAuBtB,IAAvB,EAAsC;EAC1C,OAAOL,MAAM,CAAC4B,UAAP,CAAkBvB,IAAlB,CAAP;AACD","names":["keys","Eq","Struct","makeStruct","a","get","set_","self","key","value","hmap_","fs","out","modify_","f","pick_","omit_","newKeys","tsplus_module_4","tsplus_module_2","tsplus_module_3","equals","x","y","map_","Object","i","length","k","getStruct","reverseGet"],"sourceRoot":"","sources":["../../../_src/data/Struct/api.ts"],"sourcesContent":[null]}
+{"version":3,"file":"api.mjs","mappings":";;;;aAkIgBA,IAAI;AAhIpB,SAASC,EAAT,QAAmB,uBAAnB;AAEA,SAASC,MAAT,QAAuB,kBAAvB;AAgBA;;;;;AAIA,OAAM,SAAUC,UAAV,CAAwBC,CAAxB,EAA4B;EAChC,OAAOF,MAAM,CAACG,GAAP,CAAWD,CAAX,CAAP;AACD;AAED;;;;AAGA,OAAM,SAAUE,GAAV,CAAmCC,GAAnC,EAA0DC,KAA1D,EAAkE;EACtE,OACEC,IADK,IAIF;IACH,OAAOP,MAAM,CAACG,GAAP,CAAW,EAAE,GAAGI,IAAL;MAAqB,CAACF,GAAD,GAAOC;IAA5B,CAAX,CAAP;EACD,CAND;AAOD;AAED;;;;AAGA,OAAM,SAAUE,IAAV,CAKJC,EALI,EAKC;EACL,OACEF,IADK,IAIF;IACH,MAAMT,IAAI,UAAGS,IAAH,CAAV;IACA,MAAMG,GAAG,GAAI,EAAb;;IACA,KAAK,MAAML,GAAX,IAAkBP,IAAlB,EAAwB;MACtBY,GAAG,CAACL,GAAD,CAAH,GAAWI,EAAE,CAACJ,GAAD,CAAF,CAAqBE,IAAI,CAAWF,GAAX,CAAzB,CAAX;IACD;;IACD,OAAOK,GAAP;EACD,CAXD;AAYD;AAED;;;;AAGA,OAAM,SAAUC,MAAV,CAA0CN,GAA1C,EAAkDO,CAAlD,EAAmE;EACvE,OACEL,IADK,IAIF;IACH,OAAOP,MAAM,CAACG,GAAP,CAAW,EAAE,GAAGI,IAAL;MAAqB,CAACF,GAAD,GAAOO,CAAC,CAACL,IAAI,CAAWF,GAAX,CAAL;IAA7B,CAAX,CAAP;EACD,CAND;AAOD;AAED;;;;AAGA,OAAM,SAAUQ,IAAV,CAAoDf,IAApD,EAAgE;EACpE,OACES,IADK,IAIF;IACH,MAAMG,GAAG,GAAG,EAAZ;;IACA,KAAK,MAAML,GAAX,IAAkBP,IAAlB,EAAwB;MACtBY,GAAG,CAACL,GAAD,CAAH,GAAWE,IAAI,CAAWF,GAAX,CAAf;IACD;;IACD,OAAOL,MAAM,CAACG,GAAP,CAAWO,GAAX,CAAP;EACD,CAVD;AAWD;AAED;;;;AAGA,OAAM,SAAUI,IAAV,CAA+DhB,IAA/D,EAA2E;EAC/E,OACES,IADK,IAIF;IACH,MAAMQ,OAAO,GAAGC,mEAAiCT,IAAjC,IAA6DU,qBAAG;MAAEC,MAAM,EAAE,CAACC,CAAD,EAAIC,CAAJ,KAAUD,CAAC,KAAKC;IAA1B,CAAH,CAA7D,EAA8FC,iCAA9FvB,IAA8F,CAA9F,CAAhB;IACA,MAAMY,GAAG,GAAO,EAAhB;;IACA,KAAK,MAAML,GAAX,IAAkBU,OAAlB,EAA2B;MACzBL,GAAG,CAACL,GAAD,CAAH,GAAWE,IAAI,CAAWF,GAAX,CAAf;IACD;;IACD,OAAOL,MAAM,CAACG,GAAP,CAAWO,GAAX,CAAP;EACD,CAXD;AAYD;AAED;;;;AAGA,OAAM,SAAUY,GAAV,CAAoBV,CAApB,EAA2C;EAC/C,OAAQL,IAAD,IAAgD;IACrD,MAAMG,GAAG,GAAI,EAAb;IACA,MAAMZ,IAAI,GAAGyB,MAAM,CAACzB,IAAP,CAAYS,IAAZ,CAAb;;IACA,KAAK,IAAIiB,CAAC,GAAG,CAAb,EAAgBA,CAAC,GAAG1B,IAAI,CAAC2B,MAAzB,EAAiCD,CAAC,EAAlC,EAAsC;MACpC,MAAME,CAAC,GAAG5B,IAAI,CAAC0B,CAAD,CAAd;MACAd,GAAG,CAACgB,CAAD,CAAH,GAAUd,CAAC,CAACL,IAAI,CAAWmB,CAAX,CAAL,CAAX;IACD;;IACD,OAAO1B,MAAM,CAACG,GAAP,CAAWO,GAAX,CAAP;EACD,CARD;AASD;AAED;;;;AAGA,gBAAmCH,IAAnC,EAAkD;EAChD,OAAoBgB,MAAM,CAACzB,IAAP,CAAYS,IAAZ,CAApB;AACD;AAED;;;;;;AAIA,OAAM,SAAUoB,SAAV,CAAuBpB,IAAvB,EAAsC;EAC1C,OAAOP,MAAM,CAAC4B,UAAP,CAAkBrB,IAAlB,CAAP;AACD","names":["keys","Eq","Struct","makeStruct","a","get","set","key","value","self","hmap","fs","out","modify","f","pick","omit","newKeys","tsplus_module_4","tsplus_module_3","equals","x","y","tsplus_module_2","map","Object","i","length","k","getStruct","reverseGet"],"sourceRoot":"","sources":["../../../_src/data/Struct/api.ts"],"sourcesContent":[null]}

package/_mjs/data/Tag/constructors.mjs

@@ -2,10 +2,11 @@ import * as tsplus_module_1 from "@fncts/base/data/Tag/definition";
 import { v4 } from "uuid";
 /**
  * @tsplus static fncts.TagOps __call
- * @fncts tag
  */
 
-export function makeTag(id = v4()) {
+export function makeTag(
+/** @fncts id */
+id = v4()) {
   return new tsplus_module_1.Tag(id);
 }
 //# sourceMappingURL=constructors.mjs.map

package/_mjs/data/Tag/constructors.mjs.map

@@ -1 +1 @@
-{"version":3,"file":"constructors.mjs","mappings":";AAAA,SAASA,EAAT,QAAmB,MAAnB;AAEA;;;;;AAIA,OAAM,SAAUC,OAAV,CAAqBC,KAAaF,EAAE,EAApC,EAAsC;EAC1C,OAAO,oBAAIG,GAAJ,CAAQD,EAAR,CAAP;AACD","names":["v4","makeTag","id","Tag"],"sourceRoot":"","sources":["../../../_src/data/Tag/constructors.ts"],"sourcesContent":[null]}
+{"version":3,"file":"constructors.mjs","mappings":";AAAA,SAASA,EAAT,QAAmB,MAAnB;AAEA;;;;AAGA,OAAM,SAAUC,OAAV;AAAqB;AAAiBC,KAAaF,EAAE,EAArD,EAAuD;EAC3D,OAAO,oBAAIG,GAAJ,CAAQD,EAAR,CAAP;AACD","names":["v4","makeTag","id","Tag"],"sourceRoot":"","sources":["../../../_src/data/Tag/constructors.ts"],"sourcesContent":[null]}

package/_mjs/data/Tag/definition.mjs

@@ -2,7 +2,6 @@ import * as tsplus_module_1 from "@fncts/base/typeclass/Hashable/hash";
 import * as tsplus_module_2 from "@fncts/base/typeclass/Hashable/definition";
 import * as tsplus_module_3 from "@fncts/base/typeclass/Equatable/definition";
 import * as tsplus_module_4 from "@fncts/base/util/predicates";
-import { AtomicNumber } from "@fncts/base/internal/AtomicNumber";
 export const TagTypeId = /*#__PURE__*/Symbol.for("fncts.Tag");
 
 const _tagHash = /*#__PURE__*/tsplus_module_1.hashString("fncts.Tag");
@@ -29,7 +28,6 @@ export class Tag {
   }
 
 }
-Tag.counter = /*#__PURE__*/new AtomicNumber(0);
 export function isTag(u) {
   return tsplus_module_4.hasTypeId(u, TagTypeId);
 }

package/_mjs/data/Tag/definition.mjs.map

@@ -1 +1 @@
-{"version":3,"file":"definition.mjs","mappings":";;;;AAAA,SAASA,YAAT,QAA6B,mCAA7B;AAEA,OAAO,MAAMC,SAAS,gBAAGC,MAAM,CAACC,GAAP,CAAW,WAAX,CAAlB;;AAGP,MAAMC,QAAQ,gBAAGC,2BAAgB,WAAhB,CAAjB;AAEA;;;;;;;;AAMA,OAAM,MAAOC,GAAP,CAAU;EAKdC,YAAqBC,EAArB,EAA+B;IAAV;IAHZ,eAAqBP,SAArB;EAG0B;;EAE/B,mCAAa;IACf,OAAOI,4BAAiBD,QAAjB,EAA2BC,2BAAgB,KAAKG,EAArB,CAA3B,CAAP;EACD;;EAED,+BAAgBC,IAAhB,EAA6B;IAC3B,OAAOC,KAAK,CAACD,IAAD,CAAL,IAAe,KAAKD,EAAL,KAAYC,IAAI,CAACD,EAAvC;EACD;;AAba;AAGCF,2BAAe,IAAIN,YAAJ,CAAiB,CAAjB,CAAf;AAajB,OAAM,SAAUU,KAAV,CAAgBC,CAAhB,EAA0B;EAC9B,OAAOC,0BAAUD,CAAV,EAAaV,SAAb,CAAP;AACD","names":["AtomicNumber","TagTypeId","Symbol","for","_tagHash","tsplus_module_1","Tag","constructor","id","that","isTag","u","tsplus_module_4"],"sourceRoot":"","sources":["../../../_src/data/Tag/definition.ts"],"sourcesContent":[null]}
+{"version":3,"file":"definition.mjs","mappings":";;;;AAEA,OAAO,MAAMA,SAAS,gBAAGC,MAAM,CAACC,GAAP,CAAW,WAAX,CAAlB;;AAGP,MAAMC,QAAQ,gBAAGC,2BAAgB,WAAhB,CAAjB;AAEA;;;;;;;;AAMA,OAAM,MAAOC,GAAP,CAAU;EAIdC,YAAqBC,EAArB,EAA+B;IAAV;IAFZ,eAAqBP,SAArB;EAE0B;;EAE/B,mCAAa;IACf,OAAOI,4BAAiBD,QAAjB,EAA2BC,2BAAgB,KAAKG,EAArB,CAA3B,CAAP;EACD;;EAED,+BAAgBC,IAAhB,EAA6B;IAC3B,OAAOC,KAAK,CAACD,IAAD,CAAL,IAAe,KAAKD,EAAL,KAAYC,IAAI,CAACD,EAAvC;EACD;;AAZa;AAehB,OAAM,SAAUE,KAAV,CAAgBC,CAAhB,EAA0B;EAC9B,OAAOC,0BAAUD,CAAV,EAAaV,SAAb,CAAP;AACD","names":["TagTypeId","Symbol","for","_tagHash","tsplus_module_1","Tag","constructor","id","that","isTag","u","tsplus_module_4"],"sourceRoot":"","sources":["../../../_src/data/Tag/definition.ts"],"sourcesContent":[null]}

package/_mjs/data/These/api.mjs

@@ -28,210 +28,226 @@ export function isBoth(self) {
   ;
 }
 /**
- * @tsplus fluent fncts.These map
+ * @tsplus pipeable fncts.These map
  */
 
-export function map(self, f) {
-  switch (self._tag) {
-    case "Left"
-    /* TheseTag.Left */
-    :
-      return self;
-
-    case "Right"
-    /* TheseTag.Right */
-    :
-      return tsplus_module_1.right(f(self.right));
-
-    case "Both"
-    /* TheseTag.Both */
-    :
-      return tsplus_module_1.both(self.left, f(self.right));
-  }
+export function map(f) {
+  return self => {
+    switch (self._tag) {
+      case "Left"
+      /* TheseTag.Left */
+      :
+        return self;
+
+      case "Right"
+      /* TheseTag.Right */
+      :
+        return tsplus_module_1.right(f(self.right));
+
+      case "Both"
+      /* TheseTag.Both */
+      :
+        return tsplus_module_1.both(self.left, f(self.right));
+    }
+  };
 }
 /**
- * @tsplus fluent fncts.These mapLeft
+ * @tsplus pipeable fncts.These mapLeft
  */
 
-export function mapLeft(self, f) {
-  switch (self._tag) {
-    case "Left"
-    /* TheseTag.Left */
-    :
-      return tsplus_module_1.left(f(self.left));
-
-    case "Right"
-    /* TheseTag.Right */
-    :
-      return self;
-
-    case "Both"
-    /* TheseTag.Both */
-    :
-      return tsplus_module_1.both(f(self.left), self.right);
-  }
+export function mapLeft(f) {
+  return self => {
+    switch (self._tag) {
+      case "Left"
+      /* TheseTag.Left */
+      :
+        return tsplus_module_1.left(f(self.left));
+
+      case "Right"
+      /* TheseTag.Right */
+      :
+        return self;
+
+      case "Both"
+      /* TheseTag.Both */
+      :
+        return tsplus_module_1.both(f(self.left), self.right);
+    }
+  };
 }
 /**
- * @tsplus fluent fncts.These bimap
+ * @tsplus pipeable fncts.These bimap
  */
 
-export function bimap(self, f, g) {
-  switch (self._tag) {
-    case "Left"
-    /* TheseTag.Left */
-    :
-      return tsplus_module_1.left(f(self.left));
-
-    case "Right"
-    /* TheseTag.Right */
-    :
-      return tsplus_module_1.right(g(self.right));
-
-    case "Both"
-    /* TheseTag.Both */
-    :
-      return tsplus_module_1.both(f(self.left), g(self.right));
-  }
+export function bimap(f, g) {
+  return self => {
+    switch (self._tag) {
+      case "Left"
+      /* TheseTag.Left */
+      :
+        return tsplus_module_1.left(f(self.left));
+
+      case "Right"
+      /* TheseTag.Right */
+      :
+        return tsplus_module_1.right(g(self.right));
+
+      case "Both"
+      /* TheseTag.Both */
+      :
+        return tsplus_module_1.both(f(self.left), g(self.right));
+    }
+  };
 }
 /**
- * @tsplus fluent fncts.These zipWith
+ * @tsplus pipeable fncts.These zipWith
  */
 
-function zipWith_1(self, that, f,
+function zipWith_1(that, f,
 /** @tsplus auto */
 S) {
-  switch (self._tag) {
-    case "Left"
-    /* TheseTag.Left */
-    :
-      switch (that._tag) {
-        case "Left"
-        /* TheseTag.Left */
-        :
-          return tsplus_module_1.left(S.combine(self.left, that.left));
-
-        case "Right"
-        /* TheseTag.Right */
-        :
-          return self;
-
-        case "Both"
-        /* TheseTag.Both */
-        :
-          return tsplus_module_1.left(S.combine(self.left, that.left));
-      }
-
-    case "Right"
-    /* TheseTag.Right */
-    :
-      switch (that._tag) {
-        case "Left"
-        /* TheseTag.Left */
-        :
-          return that;
-
-        case "Right"
-        /* TheseTag.Right */
-        :
-          return tsplus_module_1.right(f(self.right, that.right));
-
-        case "Both"
-        /* TheseTag.Both */
-        :
-          return tsplus_module_1.left(that.left);
-      }
-
-    case "Both"
-    /* TheseTag.Both */
-    :
-      switch (that._tag) {
-        case "Left"
-        /* TheseTag.Left */
-        :
-          return tsplus_module_1.left(S.combine(self.left, that.left));
-
-        case "Right"
-        /* TheseTag.Right */
-        :
-          return tsplus_module_1.both(self.left, f(self.right, that.right));
-
-        case "Both"
-        /* TheseTag.Both */
-        :
-          return tsplus_module_1.both(S.combine(self.left, that.left), f(self.right, that.right));
-      }
-
-  }
+  return self => {
+    switch (self._tag) {
+      case "Left"
+      /* TheseTag.Left */
+      :
+        switch (that._tag) {
+          case "Left"
+          /* TheseTag.Left */
+          :
+            return tsplus_module_1.left(S.combine(self.left, that.left));
+
+          case "Right"
+          /* TheseTag.Right */
+          :
+            return self;
+
+          case "Both"
+          /* TheseTag.Both */
+          :
+            return tsplus_module_1.left(S.combine(self.left, that.left));
+        }
+
+      case "Right"
+      /* TheseTag.Right */
+      :
+        switch (that._tag) {
+          case "Left"
+          /* TheseTag.Left */
+          :
+            return that;
+
+          case "Right"
+          /* TheseTag.Right */
+          :
+            return tsplus_module_1.right(f(self.right, that.right));
+
+          case "Both"
+          /* TheseTag.Both */
+          :
+            return tsplus_module_1.left(that.left);
+        }
+
+      case "Both"
+      /* TheseTag.Both */
+      :
+        switch (that._tag) {
+          case "Left"
+          /* TheseTag.Left */
+          :
+            return tsplus_module_1.left(S.combine(self.left, that.left));
+
+          case "Right"
+          /* TheseTag.Right */
+          :
+            return tsplus_module_1.both(self.left, f(self.right, that.right));
+
+          case "Both"
+          /* TheseTag.Both */
+          :
+            return tsplus_module_1.both(S.combine(self.left, that.left), f(self.right, that.right));
+        }
+
+    }
+  };
 }
 /**
- * @tsplus fluent fncts.These zip
+ * @tsplus pipeable fncts.These zip
  */
 
 
-export function zip(self, that,
+export function zip(that,
 /** @tsplus auto */
 S) {
-  return zipWith_1(self, that, (a, b) => [a, b], S);
+  return self => {
+    return zipWith_1(that, (a, b) => [a, b], S)(self);
+  };
 }
 /**
- * @tsplus fluent fncts.These ap
+ * @tsplus pipeable fncts.These ap
  */
 
-export function ap(self, that,
+export function ap(that,
 /** @tsplus auto */
 S) {
-  return zipWith_1(self, that, (f, a) => f(a), S);
+  return self => {
+    return zipWith_1(that, (f, a) => f(a), S)(self);
+  };
 }
 /**
- * @tsplus fluent fncts.These flatMap
+ * @tsplus pipeable fncts.These flatMap
  */
 
-export function flatMap(self, f,
+export function flatMap(f,
 /** @tsplus auto */
 S) {
-  if (self._tag === "Left"
-  /* TheseTag.Left */
-  ) {
-    return self;
-  }
-
-  if (self._tag === "Right"
-  /* TheseTag.Right */
-  ) {
-    return f(self.right);
-  }
-
-  const that = f(self.right);
-
-  switch (that._tag) {
-    case "Left"
+  return self => {
+    if (self._tag === "Left"
     /* TheseTag.Left */
-    :
-      return tsplus_module_1.left(S.combine(self.left, that.left));
+    ) {
+      return self;
+    }
 
-    case "Right"
+    if (self._tag === "Right"
     /* TheseTag.Right */
-    :
-      return tsplus_module_1.both(self.left, that.right);
-
-    case "Both"
-    /* TheseTag.Both */
-    :
-      return tsplus_module_1.both(S.combine(self.left, that.left), that.right);
-  }
+    ) {
+      return f(self.right);
+    }
+
+    const that = f(self.right);
+
+    switch (that._tag) {
+      case "Left"
+      /* TheseTag.Left */
+      :
+        return tsplus_module_1.left(S.combine(self.left, that.left));
+
+      case "Right"
+      /* TheseTag.Right */
+      :
+        return tsplus_module_1.both(self.left, that.right);
+
+      case "Both"
+      /* TheseTag.Both */
+      :
+        return tsplus_module_1.both(S.combine(self.left, that.left), that.right);
+    }
+  };
 }
 /**
- * @tsplus fluent fncts.These catchAll
+ * @tsplus pipeable fncts.These catchAll
  */
 
-export function catchAll_(self, f) {
-  if (self._tag === "Left"
-  /* TheseTag.Left */
-  ) {
-    return f(self.left);
-  }
+export function catchAll(f) {
+  return self => {
+    if (self._tag === "Left"
+    /* TheseTag.Left */
+    ) {
+      return f(self.left);
+    }
 
-  return self;
+    return self;
+  };
 }
 /**
  * @tsplus getter fncts.These condemn
@@ -247,16 +263,18 @@ export function condemn(self) {
   return self;
 }
 /**
- * @tsplus fluent fncts.These condemnWhen
+ * @tsplus pipeable fncts.These condemnWhen
  */
 
-export function condemnWhen(self, p) {
-  if (self._tag === "Both"
-  /* TheseTag.Both */
-  && p(self.left)) {
-    return tsplus_module_1.left(self.left);
-  }
+export function condemnWhen(p) {
+  return self => {
+    if (self._tag === "Both"
+    /* TheseTag.Both */
+    && p(self.left)) {
+      return tsplus_module_1.left(self.left);
+    }
 
-  return self;
+    return self;
+  };
 }
 //# sourceMappingURL=api.mjs.map

package/_mjs/data/These/api.mjs.map

@@ -1 +1 @@
-{"version":3,"file":"api.mjs","mappings":";aAuEgBA,OAAO;AAlEvB;;;;AAGA,OAAM,SAAUC,MAAV,CAAuBC,IAAvB,EAAwC;EAC5C,OAAOA,IAAI,CAACC,IAAL,KAAS;EAAA;EAAhB;AACD;AAED;;;;AAGA,OAAM,SAAUC,OAAV,CAAwBF,IAAxB,EAAyC;EAC7C,OAAOA,IAAI,CAACC,IAAL,KAAS;EAAA;EAAhB;AACD;AAED;;;;AAGA,OAAM,SAAUE,MAAV,CAAuBH,IAAvB,EAAwC;EAC5C,OAAOA,IAAI,CAACC,IAAL,KAAS;EAAA;EAAhB;AACD;AAED;;;;AAGA,OAAM,SAAUG,GAAV,CAAuBJ,IAAvB,EAA0CK,CAA1C,EAAwD;EAC5D,QAAQL,IAAI,CAACC,IAAb;IACE;IAAA;IAAA;MACE,OAAOD,IAAP;;IACF;IAAA;IAAA;MACE,OAAOM,sBAAYD,CAAC,CAACL,IAAI,CAACO,KAAN,CAAb,CAAP;;IACF;IAAA;IAAA;MACE,OAAOD,qBAAWN,IAAI,CAACQ,IAAhB,EAAsBH,CAAC,CAACL,IAAI,CAACO,KAAN,CAAvB,CAAP;EANJ;AAQD;AAED;;;;AAGA,OAAM,SAAUE,OAAV,CAA4BT,IAA5B,EAA+CK,CAA/C,EAA8D;EAClE,QAAQL,IAAI,CAACC,IAAb;IACE;IAAA;IAAA;MACE,OAAOK,qBAAWD,CAAC,CAACL,IAAI,CAACQ,IAAN,CAAZ,CAAP;;IACF;IAAA;IAAA;MACE,OAAOR,IAAP;;IACF;IAAA;IAAA;MACE,OAAOM,qBAAWD,CAAC,CAACL,IAAI,CAACQ,IAAN,CAAZ,EAAyBR,IAAI,CAACO,KAA9B,CAAP;EANJ;AAQD;AAED;;;;AAGA,OAAM,SAAUG,KAAV,CAA6BV,IAA7B,EAAgDK,CAAhD,EAAiEM,CAAjE,EAA+E;EACnF,QAAQX,IAAI,CAACC,IAAb;IACE;IAAA;IAAA;MACE,OAAOK,qBAAWD,CAAC,CAACL,IAAI,CAACQ,IAAN,CAAZ,CAAP;;IACF;IAAA;IAAA;MACE,OAAOF,sBAAYK,CAAC,CAACX,IAAI,CAACO,KAAN,CAAb,CAAP;;IACF;IAAA;IAAA;MACE,OAAOD,qBAAWD,CAAC,CAACL,IAAI,CAACQ,IAAN,CAAZ,EAAyBG,CAAC,CAACX,IAAI,CAACO,KAAN,CAA1B,CAAP;EANJ;AAQD;AAED;;;;AAGA,mBACEP,IADF,EAEEY,IAFF,EAGEP,CAHF;AAIE;AAAoBQ,CAJtB,EAIuC;EAErC,QAAQb,IAAI,CAACC,IAAb;IACE;IAAA;IAAA;MACE,QAAQW,IAAI,CAACX,IAAb;QACE;QAAA;QAAA;UACE,OAAOK,qBAAWO,CAAC,CAACC,OAAF,CAAUd,IAAI,CAACQ,IAAf,EAAqBI,IAAI,CAACJ,IAA1B,CAAX,CAAP;;QACF;QAAA;QAAA;UACE,OAAOR,IAAP;;QACF;QAAA;QAAA;UACE,OAAOM,qBAAWO,CAAC,CAACC,OAAF,CAAUd,IAAI,CAACQ,IAAf,EAAqBI,IAAI,CAACJ,IAA1B,CAAX,CAAP;MANJ;;IAQF;IAAA;IAAA;MACE,QAAQI,IAAI,CAACX,IAAb;QACE;QAAA;QAAA;UACE,OAAOW,IAAP;;QACF;QAAA;QAAA;UACE,OAAON,sBAAYD,CAAC,CAACL,IAAI,CAACO,KAAN,EAAaK,IAAI,CAACL,KAAlB,CAAb,CAAP;;QACF;QAAA;QAAA;UACE,OAAOD,qBAAWM,IAAI,CAACJ,IAAhB,CAAP;MANJ;;IAQF;IAAA;IAAA;MACE,QAAQI,IAAI,CAACX,IAAb;QACE;QAAA;QAAA;UACE,OAAOK,qBAAWO,CAAC,CAACC,OAAF,CAAUd,IAAI,CAACQ,IAAf,EAAqBI,IAAI,CAACJ,IAA1B,CAAX,CAAP;;QACF;QAAA;QAAA;UACE,OAAOF,qBAAWN,IAAI,CAACQ,IAAhB,EAAsBH,CAAC,CAACL,IAAI,CAACO,KAAN,EAAaK,IAAI,CAACL,KAAlB,CAAvB,CAAP;;QACF;QAAA;QAAA;UACE,OAAOD,qBAAWO,CAAC,CAACC,OAAF,CAAUd,IAAI,CAACQ,IAAf,EAAqBI,IAAI,CAACJ,IAA1B,CAAX,EAA4CH,CAAC,CAACL,IAAI,CAACO,KAAN,EAAaK,IAAI,CAACL,KAAlB,CAA7C,CAAP;MANJ;;EApBJ;AA6BD;AAED;;;;;AAGA,OAAM,SAAUQ,GAAV,CACJf,IADI,EAEJY,IAFI;AAGJ;AAAoBC,CAHhB,EAGiC;EAErC,OAAOG,gBAAaJ,IAAb,EAAmB,CAACK,CAAD,EAAIC,CAAJ,KAAU,CAACD,CAAD,EAAIC,CAAJ,CAA7B,EAAqCL,CAArC,CAAP;AACD;AAED;;;;AAGA,OAAM,SAAUM,EAAV,CACJnB,IADI,EAEJY,IAFI;AAGJ;AAAoBC,CAHhB,EAGiC;EAErC,OAAOG,gBAAaJ,IAAb,EAAmB,CAACP,CAAD,EAAIY,CAAJ,KAAUZ,CAAC,CAACY,CAAD,CAA9B,EAAmCJ,CAAnC,CAAP;AACD;AAED;;;;AAGA,OAAM,SAAUO,OAAV,CACJpB,IADI,EAEJK,CAFI;AAGJ;AAAoBQ,CAHhB,EAGiC;EAErC,IAAIb,IAAI,CAACC,IAAL,KAAS;EAAA;EAAb,EAAiC;IAC/B,OAAOD,IAAP;EACD;;EACD,IAAIA,IAAI,CAACC,IAAL,KAAS;EAAA;EAAb,EAAkC;IAChC,OAAOI,CAAC,CAACL,IAAI,CAACO,KAAN,CAAR;EACD;;EACD,MAAMK,IAAI,GAAGP,CAAC,CAACL,IAAI,CAACO,KAAN,CAAd;;EACA,QAAQK,IAAI,CAACX,IAAb;IACE;IAAA;IAAA;MACE,OAAOK,qBAAWO,CAAC,CAACC,OAAF,CAAUd,IAAI,CAACQ,IAAf,EAAqBI,IAAI,CAACJ,IAA1B,CAAX,CAAP;;IACF;IAAA;IAAA;MACE,OAAOF,qBAAWN,IAAI,CAACQ,IAAhB,EAAsBI,IAAI,CAACL,KAA3B,CAAP;;IACF;IAAA;IAAA;MACE,OAAOD,qBAAWO,CAAC,CAACC,OAAF,CAAUd,IAAI,CAACQ,IAAf,EAAqBI,IAAI,CAACJ,IAA1B,CAAX,EAA4CI,IAAI,CAACL,KAAjD,CAAP;EANJ;AAQD;AAED;;;;AAGA,OAAM,SAAUc,SAAV,CAA6BrB,IAA7B,EAAgDK,CAAhD,EAAwE;EAC5E,IAAIL,IAAI,CAACC,IAAL,KAAS;EAAA;EAAb,EAAiC;IAC/B,OAAOI,CAAC,CAACL,IAAI,CAACQ,IAAN,CAAR;EACD;;EACD,OAAOR,IAAP;AACD;AAED;;;;AAGA,OAAM,SAAUsB,OAAV,CAAwBtB,IAAxB,EAAyC;EAC7C,IAAIA,IAAI,CAACC,IAAL,KAAS;EAAA;EAAb,EAAiC;IAC/B,OAAOK,qBAAWN,IAAI,CAACQ,IAAhB,CAAP;EACD;;EACD,OAAOR,IAAP;AACD;AAED;;;;AAGA,OAAM,SAAUuB,WAAV,CAA4BvB,IAA5B,EAA+CwB,CAA/C,EAA8D;EAClE,IAAIxB,IAAI,CAACC,IAAL,KAAS;EAAA;EAAT,GAA+BuB,CAAC,CAACxB,IAAI,CAACQ,IAAN,CAApC,EAAiD;IAC/C,OAAOF,qBAAWN,IAAI,CAACQ,IAAhB,CAAP;EACD;;EACD,OAAOR,IAAP;AACD","names":["zipWith","isLeft","self","_tag","isRight","isBoth","map","f","tsplus_module_1","right","left","mapLeft","bimap","g","that","S","combine","zip","zipWith_1","a","b","ap","flatMap","catchAll_","condemn","condemnWhen","p"],"sourceRoot":"","sources":["../../../_src/data/These/api.ts"],"sourcesContent":[null]}
+{"version":3,"file":"api.mjs","mappings":";aA4EgBA,OAAO;AAxEvB;;;;AAGA,OAAM,SAAUC,MAAV,CAAuBC,IAAvB,EAAwC;EAC5C,OAAOA,IAAI,CAACC,IAAL,KAAS;EAAA;EAAhB;AACD;AAED;;;;AAGA,OAAM,SAAUC,OAAV,CAAwBF,IAAxB,EAAyC;EAC7C,OAAOA,IAAI,CAACC,IAAL,KAAS;EAAA;EAAhB;AACD;AAED;;;;AAGA,OAAM,SAAUE,MAAV,CAAuBH,IAAvB,EAAwC;EAC5C,OAAOA,IAAI,CAACC,IAAL,KAAS;EAAA;EAAhB;AACD;AAED;;;;AAGA,OAAM,SAAUG,GAAV,CAAoBC,CAApB,EAAkC;EACtC,OAAWL,IAAJ,IAAsC;IAC3C,QAAQA,IAAI,CAACC,IAAb;MACE;MAAA;MAAA;QACE,OAAOD,IAAP;;MACF;MAAA;MAAA;QACE,OAAOM,sBAAYD,CAAC,CAACL,IAAI,CAACO,KAAN,CAAb,CAAP;;MACF;MAAA;MAAA;QACE,OAAOD,qBAAWN,IAAI,CAACQ,IAAhB,EAAsBH,CAAC,CAACL,IAAI,CAACO,KAAN,CAAvB,CAAP;IANJ;EAQD,CATD;AAUD;AAED;;;;AAGA,OAAM,SAAUE,OAAV,CAAyBJ,CAAzB,EAAwC;EAC5C,OAAWL,IAAJ,IAAuC;IAC5C,QAAQA,IAAI,CAACC,IAAb;MACE;MAAA;MAAA;QACE,OAAOK,qBAAWD,CAAC,CAACL,IAAI,CAACQ,IAAN,CAAZ,CAAP;;MACF;MAAA;MAAA;QACE,OAAOR,IAAP;;MACF;MAAA;MAAA;QACE,OAAOM,qBAAWD,CAAC,CAACL,IAAI,CAACQ,IAAN,CAAZ,EAAyBR,IAAI,CAACO,KAA9B,CAAP;IANJ;EAQD,CATD;AAUD;AAED;;;;AAGA,OAAM,SAAUG,KAAV,CAA6BL,CAA7B,EAA8CM,CAA9C,EAA4D;EAChE,OAAQX,IAAD,IAAoC;IACzC,QAAQA,IAAI,CAACC,IAAb;MACE;MAAA;MAAA;QACE,OAAOK,qBAAWD,CAAC,CAACL,IAAI,CAACQ,IAAN,CAAZ,CAAP;;MACF;MAAA;MAAA;QACE,OAAOF,sBAAYK,CAAC,CAACX,IAAI,CAACO,KAAN,CAAb,CAAP;;MACF;MAAA;MAAA;QACE,OAAOD,qBAAWD,CAAC,CAACL,IAAI,CAACQ,IAAN,CAAZ,EAAyBG,CAAC,CAACX,IAAI,CAACO,KAAN,CAA1B,CAAP;IANJ;EAQD,CATD;AAUD;AAED;;;;AAGA,mBAAoCK,IAApC,EAAuDP,CAAvD;AAA6E;AAAoBQ,CAAjG,EAAkH;EAChH,OAAQb,IAAD,IAAmC;IACxC,QAAQA,IAAI,CAACC,IAAb;MACE;MAAA;MAAA;QACE,QAAQW,IAAI,CAACX,IAAb;UACE;UAAA;UAAA;YACE,OAAOK,qBAAWO,CAAC,CAACC,OAAF,CAAUd,IAAI,CAACQ,IAAf,EAAqBI,IAAI,CAACJ,IAA1B,CAAX,CAAP;;UACF;UAAA;UAAA;YACE,OAAOR,IAAP;;UACF;UAAA;UAAA;YACE,OAAOM,qBAAWO,CAAC,CAACC,OAAF,CAAUd,IAAI,CAACQ,IAAf,EAAqBI,IAAI,CAACJ,IAA1B,CAAX,CAAP;QANJ;;MAQF;MAAA;MAAA;QACE,QAAQI,IAAI,CAACX,IAAb;UACE;UAAA;UAAA;YACE,OAAOW,IAAP;;UACF;UAAA;UAAA;YACE,OAAON,sBAAYD,CAAC,CAACL,IAAI,CAACO,KAAN,EAAaK,IAAI,CAACL,KAAlB,CAAb,CAAP;;UACF;UAAA;UAAA;YACE,OAAOD,qBAAWM,IAAI,CAACJ,IAAhB,CAAP;QANJ;;MAQF;MAAA;MAAA;QACE,QAAQI,IAAI,CAACX,IAAb;UACE;UAAA;UAAA;YACE,OAAOK,qBAAWO,CAAC,CAACC,OAAF,CAAUd,IAAI,CAACQ,IAAf,EAAqBI,IAAI,CAACJ,IAA1B,CAAX,CAAP;;UACF;UAAA;UAAA;YACE,OAAOF,qBAAWN,IAAI,CAACQ,IAAhB,EAAsBH,CAAC,CAACL,IAAI,CAACO,KAAN,EAAaK,IAAI,CAACL,KAAlB,CAAvB,CAAP;;UACF;UAAA;UAAA;YACE,OAAOD,qBAAWO,CAAC,CAACC,OAAF,CAAUd,IAAI,CAACQ,IAAf,EAAqBI,IAAI,CAACJ,IAA1B,CAAX,EAA4CH,CAAC,CAACL,IAAI,CAACO,KAAN,EAAaK,IAAI,CAACL,KAAlB,CAA7C,CAAP;QANJ;;IApBJ;EA6BD,CA9BD;AA+BD;AAED;;;;;AAGA,OAAM,SAAUQ,GAAV,CAAoBH,IAApB;AAAuC;AAAoBC,CAA3D,EAA4E;EAChF,OAAWb,IAAJ,IAAoD;IACzD,OAAOgB,UAAaJ,IAAb,EAAmB,CAACK,CAAD,EAAIC,CAAJ,KAAU,CAACD,CAAD,EAAIC,CAAJ,CAA7B,EAAqCL,CAArC,OAAP;EACD,CAFD;AAGD;AAED;;;;AAGA,OAAM,SAAUM,EAAV,CAAmBP,IAAnB;AAAsC;AAAoBC,CAA1D,EAA2E;EAC/E,OAAWb,IAAJ,IAAgD;IACrD,OAAOgB,UAAaJ,IAAb,EAAmB,CAACP,CAAD,EAAIY,CAAJ,KAAUZ,CAAC,CAACY,CAAD,CAA9B,EAAmCJ,CAAnC,OAAP;EACD,CAFD;AAGD;AAED;;;;AAGA,OAAM,SAAUO,OAAV,CAA2Bf,CAA3B;AAAqD;AAAoBQ,CAAzE,EAA0F;EAC9F,OAAQb,IAAD,IAAmC;IACxC,IAAIA,IAAI,CAACC,IAAL,KAAS;IAAA;IAAb,EAAiC;MAC/B,OAAOD,IAAP;IACD;;IACD,IAAIA,IAAI,CAACC,IAAL,KAAS;IAAA;IAAb,EAAkC;MAChC,OAAOI,CAAC,CAACL,IAAI,CAACO,KAAN,CAAR;IACD;;IACD,MAAMK,IAAI,GAAGP,CAAC,CAACL,IAAI,CAACO,KAAN,CAAd;;IACA,QAAQK,IAAI,CAACX,IAAb;MACE;MAAA;MAAA;QACE,OAAOK,qBAAWO,CAAC,CAACC,OAAF,CAAUd,IAAI,CAACQ,IAAf,EAAqBI,IAAI,CAACJ,IAA1B,CAAX,CAAP;;MACF;MAAA;MAAA;QACE,OAAOF,qBAAWN,IAAI,CAACQ,IAAhB,EAAsBI,IAAI,CAACL,KAA3B,CAAP;;MACF;MAAA;MAAA;QACE,OAAOD,qBAAWO,CAAC,CAACC,OAAF,CAAUd,IAAI,CAACQ,IAAf,EAAqBI,IAAI,CAACJ,IAA1B,CAAX,EAA4CI,IAAI,CAACL,KAAjD,CAAP;IANJ;EAQD,CAhBD;AAiBD;AAED;;;;AAGA,OAAM,SAAUc,QAAV,CAAyBhB,CAAzB,EAAiD;EACrD,OAAWL,IAAJ,IAA0C;IAC/C,IAAIA,IAAI,CAACC,IAAL,KAAS;IAAA;IAAb,EAAiC;MAC/B,OAAOI,CAAC,CAACL,IAAI,CAACQ,IAAN,CAAR;IACD;;IACD,OAAOR,IAAP;EACD,CALD;AAMD;AAED;;;;AAGA,OAAM,SAAUsB,OAAV,CAAwBtB,IAAxB,EAAyC;EAC7C,IAAIA,IAAI,CAACC,IAAL,KAAS;EAAA;EAAb,EAAiC;IAC/B,OAAOK,qBAAWN,IAAI,CAACQ,IAAhB,CAAP;EACD;;EACD,OAAOR,IAAP;AACD;AAED;;;;AAGA,OAAM,SAAUuB,WAAV,CAAyBC,CAAzB,EAAwC;EAC5C,OAAWxB,IAAJ,IAAsC;IAC3C,IAAIA,IAAI,CAACC,IAAL,KAAS;IAAA;IAAT,GAA+BuB,CAAC,CAACxB,IAAI,CAACQ,IAAN,CAApC,EAAiD;MAC/C,OAAOF,qBAAWN,IAAI,CAACQ,IAAhB,CAAP;IACD;;IACD,OAAOR,IAAP;EACD,CALD;AAMD","names":["zipWith","isLeft","self","_tag","isRight","isBoth","map","f","tsplus_module_1","right","left","mapLeft","bimap","g","that","S","combine","zip","zipWith_1","a","b","ap","flatMap","catchAll","condemn","condemnWhen","p"],"sourceRoot":"","sources":["../../../_src/data/These/api.ts"],"sourcesContent":[null]}

package/_mjs/data/These/constructors.mjs

@@ -33,6 +33,6 @@ function both_1(e, a) {
 
 
 export function rightOrBoth(e, a) {
-  return tsplus_module_1.match_(e, () => right_1(a), e => both_1(e, a));
+  return tsplus_module_1.match(() => right_1(a), e => both_1(e, a))(e);
 }
 //# sourceMappingURL=constructors.mjs.map