@fncts/io 0.0.20 → 0.0.22

package/_cjs/STM/api.cjs

@@ -4,31 +4,31 @@ Object.defineProperty(exports, "__esModule", {
   value: true
 });
 exports.absolve = absolve;
+exports.as = void 0;
 exports.asJust = asJust;
 exports.asJustError = asJustError;
-exports.atomically = exports.as_ = void 0;
-exports.bimap_ = bimap_;
-exports.catchJust_ = catchJust_;
-exports.catchTag_ = catchTag_;
-exports.catch_ = catch_;
-exports.chainError_ = chainError_;
+exports.atomically = void 0;
+exports.bimap = bimap;
+exports.catchJust = catchJust;
+exports.catchTag = catchTag;
+exports.catchWith = catchWith;
+exports.chainError = chainError;
 exports.check = check;
 exports.commitEither = commitEither;
-exports.continueOrFailSTM_ = void 0;
-exports.continueOrFail_ = continueOrFail_;
-exports.continueOrRetrySTM_ = void 0;
-exports.continueOrRetry_ = continueOrRetry_;
-exports.environment = exports.either = exports.defer = exports.contramapEnvironment_ = void 0;
+exports.continueOrFail = continueOrFail;
+exports.continueOrFailSTM = void 0;
+exports.continueOrRetry = continueOrRetry;
+exports.environment = exports.either = exports.defer = exports.contramapEnvironment = exports.continueOrRetrySTM = void 0;
 exports.environmentWith = environmentWith;
 exports.environmentWithSTM = environmentWithSTM;
-exports.filterMapSTM_ = exports.eventually = void 0;
-exports.filterMap_ = filterMap_;
-exports.filterOrElse_ = void 0;
-exports.filterOrFail_ = filterOrFail_;
-exports.filterOrHalt_ = filterOrHalt_;
+exports.eventually = void 0;
+exports.filterMap = filterMap;
+exports.filterOrElse = exports.filterMapSTM = void 0;
+exports.filterOrFail = filterOrFail;
+exports.filterOrHalt = filterOrHalt;
 exports.flatten = void 0;
-exports.flattenErrorOption_ = flattenErrorOption_;
-exports.foreach_ = foreach_;
+exports.flattenErrorOption = flattenErrorOption;
+exports.foreach = foreach;
 exports.fromEither = fromEither;
 exports.fromEitherNow = void 0;
 exports.get = get;
@@ -39,126 +39,103 @@ exports.interrupt = void 0;
 exports.isFailure = isFailure;
 exports.isSuccess = isSuccess;
 exports.left = left;
-exports.leftOrFail_ = leftOrFail_;
+exports.leftOrFail = leftOrFail;
 exports.makeEffect = makeEffect;
-exports.match_ = exports.mapError_ = void 0;
-exports.provideEnvironment_ = provideEnvironment_;
-exports.swapWith_ = exports.swap = exports.repeatWhile_ = exports.repeatUntil_ = void 0;
-exports.tap_ = tap_;
+exports.match = exports.mapError = void 0;
+exports.provideEnvironment = provideEnvironment;
+exports.swapWith = exports.swap = exports.repeatWhile = exports.repeatUntil = void 0;
+exports.tap = tap;
 exports.toLeft = toLeft;
-exports.zipWith_ = exports.unit = void 0;
-
+exports.zipWith = exports.unit = void 0;
 var tsplus_module_1 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/io/STM/api/core-api"));
-
 var tsplus_module_2 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Maybe/constructors"));
-
 var tsplus_module_3 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/io/IO/api"));
-
 var tsplus_module_4 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/io/TxnId"));
-
 var tsplus_module_5 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/io/STM/internal/CommitState"));
-
 var tsplus_module_6 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/io/IO/api/interrupt"));
-
 var tsplus_module_7 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/io/FiberRef/unsafe"));
-
 var tsplus_module_8 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/io/FiberRef/api"));
-
 var tsplus_module_9 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/io/IO/api/environment"));
-
 var tsplus_module_10 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/io/STM/api/core-constructors"));
-
-var tsplus_module_11 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Maybe/api"));
-
-var tsplus_module_12 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Either/constructors"));
-
-var tsplus_module_13 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Either/destructors"));
-
-var tsplus_module_14 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Maybe/destructors"));
-
+var tsplus_module_11 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/util/predicates"));
+var tsplus_module_12 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Maybe/api"));
+var tsplus_module_13 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Either/constructors"));
+var tsplus_module_14 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Either/destructors"));
+var tsplus_module_15 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Maybe/destructors"));
 var _function = /*#__PURE__*/require("@fncts/base/data/function");
-
 var _AtomicReference = /*#__PURE__*/require("@fncts/base/internal/AtomicReference");
-
 var _definition = /*#__PURE__*/require("./definition.cjs");
