@fncts/base 0.0.20 → 0.0.22

package/_cjs/control/Z/runtime.cjs

@@ -3,389 +3,305 @@
 Object.defineProperty(exports, "__esModule", {
   value: true
 });
-exports.unsafeRunAll_ = void 0;
+exports.unsafeRunAll = exports.unsafeRun = void 0;
 exports.unsafeRunExit = unsafeRunExit;
-exports.unsafeRunReader_ = unsafeRunReader_;
+exports.unsafeRunReader = unsafeRunReader;
 exports.unsafeRunResult = void 0;
-exports.unsafeRunStateResult_ = unsafeRunStateResult_;
-exports.unsafeRunState_ = unsafeRunState_;
+exports.unsafeRunState = unsafeRunState;
+exports.unsafeRunStateResult = unsafeRunStateResult;
 exports.unsafeRunWriter = unsafeRunWriter;
-exports.unsafeRun_ = void 0;
-
 var tsplus_module_1 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/internal/Stack"));
-
 var tsplus_module_2 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/collection/immutable/Conc/api/empty"));
-
 var tsplus_module_3 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/control/Z/api"));
-
 var tsplus_module_4 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Environment/api"));
-
 var tsplus_module_5 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Cause/api"));
-
 var tsplus_module_6 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Exit/constructors"));
-
 var tsplus_module_7 = /*#__PURE__*/_interopRequireWildcard( /*#__PURE__*/require("@fncts/base/data/Exit/api"));
-
 var _function = /*#__PURE__*/require("../../data/function.cjs");
-
 var _Stack2 = /*#__PURE__*/require("../../internal/Stack.cjs");
-
 var _definition = /*#__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 fileName_1 = "(@fncts/base) src/control/Z/runtime.ts";
-const unsafeRunAll_ = unsafeRunAll_1;
-exports.unsafeRunAll_ = unsafeRunAll_;
-const unsafeRun_ = unsafeRun_1;
-exports.unsafeRun_ = unsafeRun_;
+const unsafeRunAll = unsafeRunAll_1;
+exports.unsafeRunAll = unsafeRunAll;
+const unsafeRun = unsafeRun_1;
+exports.unsafeRun = unsafeRun;
 const unsafeRunResult = unsafeRunResult_1;
 exports.unsafeRunResult = unsafeRunResult;
-
 class MatchFrame {
   constructor(failure, apply) {
     this.failure = failure;
     this.apply = apply;
     this._zTag = "MatchFrame";
   }
-
 }
-
 class ApplyFrame {
   constructor(apply) {
     this.apply = apply;
     this._zTag = "ApplyFrame";
   }
-
 }
 /**
  * Runs this computation with the specified initial state, returning either a
  * failure or the updated state and the result
  *
- * @tsplus fluent fncts.control.Z unsafeRunAll
+ * @tsplus pipeable fncts.control.Z unsafeRunAll
  */
