@fncts/base 0.0.20 → 0.0.22

package/_cjs/data/Cause/api.cjs

@@ -5,18 +5,18 @@ Object.defineProperty(exports, "__esModule", {
 });
 exports.as_ = as_;
 exports.both = void 0;
-exports.contains_ = contains_;
+exports.contains = contains;
 exports.failureMaybe = exports.failed = exports.fail = exports.empty = exports.defects = void 0;
 exports.failureOrCause = failureOrCause;
 exports.failureTraceMaybe = void 0;
 exports.failureTraceOrCause = failureTraceOrCause;
 exports.failures = failures;
-exports.filterDefects_ = filterDefects_;
-exports.flatMap_ = exports.find_ = void 0;
+exports.filterDefects = filterDefects;
+exports.flatMap = exports.find = void 0;
 exports.flatten = flatten;
 exports.flipCauseEither = flipCauseEither;
 exports.flipCauseOption = flipCauseOption;
-exports.interruptOption = exports.interrupt = exports.halted = exports.haltMaybe = exports.halt = exports.foldLeft_ = void 0;
+exports.interruptOption = exports.interrupt = exports.halted = exports.haltMaybe = exports.halt = exports.foldLeft = void 0;
 exports.interrupted = interrupted;
 exports.interruptedOnly = interruptedOnly;
 exports.interruptors = void 0;
@@ -25,74 +25,46 @@ exports.isInterrupted = exports.isInterrupt = exports.isHalt = exports.isFail =
 exports.isThen = isThen;
 exports.isTraced = isTraced;
 exports.keepDefects = keepDefects;
-exports.map_ = exports.mapTrace_ = void 0;
+exports.mapTrace = exports.map = void 0;
 exports.sequenceCauseEither = sequenceCauseEither;
 exports.sequenceCauseMaybe = sequenceCauseMaybe;
-exports.squashWith_ = squashWith_;
+exports.squashWith = squashWith;
 exports.stackless = void 0;
 exports.stripFailures = stripFailures;
 exports.stripSomeDefects = stripSomeDefects;
 exports.traced = exports.then = void 0;
 exports.untraced = untraced;
-
 var tsplus_module_1 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/control/Eval/constructors"));
-
 var tsplus_module_2 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/control/Eval/api"));
-
 var tsplus_module_3 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Cause/api/isEmpty"));
-
 var tsplus_module_4 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/control/Eval/run"));
-
 var tsplus_module_5 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Maybe/constructors"));
-
 var tsplus_module_6 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/collection/immutable/List/constructors"));
-
 var tsplus_module_7 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/collection/immutable/List/api"));
-
 var tsplus_module_8 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Trace/constructors"));
-
 var tsplus_module_9 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Maybe/destructors"));
-
 var tsplus_module_10 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Either/constructors"));
-
 var tsplus_module_11 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Maybe/definition"));
-
 var tsplus_module_12 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Maybe/api"));
-
 var tsplus_module_13 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Cause/api/fold"));
-
 var tsplus_module_14 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/collection/immutable/List/definition"));
-
 var tsplus_module_15 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/collection/immutable/List/api/unsafeTail"));
-
 var tsplus_module_16 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/internal/Stack"));
-
 var tsplus_module_17 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Either/destructors"));
-
 var tsplus_module_18 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Either/api"));
-
 var tsplus_module_19 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/collection/immutable/HashSet/api"));
-
 var tsplus_module_20 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/exceptions"));
-
 var tsplus_module_21 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/FiberId/api"));
-
 var tsplus_module_22 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Trace/api"));
-
 var _Stack2 = /*#__PURE__*/require("../../internal/Stack.cjs");
-
 var _function = /*#__PURE__*/require("../function.cjs");
-
 var _definition3 = /*#__PURE__*/require("./definition.cjs");
-
 function _getRequireWildcardCache(nodeInterop) { if (typeof WeakMap !== "function") return null; var cacheBabelInterop = new WeakMap(); var cacheNodeInterop = new WeakMap(); return (_getRequireWildcardCache = function (nodeInterop) { return nodeInterop ? cacheNodeInterop : cacheBabelInterop; })(nodeInterop); }
-
 function _interopRequireWildcard(obj, nodeInterop) { if (!nodeInterop && obj && obj.__esModule) { return obj; } if (obj === null || typeof obj !== "object" && typeof obj !== "function") { return { default: obj }; } var cache = _getRequireWildcardCache(nodeInterop); if (cache && cache.has(obj)) { return cache.get(obj); } var newObj = {}; var hasPropertyDescriptor = Object.defineProperty && Object.getOwnPropertyDescriptor; for (var key in obj) { if (key !== "default" && Object.prototype.hasOwnProperty.call(obj, key)) { var desc = hasPropertyDescriptor ? Object.getOwnPropertyDescriptor(obj, key) : null; if (desc && (desc.get || desc.set)) { Object.defineProperty(newObj, key, desc); } else { newObj[key] = obj[key]; } } } newObj.default = obj; if (cache) { cache.set(obj, newObj); } return newObj; }
-
 const both = both_1;
 exports.both = both;
-const flatMap_ = flatMap_1;
-exports.flatMap_ = flatMap_;
+const flatMap = flatMap_1;
+exports.flatMap = flatMap;
 const defects = defects_1;
 exports.defects = defects;
 const empty = empty_1;
@@ -105,10 +77,10 @@ const failureTraceMaybe = failureTraceMaybe_1;
 exports.failureTraceMaybe = failureTraceMaybe;
 const failureMaybe = failureMaybe_1;
 exports.failureMaybe = failureMaybe;
-const find_ = find_1;
-exports.find_ = find_;
-const foldLeft_ = foldLeft_1;
-exports.foldLeft_ = foldLeft_;
+const find = find_1;
+exports.find = find;
+const foldLeft = foldLeft_1;
+exports.foldLeft = foldLeft;
 const halt = halt_1;
 exports.halt = halt;
 const halted = halted_1;
@@ -129,63 +101,42 @@ const interruptOption = interruptOption_1;
 exports.interruptOption = interruptOption;
 const interruptors = interruptors_1;
 exports.interruptors = interruptors;
-const map_ = map_1;
-exports.map_ = map_;
-const mapTrace_ = mapTrace_1;
-exports.mapTrace_ = mapTrace_;
+const map = map_1;
+exports.map = map;
+const mapTrace = mapTrace_1;
+exports.mapTrace = mapTrace;
 const stackless = stackless_1;
 exports.stackless = stackless;
 const then = then_1;
 exports.then = then;
 const traced = traced_1;
 exports.traced = traced;
-
 /**
- * @tsplus fluent fncts.Cause as
+ * @tsplus pipeable fncts.Cause as
  */
