@fncts/base 0.0.19 → 0.0.21

package/_mjs/data/Cause/api.mjs

@@ -21,15 +21,15 @@ import * as tsplus_module_20 from "@fncts/base/data/exceptions";
 import * as tsplus_module_21 from "@fncts/base/data/FiberId/api";
 import * as tsplus_module_22 from "@fncts/base/data/Trace/api";
 export const both = both_1;
-export const flatMap_ = flatMap_1;
+export const flatMap = flatMap_1;
 export const defects = defects_1;
 export const empty = empty_1;
 export const fail = fail_1;
 export const failed = failed_1;
 export const failureTraceMaybe = failureTraceMaybe_1;
 export const failureMaybe = failureMaybe_1;
-export const find_ = find_1;
-export const foldLeft_ = foldLeft_1;
+export const find = find_1;
+export const foldLeft = foldLeft_1;
 export const halt = halt_1;
 export const halted = halted_1;
 export const haltMaybe = haltMaybe_1;
@@ -40,8 +40,8 @@ export const isInterrupt = isInterrupt_1;
 export const isInterrupted = isInterrupted_1;
 export const interruptOption = interruptOption_1;
 export const interruptors = interruptors_1;
-export const map_ = map_1;
-export const mapTrace_ = mapTrace_1;
+export const map = map_1;
+export const mapTrace = mapTrace_1;
 export const stackless = stackless_1;
 export const then = then_1;
 export const traced = traced_1;
@@ -49,11 +49,13 @@ import { Stack } from "../../internal/Stack.mjs";
 import { identity } from "../function.mjs";
 import { _Empty, Both, Empty, Fail, Halt, Interrupt, Stackless, Then } from "./definition.mjs";
 /**
- * @tsplus fluent fncts.Cause as
+ * @tsplus pipeable fncts.Cause as
  */
 
-export function as_(self, b) {
-  return map_1(self, () => b());
+export function as_(b) {
+  return self => {
+    return map_1(() => b())(self);
+  };
 }
 /**
  * @internal
@@ -84,12 +86,12 @@ function chainEval(self, f) {
     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);
+      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.left, f)), tsplus_module_1.defer(() => chainEval(self.right, f)), both_1);
+      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 */
@@ -113,22 +115,26 @@ function both_1(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
  */
 
 
-export function contains_(self, that) {
-  return tsplus_module_4.run(containsEval(self, that));
+export function contains(that) {
+  return self => {
+    return tsplus_module_4.run(containsEval(self, that));
+  };
 }
 /**
  * @internal
@@ -140,7 +146,7 @@ function containsEval(self, 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));
   });
 }
 /**
@@ -151,7 +157,7 @@ function containsEval(self, that) {
 
 
 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`
@@ -183,7 +189,7 @@ function fail_1(value, trace = tsplus_module_8.none) {
 
 
 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`.
@@ -193,7 +199,7 @@ function failed_1(self) {
 
 
 export 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,
@@ -204,7 +210,7 @@ export function failures(self) {
  */
 
 export 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
@@ -214,7 +220,7 @@ export function failureOrCause(self) {
  */
 
 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,
@@ -226,7 +232,7 @@ function failureTraceMaybe_1(self) {
 
 
 export 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.
@@ -235,49 +241,51 @@ export function failureTraceOrCause(self) {
  */
 
 function failureMaybe_1(self) {
-  return find_1(self, c => c._tag === "Fail"
+  return find_1(c => c._tag === "Fail"
   /* CauseTag.Fail */
-  ? tsplus_module_5.just(c.value) : tsplus_module_5.nothing());
+  ? 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
  */
 
 
-export 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))
-  });
+export 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
@@ -310,7 +318,7 @@ function findLoop(self, f, stack) {
               {
                 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;
@@ -346,12 +354,14 @@ 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
@@ -359,7 +369,7 @@ function find_1(self, f) {
 
 
 export function flatten(self) {
-  return flatMap_1(self, identity);
+  return flatMap_1(identity)(self);
 }
 
 class FCEStackFrameDone {
@@ -411,7 +421,7 @@ class FCEStackFrameBothRight {
 
 
 export function flipCauseEither(self) {
-  const stack = tsplus_module_16.mkStack();
+  const stack = tsplus_module_16.makeStack();
   stack.push(new FCEStackFrameDone());
   let result;
   let c = self;
@@ -441,7 +451,7 @@ export function flipCauseEither(self) {
         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));
+          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"
@@ -571,7 +581,7 @@ class FCOStackFrameBothRight {
 
 
 export function flipCauseOption(self) {
-  const stack = tsplus_module_16.mkStack();
+  const stack = tsplus_module_16.makeStack();
   stack.push(new FCOStackFrameDone());
   let result;
   let c = self;
@@ -601,7 +611,7 @@ export function flipCauseOption(self) {
         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)));
+          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"
@@ -686,11 +696,13 @@ export function flipCauseOption(self) {
 /**
  * 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
@@ -709,7 +721,7 @@ function foldLeftLoop(self, b, f, stack) {
       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"
@@ -722,7 +734,7 @@ function foldLeftLoop(self, b, f, stack) {
           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;
@@ -768,7 +780,7 @@ function halt_1(value, trace = tsplus_module_8.none) {
 
 
 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.
@@ -778,9 +790,9 @@ function halted_1(self) {
 
 
 function haltMaybe_1(self) {
-  return find_1(self, c => c._tag === "Halt"
+  return find_1(c => c._tag === "Halt"
   /* CauseTag.Halt */
-  ? tsplus_module_5.just(c.value) : tsplus_module_5.nothing());
+  ? tsplus_module_5.just(c.value) : tsplus_module_5.nothing())(self);
 }
 /**
  * Constructs a `Cause` from an `Id`, representing an interruption of asynchronous computation
@@ -857,7 +869,7 @@ function isInterrupt_1(self) {
 
 
 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`
@@ -867,7 +879,7 @@ function isInterrupted_1(self) {
 
 
 export 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 */
@@ -883,7 +895,7 @@ export function isTraced(self) {
       default:
         return tsplus_module_5.nothing();
     }
-  }));
+  })(self));
 }
 /**
  * Determines whether the `Cause` contains an interruption
@@ -892,7 +904,7 @@ export function isTraced(self) {
  */
 
 export 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.