-
-
-function unsafeRunAll_1(ma, s) {
-  const stack = tsplus_module_1.mkStack();
-  let s0 = s;
-  let result = null;
-  const environment = tsplus_module_1.mkStack();
-  let failed = false;
-  let current = ma;
-  let log = tsplus_module_2.empty();
-
-  function unsafeUnwindStack() {
-    let unwinding = true;
-
-    while (unwinding) {
-      const next = stack.pop();
-
-      if (next == null) {
-        unwinding = false;
-      } else {
-        if (next._zTag === "MatchFrame") {
+function unsafeRunAll_1(s) {
+  return ma => {
+    const stack = tsplus_module_1.makeStack();
+    let s0 = s;
+    let result = null;
+    const environment = tsplus_module_1.makeStack();
+    let failed = false;
+    let current = ma;
+    let log = tsplus_module_2.empty();
+    function unsafeUnwindStack() {
+      let unwinding = true;
+      while (unwinding) {
+        const next = stack.pop();
+        if (next == null) {
           unwinding = false;
-          stack.push(new ApplyFrame(next.failure));
+        } else {
+          if (next._zTag === "MatchFrame") {
+            unwinding = false;
+            stack.push(new ApplyFrame(next.failure));
+          }
         }
       }
     }
-  }
-
-  while (current != null) {
-    try {
-      while (current != null) {
-        const currZ = current;
-        (0, _definition.concrete)(currZ);
-
-        switch (currZ._tag) {
-          case "Chain"
-          /* ZTag.Chain */
-          :
-            {
-              const nested = currZ.ma;
-              const continuation = currZ.f;
-              (0, _definition.concrete)(nested);
-
-              switch (nested._tag) {
-                case "SucceedNow"
-                /* ZTag.SucceedNow */
-                :
-                  {
-                    current = continuation(nested.value);
-                    break;
-                  }
-
-                case "Succeed"
-                /* ZTag.Succeed */
-                :
-                  {
-                    current = continuation(nested.effect());
-                    break;
-                  }
-
-                case "Modify"
-                /* ZTag.Modify */
-                :
-                  {
-                    const updated = nested.run(s0);
-                    result = updated[0];
-                    s0 = updated[1];
-                    current = continuation(result);
-                    break;
-                  }
-
-                default:
-                  {
-                    current = nested;
-                    stack.push(new ApplyFrame(continuation));
-                    break;
-                  }
+    while (current != null) {
+      try {
+        while (current != null) {
+          const currZ = current;
+          (0, _definition.concrete)(currZ);
+          switch (currZ._tag) {
+            case "Chain" /* ZTag.Chain */:
+              {
+                const nested = currZ.ma;
+                const continuation = currZ.f;
+                (0, _definition.concrete)(nested);
+                switch (nested._tag) {
+                  case "SucceedNow" /* ZTag.SucceedNow */:
+                    {
+                      current = continuation(nested.value);
+                      break;
+                    }
+                  case "Succeed" /* ZTag.Succeed */:
+                    {
+                      current = continuation(nested.effect());
+                      break;
+                    }
+                  case "Modify" /* ZTag.Modify */:
+                    {
+                      const updated = nested.run(s0);
+                      result = updated[0];
+                      s0 = updated[1];
+                      current = continuation(result);
+                      break;
+                    }
+                  default:
+                    {
+                      current = nested;
+                      stack.push(new ApplyFrame(continuation));
+                      break;
+                    }
+                }
+                break;
               }
-
-              break;
-            }
-
-          case "Succeed"
-          /* ZTag.Succeed */
-          :
-            {
-              result = currZ.effect();
-              const nextInstruction = stack.pop();
-
-              if (nextInstruction) {
-                current = nextInstruction.apply(result);
-              } else {
-                current = undefined;
+            case "Succeed" /* ZTag.Succeed */:
+              {
+                result = currZ.effect();
+                const nextInstruction = stack.pop();
+                if (nextInstruction) {
+                  current = nextInstruction.apply(result);
+                } else {
+                  current = undefined;
+                }
+                break;
               }
-
-              break;
-            }
-
-          case "Defer"
-          /* ZTag.Defer */
-          :
-            {
-              current = currZ.make();
-              break;
-            }
-
-          case "SucceedNow"
-          /* ZTag.SucceedNow */
-          :
-            {
-              result = currZ.value;
-              const nextInstr = stack.pop();
-
-              if (nextInstr) {
-                current = nextInstr.apply(result);
-              } else {
-                current = undefined;
+            case "Defer" /* ZTag.Defer */:
+              {
+                current = currZ.make();
+                break;
               }
-
-              break;
-            }
-
-          case "Fail"
-          /* ZTag.Fail */
-          :
-            {
-              unsafeUnwindStack();
-              const nextInst = stack.pop();
-
-              if (nextInst) {
-                current = nextInst.apply(currZ.cause);
-              } else {
-                failed = true;
-                result = currZ.cause;
-                current = undefined;
+            case "SucceedNow" /* ZTag.SucceedNow */:
+              {
+                result = currZ.value;
+                const nextInstr = stack.pop();
+                if (nextInstr) {
+                  current = nextInstr.apply(result);
+                } else {
+                  current = undefined;
+                }
+                break;
               }
-
-              break;
-            }
-
-          case "Match"
-          /* ZTag.Match */
-          :
-            {
-              current = currZ.z;
-              const state = s0;
-              stack.push(new MatchFrame(cause => {
-                const m = tsplus_module_3.flatMap_(tsplus_module_3.put(state), () => currZ.onFailure(log, cause));
-                log = tsplus_module_2.empty();
-                return m;
-              }, a => {
-                const m = currZ.onSuccess(log, a);
-                log = tsplus_module_2.empty();
-                return m;
-              }));
-              break;
-            }
-
-          case "Access"
-          /* ZTag.Access */
-          :
-            {
-              current = currZ.asks(environment.peek() ?? tsplus_module_4.make());
-              break;
-            }
-
-          case "Provide"
-          /* ZTag.Provide */
-          :
-            {
-              environment.push(currZ.env);
-              current = tsplus_module_3.match_(currZ.ma, e => tsplus_module_3.flatMap_(tsplus_module_3.succeedNow(environment.pop(), fileName_1 + ":151:34"), () => tsplus_module_3.failNow(e, fileName_1 + ":151:77")), a => tsplus_module_3.flatMap_(tsplus_module_3.succeedNow(environment.pop(), fileName_1 + ":152:34"), () => tsplus_module_3.succeedNow(a, fileName_1 + ":152:80")));
-              break;
-            }
-
-          case "Modify"
-          /* ZTag.Modify */
-          :
-            {
-              const updated = currZ.run(s0);
-              s0 = updated[1];
-              result = updated[0];
-              const nextInst = stack.pop();
-
-              if (nextInst) {
-                current = nextInst.apply(result);
-              } else {
-                current = undefined;
+            case "Fail" /* ZTag.Fail */:
+              {
+                unsafeUnwindStack();
+                const nextInst = stack.pop();
+                if (nextInst) {
+                  current = nextInst.apply(currZ.cause);
+                } else {
+                  failed = true;
+                  result = currZ.cause;
+                  current = undefined;
+                }
+                break;
               }
-
-              break;
-            }
-
-          case "Tell"
-          /* ZTag.Tell */
-          :
-            {
-              log = currZ.log;
-              const nextInst = stack.pop();
-
-              if (nextInst) {
-                current = nextInst.apply(result);
-              } else {
-                current = undefined;
+            case "Match" /* ZTag.Match */:
+              {
+                current = currZ.z;
+                const state = s0;
+                stack.push(new MatchFrame(cause => {
+                  const m = tsplus_module_3.flatMap(() => currZ.onFailure(log, cause))(tsplus_module_3.put(state));
+                  log = tsplus_module_2.empty();
+                  return m;
+                }, a => {
+                  const m = currZ.onSuccess(log, a);
+                  log = tsplus_module_2.empty();
+                  return m;
+                }));
+                break;
               }
-
-              break;
-            }
-
-          case "MapLog"
-          /* ZTag.MapLog */
-          :
-            {
-              current = currZ.ma;
-              stack.push(new MatchFrame(cause => {
-                log = currZ.modifyLog(log);
-                return tsplus_module_3.failCauseNow(cause, fileName_1 + ":184:40");
-              }, a => {
-                log = currZ.modifyLog(log);
-                return tsplus_module_3.succeedNow(a, fileName_1 + ":188:38");
-              }));
-            }
+            case "Access" /* ZTag.Access */:
+              {
+                current = currZ.asks(environment.peek() ?? tsplus_module_4.make());
+                break;
+              }
+            case "Provide" /* ZTag.Provide */:
+              {
+                environment.push(currZ.env);
+                current = tsplus_module_3.match(e => tsplus_module_3.flatMap(() => tsplus_module_3.failNow(e, fileName_1 + ":145:79"))(tsplus_module_3.succeedNow(environment.pop(), fileName_1 + ":145:36")), a => tsplus_module_3.flatMap(() => tsplus_module_3.succeedNow(a, fileName_1 + ":146:82"))(tsplus_module_3.succeedNow(environment.pop(), fileName_1 + ":146:36")))(currZ.ma);
+                break;
+              }
+            case "Modify" /* ZTag.Modify */:
+              {
+                const updated = currZ.run(s0);
+                s0 = updated[1];
+                result = updated[0];
+                const nextInst = stack.pop();
+                if (nextInst) {
+                  current = nextInst.apply(result);
+                } else {
+                  current = undefined;
+                }
+                break;
+              }
+            case "Tell" /* ZTag.Tell */:
+              {
+                log = currZ.log;
+                const nextInst = stack.pop();
+                if (nextInst) {
+                  current = nextInst.apply(result);
+                } else {
+                  current = undefined;
+                }
+                break;
+              }
+            case "MapLog" /* ZTag.MapLog */:
+              {
+                current = currZ.ma;
+                stack.push(new MatchFrame(cause => {
+                  log = currZ.modifyLog(log);
+                  return tsplus_module_3.failCauseNow(cause, fileName_1 + ":178:42");
+                }, a => {
+                  log = currZ.modifyLog(log);
+                  return tsplus_module_3.succeedNow(a, fileName_1 + ":182:40");
+                }));
+              }
+          }
+        }
+      } catch (e) {
+        if ((0, _definition.isZError)(e)) {
+          current = tsplus_module_3.failCauseNow(e.cause, fileName_1 + ":191:35");
+        } else {
+          failed = true;
+          result = tsplus_module_5.halt(e);
         }
-      }
-    } catch (e) {
-      if ((0, _definition.isZError)(e)) {
-        current = tsplus_module_3.failCauseNow(e.cause, fileName_1 + ":197:33");
-      } else {
-        failed = true;
-        result = tsplus_module_5.halt(e);
       }
     }
-  }
-
-  if (failed) {
-    return [log, tsplus_module_6.failCause(result)];
-  }
-
-  return [log, tsplus_module_6.succeed([s0, result])];
+    if (failed) {
+      return [log, tsplus_module_6.failCause(result)];
+    }
+    return [log, tsplus_module_6.succeed([s0, result])];
+  };
 }
 /**
  * Runs this computation with the specified initial state, returning both
  * the updated state and the result.
  *
- * @tsplus fluent fncts.control.Z unsafeRun
+ * @tsplus pipeable fncts.control.Z unsafeRun
  */
-
-
-function unsafeRun_1(ma, s) {
-  return tsplus_module_7.match_(unsafeRunAll_1(ma, s)[1], cause => {
-    // throw cause.squash
-    throw new Error();
-  }, _function.identity);
+function unsafeRun_1(s) {
+  return ma => {
+    return tsplus_module_7.match(cause => {
+      // throw cause.squash
+      throw new Error();
+    }, _function.identity)(unsafeRunAll_1(s)(ma)[1]);
+  };
 }
 /**
  * Runs this computation, returning the result.
  *
  * @tsplus getter fncts.control.Z unsafeRunResult
  */
-
-
 function unsafeRunResult_1(ma) {
-  return unsafeRun_1(ma, {})[1];
+  return unsafeRun_1({})(ma)[1];
 }
 /**
  * Runs this computation with the given environment, returning the result.
  *
- * @tsplus fluent fncts.control.Z unsafeRunReader
+ * @tsplus pipeable fncts.control.Z unsafeRunReader
  */
-
-
-function unsafeRunReader_(ma, r) {
-  return unsafeRunResult_1(tsplus_module_3.provideEnvironment_(ma, r));
+function unsafeRunReader(r) {
+  return ma => {
+    return unsafeRunResult_1(tsplus_module_3.provideEnvironment(r)(ma));
+  };
 }
 /**
  * Runs this computation with the specified initial state, returning the
  * updated state and discarding the result.
  *
- * @tsplus fluent fncts.control.Z unsafeRunState
+ * @tsplus pipeable fncts.control.Z unsafeRunState
  */
-
-
-function unsafeRunState_(ma, s) {
-  return unsafeRun_1(ma, s)[0];
+function unsafeRunState(s) {
+  return ma => {
+    return unsafeRun_1(s)(ma)[0];
+  };
 }
 /**
  * Runs this computation with the specified initial state, returning the
  * result and discarding the updated state.
  *
- * @tsplus fluent fncts.control.Z unsafeRunStateResult
+ * @tsplus pipeable fncts.control.Z unsafeRunStateResult
  */
-
-
-function unsafeRunStateResult_(ma, s) {
-  return tsplus_module_7.match_(unsafeRunAll_1(ma, s)[1], cause => {
-    // throw cause.squash
-    throw new Error();
-  }, ([_, a]) => a);
+function unsafeRunStateResult(s) {
+  return ma => {
+    return tsplus_module_7.match(cause => {
+      // throw cause.squash
+      throw new Error();
+    }, ([_, a]) => a)(unsafeRunAll_1(s)(ma)[1]);
+  };
 }
 /**
  * Runs this computation returning either the result or error
  *
  * @tsplus getter fncts.control.Z unsafeRunExit
  */
-
-
 function unsafeRunExit(ma) {
-  return tsplus_module_7.map_(unsafeRunAll_1(ma, {})[1], ([_, a]) => a);
+  return tsplus_module_7.map(([_, a]) => a)(unsafeRunAll_1({})(ma)[1]);
 }
 /**
  *
  * @tsplus getter fncts.control.Z unsafeRunWriter
  */
-
-
 function unsafeRunWriter(ma) {
-  const [w, exit] = unsafeRunAll_1(ma, {});
-  return tsplus_module_7.match_(exit, () => {
+  const [w, exit] = unsafeRunAll_1({})(ma);
+  return tsplus_module_7.match(() => {
     // throw cause.squash
     throw new Error();
-  }, ([_, a]) => [w, a]);
+  }, ([_, a]) => [w, a])(exit);
 }
 //# sourceMappingURL=runtime.cjs.map

package/_cjs/control/Z/runtime.cjs.map

@@ -1 +1 @@
-{"version":3,"file":"runtime.cjs","mappings":";;;;;;;;;;;;;;;;;;;;;;;;;;;;AAAA;;AACA;;AACA;;;;;;;MAuBgBA,aAAa;;MAgMbC,UAAU;;MAYVC,eAAe;;;AAjO/B,MAAMC,UAAN,CAAgB;EAEdC,YACWC,OADX,EAEWC,KAFX,EAE6D;IADlD;IACA;IAHF,aAAQ,YAAR;EAIL;;AALU;;AAQhB,MAAMC,UAAN,CAAgB;EAEdH,YAAqBE,KAArB,EAAuE;IAAlD;IADZ,aAAQ,YAAR;EACkE;;AAF7D;AAOhB;;;;;;;;AAMA,wBACEE,EADF,EAEEC,CAFF,EAEO;EAEL,MAAMC,KAAK,GAAiBC,yBAA5B;EACA,IAAIC,EAAE,GAAsBH,CAA5B;EACA,IAAII,MAAM,GAAkB,IAA5B;EACA,MAAMC,WAAW,GAAWH,yBAA5B;EACA,IAAII,MAAM,GAAkB,KAA5B;EACA,IAAIC,OAAO,GAAiBR,EAA5B;EACA,IAAIS,GAAG,GAAqBC,uBAA5B;;EAEA,SAASC,iBAAT,GAA0B;IACxB,IAAIC,SAAS,GAAG,IAAhB;;IACA,OAAOA,SAAP,EAAkB;MAChB,MAAMC,IAAI,GAAGX,KAAK,CAACY,GAAN,EAAb;;MAEA,IAAID,IAAI,IAAI,IAAZ,EAAkB;QAChBD,SAAS,GAAG,KAAZ;MACD,CAFD,MAEO;QACL,IAAIC,IAAI,CAACE,KAAL,KAAe,YAAnB,EAAiC;UAC/BH,SAAS,GAAG,KAAZ;UACAV,KAAK,CAACc,IAAN,CAAW,IAAIjB,UAAJ,CAAec,IAAI,CAAChB,OAApB,CAAX;QACD;MACF;IACF;EACF;;EAED,OAAOW,OAAO,IAAI,IAAlB,EAAwB;IACtB,IAAI;MACF,OAAOA,OAAO,IAAI,IAAlB,EAAwB;QACtB,MAAMS,KAAK,GAAoCT,OAA/C;QACA,0BAASS,KAAT;;QAEA,QAAQA,KAAK,CAACC,IAAd;UACE;UAAA;UAAA;YAAiB;cACf,MAAMC,MAAM,GAASF,KAAK,CAACjB,EAA3B;cACA,MAAMoB,YAAY,GAAGH,KAAK,CAACI,CAA3B;cACA,0BAASF,MAAT;;cACA,QAAQA,MAAM,CAACD,IAAf;gBACE;gBAAA;gBAAA;kBAAsB;oBACpBV,OAAO,GAAGY,YAAY,CAACD,MAAM,CAACG,KAAR,CAAtB;oBACA;kBACD;;gBACD;gBAAA;gBAAA;kBAAmB;oBACjBd,OAAO,GAAGY,YAAY,CAACD,MAAM,CAACI,MAAP,EAAD,CAAtB;oBACA;kBACD;;gBACD;gBAAA;gBAAA;kBAAkB;oBAChB,MAAMC,OAAO,GAAGL,MAAM,CAACM,GAAP,CAAWrB,EAAX,CAAhB;oBACAC,MAAM,GAAUmB,OAAO,CAAC,CAAD,CAAvB;oBACApB,EAAE,GAAcoB,OAAO,CAAC,CAAD,CAAvB;oBACAhB,OAAO,GAASY,YAAY,CAACf,MAAD,CAA5B;oBACA;kBACD;;gBACD;kBAAS;oBACPG,OAAO,GAAGW,MAAV;oBACAjB,KAAK,CAACc,IAAN,CAAW,IAAIjB,UAAJ,CAAeqB,YAAf,CAAX;oBACA;kBACD;cApBH;;cAsBA;YACD;;UACD;UAAA;UAAA;YAAmB;cACjBf,MAAM,GAAkBY,KAAK,CAACM,MAAN,EAAxB;cACA,MAAMG,eAAe,GAAGxB,KAAK,CAACY,GAAN,EAAxB;;cACA,IAAIY,eAAJ,EAAqB;gBACnBlB,OAAO,GAAGkB,eAAe,CAAC5B,KAAhB,CAAsBO,MAAtB,CAAV;cACD,CAFD,MAEO;gBACLG,OAAO,GAAGmB,SAAV;cACD;;cACD;YACD;;UACD;UAAA;UAAA;YAAiB;cACfnB,OAAO,GAAGS,KAAK,CAACW,IAAN,EAAV;cACA;YACD;;UACD;UAAA;UAAA;YAAsB;cACpBvB,MAAM,GAAYY,KAAK,CAACK,KAAxB;cACA,MAAMO,SAAS,GAAG3B,KAAK,CAACY,GAAN,EAAlB;;cACA,IAAIe,SAAJ,EAAe;gBACbrB,OAAO,GAAGqB,SAAS,CAAC/B,KAAV,CAAgBO,MAAhB,CAAV;cACD,CAFD,MAEO;gBACLG,OAAO,GAAGmB,SAAV;cACD;;cACD;YACD;;UACD;UAAA;UAAA;YAAgB;cACdhB,iBAAiB;cACjB,MAAMmB,QAAQ,GAAG5B,KAAK,CAACY,GAAN,EAAjB;;cACA,IAAIgB,QAAJ,EAAc;gBACZtB,OAAO,GAAGsB,QAAQ,CAAChC,KAAT,CAAemB,KAAK,CAACc,KAArB,CAAV;cACD,CAFD,MAEO;gBACLxB,MAAM,GAAI,IAAV;gBACAF,MAAM,GAAIY,KAAK,CAACc,KAAhB;gBACAvB,OAAO,GAAGmB,SAAV;cACD;;cACD;YACD;;UACD;UAAA;UAAA;YAAiB;cACfnB,OAAO,GAAOS,KAAK,CAACe,CAApB;cACA,MAAMC,KAAK,GAAG7B,EAAd;cACAF,KAAK,CAACc,IAAN,CACE,IAAIrB,UAAJ,CACGoC,KAAD,IAAsB;gBACpB,MAAMG,CAAC,GAAGC,6CAAMF,KAAN,GAAqB,MAAMhB,KAAK,CAACmB,SAAN,CAAgB3B,GAAhB,EAAqBsB,KAArB,CAA3B,CAAV;gBACAtB,GAAG,GAAOC,uBAAV;gBACA,OAAOwB,CAAP;cACD,CALH,EAMGG,CAAD,IAAM;gBACJ,MAAMH,CAAC,GAAGjB,KAAK,CAACqB,SAAN,CAAgB7B,GAAhB,EAAqB4B,CAArB,CAAV;gBACA5B,GAAG,GAAOC,uBAAV;gBACA,OAAOwB,CAAP;cACD,CAVH,CADF;cAcA;YACD;;UACD;UAAA;UAAA;YAAkB;cAChB1B,OAAO,GAAGS,KAAK,CAACsB,IAAN,CAAWjC,WAAW,CAACkC,IAAZ,MAAsBC,sBAAjC,CAAV;cACA;YACD;;UACD;UAAA;UAAA;YAAmB;cACjBnC,WAAW,CAACU,IAAZ,CAAiBC,KAAK,CAACyB,GAAvB;cACAlC,OAAO,GAAG2B,4BAAK,CAACnC,EAAN,EACP2C,CAAD,IAAOR,oDAAa7B,WAAW,CAACQ,GAAZ,EAAb,EAA8B8B,sBAA9B,GAAwC,MAAMT,wBAAUQ,CAAV,EAAWC,sBAAX,CAA9C,CADC,EAEPP,CAAD,IAAOF,oDAAa7B,WAAW,CAACQ,GAAZ,EAAb,EAA8B8B,sBAA9B,GAAwC,MAAMT,2BAAaE,CAAb,EAAcO,sBAAd,CAA9C,CAFC,CAAV;cAIA;YACD;;UACD;UAAA;UAAA;YAAkB;cAChB,MAAMpB,OAAO,GAAIP,KAAK,CAACQ,GAAN,CAAUrB,EAAV,CAAjB;cACAA,EAAE,GAAeoB,OAAO,CAAC,CAAD,CAAxB;cACAnB,MAAM,GAAWmB,OAAO,CAAC,CAAD,CAAxB;cACA,MAAMM,QAAQ,GAAG5B,KAAK,CAACY,GAAN,EAAjB;;cACA,IAAIgB,QAAJ,EAAc;gBACZtB,OAAO,GAAGsB,QAAQ,CAAChC,KAAT,CAAeO,MAAf,CAAV;cACD,CAFD,MAEO;gBACLG,OAAO,GAAGmB,SAAV;cACD;;cACD;YACD;;UACD;UAAA;UAAA;YAAgB;cACdlB,GAAG,GAAcQ,KAAK,CAACR,GAAvB;cACA,MAAMqB,QAAQ,GAAG5B,KAAK,CAACY,GAAN,EAAjB;;cACA,IAAIgB,QAAJ,EAAc;gBACZtB,OAAO,GAAGsB,QAAQ,CAAChC,KAAT,CAAeO,MAAf,CAAV;cACD,CAFD,MAEO;gBACLG,OAAO,GAAGmB,SAAV;cACD;;cACD;YACD;;UACD;UAAA;UAAA;YAAkB;cAChBnB,OAAO,GAAGS,KAAK,CAACjB,EAAhB;cACAE,KAAK,CAACc,IAAN,CACE,IAAIrB,UAAJ,CACGoC,KAAD,IAAsB;gBACpBtB,GAAG,GAAGQ,KAAK,CAAC4B,SAAN,CAAgBpC,GAAhB,CAAN;gBACA,OAAO0B,6BAAeJ,KAAf,EAAoBa,sBAApB,CAAP;cACD,CAJH,EAKGP,CAAD,IAAM;gBACJ5B,GAAG,GAAGQ,KAAK,CAAC4B,SAAN,CAAgBpC,GAAhB,CAAN;gBACA,OAAO0B,2BAAaE,CAAb,EAAcO,sBAAd,CAAP;cACD,CARH,CADF;YAYD;QApIH;MAsID;IACF,CA5ID,CA4IE,OAAOD,CAAP,EAAU;MACV,IAAI,0BAASA,CAAT,CAAJ,EAAiB;QACfnC,OAAO,GAAG2B,6BAAeQ,CAAC,CAACZ,KAAjB,EAAsBa,sBAAtB,CAAV;MACD,CAFD,MAEO;QACLrC,MAAM,GAAG,IAAT;QACAF,MAAM,GAAGyC,qBAAWH,CAAX,CAAT;MACD;IACF;EACF;;EAED,IAAIpC,MAAJ,EAAY;IACV,OAAO,CAACE,GAAD,EAAMsC,0BAAe1C,MAAf,CAAN,CAAP;EACD;;EAED,OAAO,CAACI,GAAD,EAAMsC,wBAAa,CAAC3C,EAAD,EAAKC,MAAL,CAAb,CAAN,CAAP;AACD;AAED;;;;;;;;AAMA,qBAAyCL,EAAzC,EAA4EC,CAA5E,EAAiF;EAC/E,OAAO+C,0CAAgB/C,CAAhB,EAAmB,CAAnB,GAA6B8B,KAAD,IAAU;IAC3C;IACA,MAAM,IAAIkB,KAAJ,EAAN;EACD,CAHM,EAGJC,kBAHI,CAAP;AAID;AAED;;;;;;;AAKA,2BAAsClD,EAAtC,EAAiF;EAC/E,OAAOmD,YAAWnD,EAAX,EAAe,EAAf,EAAmB,CAAnB,CAAP;AACD;AAED;;;;;;;AAKM,SAAUoD,gBAAV,CAAoCpD,EAApC,EAA2EqD,CAA3E,EAA4F;EAChG,OAAOC,kBAAgBnB,wCAAsBkB,CAAtB,CAAhB,CAAP;AACD;AAED;;;;;;;;AAMM,SAAUE,eAAV,CAAwCvD,EAAxC,EAA2EC,CAA3E,EAAgF;EACpF,OAAOkD,gBAAalD,CAAb,EAAgB,CAAhB,CAAP;AACD;AAED;;;;;;;;AAMM,SAAUuD,qBAAV,CAA8CxD,EAA9C,EAAiFC,CAAjF,EAAsF;EAC1F,OAAO+C,0CAAgB/C,CAAhB,EAAmB,CAAnB,GACJ8B,KAAD,IAAU;IACR;IACA,MAAM,IAAIkB,KAAJ,EAAN;EACD,CAJI,EAKL,CAAC,CAACQ,CAAD,EAAIpB,CAAJ,CAAD,KAAYA,CALP,CAAP;AAOD;AAED;;;;;;;AAKM,SAAUqB,aAAV,CAA8B1D,EAA9B,EAAyE;EAC7E,OAAOgD,wCAAgB,EAAhB,EAA6B,CAA7B,GAAoC,CAAC,CAACS,CAAD,EAAIpB,CAAJ,CAAD,KAAYA,CAAhD,CAAP;AACD;AAED;;;;;;AAIM,SAAUsB,eAAV,CAAgC3D,EAAhC,EAA2E;EAC/E,MAAM,CAAC4D,CAAD,EAAIC,IAAJ,IAAYC,mBAAgB,EAAhB,CAAlB;EACA,OAAOd,6BACL,MAAK;IACH;IACA,MAAM,IAAIC,KAAJ,EAAN;EACD,CAJI,EAKL,CAAC,CAACQ,CAAD,EAAIpB,CAAJ,CAAD,KAAY,CAACuB,CAAD,EAAIvB,CAAJ,CALP,CAAP;AAOD","names":["unsafeRunAll_","unsafeRun_","unsafeRunResult","MatchFrame","constructor","failure","apply","ApplyFrame","ma","s","stack","tsplus_module_1","s0","result","environment","failed","current","log","tsplus_module_2","unsafeUnwindStack","unwinding","next","pop","_zTag","push","currZ","_tag","nested","continuation","f","value","effect","updated","run","nextInstruction","undefined","make","nextInstr","nextInst","cause","z","state","m","tsplus_module_3","onFailure","a","onSuccess","asks","peek","tsplus_module_4","env","e","fileName_1","modifyLog","tsplus_module_5","tsplus_module_6","tsplus_module_7","Error","identity","unsafeRun_1","unsafeRunReader_","r","unsafeRunResult_1","unsafeRunState_","unsafeRunStateResult_","_","unsafeRunExit","unsafeRunWriter","w","exit","unsafeRunAll_1"],"sourceRoot":"","sources":["../../../_src/control/Z/runtime.ts"],"sourcesContent":[null]}
+{"version":3,"file":"runtime.cjs","mappings":";;;;;;;;;;;;;;;;;;;AAAA;AACA;AACA;AAA2D;AAAA;;MAuB3CA,YAAY;AAAA;MAyLZC,SAAS;AAAA;MAcTC,eAAe;AAAA;AA5N/B,MAAMC,UAAU;EAEdC,YACWC,OAAoD,EACpDC,KAAkD;IADlD,YAAO,GAAPD,OAAO;IACP,UAAK,GAALC,KAAK;IAHP,UAAK,GAAG,YAAY;EAI1B;;AAGL,MAAMC,UAAU;EAEdH,YAAqBE,KAAkD;IAAlD,UAAK,GAALA,KAAK;IADjB,UAAK,GAAG,YAAY;EAC6C;;AAK5E;;;;;;AAMA,wBAAiCE,CAAK;EACpC,OAAqBC,EAA6B,IAAmD;IACnG,MAAMC,KAAK,GAAiBC,2BAAO;IACnC,IAAIC,EAAE,GAAsBJ,CAAQ;IACpC,IAAIK,MAAM,GAAkB,IAAI;IAChC,MAAMC,WAAW,GAAWH,2BAA6B;IACzD,IAAII,MAAM,GAAkB,KAAK;IACjC,IAAIC,OAAO,GAAiBP,EAAiD;IAC7E,IAAIQ,GAAG,GAAqBC,uBAAe;IAC3C,SAASC,iBAAiB;MACxB,IAAIC,SAAS,GAAG,IAAI;MACpB,OAAOA,SAAS,EAAE;QAChB,MAAMC,IAAI,GAAGX,KAAK,CAACY,GAAG,EAAE;QACxB,IAAID,IAAI,IAAI,IAAI,EAAE;UAChBD,SAAS,GAAG,KAAK;SAClB,MAAM;UACL,IAAIC,IAAI,CAACE,KAAK,KAAK,YAAY,EAAE;YAC/BH,SAAS,GAAG,KAAK;YACjBV,KAAK,CAACc,IAAI,CAAC,IAAIjB,UAAU,CAACc,IAAI,CAAChB,OAAO,CAAC,CAAC;;;;IAIhD;IACA,OAAOW,OAAO,IAAI,IAAI,EAAE;MACtB,IAAI;QACF,OAAOA,OAAO,IAAI,IAAI,EAAE;UACtB,MAAMS,KAAK,GAAoCT,OAAO;UACtD,wBAAQ,EAACS,KAAK,CAAC;UACf,QAAQA,KAAK,CAACC,IAAI;YAChB;cAAiB;gBACf,MAAMC,MAAM,GAASF,KAAK,CAAChB,EAAE;gBAC7B,MAAMmB,YAAY,GAAGH,KAAK,CAACI,CAAC;gBAC5B,wBAAQ,EAACF,MAAM,CAAC;gBAChB,QAAQA,MAAM,CAACD,IAAI;kBACjB;oBAAsB;sBACpBV,OAAO,GAAGY,YAAY,CAACD,MAAM,CAACG,KAAK,CAAC;sBACpC;;kBAEF;oBAAmB;sBACjBd,OAAO,GAAGY,YAAY,CAACD,MAAM,CAACI,MAAM,EAAE,CAAC;sBACvC;;kBAEF;oBAAkB;sBAChB,MAAMC,OAAO,GAAGL,MAAM,CAACM,GAAG,CAACrB,EAAE,CAAC;sBAC9BC,MAAM,GAAUmB,OAAO,CAAC,CAAC,CAAC;sBAC1BpB,EAAE,GAAcoB,OAAO,CAAC,CAAC,CAAC;sBAC1BhB,OAAO,GAASY,YAAY,CAACf,MAAM,CAAC;sBACpC;;kBAEF;oBAAS;sBACPG,OAAO,GAAGW,MAAM;sBAChBjB,KAAK,CAACc,IAAI,CAAC,IAAIjB,UAAU,CAACqB,YAAY,CAAC,CAAC;sBACxC;;gBACD;gBAEH;;YAEF;cAAmB;gBACjBf,MAAM,GAAkBY,KAAK,CAACM,MAAM,EAAE;gBACtC,MAAMG,eAAe,GAAGxB,KAAK,CAACY,GAAG,EAAE;gBACnC,IAAIY,eAAe,EAAE;kBACnBlB,OAAO,GAAGkB,eAAe,CAAC5B,KAAK,CAACO,MAAM,CAAC;iBACxC,MAAM;kBACLG,OAAO,GAAGmB,SAAS;;gBAErB;;YAEF;cAAiB;gBACfnB,OAAO,GAAGS,KAAK,CAACW,IAAI,EAAE;gBACtB;;YAEF;cAAsB;gBACpBvB,MAAM,GAAYY,KAAK,CAACK,KAAK;gBAC7B,MAAMO,SAAS,GAAG3B,KAAK,CAACY,GAAG,EAAE;gBAC7B,IAAIe,SAAS,EAAE;kBACbrB,OAAO,GAAGqB,SAAS,CAAC/B,KAAK,CAACO,MAAM,CAAC;iBAClC,MAAM;kBACLG,OAAO,GAAGmB,SAAS;;gBAErB;;YAEF;cAAgB;gBACdhB,iBAAiB,EAAE;gBACnB,MAAMmB,QAAQ,GAAG5B,KAAK,CAACY,GAAG,EAAE;gBAC5B,IAAIgB,QAAQ,EAAE;kBACZtB,OAAO,GAAGsB,QAAQ,CAAChC,KAAK,CAACmB,KAAK,CAACc,KAAK,CAAC;iBACtC,MAAM;kBACLxB,MAAM,GAAI,IAAI;kBACdF,MAAM,GAAIY,KAAK,CAACc,KAAK;kBACrBvB,OAAO,GAAGmB,SAAS;;gBAErB;;YAEF;cAAiB;gBACfnB,OAAO,GAAOS,KAAK,CAACe,CAAC;gBACrB,MAAMC,KAAK,GAAG7B,EAAE;gBAChBF,KAAK,CAACc,IAAI,CACR,IAAIrB,UAAU,CACXoC,KAAiB,IAAI;kBACpB,MAAMG,CAAC,GAAGC,wBAAqB,MAAMlB,KAAK,CAACmB,SAAS,CAAC3B,GAAG,EAAEsB,KAAK,CAAC,EAAtDI,oBAAMF,KAAK,CAAC,CAA2C;kBACjExB,GAAG,GAAOC,uBAAY;kBACtB,OAAOwB,CAAC;gBACV,CAAC,EACAG,CAAC,IAAI;kBACJ,MAAMH,CAAC,GAAGjB,KAAK,CAACqB,SAAS,CAAC7B,GAAG,EAAE4B,CAAC,CAAC;kBACjC5B,GAAG,GAAOC,uBAAY;kBACtB,OAAOwB,CAAC;gBACV,CAAC,CACF,CACF;gBACD;;YAEF;cAAkB;gBAChB1B,OAAO,GAAGS,KAAK,CAACsB,IAAI,CAACjC,WAAW,CAACkC,IAAI,EAAE,IAAIC,sBAAa,CAAC;gBACzD;;YAEF;cAAmB;gBACjBnC,WAAW,CAACU,IAAI,CAACC,KAAK,CAACyB,GAAG,CAAC;gBAC3BlC,OAAO,GAAG2B,sBACPQ,CAAC,IAAKR,wBAAwC,MAAMA,wBAAUQ,CAAC,yBAAC,EAA1DR,2BAAa7B,WAAW,CAACQ,GAAG,EAAE,yBAAC,CAA4B,EACjEuB,CAAC,IAAKF,wBAAwC,MAAMA,2BAAaE,CAAC,yBAAC,EAA7DF,2BAAa7B,WAAW,CAACQ,GAAG,EAAE,yBAAC,CAA+B,EAF7DG,KAAK,CAAChB,EAAE,CAGjB;gBACD;;YAEF;cAAkB;gBAChB,MAAMuB,OAAO,GAAIP,KAAK,CAACQ,GAAG,CAACrB,EAAE,CAAC;gBAC9BA,EAAE,GAAeoB,OAAO,CAAC,CAAC,CAAC;gBAC3BnB,MAAM,GAAWmB,OAAO,CAAC,CAAC,CAAC;gBAC3B,MAAMM,QAAQ,GAAG5B,KAAK,CAACY,GAAG,EAAE;gBAC5B,IAAIgB,QAAQ,EAAE;kBACZtB,OAAO,GAAGsB,QAAQ,CAAChC,KAAK,CAACO,MAAM,CAAC;iBACjC,MAAM;kBACLG,OAAO,GAAGmB,SAAS;;gBAErB;;YAEF;cAAgB;gBACdlB,GAAG,GAAcQ,KAAK,CAACR,GAAG;gBAC1B,MAAMqB,QAAQ,GAAG5B,KAAK,CAACY,GAAG,EAAE;gBAC5B,IAAIgB,QAAQ,EAAE;kBACZtB,OAAO,GAAGsB,QAAQ,CAAChC,KAAK,CAACO,MAAM,CAAC;iBACjC,MAAM;kBACLG,OAAO,GAAGmB,SAAS;;gBAErB;;YAEF;cAAkB;gBAChBnB,OAAO,GAAGS,KAAK,CAAChB,EAAE;gBAClBC,KAAK,CAACc,IAAI,CACR,IAAIrB,UAAU,CACXoC,KAAiB,IAAI;kBACpBtB,GAAG,GAAGQ,KAAK,CAAC2B,SAAS,CAACnC,GAAG,CAAC;kBAC1B,OAAO0B,6BAAeJ,KAAK,yBAAC;gBAC9B,CAAC,EACAM,CAAC,IAAI;kBACJ5B,GAAG,GAAGQ,KAAK,CAAC2B,SAAS,CAACnC,GAAG,CAAC;kBAC1B,OAAO0B,2BAAaE,CAAC,yBAAC;gBACxB,CAAC,CACF,CACF;;UACF;;OAGN,CAAC,OAAOM,CAAC,EAAE;QACV,IAAI,wBAAQ,EAACA,CAAC,CAAC,EAAE;UACfnC,OAAO,GAAG2B,6BAAeQ,CAAC,CAACZ,KAAK,yBAAC;SAClC,MAAM;UACLxB,MAAM,GAAG,IAAI;UACbF,MAAM,GAAGwC,qBAAWF,CAAC,CAAC;;;;IAI5B,IAAIpC,MAAM,EAAE;MACV,OAAO,CAACE,GAAG,EAAEqC,0BAAezC,MAAM,CAAC,CAAC;;IAEtC,OAAO,CAACI,GAAG,EAAEqC,wBAAa,CAAC1C,EAAE,EAAEC,MAAM,CAAC,CAAC,CAAC;EAC1C,CAAC;AACH;AAEA;;;;;;AAMA,qBAA8BL,CAAK;EACjC,OAAkBC,EAAiC,IAAsB;IACvE,OAAO8C,sBAA6BhB,KAAK,IAAI;MAC3C;MACA,MAAM,IAAIiB,KAAK,EAAE;IACnB,CAAC,EAAEC,kBAAQ,EAHJC,eAAgBlD,CAAC,EAAjBC,EAAE,CAAgB,CAAC,CAAC,CAAC,CAGhB;EACd,CAAC;AACH;AAEA;;;;;AAKA,2BAAsCA,EAA2C;EAC/E,OAAOkD,YAAa,EAAE,EAAflD,EAAE,CAAc,CAAC,CAAC,CAAC;AAC5B;AAEA;;;;;AAKM,SAAUmD,eAAe,CAAIC,CAAiB;EAClD,OAAcpD,EAAqC,IAAO;IACxD,OAAOqD,kBAAgBnB,mCAAsBkB,CAAC,EAAvBpD,EAAE,CAAsB,CAAC;EAClD,CAAC;AACH;AAEA;;;;;;AAMM,SAAUsD,cAAc,CAAKvD,CAAK;EACtC,OAAkBC,EAAiC,IAAQ;IACzD,OAAOkD,YAAanD,CAAC,EAAdC,EAAE,CAAa,CAAC,CAAC,CAAC;EAC3B,CAAC;AACH;AAEA;;;;;;AAMM,SAAUuD,oBAAoB,CAAKxD,CAAK;EAC5C,OAAkBC,EAAiC,IAAO;IACxD,OAAO8C,sBACJhB,KAAK,IAAI;MACR;MACA,MAAM,IAAIiB,KAAK,EAAE;IACnB,CAAC,EACD,CAAC,CAACS,CAAC,EAAEpB,CAAC,CAAC,KAAKA,CAAC,EALRa,eAAgBlD,CAAC,EAAjBC,EAAE,CAAgB,CAAC,CAAC,CAAC,CAM3B;EACH,CAAC;AACH;AAEA;;;;;AAKM,SAAUyD,aAAa,CAAOzD,EAA2C;EAC7E,OAAO8C,oBAAoC,CAAC,CAACU,CAAC,EAAEpB,CAAC,CAAC,KAAKA,CAAC,EAAjDa,eAAgB,EAAW,EAA3BjD,EAAE,CAA0B,CAAC,CAAC,CAAC,CAAmB;AAC3D;AAEA;;;;AAIM,SAAU0D,eAAe,CAAO1D,EAA2C;EAC/E,MAAM,CAAC2D,CAAC,EAAEC,IAAI,CAAC,GAAGX,eAAgB,EAAE,EAAlBjD,EAAE,CAAiB;EACrC,OAAO8C,sBACL,MAAK;IACH;IACA,MAAM,IAAIC,KAAK,EAAE;EACnB,CAAC,EACD,CAAC,CAACS,CAAC,EAAEpB,CAAC,CAAC,KAAK,CAACuB,CAAC,EAAEvB,CAAC,CAAC,EALbwB,IAAI,CAMV;AACH","names":["unsafeRunAll","unsafeRun","unsafeRunResult","MatchFrame","constructor","failure","apply","ApplyFrame","s","ma","stack","tsplus_module_1","s0","result","environment","failed","current","log","tsplus_module_2","unsafeUnwindStack","unwinding","next","pop","_zTag","push","currZ","_tag","nested","continuation","f","value","effect","updated","run","nextInstruction","undefined","make","nextInstr","nextInst","cause","z","state","m","tsplus_module_3","onFailure","a","onSuccess","asks","peek","tsplus_module_4","env","e","modifyLog","tsplus_module_5","tsplus_module_6","tsplus_module_7","Error","identity","unsafeRunAll_1","unsafeRun_1","unsafeRunReader","r","unsafeRunResult_1","unsafeRunState","unsafeRunStateResult","_","unsafeRunExit","unsafeRunWriter","w","exit"],"sourceRoot":"","sources":["../../../_src/control/Z/runtime.ts"],"sourcesContent":[null]}