-function as_(self, b) {
-  return map_1(self, () => b());
+function as_(b) {
+  return self => {
+    return map_1(() => b())(self);
+  };
 }
 /**
  * @internal
  */
-
-
 function chainEval(self, f) {
   switch (self._tag) {
-    case "Empty"
-    /* CauseTag.Empty */
-    :
+    case "Empty" /* CauseTag.Empty */:
       return tsplus_module_1.now(empty_1());
-
-    case "Fail"
-    /* CauseTag.Fail */
-    :
+    case "Fail" /* CauseTag.Fail */:
       return tsplus_module_1.now(traced_1(f(self.value), self.trace));
-
-    case "Halt"
-    /* CauseTag.Halt */
-    :
+    case "Halt" /* CauseTag.Halt */:
       return tsplus_module_1.now(self);
-
-    case "Interrupt"
-    /* CauseTag.Interrupt */
-    :
+    case "Interrupt" /* CauseTag.Interrupt */:
       return tsplus_module_1.now(self);
-
-    case "Then"
-    /* CauseTag.Then */
-    :
-      return tsplus_module_2.zipWith_(tsplus_module_1.defer(() => chainEval(self.left, f)), tsplus_module_1.defer(() => chainEval(self.right, f)), then_1);
-
-    case "Both"
-    /* CauseTag.Both */
-    :
-      return tsplus_module_2.zipWith_(tsplus_module_1.defer(() => chainEval(self.left, f)), tsplus_module_1.defer(() => chainEval(self.right, f)), both_1);
-
-    case "Stackless"
-    /* CauseTag.Stackless */
-    :
+    case "Then" /* CauseTag.Then */:
+      return tsplus_module_2.zipWith(tsplus_module_1.defer(() => chainEval(self.right, f)), then_1)(tsplus_module_1.defer(() => chainEval(self.left, f)));
+    case "Both" /* CauseTag.Both */:
+      return tsplus_module_2.zipWith(tsplus_module_1.defer(() => chainEval(self.right, f)), both_1)(tsplus_module_1.defer(() => chainEval(self.left, f)));
+    case "Stackless" /* CauseTag.Stackless */:
       return tsplus_module_1.defer(() => chainEval(self.cause, f));
   }
 }
@@ -197,43 +148,38 @@ function chainEval(self, f) {
  * @tsplus static fncts.CauseOps both
  * @tsplus static fncts.Cause.BothOps __call
  */
-
-
 function both_1(left, right) {
   return tsplus_module_3.isEmpty(left) ? right : tsplus_module_3.isEmpty(right) ? left : new _definition3.Both(left, right);
 }
 /**
  * Composes computations in sequence, using the return value of one computation as input for the next
  *
- * @tsplus fluent fncts.Cause flatMap
+ * @tsplus pipeable fncts.Cause flatMap
  */
-
-
-function flatMap_1(self, f) {
-  return tsplus_module_4.run(chainEval(self, f));
+function flatMap_1(f) {
+  return self => {
+    return tsplus_module_4.run(chainEval(self, f));
+  };
 }
 /**
  * Determines whether a `Cause` contains or is equal to the specified cause.
  *
- * @tsplus fluent fncts.Cause contains
+ * @tsplus pipeable fncts.Cause contains
  */
-
-
-function contains_(self, that) {
-  return tsplus_module_4.run(containsEval(self, that));
+function contains(that) {
+  return self => {
+    return tsplus_module_4.run(containsEval(self, that));
+  };
 }
 /**
  * @internal
  */
-
-
 function containsEval(self, that) {
   return tsplus_module_2.gen(function* (_) {
     if (yield* _(self.equalsEval(that))) {
       return true;
     }
-
-    return yield* _(foldLeft_1(self, tsplus_module_1.now(false), (computation, c) => tsplus_module_5.just(tsplus_module_2.flatMap_(computation, b => b ? tsplus_module_1.now(b) : c.equalsEval(that)))));
+    return yield* _(foldLeft_1(tsplus_module_1.now(false), (computation, c) => tsplus_module_5.just(tsplus_module_2.flatMap(b => b ? tsplus_module_1.now(b) : c.equalsEval(that))(computation)))(self));
   });
 }
 /**
@@ -241,10 +187,8 @@ function containsEval(self, that) {
  *
  * @tsplus getter fncts.Cause defects
  */
-
-
 function defects_1(self) {
-  return tsplus_module_7.reverse(foldLeft_1(self, tsplus_module_6.empty(), (z, c) => isHalt_1(c) ? tsplus_module_5.just(tsplus_module_7.prependOperator(c.value, z)) : tsplus_module_5.nothing()));
+  return tsplus_module_7.reverse(foldLeft_1(tsplus_module_6.empty(), (z, c) => isHalt_1(c) ? tsplus_module_5.just(tsplus_module_7.prependOperator(c.value, z)) : tsplus_module_5.nothing())(self));
 }
 /**
  * The empty `Cause`
@@ -252,8 +196,6 @@ function defects_1(self) {
  * @tsplus static fncts.CauseOps empty
  * @tsplus static fncts.Cause.EmptyOps __call
  */
-
-
 function empty_1() {
   return _definition3._Empty;
 }
@@ -263,8 +205,6 @@ function empty_1() {
  * @tsplus static fncts.CauseOps fail
  * @tsplus static fncts.Cause.FailOps __call
  */
-
-
 function fail_1(value, trace = tsplus_module_8.none) {
   return new _definition3.Fail(value, trace);
 }
@@ -273,20 +213,16 @@ function fail_1(value, trace = tsplus_module_8.none) {
  *
  * @tsplus getter Cause failed
  */
-
-
 function failed_1(self) {
-  return tsplus_module_9.match_(failureMaybe_1(self), () => false, () => true);
+  return tsplus_module_9.match(() => false, () => true)(failureMaybe_1(self));
 }
 /**
  * Produces a list of all recoverable errors `E` in the `Cause`.
  *
  * @tsplus getter fncts.Cause failures
  */
-
-
 function failures(self) {
-  return tsplus_module_7.reverse(foldLeft_1(self, tsplus_module_6.empty(), (z, c) => isFail_1(c) ? tsplus_module_5.just(tsplus_module_7.prependOperator(c.value, z)) : tsplus_module_5.nothing()));
+  return tsplus_module_7.reverse(foldLeft_1(tsplus_module_6.empty(), (z, c) => isFail_1(c) ? tsplus_module_5.just(tsplus_module_7.prependOperator(c.value, z)) : tsplus_module_5.nothing())(self));
 }
 /**
  * Retrieve the first checked error on the `Left` if available,
@@ -295,10 +231,8 @@ function failures(self) {
  *
  * @tsplus getter fncts.Cause failureOrCause
  */
-
-
 function failureOrCause(self) {
-  return tsplus_module_9.match_(failureMaybe_1(self), () => tsplus_module_10.right(self), tsplus_module_10.left);
+  return tsplus_module_9.match(() => tsplus_module_10.right(self), tsplus_module_10.left)(failureMaybe_1(self));
 }
 /**
  * Returns the `E` associated with the first `Fail` in this `Cause` if one
@@ -306,10 +240,8 @@ function failureOrCause(self) {
  *
  * @tsplus getter fncts.Cause failureTraceMaybe
  */
-
-
 function failureTraceMaybe_1(self) {
-  return find_1(self, c => isFail_1(c) ? tsplus_module_5.just([c.value, c.trace]) : tsplus_module_5.nothing());
+  return find_1(c => isFail_1(c) ? tsplus_module_5.just([c.value, c.trace]) : tsplus_module_5.nothing())(self);
 }
 /**
  * Retrieve the first checked error and its trace on the `Left` if available,
@@ -318,102 +250,85 @@ function failureTraceMaybe_1(self) {
  *
  * @tsplus getter fncts.Cause failureTraceOrCause
  */
-
-
 function failureTraceOrCause(self) {
-  return tsplus_module_9.match_(failureTraceMaybe_1(self), () => tsplus_module_10.right(self), tsplus_module_10.left);
+  return tsplus_module_9.match(() => tsplus_module_10.right(self), tsplus_module_10.left)(failureTraceMaybe_1(self));
 }
 /**
  * Returns the `E` associated with the first `Fail` in this `Cause` if one exists.
  *
  * @tsplus getter fncts.Cause failureMaybe
  */
-
-
 function failureMaybe_1(self) {
-  return find_1(self, c => c._tag === "Fail"
-  /* CauseTag.Fail */
-  ? tsplus_module_5.just(c.value) : tsplus_module_5.nothing());
+  return find_1(c => c._tag === "Fail" /* CauseTag.Fail */ ? tsplus_module_5.just(c.value) : tsplus_module_5.nothing())(self);
 }
 /**
  * Remove all `Halt` causes that the specified partial function is defined at,
  * returning `Just` with the remaining causes or `Nothing` if there are no
  * remaining causes.
  *
- * @tsplus fluent fncts.Cause filterDefects
+ * @tsplus pipeable fncts.Cause filterDefects
  */
-
-
-function filterDefects_(self, p) {
-  return tsplus_module_13.fold_(self, {
-    Empty: () => tsplus_module_5.just(empty_1()),
-    Fail: (e, trace) => tsplus_module_5.just(fail_1(e, trace)),
-    Halt: (u, trace) => p(u) ? tsplus_module_5.nothing() : tsplus_module_5.just(halt_1(u, trace)),
-    Interrupt: (fiberId, trace) => tsplus_module_5.just(interrupt_1(fiberId, trace)),
-    Then: (l, r) => {
-      if (tsplus_module_11.isJust(l) && tsplus_module_11.isJust(r)) {
-        return tsplus_module_5.just(then_1(l.value, r.value));
-      } else if (tsplus_module_11.isJust(l) && tsplus_module_11.isNothing(r)) {
-        return tsplus_module_5.just(l.value);
-      } else if (tsplus_module_11.isNothing(l) && tsplus_module_11.isJust(r)) {
-        return tsplus_module_5.just(r.value);
-      } else {
-        return tsplus_module_5.nothing();
-      }
-    },
-    Both: (l, r) => {
-      if (tsplus_module_11.isJust(l) && tsplus_module_11.isJust(r)) {
-        return tsplus_module_5.just(both_1(l.value, r.value));
-      } else if (tsplus_module_11.isJust(l) && tsplus_module_11.isNothing(r)) {
-        return tsplus_module_5.just(l.value);
-      } else if (tsplus_module_11.isNothing(l) && tsplus_module_11.isJust(r)) {
-        return tsplus_module_5.just(r.value);
-      } else {
-        return tsplus_module_5.nothing();
-      }
-    },
-    Stackless: (causeOption, stackless) => tsplus_module_12.map_(causeOption, cause => stackless_1(cause, stackless))
-  });
+function filterDefects(p) {
+  return self => {
+    return tsplus_module_13.fold({
+      Empty: () => tsplus_module_5.just(empty_1()),
+      Fail: (e, trace) => tsplus_module_5.just(fail_1(e, trace)),
+      Halt: (u, trace) => p(u) ? tsplus_module_5.nothing() : tsplus_module_5.just(halt_1(u, trace)),
+      Interrupt: (fiberId, trace) => tsplus_module_5.just(interrupt_1(fiberId, trace)),
+      Then: (l, r) => {
+        if (tsplus_module_11.isJust(l) && tsplus_module_11.isJust(r)) {
+          return tsplus_module_5.just(then_1(l.value, r.value));
+        } else if (tsplus_module_11.isJust(l) && tsplus_module_11.isNothing(r)) {
+          return tsplus_module_5.just(l.value);
+        } else if (tsplus_module_11.isNothing(l) && tsplus_module_11.isJust(r)) {
+          return tsplus_module_5.just(r.value);
+        } else {
+          return tsplus_module_5.nothing();
+        }
+      },
+      Both: (l, r) => {
+        if (tsplus_module_11.isJust(l) && tsplus_module_11.isJust(r)) {
+          return tsplus_module_5.just(both_1(l.value, r.value));
+        } else if (tsplus_module_11.isJust(l) && tsplus_module_11.isNothing(r)) {
+          return tsplus_module_5.just(l.value);
+        } else if (tsplus_module_11.isNothing(l) && tsplus_module_11.isJust(r)) {
+          return tsplus_module_5.just(r.value);
+        } else {
+          return tsplus_module_5.nothing();
+        }
+      },
+      Stackless: (causeOption, stackless) => tsplus_module_12.map(cause => stackless_1(cause, stackless))(causeOption)
+    })(self);
+  };
 }
 /**
  * @tsplus tailRec
  */
-
-
 function findLoop(self, f, stack) {
   var self_1 = self,
-      f_1 = f,
-      stack_1 = stack;
+    f_1 = f,
+    stack_1 = stack;
   var self_2 = self,
-      f_2 = f,
-      stack_2 = stack;
-
+    f_2 = f,
+    stack_2 = stack;
   while (1) {
     const r = f_1(self_1);
     void 0;
-
     switch (r._tag) {
-      case "Nothing"
-      /* MaybeTag.Nothing */
-      :
+      case "Nothing" /* MaybeTag.Nothing */:
         {
           switch (self_1._tag) {
-            case "Both"
-            /* CauseTag.Both */
-            :
-            case "Then"
-            /* CauseTag.Then */
-            :
+            case "Both" /* CauseTag.Both */:
+            case "Then" /* CauseTag.Then */:
               {
                 self_2 = self_1.left;
                 f_2 = f_1;
-                stack_2 = tsplus_module_7.prepend_(stack_1, self_1.right);
+                stack_2 = tsplus_module_7.prepend(self_1.right)(stack_1);
                 self_1 = self_2;
                 f_1 = f_2;
                 stack_1 = stack_2;
                 continue;
               }
-
             default:
               {
                 if (tsplus_module_14.isNonEmpty(stack_1)) {
@@ -425,15 +340,11 @@ function findLoop(self, f, stack) {
                   stack_1 = stack_2;
                   continue;
                 }
-
                 return tsplus_module_5.nothing();
               }
           }
         }
-
-      case "Just"
-      /* MaybeTag.Just */
-      :
+      case "Just" /* MaybeTag.Just */:
         {
           return r;
         }
@@ -443,61 +354,49 @@ function findLoop(self, f, stack) {
 /**
  * Finds the first result matching `f`
  *
- * @tsplus fluent fncts.Cause find
+ * @tsplus pipeable fncts.Cause find
  */
-
-
-function find_1(self, f) {
-  return findLoop(self, f, tsplus_module_6.nil());
+function find_1(f) {
+  return self => {
+    return findLoop(self, f, tsplus_module_6.nil());
+  };
 }
 /**
  * @tsplus getter fncts.Cause flatten
  */
-
-
 function flatten(self) {
-  return flatMap_1(self, _function.identity);
+  return flatMap_1(_function.identity)(self);
 }
-
 class FCEStackFrameDone {
   constructor() {
     this._tag = "FCEStackFrameDone";
   }
-
 }
-
 class FCEStackFrameThenLeft {
   constructor(cause) {
     this.cause = cause;
     this._tag = "FCEStackFrameThenLeft";
   }
-
 }
-
 class FCEStackFrameThenRight {
   constructor(cause, leftResult) {
     this.cause = cause;
     this.leftResult = leftResult;
     this._tag = "FCEStackFrameThenRight";
   }
-
 }
-
 class FCEStackFrameBothLeft {
   constructor(cause) {
     this.cause = cause;
     this._tag = "FCEStackFrameBothLeft";
   }
-
 }
-
 class FCEStackFrameBothRight {
   constructor(cause, leftResult) {
     this.cause = cause;
     this.leftResult = leftResult;
     this._tag = "FCEStackFrameBothRight";
   }
-
 }
 /**
  * Converts the specified `Cause<Either<E, A>>` to an `Either<Cause<E>, A>` by
@@ -505,159 +404,114 @@ class FCEStackFrameBothRight {
  *
  * @tsplus getter fncts.Cause flipCauseEither
  */
-
-
 function flipCauseEither(self) {
-  const stack = tsplus_module_16.mkStack();
+  const stack = tsplus_module_16.makeStack();
   stack.push(new FCEStackFrameDone());
   let result;
   let c = self;
-
   recursion: while (stack.hasNext) {
     // eslint-disable-next-line no-constant-condition
     pushing: while (true) {
       switch (c._tag) {
-        case "Empty"
-        /* CauseTag.Empty */
-        :
+        case "Empty" /* CauseTag.Empty */:
           result = tsplus_module_10.left(empty_1());
           break pushing;
-
-        case "Interrupt"
-        /* CauseTag.Interrupt */
-        :
+        case "Interrupt" /* CauseTag.Interrupt */:
           result = tsplus_module_10.left(interrupt_1(c.id, c.trace));
           break pushing;
-
-        case "Halt"
-        /* CauseTag.Halt */
-        :
+        case "Halt" /* CauseTag.Halt */:
           result = tsplus_module_10.left(c);
           break pushing;
-
-        case "Fail"
-        /* CauseTag.Fail */
-        :
-          result = tsplus_module_17.match_(c.value, l => tsplus_module_10.left(fail_1(l, tsplus_module_8.none)), r => tsplus_module_10.right(r));
+        case "Fail" /* CauseTag.Fail */:
+          result = tsplus_module_17.match(l => tsplus_module_10.left(fail_1(l, tsplus_module_8.none)), r => tsplus_module_10.right(r))(c.value);
           break pushing;
-
-        case "Then"
-        /* CauseTag.Then */
-        :
+        case "Then" /* CauseTag.Then */:
           stack.push(new FCEStackFrameThenLeft(c));
           c = c.left;
           continue pushing;
-
-        case "Both"
-        /* CauseTag.Both */
-        :
+        case "Both" /* CauseTag.Both */:
           stack.push(new FCEStackFrameBothLeft(c));
           c = c.left;
           continue pushing;
       }
-    } // eslint-disable-next-line no-constant-condition
-
-
+    }
+    // eslint-disable-next-line no-constant-condition
     popping: while (true) {
       const top = stack.pop();
-
       switch (top._tag) {
         case "FCEStackFrameDone":
           return result;
-
         case "FCEStackFrameThenLeft":
           c = top.cause.right;
           stack.push(new FCEStackFrameThenRight(top.cause, result));
           continue recursion;
-
         case "FCEStackFrameThenRight":
           {
             const l = top.leftResult;
-
             if (tsplus_module_18.isLeft(l) && tsplus_module_18.isLeft(result)) {
               result = tsplus_module_10.left(then_1(l.left, result.left));
             }
-
             if (tsplus_module_18.isRight(l)) {
               result = tsplus_module_10.right(l.right);
             }
-
             if (tsplus_module_18.isRight(result)) {
               result = tsplus_module_10.right(result.right);
             }
-
             continue popping;
           }
-
         case "FCEStackFrameBothLeft":
           c = top.cause.right;
           stack.push(new FCEStackFrameBothRight(top.cause, result));
           continue recursion;
-
         case "FCEStackFrameBothRight":
           {
             const l = top.leftResult;
-
             if (tsplus_module_18.isLeft(l) && tsplus_module_18.isLeft(result)) {
               result = tsplus_module_10.left(both_1(l.left, result.left));
             }
-
             if (tsplus_module_18.isRight(l)) {
               result = tsplus_module_10.right(l.right);
             }
-
             if (tsplus_module_18.isRight(result)) {
               result = tsplus_module_10.right(result.right);
             }
-
             continue popping;
           }
       }
     }
   }
-
   throw new Error("Bug");
 }
-
 class FCOStackFrameDone {
   constructor() {
     this._tag = "FCOStackFrameDone";
   }
-
 }
-
 class FCOStackFrameThenLeft {
   constructor(cause) {
     this.cause = cause;
     this._tag = "FCOStackFrameThenLeft";
   }
-
 }
-
 class FCOStackFrameThenRight {
   constructor(cause, leftResult) {
     this.cause = cause;
     this.leftResult = leftResult;
     this._tag = "FCOStackFrameThenRight";
   }
-
 }
-
 class FCOStackFrameBothLeft {
   constructor(cause) {
     this.cause = cause;
     this._tag = "FCOStackFrameBothLeft";
   }
-
 }
-
 class FCOStackFrameBothRight {
   constructor(cause, leftResult) {
     this.cause = cause;
     this.leftResult = leftResult;
     this._tag = "FCOStackFrameBothRight";
   }
-
 }
 /**
  * Converts the specified `Cause<Maybe<A>>` to an `Maybe<Cause<A>>` by
@@ -665,169 +519,125 @@ class FCOStackFrameBothRight {
  *
  * @tsplus getter fncts.Cause flipCauseMaybe
  */
-
-
 function flipCauseOption(self) {
-  const stack = tsplus_module_16.mkStack();
+  const stack = tsplus_module_16.makeStack();
   stack.push(new FCOStackFrameDone());
   let result;
   let c = self;
-
   recursion: while (stack.hasNext) {
     // eslint-disable-next-line no-constant-condition
     pushing: while (true) {
       switch (c._tag) {
-        case "Empty"
-        /* CauseTag.Empty */
-        :
+        case "Empty" /* CauseTag.Empty */:
           result = tsplus_module_5.just(empty_1());
           break pushing;
-
-        case "Interrupt"
-        /* CauseTag.Interrupt */
-        :
+        case "Interrupt" /* CauseTag.Interrupt */:
           result = tsplus_module_5.just(interrupt_1(c.id, tsplus_module_8.none));
           break pushing;
-
-        case "Halt"
-        /* CauseTag.Halt */
-        :
+        case "Halt" /* CauseTag.Halt */:
           result = tsplus_module_5.just(c);
           break pushing;
-
-        case "Fail"
-        /* CauseTag.Fail */
-        :
-          result = tsplus_module_9.match_(c.value, () => tsplus_module_5.nothing(), r => tsplus_module_5.just(fail_1(r, tsplus_module_8.none)));
+        case "Fail" /* CauseTag.Fail */:
+          result = tsplus_module_9.match(() => tsplus_module_5.nothing(), r => tsplus_module_5.just(fail_1(r, tsplus_module_8.none)))(c.value);
           break pushing;
-
-        case "Then"
-        /* CauseTag.Then */
-        :
+        case "Then" /* CauseTag.Then */:
           stack.push(new FCOStackFrameThenLeft(c));
           c = c.left;
           continue pushing;
-
-        case "Both"
-        /* CauseTag.Both */
-        :
+        case "Both" /* CauseTag.Both */:
           stack.push(new FCOStackFrameBothLeft(c));
           c = c.left;
           continue pushing;
       }
-    } // eslint-disable-next-line no-constant-condition
-
-
+    }
+    // eslint-disable-next-line no-constant-condition
     popping: while (true) {
       const top = stack.pop();
-
       switch (top._tag) {
         case "FCOStackFrameDone":
           return result;
-
         case "FCOStackFrameThenLeft":
           c = top.cause.right;
           stack.push(new FCOStackFrameThenRight(top.cause, result));
           continue recursion;
-
         case "FCOStackFrameThenRight":
           {
             const l = top.leftResult;
-
             if (tsplus_module_11.isJust(l) && tsplus_module_11.isJust(result)) {
               result = tsplus_module_5.just(then_1(l.value, result.value));
             }
-
             if (tsplus_module_11.isNothing(l) && tsplus_module_11.isJust(result)) {
               result = tsplus_module_5.just(result.value);
             }
-
             if (tsplus_module_11.isJust(l) && tsplus_module_11.isNothing(result)) {
               result = tsplus_module_5.just(l.value);
             }
-
             result = tsplus_module_5.nothing();
             continue popping;
           }
-
         case "FCOStackFrameBothLeft":
           c = top.cause.right;
           stack.push(new FCOStackFrameBothRight(top.cause, result));
           continue recursion;
-
         case "FCOStackFrameBothRight":
           {
             const l = top.leftResult;
-
             if (tsplus_module_11.isJust(l) && tsplus_module_11.isJust(result)) {
               result = tsplus_module_5.just(both_1(l.value, result.value));
             }
-
             if (tsplus_module_11.isNothing(l) && tsplus_module_11.isJust(result)) {
               result = tsplus_module_5.just(result.value);
             }
-
             if (tsplus_module_11.isJust(l) && tsplus_module_11.isNothing(result)) {
               result = tsplus_module_5.just(l.value);
             }
-
             result = tsplus_module_5.nothing();
             continue popping;
           }
       }
     }
   }
-
   throw new Error("Bug");
 }
 /**
  * Accumulates a state over a `Cause`
  *
- * @tsplus fluent fncts.Cause foldLeft
+ * @tsplus pipeable fncts.Cause foldLeft
  */
-
-
-function foldLeft_1(self, b, f) {
-  return foldLeftLoop(self, b, f, tsplus_module_6.nil());
+function foldLeft_1(b, f) {
+  return self => {
+    return foldLeftLoop(self, b, f, tsplus_module_6.nil());
+  };
 }
 /**
  * @internal
  * @tsplus tailRec
  */
-
-
 function foldLeftLoop(self, b, f, stack) {
   var self_3 = self,
-      b_1 = b,
-      f_3 = f,
-      stack_3 = stack;
+    b_1 = b,
+    f_3 = f,
+    stack_3 = stack;
   var self_4 = self,
-      b_2 = b,
-      f_4 = f,
-      stack_4 = stack;
-
+    b_2 = b,
+    f_4 = f,
+    stack_4 = stack;
   while (1) {
-    const z = tsplus_module_12.getOrElse_(f_3(b_1, self_3), () => b_1);
-
+    const z = tsplus_module_12.getOrElse(() => b_1)(f_3(b_1, self_3));
     switch (self_3._tag) {
-      case "Both"
-      /* CauseTag.Both */
-      :
-      case "Then"
-      /* CauseTag.Then */
-      :
+      case "Both" /* CauseTag.Both */:
+      case "Then" /* CauseTag.Then */:
         {
           self_4 = self_3.left;
           b_2 = z;
           f_4 = f_3;
-          stack_4 = tsplus_module_7.prepend_(stack_3, self_3.right);
+          stack_4 = tsplus_module_7.prepend(self_3.right)(stack_3);
           self_3 = self_4;
           b_1 = b_2;
           f_3 = f_4;
           stack_3 = stack_4;
           continue;
         }
-
       default:
         {
           if (tsplus_module_14.isNonEmpty(stack_3)) {
@@ -841,7 +651,6 @@ function foldLeftLoop(self, b, f, stack) {
             stack_3 = stack_4;
             continue;
           }
-
           return z;
         }
     }
@@ -853,8 +662,6 @@ function foldLeftLoop(self, b, f, stack) {
  * @tsplus static fncts.CauseOps halt
  * @tsplus static fncts.Cause.HaltOps __call
  */
-
-
 function halt_1(value, trace = tsplus_module_8.none) {
   return new _definition3.Halt(value, trace);
 }
@@ -863,22 +670,16 @@ function halt_1(value, trace = tsplus_module_8.none) {
  *
  * @tsplus getter fncts.Cause halted
  */
-
-
 function halted_1(self) {
-  return tsplus_module_9.match_(haltMaybe_1(self), () => false, () => true);
+  return tsplus_module_9.match(() => false, () => true)(haltMaybe_1(self));
 }
 /**
  * Returns the `unknown` associated with the first `Halt` in this `Cause` if one exists.
  *
  * @tsplus getter fncts.Cause haltMaybe
  */
-
-
 function haltMaybe_1(self) {
-  return find_1(self, c => c._tag === "Halt"
-  /* CauseTag.Halt */
-  ? tsplus_module_5.just(c.value) : tsplus_module_5.nothing());
+  return find_1(c => c._tag === "Halt" /* CauseTag.Halt */ ? tsplus_module_5.just(c.value) : tsplus_module_5.nothing())(self);
 }
 /**
  * Constructs a `Cause` from an `Id`, representing an interruption of asynchronous computation
@@ -886,8 +687,6 @@ function haltMaybe_1(self) {
  * @tsplus static fncts.CauseOps interrupt
  * @tsplus static fncts.Cause.InterruptOps __call
  */
-
-
 function interrupt_1(id, trace = tsplus_module_8.none) {
   return new _definition3.Interrupt(id, trace);
 }
@@ -896,116 +695,79 @@ function interrupt_1(id, trace = tsplus_module_8.none) {
  *
  * @tsplus fluent fncts.Cause isBoth
  */
-
-
 function isBoth(self) {
-  return self._tag === "Both"
-  /* CauseTag.Both */
-  ;
+  return self._tag === "Both" /* CauseTag.Both */;
 }
 /**
  * A type-guard matching `Fail`
  *
  * @tsplus fluent fncts.Cause isFail
  */
-
-
 function isFail_1(self) {
-  return self._tag === "Fail"
-  /* CauseTag.Fail */
-  ;
+  return self._tag === "Fail" /* CauseTag.Fail */;
 }
 /**
  * @tsplus fluent fncts.Cause isHalt
  */
-
-
 function isHalt_1(self) {
-  return self._tag === "Halt"
-  /* CauseTag.Halt */
-  ;
+  return self._tag === "Halt" /* CauseTag.Halt */;
 }
 /**
  * A type-guard matching `Then`
  *
  * @tsplus fluent fncts.Cause isThen
  */
-
-
 function isThen(self) {
-  return self._tag === "Then"
-  /* CauseTag.Then */
-  ;
+  return self._tag === "Then" /* CauseTag.Then */;
 }
 /**
  * A type-guard matching `Interrupt`
  *
  * @tsplus fluent fncts.Cause isInterrupt
  */
-
-
 function isInterrupt_1(self) {
-  return self._tag === "Interrupt"
-  /* CauseTag.Interrupt */
-  ;
+  return self._tag === "Interrupt" /* CauseTag.Interrupt */;
 }
 /**
  * Determines if the `Cause` contains an interruption.
  *
  * @tsplus getter fncts.Cause isInterrupted
  */
-
-
 function isInterrupted_1(self) {
-  return tsplus_module_11.isJust(find_1(self, cause => isInterrupt_1(cause) ? tsplus_module_5.just(cause) : tsplus_module_5.nothing()));
+  return tsplus_module_11.isJust(find_1(cause => isInterrupt_1(cause) ? tsplus_module_5.just(cause) : tsplus_module_5.nothing())(self));
 }
 /**
  * A type-guard matching `Traced`
  *
  * @tsplus getter fncts.Cause isTraced
  */
-
-
 function isTraced(self) {
-  return tsplus_module_11.isJust(find_1(self, cause => {
+  return tsplus_module_11.isJust(find_1(cause => {
     switch (cause._tag) {
-      case "Halt"
-      /* CauseTag.Halt */
-      :
-      case "Fail"
-      /* CauseTag.Fail */
-      :
-      case "Interrupt"
-      /* CauseTag.Interrupt */
-      :
+      case "Halt" /* CauseTag.Halt */:
+      case "Fail" /* CauseTag.Fail */:
+      case "Interrupt" /* CauseTag.Interrupt */:
         return cause.trace !== tsplus_module_8.none ? tsplus_module_5.just(undefined) : tsplus_module_5.nothing();
-
       default:
         return tsplus_module_5.nothing();
     }
-  }));
+  })(self));
 }
 /**
  * Determines whether the `Cause` contains an interruption
  *
  * @tsplus getter fncts.Cause interrupted
  */
-
-
 function interrupted(self) {
-  return tsplus_module_9.match_(interruptOption_1(self), () => false, () => true);
+  return tsplus_module_9.match(() => false, () => true)(interruptOption_1(self));
 }
 /**
  * Returns the `FiberId` associated with the first `Interrupt` in this `Cause` if one exists.
  *
  * @tsplus getter fncts.Cause interruptOption
  */
-
-
 function interruptOption_1(self) {
-  return find_1(self, c => c._tag === "Interrupt"
-  /* CauseTag.Interrupt */
-  ? tsplus_module_5.just(c.id) : tsplus_module_5.nothing());
+  return find_1(c => c._tag === "Interrupt" /* CauseTag.Interrupt */ ? tsplus_module_5.just(c.id) : tsplus_module_5.nothing())(self);
 }
 /**
  * Returns a set of interruptors, fibers that interrupted the fiber described
@@ -1013,12 +775,8 @@ function interruptOption_1(self) {
  *
  * @tsplus getter fncts.Cause interruptors
  */
-
-
 function interruptors_1(self) {
-  return foldLeft_1(self, tsplus_module_19.makeDefault(), (s, c) => c._tag === "Interrupt"
-  /* CauseTag.Interrupt */
-  ? tsplus_module_5.just(tsplus_module_19.add_(s, c.id)) : tsplus_module_5.nothing());
+  return foldLeft_1(tsplus_module_19.empty(), (s, c) => c._tag === "Interrupt" /* CauseTag.Interrupt */ ? tsplus_module_5.just(tsplus_module_19.add(c.id)(s)) : tsplus_module_5.nothing())(self);
 }
 /**
  * Determines if the `Cause` contains only interruptions and not any `Halt` or
@@ -1026,10 +784,8 @@ function interruptors_1(self) {
  *
  * @tsplus getter fncts.Cause interruptedOnly
  */
-
-
 function interruptedOnly(self) {
-  return tsplus_module_12.getOrElse_(find_1(self, c => halted_1(c) || failed_1(c) ? tsplus_module_5.just(false) : tsplus_module_5.nothing()), () => true);
+  return tsplus_module_12.getOrElse(() => true)(find_1(c => halted_1(c) || failed_1(c) ? tsplus_module_5.just(false) : tsplus_module_5.nothing())(self));
 }
 /**
  * Remove all `Fail` and `Interrupt` nodes from this `Cause`,
@@ -1037,10 +793,8 @@ function interruptedOnly(self) {
  *
  * @tsplus getter fncts.Cause keepDefects
  */
-
-
 function keepDefects(self) {
-  return tsplus_module_13.fold_(self, {
+  return tsplus_module_13.fold({
     Empty: () => tsplus_module_5.nothing(),
     Fail: () => tsplus_module_5.nothing(),
     Halt: (t, trace) => tsplus_module_5.just(halt_1(t, trace)),
@@ -1067,39 +821,37 @@ function keepDefects(self) {
         return tsplus_module_5.nothing();
       }
     },
-    Stackless: (maybeCause, stackless) => tsplus_module_12.map_(maybeCause, cause => stackless_1(cause, stackless))
-  });
+    Stackless: (maybeCause, stackless) => tsplus_module_12.map(cause => stackless_1(cause, stackless))(maybeCause)
+  })(self);
 }
 /**
- * @tsplus fluent fncts.Cause map
+ * @tsplus pipeable fncts.Cause map
  */
-
-
-function map_1(self, f) {
-  return flatMap_1(self, e => fail_1(f(e), tsplus_module_8.none));
+function map_1(f) {
+  return self => {
+    return flatMap_1(e => fail_1(f(e), tsplus_module_8.none))(self);
+  };
 }
 /**
- * @tsplus fluent fncts.Cause mapTrace
+ * @tsplus pipeable fncts.Cause mapTrace
  */
-
-
-function mapTrace_1(self, f) {
-  return tsplus_module_13.fold_(self, {
-    Empty: () => empty_1(),
-    Fail: (e, trace) => fail_1(e, f(trace)),
-    Halt: (u, trace) => halt_1(u, f(trace)),
-    Interrupt: (id, trace) => interrupt_1(id, f(trace)),
-    Then: then_1,
-    Both: both_1,
-    Stackless: stackless_1
-  });
+function mapTrace_1(f) {
+  return self => {
+    return tsplus_module_13.fold({
+      Empty: () => empty_1(),
+      Fail: (e, trace) => fail_1(e, f(trace)),
+      Halt: (u, trace) => halt_1(u, f(trace)),
+      Interrupt: (id, trace) => interrupt_1(id, f(trace)),
+      Then: then_1,
+      Both: both_1,
+      Stackless: stackless_1
+    })(self);
+  };
 }
 /**
  * @tsplus static fncts.CauseOps stackless
  * @tsplus static fncts.Cause.StacklessOps __call
  */
-
-
 function stackless_1(cause, stackless) {
   return new _definition3.Stackless(cause, stackless);
 }
@@ -1108,10 +860,8 @@ function stackless_1(cause, stackless) {
  *
  * @tsplus getter fncts.Cause stripFailures
  */
-
-
 function stripFailures(self) {
-  return tsplus_module_13.fold_(self, {
+  return tsplus_module_13.fold({
     Empty: () => empty_1(),
     Fail: () => empty_1(),
     Halt: (u, trace) => halt_1(u, trace),
@@ -1119,94 +869,65 @@ function stripFailures(self) {
     Then: (l, r) => then_1(l, r),
     Both: (l, r) => both_1(l, r),
     Stackless: (c, stackless) => stackless_1(c, stackless)
-  });
+  })(self);
 }
 /**
  * Remove all `Halt` causes that the specified partial function is defined at,
  * returning `Just` with the remaining causes or `Nothing` if there are no
  * remaining causes.
  *
- * @tsplus fluent fncts.Cause stripSomeDefects
+ * @tsplus pipeable fncts.Cause stripSomeDefects
  */
-
-
-function stripSomeDefects(self, p) {
-  return tsplus_module_13.fold_(self, {
-    Empty: () => tsplus_module_5.just(empty_1()),
-    Fail: (e, trace) => tsplus_module_5.just(fail_1(e, trace)),
-    Halt: (t, trace) => p(t) ? tsplus_module_5.nothing() : tsplus_module_5.just(halt_1(t, trace)),
-    Interrupt: (fiberId, trace) => tsplus_module_5.just(interrupt_1(fiberId, trace)),
-    Then: (l, r) => tsplus_module_11.isJust(l) && tsplus_module_11.isJust(r) ? tsplus_module_5.just(then_1(l.value, r.value)) : tsplus_module_11.isJust(l) ? tsplus_module_5.just(l.value) : tsplus_module_11.isJust(r) ? tsplus_module_5.just(r.value) : tsplus_module_5.nothing(),
-    Both: (l, r) => tsplus_module_11.isJust(l) && tsplus_module_11.isJust(r) ? tsplus_module_5.just(then_1(l.value, r.value)) : tsplus_module_11.isJust(l) ? tsplus_module_5.just(l.value) : tsplus_module_11.isJust(r) ? tsplus_module_5.just(r.value) : tsplus_module_5.nothing(),
-    Stackless: (causeOption, stackless) => tsplus_module_12.map_(causeOption, cause => stackless_1(cause, stackless))
-  });
+function stripSomeDefects(p) {
+  return self => {
+    return tsplus_module_13.fold({
+      Empty: () => tsplus_module_5.just(empty_1()),
+      Fail: (e, trace) => tsplus_module_5.just(fail_1(e, trace)),
+      Halt: (t, trace) => p(t) ? tsplus_module_5.nothing() : tsplus_module_5.just(halt_1(t, trace)),
+      Interrupt: (fiberId, trace) => tsplus_module_5.just(interrupt_1(fiberId, trace)),
+      Then: (l, r) => tsplus_module_11.isJust(l) && tsplus_module_11.isJust(r) ? tsplus_module_5.just(then_1(l.value, r.value)) : tsplus_module_11.isJust(l) ? tsplus_module_5.just(l.value) : tsplus_module_11.isJust(r) ? tsplus_module_5.just(r.value) : tsplus_module_5.nothing(),
+      Both: (l, r) => tsplus_module_11.isJust(l) && tsplus_module_11.isJust(r) ? tsplus_module_5.just(then_1(l.value, r.value)) : tsplus_module_11.isJust(l) ? tsplus_module_5.just(l.value) : tsplus_module_11.isJust(r) ? tsplus_module_5.just(r.value) : tsplus_module_5.nothing(),
+      Stackless: (causeOption, stackless) => tsplus_module_12.map(cause => stackless_1(cause, stackless))(causeOption)
+    })(self);
+  };
 }
-
 function sequenceCauseEitherEval(self) {
   switch (self._tag) {
-    case "Empty"
-    /* CauseTag.Empty */
-    :
+    case "Empty" /* CauseTag.Empty */:
       {
         return tsplus_module_1.now(tsplus_module_10.left(empty_1()));
       }
-
-    case "Interrupt"
-    /* CauseTag.Interrupt */
-    :
+    case "Interrupt" /* CauseTag.Interrupt */:
       {
         return tsplus_module_1.now(tsplus_module_10.left(self));
       }
-
-    case "Fail"
-    /* CauseTag.Fail */
-    :
+    case "Fail" /* CauseTag.Fail */:
       {
-        return tsplus_module_1.now(tsplus_module_17.match_(self.value, e => tsplus_module_10.left(fail_1(e, tsplus_module_8.none)), a => tsplus_module_10.right(a)));
+        return tsplus_module_1.now(tsplus_module_17.match(e => tsplus_module_10.left(fail_1(e, tsplus_module_8.none)), a => tsplus_module_10.right(a))(self.value));
       }
-
-    case "Halt"
-    /* CauseTag.Halt */
-    :
+    case "Halt" /* CauseTag.Halt */:
       {
         return tsplus_module_1.now(tsplus_module_10.left(self));
       }
-
-    case "Then"
-    /* CauseTag.Then */
-    :
+    case "Then" /* CauseTag.Then */:
       {
-        return tsplus_module_2.zipWith_(tsplus_module_1.defer(() => sequenceCauseEitherEval(self.left)), tsplus_module_1.defer(() => sequenceCauseEitherEval(self.right)), (lefts, rights) => {
+        return tsplus_module_2.zipWith(tsplus_module_1.defer(() => sequenceCauseEitherEval(self.right)), (lefts, rights) => {
           void 0;
           void 0;
-          return lefts._tag === "Left"
-          /* EitherTag.Left */
-          ? rights._tag === "Right"
-          /* EitherTag.Right */
-          ? tsplus_module_10.right(rights.right) : tsplus_module_10.left(then_1(lefts.left, rights.left)) : tsplus_module_10.right(lefts.right);
-        });
+          return lefts._tag === "Left" /* EitherTag.Left */ ? rights._tag === "Right" /* EitherTag.Right */ ? tsplus_module_10.right(rights.right) : tsplus_module_10.left(then_1(lefts.left, rights.left)) : tsplus_module_10.right(lefts.right);
+        })(tsplus_module_1.defer(() => sequenceCauseEitherEval(self.left)));
       }
-
-    case "Both"
-    /* CauseTag.Both */
-    :
+    case "Both" /* CauseTag.Both */:
       {
-        return tsplus_module_2.zipWith_(tsplus_module_1.defer(() => sequenceCauseEitherEval(self.left)), tsplus_module_1.defer(() => sequenceCauseEitherEval(self.right)), (lefts, rights) => {
+        return tsplus_module_2.zipWith(tsplus_module_1.defer(() => sequenceCauseEitherEval(self.right)), (lefts, rights) => {
           void 0;
           void 0;
-          return lefts._tag === "Left"
-          /* EitherTag.Left */
-          ? rights._tag === "Right"
-          /* EitherTag.Right */
-          ? tsplus_module_10.right(rights.right) : tsplus_module_10.left(both_1(lefts.left, rights.left)) : tsplus_module_10.right(lefts.right);
-        });
+          return lefts._tag === "Left" /* EitherTag.Left */ ? rights._tag === "Right" /* EitherTag.Right */ ? tsplus_module_10.right(rights.right) : tsplus_module_10.left(both_1(lefts.left, rights.left)) : tsplus_module_10.right(lefts.right);
+        })(tsplus_module_1.defer(() => sequenceCauseEitherEval(self.left)));
       }
-
-    case "Stackless"
-    /* CauseTag.Stackless */
-    :
+    case "Stackless" /* CauseTag.Stackless */:
       {
-        return tsplus_module_2.map_(tsplus_module_1.defer(() => sequenceCauseEitherEval(self.cause)), _ => tsplus_module_18.mapLeft_(_, cause => stackless_1(cause, self.stackless)));
+        return tsplus_module_2.map(_ => tsplus_module_18.mapLeft(cause => stackless_1(cause, self.stackless))(_))(tsplus_module_1.defer(() => sequenceCauseEitherEval(self.cause)));
       }
   }
 }
@@ -1215,81 +936,46 @@ function sequenceCauseEitherEval(self) {
  *
  * @tsplus getter fncts.Cause sequenceCauseEither
  */
-
-
 function sequenceCauseEither(self) {
   return tsplus_module_4.run(sequenceCauseEitherEval(self));
 }
-
 function sequenceCauseMaybeEval(self) {
   switch (self._tag) {
-    case "Empty"
-    /* CauseTag.Empty */
-    :
+    case "Empty" /* CauseTag.Empty */:
       {
         return tsplus_module_1.now(tsplus_module_5.just(empty_1()));
       }
-
-    case "Interrupt"
-    /* CauseTag.Interrupt */
-    :
+    case "Interrupt" /* CauseTag.Interrupt */:
       {
         return tsplus_module_1.now(tsplus_module_5.just(self));
       }
-
-    case "Fail"
-    /* CauseTag.Fail */
-    :
+    case "Fail" /* CauseTag.Fail */:
       {
-        return tsplus_module_1.now(tsplus_module_12.map_(self.value, e => fail_1(e, tsplus_module_8.none)));
+        return tsplus_module_1.now(tsplus_module_12.map(e => fail_1(e, tsplus_module_8.none))(self.value));
       }
-
-    case "Halt"
-    /* CauseTag.Halt */
-    :
+    case "Halt" /* CauseTag.Halt */:
       {
         return tsplus_module_1.now(tsplus_module_5.just(self));
       }
-
-    case "Then"
-    /* CauseTag.Then */
-    :
+    case "Then" /* CauseTag.Then */:
       {
-        return tsplus_module_2.zipWith_(tsplus_module_1.defer(() => sequenceCauseMaybeEval(self.left)), tsplus_module_1.defer(() => sequenceCauseMaybeEval(self.right)), (lefts, rights) => {
+        return tsplus_module_2.zipWith(tsplus_module_1.defer(() => sequenceCauseMaybeEval(self.right)), (lefts, rights) => {
           void 0;
           void 0;
-          return lefts._tag === "Just"
-          /* MaybeTag.Just */
-          ? rights._tag === "Just"
-          /* MaybeTag.Just */
-          ? tsplus_module_5.just(then_1(lefts.value, rights.value)) : lefts : rights._tag === "Just"
-          /* MaybeTag.Just */
-          ? rights : tsplus_module_5.nothing();
-        });
+          return lefts._tag === "Just" /* MaybeTag.Just */ ? rights._tag === "Just" /* MaybeTag.Just */ ? tsplus_module_5.just(then_1(lefts.value, rights.value)) : lefts : rights._tag === "Just" /* MaybeTag.Just */ ? rights : tsplus_module_5.nothing();
+        })(tsplus_module_1.defer(() => sequenceCauseMaybeEval(self.left)));
       }
-
-    case "Both"
-    /* CauseTag.Both */
-    :
+    case "Both" /* CauseTag.Both */:
       {
-        return tsplus_module_2.zipWith_(tsplus_module_1.defer(() => sequenceCauseMaybeEval(self.left)), tsplus_module_1.defer(() => sequenceCauseMaybeEval(self.right)), (lefts, rights) => {
+        return tsplus_module_2.zipWith(tsplus_module_1.defer(() => sequenceCauseMaybeEval(self.right)), (lefts, rights) => {
           void 0;
           void 0;
-          return lefts._tag === "Just"
-          /* MaybeTag.Just */
-          ? rights._tag === "Just"
-          /* MaybeTag.Just */
-          ? tsplus_module_5.just(both_1(lefts.value, rights.value)) : lefts : rights._tag === "Just"
-          /* MaybeTag.Just */
-          ? rights : tsplus_module_5.nothing();
-        });
+          return lefts._tag === "Just" /* MaybeTag.Just */ ? rights._tag === "Just" /* MaybeTag.Just */ ? tsplus_module_5.just(both_1(lefts.value, rights.value)) : lefts : rights._tag === "Just" /* MaybeTag.Just */ ? rights : tsplus_module_5.nothing();
+        })(tsplus_module_1.defer(() => sequenceCauseMaybeEval(self.left)));
       }
-
-    case "Stackless"
-    /* CauseTag.Stackless */
-    :
+    case "Stackless" /* CauseTag.Stackless */:
       {
-        return tsplus_module_2.map_(tsplus_module_1.defer(() => sequenceCauseMaybeEval(self.cause)), _ => tsplus_module_12.map_(_, cause => stackless_1(cause, self.stackless)));
+        return tsplus_module_2.map(_ => tsplus_module_12.map(cause => stackless_1(cause, self.stackless))(_))(tsplus_module_1.defer(() => sequenceCauseMaybeEval(self.cause)));
       }
   }
 }
@@ -1298,8 +984,6 @@ function sequenceCauseMaybeEval(self) {
  *
  * @tsplus getter fncts.Cause sequenceCauseMaybe
  */
-
-
 function sequenceCauseMaybe(self) {
   return tsplus_module_4.run(sequenceCauseMaybeEval(self));
 }
@@ -1307,12 +991,12 @@ function sequenceCauseMaybe(self) {
  * Squashes a `Cause` down to a single `Error`, chosen to be the
  * "most important" `Error`.
  *
- * @tsplus fluent fncts.Cause squashWith
+ * @tsplus pipeable fncts.Cause squashWith
  */
-
-
-function squashWith_(self, f) {
-  return tsplus_module_12.getOrElse_(tsplus_module_12.orElse_(tsplus_module_12.orElse_(tsplus_module_12.map_(failureMaybe_1(self), f), () => isInterrupted_1(self) ? tsplus_module_5.just(new tsplus_module_20.InterruptedException("Interrupted by fibers: " + tsplus_module_19.join_(tsplus_module_19.mapDefault(tsplus_module_19.flatMapDefault(interruptors_1(self), id => tsplus_module_21.ids(id)), id => `#${id}`), ", "))) : tsplus_module_5.nothing()), () => tsplus_module_7.head(defects_1(self))), () => new tsplus_module_20.InterruptedException());
+function squashWith(f) {
+  return self => {
+    return tsplus_module_12.getOrElse(() => new tsplus_module_20.InterruptedException())(tsplus_module_12.orElse(() => tsplus_module_7.head(defects_1(self)))(tsplus_module_12.orElse(() => isInterrupted_1(self) ? tsplus_module_5.just(new tsplus_module_20.InterruptedException("Interrupted by fibers: " + tsplus_module_19.join(", ")(tsplus_module_19.map(id => `#${id}`)(tsplus_module_19.flatMap(id => tsplus_module_21.ids(id))(interruptors_1(self)))))) : tsplus_module_5.nothing())(tsplus_module_12.map(f)(failureMaybe_1(self)))));
+  };
 }
 /**
  * Constructs a `Cause` from two `Cause`s, representing sequential failures.
@@ -1322,8 +1006,6 @@ function squashWith_(self, f) {
  * @tsplus static fncts.CauseOps then
  * @tsplus static fncts.Cause.ThenOps __call
  */
-
-
 function then_1(left, right) {
   return tsplus_module_3.isEmpty(left) ? right : tsplus_module_3.isEmpty(right) ? left : new _definition3.Then(left, right);
 }
@@ -1335,19 +1017,15 @@ function then_1(left, right) {
  * @tsplus static fncts.CauseOps traced
  * @tsplus static fncts.Cause.TracedOps __call
  */
-
-
 function traced_1(cause, trace) {
-  return mapTrace_1(cause, t => tsplus_module_22.combine_(t, trace));
+  return mapTrace_1(t => tsplus_module_22.combine(trace)(t))(cause);
 }
 /**
  * Returns a `Cause` that has been stripped of all tracing information.
  *
  * @tsplus getter fncts.Cause untraced
  */
-
-
 function untraced(self) {
-  return mapTrace_1(self, () => tsplus_module_8.none);
+  return mapTrace_1(() => tsplus_module_8.none)(self);
 }
 //# sourceMappingURL=api.cjs.map