-
 var _Journal = /*#__PURE__*/require("./internal/Journal.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 fileName_1 = "(@fncts/io) src/STM/api.ts";
-const as_ = as_1;
-exports.as_ = as_;
+const as = as_1;
+exports.as = as;
 const environment = environment_1;
 exports.environment = environment;
 const atomically = atomically_1;
 exports.atomically = atomically;
-const continueOrFailSTM_ = continueOrFailSTM_1;
-exports.continueOrFailSTM_ = continueOrFailSTM_;
-const continueOrRetrySTM_ = continueOrRetrySTM_1;
-exports.continueOrRetrySTM_ = continueOrRetrySTM_;
+const continueOrFailSTM = continueOrFailSTM_1;
+exports.continueOrFailSTM = continueOrFailSTM;
+const continueOrRetrySTM = continueOrRetrySTM_1;
+exports.continueOrRetrySTM = continueOrRetrySTM;
 const defer = defer_1;
 exports.defer = defer;
 const either = either_1;
 exports.either = either;
 const eventually = eventually_1;
 exports.eventually = eventually;
-const filterMapSTM_ = filterMapSTM_1;
-exports.filterMapSTM_ = filterMapSTM_;
-const filterOrElse_ = filterOrElse_1;
-exports.filterOrElse_ = filterOrElse_;
+const filterMapSTM = filterMapSTM_1;
+exports.filterMapSTM = filterMapSTM;
+const filterOrElse = filterOrElse_1;
+exports.filterOrElse = filterOrElse;
 const flatten = flatten_1;
 exports.flatten = flatten;
 const fromEitherNow = fromEitherNow_1;
 exports.fromEitherNow = fromEitherNow;
-const contramapEnvironment_ = contramapEnvironment_1;
-exports.contramapEnvironment_ = contramapEnvironment_;
+const contramapEnvironment = contramapEnvironment_1;
+exports.contramapEnvironment = contramapEnvironment;
 const halt = halt_1;
 exports.halt = halt;
-const mapError_ = mapError_1;
-exports.mapError_ = mapError_;
-const match_ = match_1;
-exports.match_ = match_;
-const repeatUntil_ = repeatUntil_1;
-exports.repeatUntil_ = repeatUntil_;
-const repeatWhile_ = repeatWhile_1;
-exports.repeatWhile_ = repeatWhile_;
+const mapError = mapError_1;
+exports.mapError = mapError;
+const match = match_1;
+exports.match = match;
+const repeatUntil = repeatUntil_1;
+exports.repeatUntil = repeatUntil;
+const repeatWhile = repeatWhile_1;
+exports.repeatWhile = repeatWhile;
 const swap = swap_1;
 exports.swap = swap;
-const swapWith_ = swapWith_1;
-exports.swapWith_ = swapWith_;
-const zipWith_ = zipWith_1;
-exports.zipWith_ = zipWith_;
-
+const swapWith = swapWith_1;
+exports.swapWith = swapWith;
+const zipWith = zipWith_1;
+exports.zipWith = zipWith;
 /**
  * Maps the success value of this effect to the specified constant value.
  *
- * @tsplus fluent fncts.io.STM as
+ * @tsplus pipeable fncts.io.STM as
  */
-function as_1(stm, b, __tsplusTrace) {
-  return tsplus_module_1.map_(stm, () => b(), __tsplusTrace);
+function as_1(b, __tsplusTrace) {
+  return stm => {
+    return tsplus_module_1.map(() => b(), __tsplusTrace)(stm);
+  };
 }
 /**
  * Maps the success value of this effect to an optional value.
  *
  * @tsplus getter fncts.io.STM asJust
  */
-
-
 function asJust(stm, __tsplusTrace) {
-  return tsplus_module_1.map_(stm, tsplus_module_2.just, __tsplusTrace);
+  return tsplus_module_1.map(tsplus_module_2.just, __tsplusTrace)(stm);
 }
 /**
  * Maps the error value of this effect to an optional value.
  *
  * @tsplus getter fncts.io.STM asJustError
  */
-
-
 function asJustError(stm, __tsplusTrace) {
-  return mapError_1(stm, tsplus_module_2.just, __tsplusTrace);
+  return mapError_1(tsplus_module_2.just, __tsplusTrace)(stm);
 }
 /**
  * Submerges the error case of an `Either` into the `STM`. The inverse
@@ -166,16 +143,12 @@ function asJustError(stm, __tsplusTrace) {
  *
  * @tsplus getter fncts.io.STM absolve
  */
-
-
 function absolve(z, __tsplusTrace) {
-  return tsplus_module_1.flatMap_(z, fromEitherNow_1, __tsplusTrace);
+  return tsplus_module_1.flatMap(fromEitherNow_1, __tsplusTrace)(z);
 }
 /**
  * @tsplus static fncts.io.STMOps Effect
  */
-
-
 function makeEffect(f, __tsplusTrace) {
   return new _definition.Effect(f);
 }
@@ -184,8 +157,6 @@ function makeEffect(f, __tsplusTrace) {
  *
  * @tsplus static fncts.io.STMOps environment
  */
-
-
 function environment_1(__tsplusTrace) {
   return new _definition.Effect((_, __, r) => r);
 }
@@ -194,137 +165,119 @@ function environment_1(__tsplusTrace) {
  *
  * @tsplus static fncts.io.STMOps environmentWith
  */
-
-
 function environmentWith(f, __tsplusTrace) {
-  return tsplus_module_1.map_(environment_1(__tsplusTrace), f, __tsplusTrace);
+  return tsplus_module_1.map(f, __tsplusTrace)(environment_1(__tsplusTrace));
 }
 /**
  * Accesses the environment of the transaction to perform a transaction.
  *
  * @tsplus static fncts.io.STMOps environmentWithSTM
  */
-
-
 function environmentWithSTM(f, __tsplusTrace) {
-  return tsplus_module_1.flatMap_(environment_1(__tsplusTrace), f, __tsplusTrace);
+  return tsplus_module_1.flatMap(f, __tsplusTrace)(environment_1(__tsplusTrace));
 }
 /**
  * @tsplus static fncts.io.STMOps atomically
  * @tsplus getter fncts.io.STM commit
  */
-
-
 function atomically_1(stm, __tsplusTrace) {
-  return tsplus_module_9.environmentWithIO(r => tsplus_module_8.getWith_(tsplus_module_7.currentScheduler, scheduler => tsplus_module_3.deferWith((_, fiberId) => {
+  return tsplus_module_9.environmentWithIO(r => tsplus_module_8.getWith(scheduler => tsplus_module_3.flatMap(fiberId => {
     const result = (0, _Journal.tryCommitSync)(fiberId, stm, r, scheduler);
-
     switch (result._tag) {
-      case "Done"
-      /* TryCommitTag.Done */
-      :
+      case "Done" /* TryCommitTag.Done */:
         {
           return tsplus_module_3.fromExitNow(result.exit, __tsplusTrace);
         }
-
-      case "Suspend"
-      /* TryCommitTag.Suspend */
-      :
+      case "Suspend" /* TryCommitTag.Suspend */:
         {
           const id = tsplus_module_4.make();
           const state = new _AtomicReference.AtomicReference(tsplus_module_5.Running);
           const async = tsplus_module_3.async((0, _Journal.tryCommitAsync)(result.journal, fiberId, stm, id, state, r, scheduler));
           return tsplus_module_6.uninterruptibleMask(({
             restore
-          }) => tsplus_module_3.catchAllCause_(restore(async), cause => {
+          }) => tsplus_module_3.catchAllCause(cause => {
             state.compareAndSet(tsplus_module_5.Running, tsplus_module_5.Interrupted);
             const newState = state.get;
-
             switch (newState._tag) {
               case "Done":
                 {
                   return tsplus_module_3.fromExitNow(newState.exit, __tsplusTrace);
                 }
-
               default:
                 {
                   return tsplus_module_3.failCauseNow(cause, __tsplusTrace);
                 }
             }
-          }, __tsplusTrace), __tsplusTrace);
+          }, __tsplusTrace)(restore(async)));
         }
     }
-  }, __tsplusTrace), __tsplusTrace), __tsplusTrace);
+  }, __tsplusTrace)(tsplus_module_3.fiberId), __tsplusTrace)(tsplus_module_7.currentScheduler), __tsplusTrace);
 }
 /**
  * Returns an `STM` effect whose failure and success channels have been mapped by
  * the specified pair of functions, `f` and `g`.
+ *
+ * @tsplus pipeable fncts.io.STM bimap
  */
-
-
-function bimap_(stm, g, f, __tsplusTrace) {
-  return tsplus_module_1.matchSTM_(stm, e => tsplus_module_10.failNow(g(e), __tsplusTrace), a => tsplus_module_10.succeedNow(f(a), __tsplusTrace), __tsplusTrace);
+function bimap(g, f, __tsplusTrace) {
+  return self => tsplus_module_1.matchSTM(e => tsplus_module_10.failNow(g(e), __tsplusTrace), a => tsplus_module_10.succeedNow(f(a), __tsplusTrace), __tsplusTrace)(self);
 }
 /**
  * Recovers from specified error.
  *
- * @tsplus fluent fncts.io.STM catch
+ * @tsplus pipeable fncts.io.STM catch
  */
-
-
-function catch_(stm, tag, k, f, __tsplusTrace) {
-  return tsplus_module_1.catchAll_(stm, e => {
-    if (tag in e && e[tag] === k) {
-      return f(e);
-    }
-
-    return tsplus_module_10.failNow(e, __tsplusTrace);
-  }, __tsplusTrace);
+function catchWith(tag, k, f, __tsplusTrace) {
+  return stm => {
+    return tsplus_module_1.catchAll(e => {
+      if (tsplus_module_11.isObject(e) && tag in e && e[tag] === k) {
+        return f(e);
+      }
+      return tsplus_module_10.failNow(e, __tsplusTrace);
+    }, __tsplusTrace)(stm);
+  };
 }
 /**
  * Recovers from some or all of the error cases.
  *
- * @tsplus fluent fncts.io.STM catchJust
+ * @tsplus pipeable fncts.io.STM catchJust
  */
-
-
-function catchJust_(stm, f, __tsplusTrace) {
-  return tsplus_module_1.catchAll_(stm, e => tsplus_module_11.getOrElse_(f(e), () => tsplus_module_10.failNow(e, __tsplusTrace)), __tsplusTrace);
+function catchJust(f, __tsplusTrace) {
+  return stm => {
+    return tsplus_module_1.catchAll(e => tsplus_module_12.getOrElse(() => tsplus_module_10.failNow(e, __tsplusTrace))(f(e)), __tsplusTrace)(stm);
+  };
 }
 /**
  * Recovers from specified error.
  *
- * @tsplus fluent fncts.io.STM catchTag
+ * @tsplus pipeable fncts.io.STM catchTag
  */
-
-
-function catchTag_(stm, k, f, __tsplusTrace) {
-  return tsplus_module_1.catchAll_(stm, e => {
-    if ("_tag" in e && e["_tag"] === k) {
-      return f(e);
-    }
-
-    return tsplus_module_10.failNow(e, __tsplusTrace);
-  }, __tsplusTrace);
+function catchTag(k, f, __tsplusTrace) {
+  return stm => {
+    return tsplus_module_1.catchAll(e => {
+      if ("_tag" in e && e["_tag"] === k) {
+        return f(e);
+      }
+      return tsplus_module_10.failNow(e, __tsplusTrace);
+    }, __tsplusTrace)(stm);
+  };
 }
 /**
  * Creates a composite effect that represents this effect followed by another
  * one that may depend on the error produced by this one.
  *
- * @tsplus fluent fncts.io.STM flatMapError
+ * @tsplus pipeable fncts.io.STM flatMapError
  */
-
-
-function chainError_(stm, f, __tsplusTrace) {
-  return swapWith_1(stm, effect => tsplus_module_1.flatMap_(effect, f, __tsplusTrace), __tsplusTrace);
+function chainError(f, __tsplusTrace) {
+  return stm => {
+    return swapWith_1(effect => tsplus_module_1.flatMap(f, __tsplusTrace)(effect), __tsplusTrace)(stm);
+  };
 }
 /**
  * Checks the condition, and if it's true, returns unit, otherwise, retries.
  *
  * @tsplus static fncts.io.STMOps check
  */
-
-
 function check(predicate, __tsplusTrace) {
   return defer_1(() => predicate() ? unit_1 : tsplus_module_10.retry, __tsplusTrace);
 }
@@ -332,8 +285,6 @@ function check(predicate, __tsplusTrace) {
  * Commits this transaction atomically, regardless of whether the transaction
  * is a success or a failure.
  */
-
-
 function commitEither(stm, __tsplusTrace) {
   return tsplus_module_3.absolve(atomically_1(either_1(stm, __tsplusTrace), __tsplusTrace), __tsplusTrace);
 }
@@ -341,53 +292,51 @@ function commitEither(stm, __tsplusTrace) {
  * Fail with `e` if the supplied `PartialFunction` does not match, otherwise
  * succeed with the returned value.
  *
- * @tsplus fluent fncts.io.STM continueOrFail
+ * @tsplus pipeable fncts.io.STM continueOrFail
  */
-
-
-function continueOrFail_(fa, e, pf, __tsplusTrace) {
-  return continueOrFailSTM_1(fa, e, a => tsplus_module_11.map_(pf(a), tsplus_module_10.succeedNow), __tsplusTrace);
+function continueOrFail(e, pf, __tsplusTrace) {
+  return fa => {
+    return continueOrFailSTM_1(e, a => tsplus_module_12.map(tsplus_module_10.succeedNow)(pf(a)), __tsplusTrace)(fa);
+  };
 }
 /**
  * Fail with `e` if the supplied `PartialFunction` does not match, otherwise
  * continue with the returned value.
  *
- * @tsplus fluent fncts.io.STM continueOrFailSTM
+ * @tsplus pipeable fncts.io.STM continueOrFailSTM
  */
-
-
-function continueOrFailSTM_1(fa, e, pf, __tsplusTrace) {
-  return tsplus_module_1.flatMap_(fa, a => tsplus_module_11.getOrElse_(pf(a), () => tsplus_module_10.fail(e, __tsplusTrace)), __tsplusTrace);
+function continueOrFailSTM_1(e, pf, __tsplusTrace) {
+  return fa => {
+    return tsplus_module_1.flatMap(a => tsplus_module_12.getOrElse(() => tsplus_module_10.fail(e, __tsplusTrace))(pf(a)), __tsplusTrace)(fa);
+  };
 }
 /**
  * Fail with `e` if the supplied `PartialFunction` does not match, otherwise
  * succeed with the returned value.
  *
- * @tsplus fluent fncts.io.STM continueOrRetry
+ * @tsplus pipeable fncts.io.STM continueOrRetry
  */
-
-
-function continueOrRetry_(fa, pf, __tsplusTrace) {
-  return continueOrRetrySTM_1(fa, a => tsplus_module_11.map_(pf(a), tsplus_module_10.succeedNow), __tsplusTrace);
+function continueOrRetry(pf, __tsplusTrace) {
+  return fa => {
+    return continueOrRetrySTM_1(a => tsplus_module_12.map(tsplus_module_10.succeedNow)(pf(a)), __tsplusTrace)(fa);
+  };
 }
 /**
  * Simultaneously filters and flatMaps the value produced by this effect.
  * Continues on the effect returned from pf.
  *
- * @tsplus fluent fncts.io.STM continueOrRetrySTM
+ * @tsplus pipeable fncts.io.STM continueOrRetrySTM
  */
-
-
-function continueOrRetrySTM_1(fa, pf, __tsplusTrace) {
-  return tsplus_module_1.flatMap_(fa, a => tsplus_module_11.getOrElse_(pf(a), () => tsplus_module_10.retry), __tsplusTrace);
+function continueOrRetrySTM_1(pf, __tsplusTrace) {
+  return fa => {
+    return tsplus_module_1.flatMap(a => tsplus_module_12.getOrElse(() => tsplus_module_10.retry)(pf(a)), __tsplusTrace)(fa);
+  };
 }
 /**
  * Suspends creation of the specified transaction lazily.
  *
  * @tsplus static fncts.io.STMOps defer
  */
-
-
 function defer_1(make, __tsplusTrace) {
   return flatten_1(tsplus_module_10.succeed(make, __tsplusTrace), __tsplusTrace);
 }
@@ -396,73 +345,70 @@ function defer_1(make, __tsplusTrace) {
  *
  * @tsplus getter fncts.io.STM either
  */
-
-
 function either_1(stm, __tsplusTrace) {
-  return match_1(stm, tsplus_module_12.left, tsplus_module_12.right, __tsplusTrace);
+  return match_1(tsplus_module_13.left, tsplus_module_13.right, __tsplusTrace)(stm);
 }
 /**
  * Returns an effect that ignores errors and runs repeatedly until it eventually succeeds.
  *
  * @tsplus getter fncts.io.STM eventually
  */
-
-
 function eventually_1(stm, __tsplusTrace) {
-  return tsplus_module_1.matchSTM_(stm, () => eventually_1(stm, __tsplusTrace), tsplus_module_10.succeedNow, __tsplusTrace);
+  return tsplus_module_1.matchSTM(() => eventually_1(stm, __tsplusTrace), tsplus_module_10.succeedNow, __tsplusTrace)(stm);
 }
 /**
  * Simultaneously filters and maps the value produced by this effect.
  *
- * @tsplus fluent fncts.io.STM filterMap
+ * @tsplus pipeable fncts.io.STM filterMap
  */
-
-
-function filterMap_(stm, f, __tsplusTrace) {
-  return filterMapSTM_1(stm, a => tsplus_module_11.map_(f(a), tsplus_module_10.succeedNow), __tsplusTrace);
+function filterMap(f, __tsplusTrace) {
+  return stm => {
+    return filterMapSTM_1(a => tsplus_module_12.map(tsplus_module_10.succeedNow)(f(a)), __tsplusTrace)(stm);
+  };
 }
 /**
  * Simultaneously filters and chains the value produced by this effect.
  * Continues on the effect returned from f.
  *
- * @tsplus fluent fncts.io.STM filterMapSTM
+ * @tsplus pipeable fncts.io.STM filterMapSTM
  */
-
-
-function filterMapSTM_1(self, f, __tsplusTrace) {
-  return tsplus_module_1.matchSTM_(self, tsplus_module_10.failNow, a => tsplus_module_11.getOrElse_(f(a), () => tsplus_module_10.retry), __tsplusTrace);
+function filterMapSTM_1(f, __tsplusTrace) {
+  return self => {
+    return tsplus_module_1.matchSTM(tsplus_module_10.failNow, a => tsplus_module_12.getOrElse(() => tsplus_module_10.retry)(f(a)), __tsplusTrace)(self);
+  };
 }
-
-function filterOrElse_1(fa, p, or, __tsplusTrace) {
-  return tsplus_module_1.flatMap_(fa, a => p(a) ? tsplus_module_10.succeedNow(a, __tsplusTrace) : defer_1(() => or(a), __tsplusTrace), __tsplusTrace);
+function filterOrElse_1(p, or, __tsplusTrace) {
+  return fa => {
+    return tsplus_module_1.flatMap(a => p(a) ? tsplus_module_10.succeedNow(a, __tsplusTrace) : defer_1(() => or(a), __tsplusTrace), __tsplusTrace)(fa);
+  };
 }
-
-function filterOrFail_(fa, p, failWith, __tsplusTrace) {
-  return filterOrElse_1(fa, p, a => tsplus_module_10.fail(() => failWith(a), __tsplusTrace));
+function filterOrFail(p, failWith, __tsplusTrace) {
+  return fa => {
+    return filterOrElse_1(p, a => tsplus_module_10.fail(() => failWith(a), __tsplusTrace))(fa);
+  };
 }
-
-function filterOrHalt_(fa, p, haltWith, __tsplusTrace) {
-  return filterOrElse_1(fa, p, a => halt_1(() => haltWith(a), __tsplusTrace));
+function filterOrHalt(p, haltWith, __tsplusTrace) {
+  return fa => {
+    return filterOrElse_1(p, a => halt_1(() => haltWith(a), __tsplusTrace))(fa);
+  };
 }
 /**
  * Flattens out a nested `STM` effect.
  *
  * @tsplus getter fncts.io.STM flatten
  */
-
-
 function flatten_1(stm, __tsplusTrace) {
-  return tsplus_module_1.flatMap_(stm, _function.identity, __tsplusTrace);
+  return tsplus_module_1.flatMap(_function.identity, __tsplusTrace)(stm);
 }
 /**
  * Unwraps the optional error, defaulting to the provided value.
  *
- * @tsplus fluent fncts.io.STM flattenErrorOption
+ * @tsplus pipeable fncts.io.STM flattenErrorOption
  */
-
-
-function flattenErrorOption_(stm, def, __tsplusTrace) {
-  return mapError_1(stm, me => tsplus_module_11.getOrElse_(me, def), __tsplusTrace);
+function flattenErrorOption(def, __tsplusTrace) {
+  return stm => {
+    return mapError_1(me => tsplus_module_12.getOrElse(def)(me), __tsplusTrace)(stm);
+  };
 }
 /**
  * Applies the function `f` to each element of the `Iterable<A>` and
@@ -470,19 +416,15 @@ function flattenErrorOption_(stm, def, __tsplusTrace) {
  *
  * @tsplus static fncts.io.STMOps foreach
  */
-
-
-function foreach_(it, f, __tsplusTrace) {
+function foreach(it, f, __tsplusTrace) {
   return defer_1(() => {
     let stm = tsplus_module_10.succeedNow([], __tsplusTrace);
-
     for (const a of it) {
-      stm = zipWith_1(stm, f(a), (acc, b) => {
+      stm = zipWith_1(f(a), (acc, b) => {
         acc.push(b);
         return acc;
-      }, __tsplusTrace);
+      }, __tsplusTrace)(stm);
     }
-
     return stm;
   }, __tsplusTrace);
 }
@@ -491,58 +433,50 @@ function foreach_(it, f, __tsplusTrace) {
  *
  * @tsplus static fncts.io.STMOps fromEither
  */
-
-
 function fromEither(e, __tsplusTrace) {
-  return defer_1(() => tsplus_module_13.match_(e(), tsplus_module_10.failNow, tsplus_module_10.succeedNow), __tsplusTrace);
+  return defer_1(() => tsplus_module_14.match(tsplus_module_10.failNow, tsplus_module_10.succeedNow)(e()), __tsplusTrace);
 }
 /**
  * Lifts an `Either` into a `STM`.
  *
  * @tsplus static fncts.io.STMOps fromEitherNow
  */
-
-
 function fromEitherNow_1(e, __tsplusTrace) {
-  return tsplus_module_13.match_(e, tsplus_module_10.failNow, tsplus_module_10.succeedNow);
+  return tsplus_module_14.match(tsplus_module_10.failNow, tsplus_module_10.succeedNow)(e);
 }
 /**
  * Unwraps the optional success of this effect, but can fail with an None value.
  */
-
-
 function get(stm, __tsplusTrace) {
-  return tsplus_module_1.matchSTM_(stm, e => tsplus_module_10.failNow(tsplus_module_2.just(e), __tsplusTrace), ma => tsplus_module_14.match_(ma, () => tsplus_module_10.failNow(tsplus_module_2.nothing(), __tsplusTrace), tsplus_module_10.succeedNow), __tsplusTrace);
+  return tsplus_module_1.matchSTM(e => tsplus_module_10.failNow(tsplus_module_2.just(e), __tsplusTrace), ma => tsplus_module_15.match(() => tsplus_module_10.failNow(tsplus_module_2.nothing(), __tsplusTrace), tsplus_module_10.succeedNow)(ma), __tsplusTrace)(stm);
 }
 /**
  * Provides the transaction its required environment, which eliminates
  * its dependency on `R`.
  *
- * @tsplus fluent fncts.io.STM provideEnvironment
+ * @tsplus pipeable fncts.io.STM provideEnvironment
  */
-
-
-function provideEnvironment_(stm, r, __tsplusTrace) {
-  return contramapEnvironment_1(stm, () => r, __tsplusTrace);
+function provideEnvironment(r, __tsplusTrace) {
+  return stm => {
+    return contramapEnvironment_1(() => r, __tsplusTrace)(stm);
+  };
 }
 /**
  * Provides some of the environment required to run this effect,
  * leaving the remainder `R0`.
  *
- * @tsplus fluent fncts.io.STM contramapEnvironment
+ * @tsplus pipeable fncts.io.STM contramapEnvironment
  */
-
-
-function contramapEnvironment_1(self, f, __tsplusTrace) {
-  return new _definition.ContramapEnvironment(self, f);
+function contramapEnvironment_1(f, __tsplusTrace) {
+  return self => {
+    return new _definition.ContramapEnvironment(self, f);
+  };
 }
 /**
  * Halts the fiber running the effect.
  *
  * @tsplus static fncts.io.STMOps halt
  */
-
-
 function halt_1(u, __tsplusTrace) {
   return new _definition.Effect(() => {
     throw new _definition.HaltException(u());
@@ -553,8 +487,6 @@ function halt_1(u, __tsplusTrace) {
  *
  * @tsplus static fncts.io.STMOps haltNow
  */
-
-
 function haltNow(u, __tsplusTrace) {
   return new _definition.Effect(() => {
     throw new _definition.HaltException(u);
@@ -566,84 +498,74 @@ function haltNow(u, __tsplusTrace) {
  *
  * @tsplus getter fncts.io.STM head
  */
-
-
 function head(stm, __tsplusTrace) {
-  return tsplus_module_1.matchSTM_(stm, e => tsplus_module_10.failNow(tsplus_module_2.just(e), __tsplusTrace), ia => {
+  return tsplus_module_1.matchSTM(e => tsplus_module_10.failNow(tsplus_module_2.just(e), __tsplusTrace), ia => {
     const it = ia[Symbol.iterator]();
     const next = it.next();
     return next.done ? tsplus_module_10.failNow(tsplus_module_2.nothing(), __tsplusTrace) : tsplus_module_10.succeedNow(next.value, __tsplusTrace);
-  }, __tsplusTrace);
+  }, __tsplusTrace)(stm);
 }
 /**
  * Interrupts the fiber running the effect.
  *
  * @tsplus static fncts.io.STMOps interrupt
  */
-
-
-const interrupt = /*#__PURE__*/tsplus_module_1.flatMap_(tsplus_module_10.fiberId, id => tsplus_module_10.interruptAs(id, fileName_1 + ":549:95"), fileName_1 + ":549:71");
+const interrupt = /*#__PURE__*/tsplus_module_1.flatMap(id => tsplus_module_10.interruptAs(id, fileName_1 + ":565:95"), fileName_1 + ":565:71")(tsplus_module_10.fiberId);
 /**
  * Returns whether this effect is a failure.
  *
  * @tsplus getter fncts.io.STM isFailure
  */
-
 exports.interrupt = interrupt;
-
 function isFailure(stm, __tsplusTrace) {
-  return match_1(stm, () => true, () => false, __tsplusTrace);
+  return match_1(() => true, () => false, __tsplusTrace)(stm);
 }
 /**
  * Returns whether this effect is a success.
  *
  * @tsplus getter fncts.io.STM isSuccess
  */
-
-
 function isSuccess(stm, __tsplusTrace) {
-  return match_1(stm, () => false, () => true, __tsplusTrace);
+  return match_1(() => false, () => true, __tsplusTrace)(stm);
 }
 /**
  * Returns a successful effect if the value is `Left`, or fails with the error `None`.
  *
  * @tsplus getter fncts.io.STM left
  */
-
-
 function left(stm, __tsplusTrace) {
-  return tsplus_module_1.matchSTM_(stm, e => tsplus_module_10.fail(() => tsplus_module_2.just(e), __tsplusTrace), bc => tsplus_module_13.match_(bc, tsplus_module_10.succeedNow, () => tsplus_module_10.failNow(tsplus_module_2.nothing(), __tsplusTrace)), __tsplusTrace);
+  return tsplus_module_1.matchSTM(e => tsplus_module_10.fail(() => tsplus_module_2.just(e), __tsplusTrace), bc => tsplus_module_14.match(tsplus_module_10.succeedNow, () => tsplus_module_10.failNow(tsplus_module_2.nothing(), __tsplusTrace))(bc), __tsplusTrace)(stm);
 }
 /**
  * Returns a successful effect if the value is `Left`, or fails with the error e.
  *
- * @tsplus fluent fncts.io.STM leftOrFail
+ * @tsplus pipeable fncts.io.STM leftOrFail
  */
-
-
-function leftOrFail_(stm, orFail, __tsplusTrace) {
-  return tsplus_module_1.flatMap_(stm, bc => tsplus_module_13.match_(bc, tsplus_module_10.succeedNow, c => tsplus_module_10.fail(() => orFail(c), __tsplusTrace)), __tsplusTrace);
+function leftOrFail(orFail, __tsplusTrace) {
+  return stm => {
+    return tsplus_module_1.flatMap(bc => tsplus_module_14.match(tsplus_module_10.succeedNow, c => tsplus_module_10.fail(() => orFail(c), __tsplusTrace))(bc), __tsplusTrace)(stm);
+  };
 }
 /**
  * Maps from one error type to another.
  *
- * @tsplus fluent fncts.io.STM mapError
+ * @tsplus pipeable fncts.io.STM mapError
  */
-
-
-function mapError_1(stm, f, __tsplusTrace) {
-  return tsplus_module_1.matchSTM_(stm, e => tsplus_module_10.failNow(f(e), __tsplusTrace), tsplus_module_10.succeedNow, __tsplusTrace);
+function mapError_1(f, __tsplusTrace) {
+  return stm => {
+    return tsplus_module_1.matchSTM(e => tsplus_module_10.failNow(f(e), __tsplusTrace), tsplus_module_10.succeedNow, __tsplusTrace)(stm);
+  };
 }
 /**
  * Folds over the `STM` effect, handling both failure and success, but not
  * retry.
  *
- * @tsplus fluent fncts.io.STM match
+ * @tsplus pipeable fncts.io.STM match
  */
-
-
-function match_1(stm, g, f, __tsplusTrace) {
-  return tsplus_module_1.matchSTM_(stm, e => tsplus_module_10.succeedNow(g(e), __tsplusTrace), a => tsplus_module_10.succeedNow(f(a), __tsplusTrace), __tsplusTrace);
+function match_1(g, f, __tsplusTrace) {
+  return stm => {
+    return tsplus_module_1.matchSTM(e => tsplus_module_10.succeedNow(g(e), __tsplusTrace), a => tsplus_module_10.succeedNow(f(a), __tsplusTrace), __tsplusTrace)(stm);
+  };
 }
 /**
  * Repeats this `STM` effect until its result satisfies the specified predicate.
@@ -657,12 +579,12 @@ function match_1(stm, g, f, __tsplusTrace) {
  * - Use `retryUntil` instead if you don't need to maintain transaction state for repeats.
  * - Ensure repeating the STM effect will eventually satisfy the predicate.
  *
- * @tsplus fluent fncts.io.STM repeatUntil
+ * @tsplus pipeable fncts.io.STM repeatUntil
  */
-
-
-function repeatUntil_1(stm, f, __tsplusTrace) {
-  return tsplus_module_1.flatMap_(stm, a => f(a) ? tsplus_module_10.succeedNow(a, __tsplusTrace) : repeatUntil_1(stm, f, __tsplusTrace), __tsplusTrace);
+function repeatUntil_1(f, __tsplusTrace) {
+  return stm => {
+    return tsplus_module_1.flatMap(a => f(a) ? tsplus_module_10.succeedNow(a, __tsplusTrace) : repeatUntil_1(f, __tsplusTrace)(stm), __tsplusTrace)(stm);
+  };
 }
 /**
  * Repeats this `STM` effect while its result satisfies the specified predicate.
@@ -676,12 +598,12 @@ function repeatUntil_1(stm, f, __tsplusTrace) {
  * - Use `retryWhile` instead if you don't need to maintain transaction state for repeats.
  * - Ensure repeating the STM effect will eventually not satisfy the predicate.
  *
- * @tsplus fluent fncts.io.STM repeatWhile
+ * @tsplus pipeable fncts.io.STM repeatWhile
  */
-
-
-function repeatWhile_1(stm, f, __tsplusTrace) {
-  return tsplus_module_1.flatMap_(stm, a => f(a) ? repeatWhile_1(stm, f, __tsplusTrace) : tsplus_module_10.succeedNow(a, __tsplusTrace), __tsplusTrace);
+function repeatWhile_1(f, __tsplusTrace) {
+  return stm => {
+    return tsplus_module_1.flatMap(a => f(a) ? repeatWhile_1(f, __tsplusTrace)(stm) : tsplus_module_10.succeedNow(a, __tsplusTrace), __tsplusTrace)(stm);
+  };
 }
 /**
  * Returns an effect that swaps the error/success cases. This allows you to
@@ -689,60 +611,54 @@ function repeatWhile_1(stm, f, __tsplusTrace) {
  *
  * @tsplus getter fncts.io.STM swap
  */
-
-
 function swap_1(stm, __tsplusTrace) {
-  return tsplus_module_1.matchSTM_(stm, tsplus_module_10.succeedNow, tsplus_module_10.failNow, __tsplusTrace);
+  return tsplus_module_1.matchSTM(tsplus_module_10.succeedNow, tsplus_module_10.failNow, __tsplusTrace)(stm);
 }
 /**
  * Swaps the error/value parameters, applies the function `f` and flips the parameters back
  *
- * @tsplus fluent fncts.io.STM swapWith
+ * @tsplus pipeable fncts.io.STM swapWith
  */
-
-
-function swapWith_1(stm, f, __tsplusTrace) {
-  return swap_1(f(swap_1(stm, __tsplusTrace)), __tsplusTrace);
+function swapWith_1(f, __tsplusTrace) {
+  return stm => {
+    return swap_1(f(swap_1(stm, __tsplusTrace)), __tsplusTrace);
+  };
 }
 /**
  * "Peeks" at the success of transactional effect.
  *
- * @tsplus fluent fncts.io.STM tap
+ * @tsplus pipeable fncts.io.STM tap
  */
-
-
-function tap_(stm, f, __tsplusTrace) {
-  return tsplus_module_1.flatMap_(stm, a => as_1(f(a), () => a, __tsplusTrace), __tsplusTrace);
+function tap(f, __tsplusTrace) {
+  return stm => {
+    return tsplus_module_1.flatMap(a => as_1(() => a, __tsplusTrace)(f(a)), __tsplusTrace)(stm);
+  };
 }
 /**
  * Returns an effect with the value on the left part.
  *
  * @tsplus static fncts.io.STMOps toLeft
  */
-
-
 function toLeft(a, __tsplusTrace) {
-  return tsplus_module_1.flatMap_(tsplus_module_10.succeed(a, __tsplusTrace), a => tsplus_module_10.succeedNow(tsplus_module_12.left(a), __tsplusTrace), __tsplusTrace);
+  return tsplus_module_1.flatMap(a => tsplus_module_10.succeedNow(tsplus_module_13.left(a), __tsplusTrace), __tsplusTrace)(tsplus_module_10.succeed(a, __tsplusTrace));
 }
 /**
  * Returns an `STM` effect that succeeds with `Unit`.
  *
  * @tsplus static fncts.io.STMOps unit
  */
-
-
-const unit_1 = /*#__PURE__*/tsplus_module_10.succeedNow(undefined, fileName_1 + ":713:35");
+const unit_1 = /*#__PURE__*/tsplus_module_10.succeedNow(undefined, fileName_1 + ":726:35");
 const unit = unit_1;
 /**
  * Sequentially zips this value with the specified one, combining the values
  * using the specified combiner function.
  *
- * @tsplus fluent fncts.io.STM zipWith
+ * @tsplus pipeable fncts.io.STM zipWith
  */
-
 exports.unit = unit;
-
-function zipWith_1(self, that, f, __tsplusTrace) {
-  return tsplus_module_1.flatMap_(self, a => tsplus_module_1.map_(that, b => f(a, b), __tsplusTrace), __tsplusTrace);
+function zipWith_1(that, f, __tsplusTrace) {
+  return self => {
+    return tsplus_module_1.flatMap(a => tsplus_module_1.map(b => f(a, b), __tsplusTrace)(that), __tsplusTrace)(self);
+  };
 }
 //# sourceMappingURL=api.cjs.map