@@ -901,9 +913,9 @@ export function interrupted(self) {
  */
 
 function interruptOption_1(self) {
-  return find_1(self, c => c._tag === "Interrupt"
+  return find_1(c => c._tag === "Interrupt"
   /* CauseTag.Interrupt */
-  ? tsplus_module_5.just(c.id) : tsplus_module_5.nothing());
+  ? tsplus_module_5.just(c.id) : tsplus_module_5.nothing())(self);
 }
 /**
  * Returns a set of interruptors, fibers that interrupted the fiber described
@@ -914,9 +926,9 @@ function interruptOption_1(self) {
 
 
 function interruptors_1(self) {
-  return foldLeft_1(self, tsplus_module_19.makeDefault(), (s, c) => c._tag === "Interrupt"
+  return foldLeft_1(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());
+  ? 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
@@ -927,7 +939,7 @@ function interruptors_1(self) {
 
 
 export 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`,
@@ -937,7 +949,7 @@ export function interruptedOnly(self) {
  */
 
 export 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)),
@@ -964,31 +976,35 @@ export 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
@@ -1007,7 +1023,7 @@ function stackless_1(cause, stackless) {
 
 
 export 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),
@@ -1015,26 +1031,28 @@ export 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
  */
 
-export 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))
-  });
+export 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) {
@@ -1057,7 +1075,7 @@ function sequenceCauseEitherEval(self) {
     /* 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"
@@ -1071,7 +1089,7 @@ function sequenceCauseEitherEval(self) {
     /* 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"
@@ -1079,14 +1097,14 @@ function sequenceCauseEitherEval(self) {
           ? 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 */
     :
       {
-        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"
@@ -1094,14 +1112,14 @@ function sequenceCauseEitherEval(self) {
           ? 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 */
     :
       {
-        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)));
       }
   }
 }
@@ -1136,7 +1154,7 @@ function sequenceCauseMaybeEval(self) {
     /* 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"
@@ -1150,7 +1168,7 @@ function sequenceCauseMaybeEval(self) {
     /* 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"
@@ -1160,14 +1178,14 @@ function sequenceCauseMaybeEval(self) {
           ? 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 */
     :
       {
-        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"
@@ -1177,14 +1195,14 @@ function sequenceCauseMaybeEval(self) {
           ? 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 */
     :
       {
-        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)));
       }
   }
 }
@@ -1202,11 +1220,13 @@ export 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
  */
 
-export 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());
+export 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.mapDefault(id => `#${id}`)(tsplus_module_19.flatMapDefault(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.
@@ -1231,7 +1251,7 @@ function then_1(left, right) {
 
 
 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.
@@ -1241,6 +1261,6 @@ function traced_1(cause, trace) {
 
 
 export function untraced(self) {
-  return mapTrace_1(self, () => tsplus_module_8.none);
+  return mapTrace_1(() => tsplus_module_8.none)(self);
 }
 //# sourceMappingURL=api.mjs.map