@fncts/base 0.0.1

package/_mjs/data/Maybe/constructors.mjs

@@ -0,0 +1,92 @@
+import * as tsplus_module_1 from "@fncts/base/data/Maybe/definition";
+export const just = just_1;
+export const nothing = nothing_1;
+export const fromNullable = fromNullable_1;
+export const tryCatch = tryCatch_1;
+/**
+ * @tsplus static fncts.MaybeOps just
+ * @tsplus static fncts.JustOps __call
+ */
+
+function just_1(a) {
+  return new tsplus_module_1.Just(a);
+}
+
+const _Nothing = /*#__PURE__*/new tsplus_module_1.Nothing();
+/**
+ * @tsplus static fncts.MaybeOps nothing
+ * @tsplus static fncts.NothingOps __call
+ */
+
+
+function nothing_1() {
+  return _Nothing;
+}
+/**
+ * @tsplus static fncts.MaybeOps fromNullable
+ */
+
+
+function fromNullable_1(a) {
+  return a == null ? nothing_1() : just_1(a);
+}
+/**
+ * @tsplus static fncts.MaybeOps fromNullableK
+ */
+
+
+export function fromNullableK(f) {
+  return (...params) => fromNullable_1(f(...params));
+}
+export function fromPredicate_(a, p) {
+  return p(a) ? just_1(a) : nothing_1();
+}
+/**
+ * @tsplus static fncts.MaybeOps tryCatch
+ */
+
+function tryCatch_1(thunk) {
+  try {
+    return just_1(thunk());
+  } catch {
+    return nothing_1();
+  }
+}
+/**
+ * @tsplus static fncts.MaybeOps tryCatchK
+ */
+
+
+export function tryCatchK(f) {
+  return (...params) => tryCatch_1(() => f(...params));
+}
+
+class PartialException {
+  constructor() {
+    this._tag = "PartialException";
+  }
+
+}
+
+function raisePartial() {
+  throw new PartialException();
+}
+/**
+ * @tsplus static fncts.MaybeOps partial
+ */
+
+
+export function partial(f) {
+  return (...params) => {
+    try {
+      return just_1(f(raisePartial)(...params));
+    } catch (e) {
+      if (e instanceof PartialException) {
+        return nothing_1();
+      }
+
+      throw e;
+    }
+  };
+}
+//# sourceMappingURL=constructors.mjs.map

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

@@ -0,0 +1 @@
+{"version":3,"file":"constructors.mjs","mappings":";aAMgBA,IAAI;aAUJC,OAAO;aAOPC,YAAY;aAuBZC,QAAQ;AA5CxB;;;;;AAIA,gBAAwBC,CAAxB,EAA4B;EAC1B,OAAO,oBAAIC,IAAJ,CAASD,CAAT,CAAP;AACD;;AAED,MAAME,QAAQ,gBAAG,oBAAIC,OAAJ,EAAjB;AAEA;;;;;;AAIA;EACE,OAAOD,QAAP;AACD;AAED;;;;;AAGA,wBAAgCF,CAAhC,EAA8C;EAC5C,OAAOA,CAAC,IAAI,IAAL,GAAYI,WAAZ,GAAwBC,OAAKL,CAAL,CAA/B;AACD;AAED;;;;;AAGA,OAAM,SAAUM,aAAV,CAA6DC,CAA7D,EAA6F;EACjG,OAAO,CAAC,GAAGC,MAAJ,KAAyCC,eAAmBF,CAAC,CAAC,GAAGC,MAAJ,CAApB,CAAhD;AACD;AAOD,OAAM,SAAUE,cAAV,CAA4BV,CAA5B,EAAkCW,CAAlC,EAAiD;EACrD,OAAOA,CAAC,CAACX,CAAD,CAAD,GAAOK,OAAKL,CAAL,CAAP,GAAiBI,WAAxB;AACD;AAED;;;;AAGA,oBAA4BQ,KAA5B,EAA0C;EACxC,IAAI;IACF,OAAOP,OAAKO,KAAK,EAAV,CAAP;EACD,CAFD,CAEE,MAAM;IACN,OAAOR,WAAP;EACD;AACF;AAED;;;;;AAGA,OAAM,SAAUS,SAAV,CAAyDN,CAAzD,EAA+E;EACnF,OAAO,CAAC,GAAGC,MAAJ,KAA4BM,WAAS,MAAMP,CAAC,CAAC,GAAGC,MAAJ,CAAhB,CAAnC;AACD;;AAED,MAAMO,gBAAN,CAAsB;EAAtBC;IACW,YAAO,kBAAP;EACV;;AAFqB;;AAItB,SAASC,YAAT,GAAqB;EACnB,MAAM,IAAIF,gBAAJ,EAAN;AACD;AAED;;;;;AAGA,OAAM,SAAUG,OAAV,CAAuDX,CAAvD,EAAoG;EACxG,OAAO,CAAC,GAAGC,MAAJ,KAA2B;IAChC,IAAI;MACF,OAAOH,OAAKE,CAAC,CAACU,YAAD,CAAD,CAAgB,GAAGT,MAAnB,CAAL,CAAP;IACD,CAFD,CAEE,OAAOW,CAAP,EAAU;MACV,IAAIA,CAAC,YAAYJ,gBAAjB,EAAmC;QACjC,OAAOX,WAAP;MACD;;MACD,MAAMe,CAAN;IACD;EACF,CATD;AAUD","names":["just","nothing","fromNullable","tryCatch","a","Just","_Nothing","Nothing","nothing_1","just_1","fromNullableK","f","params","fromNullable_1","fromPredicate_","p","thunk","tryCatchK","tryCatch_1","PartialException","constructor","raisePartial","partial","e"],"sourceRoot":"","sources":["../../../_src/data/Maybe/constructors.ts"],"sourcesContent":[null]}

package/_mjs/data/Maybe/definition.mjs

@@ -0,0 +1,99 @@
+import * as tsplus_module_1 from "@fncts/base/typeclass/Hashable/hash";
+import * as tsplus_module_2 from "@fncts/base/typeclass/Equatable/definition";
+import * as tsplus_module_3 from "@fncts/base/typeclass/Equatable/api";
+import * as tsplus_module_4 from "@fncts/base/typeclass/Hashable/definition";
+export const isMaybe = isMaybe_1;
+export const isJust = isJust_1;
+export const isNothing = isNothing_1;
+import { isObject } from "../../util/predicates.mjs";
+export const MaybeTypeId = /*#__PURE__*/Symbol.for("fncts.Maybe");
+
+const _justHash = /*#__PURE__*/tsplus_module_1.hashString("fncts.Just");
+
+const _nothingHash = /*#__PURE__*/tsplus_module_1.hashString("fncts.Nothing");
+/**
+ * @tsplus type fncts.Just
+ * @tsplus companion fncts.JustOps
+ */
+
+
+export class Just {
+  constructor(value) {
+    this.value = value;
+    this._typeId = MaybeTypeId;
+    this._tag = "Just"
+    /* MaybeTag.Just */
+    ;
+  }
+
+  [tsplus_module_2.equalsSymbol](that) {
+    return isMaybe_1(that) && isJust_1(that) && tsplus_module_3.strictEquals(this.value, that.value);
+  }
+
+  get [tsplus_module_4.hashSymbol]() {
+    return tsplus_module_1.combineHash(_justHash, tsplus_module_1.hashUnknown(this.value));
+  }
+
+}
+/**
+ * @tsplus type fncts.Nothing
+ * @tsplus companion fncts.NothingOps
+ */
+
+export class Nothing {
+  constructor() {
+    this._typeId = MaybeTypeId;
+    this._tag = "Nothing"
+    /* MaybeTag.Nothing */
+    ;
+  }
+
+  [tsplus_module_2.equalsSymbol](that) {
+    return isMaybe_1(that) && isNothing_1(that);
+  }
+
+  get [tsplus_module_4.hashSymbol]() {
+    return _nothingHash;
+  }
+
+}
+export const Maybe = {};
+/**
+ * @tsplus unify fncts.Maybe
+ */
+
+export function unifyMaybe(self) {
+  return self;
+}
+/**
+ * @tsplus static fncts.MaybeOps isMaybe
+ */
+
+function isMaybe_1(u) {
+  return isObject(u) && (MaybeTypeId in u || "_tag" in u && typeof u["_tag"] === "string" && (u["_tag"] === "Nothing" || u["_tag"] === "Just"));
+}
+/**
+ * A type predicate determining if a `Maybe` is `Just`
+ *
+ * @tsplus fluent fncts.Maybe isJust
+ */
+
+
+function isJust_1(self) {
+  return self._tag === "Just"
+  /* MaybeTag.Just */
+  ;
+}
+/**
+ * A type predicate determining if a `Maybe` is `Nothing`
+ *
+ * @tsplus fluent fncts.Maybe isNothing
+ */
+
+
+function isNothing_1(self) {
+  return self._tag === "Nothing"
+  /* MaybeTag.Nothing */
+  ;
+}
+//# sourceMappingURL=definition.mjs.map

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

@@ -0,0 +1 @@
+{"version":3,"file":"definition.mjs","mappings":";;;;aAkEgBA,OAAO;aAaPC,MAAM;aASNC,SAAS;AAxFzB,SAASC,QAAT,QAAyB,2BAAzB;AAOA,OAAO,MAAMC,WAAW,gBAAGC,MAAM,CAACC,GAAP,CAAW,aAAX,CAApB;;AAGP,MAAMC,SAAS,gBAAMC,2BAAgB,YAAhB,CAArB;;AACA,MAAMC,YAAY,gBAAGD,2BAAgB,eAAhB,CAArB;AAEA;;;;;;AAIA,OAAM,MAAOE,IAAP,CAAW;EAGfC,YAAqBC,KAArB,EAA6B;IAAR;IAFZ,eAAuBR,WAAvB;IACA,YAAI;IAAA;IAAJ;EACwB;;EACjC,+BAAgBS,IAAhB,EAA6B;IAC3B,OAAOC,UAAQD,IAAR,KAAiBE,cAAjB,IAAkCC,6BAAuB,KAAKJ,KAA5B,EAAmCC,IAAI,CAACD,KAAxC,CAAzC;EACD;;EACG,mCAAa;IACf,OAAOJ,4BAAiBD,SAAjB,EAA4BC,4BAAiB,KAAKI,KAAtB,CAA5B,CAAP;EACD;;AATc;AAYjB;;;;;AAIA,OAAM,MAAOK,OAAP,CAAc;EAApBN;IACW,eAAuBP,WAAvB;IACA,YAAI;IAAA;IAAJ;EAOV;;EANC,+BAAgBS,IAAhB,EAA6B;IAC3B,OAAOC,UAAQD,IAAR,KAAiBK,iBAAxB;EACD;;EACG,mCAAa;IACf,OAAOT,YAAP;EACD;;AARiB;AAqBpB,OAAO,MAAMU,KAAK,GAAa,EAAxB;AAEP;;;;AAGA,OAAM,SAAUC,UAAV,CAA2CC,IAA3C,EAAkD;EACtD,OAAOA,IAAP;AACD;AAED;;;;AAGA,mBAAwBC,CAAxB,EAAkC;EAChC,OACEnB,QAAQ,CAACmB,CAAD,CAAR,KACClB,WAAW,IAAIkB,CAAf,IACE,UAAUA,CAAV,IAAe,OAAOA,CAAC,CAAC,MAAD,CAAR,KAAqB,QAApC,KAAiDA,CAAC,CAAC,MAAD,CAAD,KAAc,SAAd,IAA2BA,CAAC,CAAC,MAAD,CAAD,KAAc,MAA1F,CAFH,CADF;AAKD;AAED;;;;;;;AAKA,kBAA0BD,IAA1B,EAAwC;EACtC,OAAOA,IAAI,CAACE,IAAL,KAAS;EAAA;EAAhB;AACD;AAED;;;;;;;AAKA,qBAA6BF,IAA7B,EAA2C;EACzC,OAAOA,IAAI,CAACE,IAAL,KAAS;EAAA;EAAhB;AACD","names":["isMaybe","isJust","isNothing","isObject","MaybeTypeId","Symbol","for","_justHash","tsplus_module_1","_nothingHash","Just","constructor","value","that","isMaybe_1","isJust_1","tsplus_module_3","Nothing","isNothing_1","Maybe","unifyMaybe","self","u","_tag"],"sourceRoot":"","sources":["../../../_src/data/Maybe/definition.ts"],"sourcesContent":[null]}

package/_mjs/data/Maybe/destructors.mjs

@@ -0,0 +1,12 @@
+/**
+ * Matches on each case of a `Maybe`, returning the result of `nothing` if the `Maybe`
+ * is `Nothing`, or returning the result of `just` if it is `Just`
+ *
+ * @tsplus fluent fncts.Maybe match
+ */
+export function match_(self, nothing, just) {
+  return self._tag === "Just"
+  /* MaybeTag.Just */
+  ? just(self.value) : nothing();
+}
+//# sourceMappingURL=destructors.mjs.map

package/_mjs/data/Maybe/destructors.mjs.map

@@ -0,0 +1 @@
+{"version":3,"file":"destructors.mjs","mappings":"AAEA;;;;;;AAMA,OAAM,SAAUA,MAAV,CAA0BC,IAA1B,EAA0CC,OAA1C,EAA4DC,IAA5D,EAA6E;EACjF,OAAOF,IAAI,CAACG,IAAL,KAAS;EAAA;EAAT,EAA8BD,IAAI,CAACF,IAAI,CAACI,KAAN,CAAlC,GAAiDH,OAAO,EAA/D;AACD","names":["match_","self","nothing","just","_tag","value"],"sourceRoot":"","sources":["../../../_src/data/Maybe/destructors.ts"],"sourcesContent":[null]}

package/_mjs/data/Maybe/instances.mjs

@@ -0,0 +1,42 @@
+import * as tsplus_module_1 from "@fncts/base/typeclass/Functor";
+import * as tsplus_module_2 from "@fncts/base/typeclass/Apply";
+import * as tsplus_module_3 from "@fncts/base/typeclass/Applicative";
+import * as tsplus_module_4 from "@fncts/base/typeclass/Monad";
+import * as tsplus_module_5 from "@fncts/base/typeclass/Foldable";
+import * as tsplus_module_6 from "@fncts/base/typeclass/Filterable";
+import * as P from "../../typeclass.mjs";
+import { ap_, filter_, filterMap_, flatMap_, foldLeft_, foldRight_, map_, partition_, partitionMap_, zipWith_ } from "./api.mjs";
+import { just } from "./constructors.mjs";
+export const Functor = /*#__PURE__*/tsplus_module_1.mkFunctor({
+  map_
+});
+export const Apply = /*#__PURE__*/tsplus_module_2.mkApply({
+  map_,
+  ap_,
+  zipWith_
+});
+export const Applicative = /*#__PURE__*/tsplus_module_3.mkApplicative({
+  map_,
+  ap_,
+  zipWith_,
+  pure: just
+});
+export const Monad = /*#__PURE__*/tsplus_module_4.mkMonad({
+  map_,
+  ap_,
+  zipWith_,
+  pure: just,
+  flatMap_: flatMap_
+});
+export const Foldable = /*#__PURE__*/tsplus_module_5.mkFoldable({
+  foldLeft_,
+  foldRight_
+});
+export const Filterable = /*#__PURE__*/tsplus_module_6.mkFilterable({
+  map_,
+  filter_,
+  filterMap_,
+  partition_,
+  partitionMap_
+});
+//# sourceMappingURL=instances.mjs.map

package/_mjs/data/Maybe/instances.mjs.map

@@ -0,0 +1 @@
+{"version":3,"file":"instances.mjs","mappings":";;;;;;AAAA,OAAO,KAAKA,CAAZ,MAAmB,qBAAnB;AACA,SACEC,GADF,EAEEC,OAFF,EAGEC,UAHF,EAIEC,QAJF,EAKEC,SALF,EAMEC,UANF,EAOEC,IAPF,EAQEC,UARF,EASEC,aATF,EAUEC,QAVF,QAWO,WAXP;AAYA,SAASC,IAAT,QAAqB,oBAArB;AASA,OAAO,MAAMC,OAAO,gBAAsBC,0BAAU;EAAEN;AAAF,CAAV,CAAnC;AAEP,OAAO,MAAMO,KAAK,gBAAoBC,wBAAQ;EAAER,IAAF;EAAQN,GAAR;EAAaS;AAAb,CAAR,CAA/B;AAEP,OAAO,MAAMM,WAAW,gBAA0BC,8BAAc;EAC9DV,IAD8D;EAE9DN,GAF8D;EAG9DS,QAH8D;EAI9DQ,IAAI,EAAEP;AAJwD,CAAd,CAA3C;AAOP,OAAO,MAAMQ,KAAK,gBAAoBC,wBAAQ;EAC5Cb,IAD4C;EAE5CN,GAF4C;EAG5CS,QAH4C;EAI5CQ,IAAI,EAAEP,IAJsC;EAK5CP,QAAQ,EAAEA;AALkC,CAAR,CAA/B;AAQP,OAAO,MAAMiB,QAAQ,gBAAuBC,2BAAW;EACrDjB,SADqD;EAErDC;AAFqD,CAAX,CAArC;AAKP,OAAO,MAAMiB,UAAU,gBAAyBC,6BAAa;EAC3DjB,IAD2D;EAE3DL,OAF2D;EAG3DC,UAH2D;EAI3DK,UAJ2D;EAK3DC;AAL2D,CAAb,CAAzC","names":["P","ap_","filter_","filterMap_","flatMap_","foldLeft_","foldRight_","map_","partition_","partitionMap_","zipWith_","just","Functor","tsplus_module_1","Apply","tsplus_module_2","Applicative","tsplus_module_3","pure","Monad","tsplus_module_4","Foldable","tsplus_module_5","Filterable","tsplus_module_6"],"sourceRoot":"","sources":["../../../_src/data/Maybe/instances.ts"],"sourcesContent":[null]}

package/_mjs/data/Maybe.mjs

@@ -0,0 +1,7 @@
+// codegen:start {preset: barrel, include: Maybe/*.ts}
+export * from "./Maybe/api.mjs";
+export * from "./Maybe/constructors.mjs";
+export * from "./Maybe/definition.mjs";
+export * from "./Maybe/destructors.mjs";
+export * from "./Maybe/instances.mjs";
+//# sourceMappingURL=Maybe.mjs.map

package/_mjs/data/Maybe.mjs.map

@@ -0,0 +1 @@
+{"version":3,"file":"Maybe.mjs","mappings":"AAAA;AACA,cAAc,iBAAd;AACA,cAAc,0BAAd;AACA,cAAc,wBAAd;AACA,cAAc,yBAAd;AACA,cAAc,uBAAd","names":[],"sourceRoot":"","sources":["../../_src/data/Maybe.ts"],"sourcesContent":[null]}

package/_mjs/data/Newtype.mjs

@@ -0,0 +1,11 @@
+import * as tsplus_module_1 from "@fncts/base/data/function/api";
+export const Newtype = {};
+/**
+ * @tsplus static fncts.NewtypeOps __call
+ */
+
+export const newtype = () => ({
+  get: tsplus_module_1.unsafeCoerce,
+  reverseGet: tsplus_module_1.unsafeCoerce
+});
+//# sourceMappingURL=Newtype.mjs.map

package/_mjs/data/Newtype.mjs.map

@@ -0,0 +1 @@
+{"version":3,"file":"Newtype.mjs","mappings":";AAkBA,OAAO,MAAMA,OAAO,GAAe,EAA5B;AAyCP;;;;AAGA,OAAO,MAAMC,OAAO,GAAG,OAA4C;EACjEC,GAAG,kBAAEC,YAD4D;EAEjEC,UAAU,kBAAED;AAFqD,CAA5C,CAAhB","names":["Newtype","newtype","get","unsafeCoerce","reverseGet"],"sourceRoot":"","sources":["../../_src/data/Newtype.ts"],"sourcesContent":[null]}

package/_mjs/data/Patch/api.mjs

@@ -0,0 +1,111 @@
+import * as tsplus_module_1 from "@fncts/base/collection/immutable/List/definition";
+import * as tsplus_module_2 from "@fncts/base/data/Environment/api";
+import * as tsplus_module_3 from "@fncts/base/collection/immutable/List/constructors";
+import * as tsplus_module_4 from "@fncts/base/data/number/instances";
+import * as tsplus_module_5 from "@fncts/base/typeclass/Ord/api/contramap";
+import * as tsplus_module_6 from "@fncts/base/collection/immutable/HashMap/api";
+import * as tsplus_module_7 from "@fncts/base/data/Maybe/destructors";
+import * as tsplus_module_8 from "@fncts/base/collection/compat/Array/api";
+export const compose = compose_1;
+export const empty = empty_1;
+import { AddService, RemoveService, UpdateService } from "@fncts/base/data/Patch";
+import { Empty } from "@fncts/base/data/Patch/definition";
+import { Compose } from "@fncts/base/data/Patch/definition";
+import { concrete } from "@fncts/base/data/Patch/definition";
+/**
+ * @tsplus tailRec
+ */
+
+function applyLoop(environment, patches) {
+  var environment_1 = environment,
+      patches_1 = patches;
+  var environment_2 = environment,
+      patches_2 = patches;
+
+  while (1) {
+    if (tsplus_module_1.isEmpty(patches_1)) {
+      return environment_1;
+    }
+
+    const head = patches_1.head;
+    const tail = patches_1.tail;
+    void 0;
+
+    switch (head._tag) {
+      case "AddService":
+        environment_2 = tsplus_module_2.add(environment_1, head.service, head.tag);
+        patches_2 = tail;
+        environment_1 = environment_2;
+        patches_1 = patches_2;
+        continue;
+
+      case "Compose":
+        environment_2 = environment_1;
+        patches_2 = tsplus_module_3.cons(head.first, tsplus_module_3.cons(head.second, tail));
+        environment_1 = environment_2;
+        patches_1 = patches_2;
+        continue;
+
+      case "Empty":
+        environment_2 = environment_1;
+        patches_2 = tail;
+        environment_1 = environment_2;
+        patches_1 = patches_2;
+        continue;
+
+      case "RemoveService":
+        environment_2 = environment_1;
+        patches_2 = tail;
+        environment_1 = environment_2;
+        patches_1 = patches_2;
+        continue;
+
+      case "UpdateService":
+        environment_2 = tsplus_module_2.update(environment_1, head.update, head.tag);
+        patches_2 = tail;
+        environment_1 = environment_2;
+        patches_1 = patches_2;
+        continue;
+    }
+  }
+}
+/**
+ * @tsplus fluent fncts.Environment.Patch __call
+ */
+
+
+export function apply(patch, environment) {
+  return applyLoop(environment, tsplus_module_3.cons(patch));
+}
+/**
+ * @tsplus fluent fncts.Environment.Patch compose
+ */
+
+function compose_1(self, that) {
+  return new Compose(self, that);
+}
+
+const OrdEnvironmentMap = /*#__PURE__*/tsplus_module_5.contramap(tsplus_module_4.Ord, _ => _[1][1]);
+/**
+ * @tsplus static fncts.Environment.PatchOps diff
+ */
+
+export function diff(oldValue, newValue) {
+  const sorted = tsplus_module_6.toArray(newValue.map).sort(OrdEnvironmentMap.compare_);
+  const [missingServices, patch] = tsplus_module_8.foldLeft(sorted, [tsplus_module_6.beginMutation(oldValue.map), empty_1()], ([map, patch], [tag, [newService, newIndex]]) => tsplus_module_7.match_(tsplus_module_6.get_(map, tag), () => [tsplus_module_6.remove_(map, tag), compose_1(patch, new AddService(newService, tag))], ([oldService, oldIndex]) => {
+    if (oldService === newService && oldIndex === newIndex) {
+      return [tsplus_module_6.remove_(map, tag), patch];
+    } else {
+      return [tsplus_module_6.remove_(map, tag), compose_1(patch, new UpdateService(_ => newService, tag))];
+    }
+  }));
+  return tsplus_module_6.foldLeftWithIndex_(missingServices, patch, (tag, patch) => compose_1(patch, new RemoveService(tag)));
+}
+/**
+ * @tsplus static fncts.Environment.PatchOps empty
+ */
+
+function empty_1() {
+  return new Empty();
+}
+//# sourceMappingURL=api.mjs.map

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

@@ -0,0 +1 @@
+{"version":3,"file":"api.mjs","mappings":";;;;;;;;aAyCgBA,OAAO;aA+BPC,KAAK;AAvErB,SAASC,UAAT,EAAqBC,aAArB,EAAoCC,aAApC,QAAyD,wBAAzD;AAEA,SAASC,KAAT,QAAsB,mCAAtB;AACA,SAASC,OAAT,QAAwB,mCAAxB;AACA,SAASC,QAAT,QAAyB,mCAAzB;AAEA;;;;AAGA,SAASC,SAAT,CAAmBC,WAAnB,EAAkDC,OAAlD,EAAgF;sBAA7DD;MAAAE,YAA+BD;sBAA/BD;MAAAG,YAA+BF;;YAAkD;IAClG,IAAIG,kCAAJ,EAAuB;MACrB;IACD;;IACD,MAAMC,IAAI,GAAGH,UAAQG,IAArB;IACA,MAAMC,IAAI,GAAGJ,UAAQI,IAArB;IACA;;IACA,QAAQD,IAAI,CAACE,IAAb;MACE,KAAK,YAAL;wBACmBC,mCAAgBH,IAAI,CAACI,OAArB,EAA8BJ,IAAI,CAACK,GAAnC;oBAAyCJ;;;;;MAC5D,KAAK,SAAL;;oBACgCK,qBAAKN,IAAI,CAACO,KAAV,EAAiBD,qBAAKN,IAAI,CAACQ,MAAV,EAAkBP,IAAlB,CAAjB;;;;;MAChC,KAAK,OAAL;;oBACgCA;;;;;MAChC,KAAK,eAAL;;oBACgCA;;;;;MAChC,KAAK,eAAL;wBACmBE,sCAAmBH,IAAI,CAACS,MAAxB,EAAgCT,IAAI,CAACK,GAArC;oBAA2CJ;;;;IAVhE;EAYD;AAAA;AAED;;;;;AAGA,OAAM,SAAUS,KAAV,CAAyBC,KAAzB,EAAgDhB,WAAhD,EAA4E;EAChF,OAAOD,SAAS,CAACC,WAAD,EAAcW,qBAAKK,KAAL,CAAd,CAAhB;AACD;AAED;;;;AAGA,mBAAuCC,IAAvC,EAA6DC,IAA7D,EAAmF;EACjF,OAAO,IAAIrB,OAAJ,CAAYoB,IAAZ,EAAkBC,IAAlB,CAAP;AACD;;AAED,MAAMC,iBAAiB,gBAAGC,+CAAsBC,CAAD,IAA4DA,CAAC,CAAC,CAAD,CAAD,CAAK,CAAL,CAAjF,CAA1B;AAEA;;;;AAGA,OAAM,SAAUC,IAAV,CAAwBC,QAAxB,EAAmDC,QAAnD,EAA6E;EACjF,MAAMC,MAAM,GAAqBC,gCAAQ,CAACC,GAAT,EAAqBC,IAArB,CAA0BT,iBAAiB,CAACU,QAA5C,CAAjC;EACA,MAAM,CAACC,eAAD,EAAkBd,KAAlB,IAA2Be,iCAC/B,+BAACR,QAAQ,CAACI,GAAV,GAA6BK,SAA7B,CAD+B,EAE/B,CAAC,CAACL,GAAD,EAAMX,KAAN,CAAD,EAAe,CAACN,GAAD,EAAM,CAACuB,UAAD,EAAaC,QAAb,CAAN,CAAf,KACEC,iDAAQzB,GAAR,GACE,MAAM,CAACgB,6BAAWhB,GAAX,CAAD,EAAkB0B,iBAAc,IAAI3C,UAAJ,CAAewC,UAAf,EAA2BvB,GAA3B,CAAd,CAAlB,CADR,EAEE,CAAC,CAAC2B,UAAD,EAAaC,QAAb,CAAD,KAA2B;IACzB,IAAID,UAAU,KAAKJ,UAAf,IAA6BK,QAAQ,KAAKJ,QAA9C,EAAwD;MACtD,OAAO,CAACR,6BAAWhB,GAAX,CAAD,EAAkBM,KAAlB,CAAP;IACD,CAFD,MAEO;MACL,OAAO,CAACU,6BAAWhB,GAAX,CAAD,EAAkB0B,iBAAc,IAAIzC,aAAJ,CAAmB0B,CAAD,IAAYY,UAA9B,EAA0CvB,GAA1C,CAAd,CAAlB,CAAP;IACD;EACF,CARH,CAH6B,CAAjC;EAcA,OAAOgB,oDAAkCV,KAAlC,EAAyC,CAACN,GAAD,EAAMM,KAAN,KAAgBoB,iBAAc,IAAI1C,aAAJ,CAAkBgB,GAAlB,CAAd,CAAzD,CAAP;AACD;AAED;;;;AAGA;EACE,OAAO,IAAId,KAAJ,EAAP;AACD","names":["compose","empty","AddService","RemoveService","UpdateService","Empty","Compose","concrete","applyLoop","environment","patches","patches_1","patches_2","tsplus_module_1","head","tail","_tag","tsplus_module_2","service","tag","tsplus_module_3","first","second","update","apply","patch","self","that","OrdEnvironmentMap","tsplus_module_5","_","diff","oldValue","newValue","sorted","tsplus_module_6","map","sort","compare_","missingServices","tsplus_module_8","empty_1","newService","newIndex","tsplus_module_7","compose_1","oldService","oldIndex"],"sourceRoot":"","sources":["../../../_src/data/Patch/api.ts"],"sourcesContent":[null]}

package/_mjs/data/Patch/definition.mjs

@@ -0,0 +1,61 @@
+export const PatchTypeId = /*#__PURE__*/Symbol.for("fncts.Patch");
+/**
+ * @tsplus type fncts.Environment.Patch
+ * @tsplus companion fncts.Environment.PatchOps
+ */
+
+export class Patch {
+  constructor() {
+    this._typeId = PatchTypeId;
+  }
+
+}
+export class AddService extends Patch {
+  constructor(service, tag) {
+    super();
+    this.service = service;
+    this.tag = tag;
+    this._tag = "AddService";
+  }
+
+}
+export class Compose extends Patch {
+  constructor(first, second) {
+    super();
+    this.first = first;
+    this.second = second;
+    this._tag = "Compose";
+  }
+
+}
+export class Empty extends Patch {
+  constructor() {
+    super(...arguments);
+    this._tag = "Empty";
+  }
+
+}
+export class RemoveService extends Patch {
+  constructor(tag) {
+    super();
+    this.tag = tag;
+    this._tag = "RemoveService";
+  }
+
+}
+export class UpdateService extends Patch {
+  constructor(update, tag) {
+    super();
+    this.update = update;
+    this.tag = tag;
+    this._tag = "UpdateService";
+  }
+
+}
+/**
+ * @tsplus macro remove
+ */
+
+export function concrete(_) {//
+}
+//# sourceMappingURL=definition.mjs.map

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

@@ -0,0 +1 @@
+{"version":3,"file":"definition.mjs","mappings":"AAAA,OAAO,MAAMA,WAAW,gBAAGC,MAAM,CAACC,GAAP,CAAW,aAAX,CAApB;AAGP;;;;;AAIA,OAAM,MAAgBC,KAAhB,CAAqB;EAA3BC;IACW,eAAuBJ,WAAvB;EAGV;;AAJ0B;AAM3B,OAAM,MAAOK,UAAP,SAAwCF,KAAxC,CAAsE;EAE1EC,YAAqBE,OAArB,EAAgDC,GAAhD,EAAiE;IAC/D;IADmB;IAA2B;IADvC,YAAO,YAAP;EAGR;;AAJyE;AAO5E,OAAM,MAAOC,OAAP,SAAsCL,KAAtC,CAAqD;EAEzDC,YAAqBK,KAArB,EAAqDC,MAArD,EAA6E;IAC3E;IADmB;IAAgC;IAD5C,YAAO,SAAP;EAGR;;AAJwD;AAO3D,OAAM,MAAOC,KAAP,SAA0BR,KAA1B,CAAyC;EAA/CC;;IACW,YAAO,OAAP;EACV;;AAF8C;AAI/C,OAAM,MAAOQ,aAAP,SAA2CT,KAA3C,CAAyE;EAE7EC,YAAqBG,GAArB,EAAsC;IACpC;IADmB;IADZ,YAAO,eAAP;EAGR;;AAJ4E;AAO/E,OAAM,MAAOM,aAAP,SAA2CV,KAA3C,CAAwF;EAE5FC,YAAqBU,MAArB,EAA+DP,GAA/D,EAAgF;IAC9E;IADmB;IAA0C;IADtD,YAAO,eAAP;EAGR;;AAJ2F;AAc9F;;;;AAGA,OAAM,SAAUQ,QAAV,CAAmBC,CAAnB,EAAqC,CACzC;AACD","names":["PatchTypeId","Symbol","for","Patch","constructor","AddService","service","tag","Compose","first","second","Empty","RemoveService","UpdateService","update","concrete","_"],"sourceRoot":"","sources":["../../../_src/data/Patch/definition.ts"],"sourcesContent":[null]}

package/_mjs/data/Patch.mjs

@@ -0,0 +1,4 @@
+// codegen:start { preset: barrel, include: ./Patch/*.ts }
+export * from "./Patch/api.mjs";
+export * from "./Patch/definition.mjs";
+//# sourceMappingURL=Patch.mjs.map

package/_mjs/data/Patch.mjs.map

@@ -0,0 +1 @@
+{"version":3,"file":"Patch.mjs","mappings":"AAAA;AACA,cAAc,iBAAd;AACA,cAAc,wBAAd","names":[],"sourceRoot":"","sources":["../../_src/data/Patch.ts"],"sourcesContent":[null]}

package/_mjs/data/Predicate/api.mjs

@@ -0,0 +1,28 @@
+/**
+ * @tsplus operator fncts.Predicate &&
+ */
+export function and(self, that) {
+  return a => self(a) && that(a);
+}
+/**
+ * @tsplus fluent fncts.Predicate contramap
+ */
+
+export function contramap(self, f) {
+  return b => self(f(b));
+}
+/**
+ * @tsplus getter fncts.Predicate invert
+ */
+
+export function invert(self) {
+  return a => !self(a);
+}
+/**
+ * @tsplus operator fncts.Predicate ||
+ */
+
+export function or(self, that) {
+  return a => self(a) || that(a);
+}
+//# sourceMappingURL=api.mjs.map

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

@@ -0,0 +1 @@
+{"version":3,"file":"api.mjs","mappings":"AAAA;;;AAGA,OAAM,SAAUA,GAAV,CAAiBC,IAAjB,EAAqCC,IAArC,EAAuD;EAC3D,OAAQC,CAAD,IAAOF,IAAI,CAACE,CAAD,CAAJ,IAAWD,IAAI,CAACC,CAAD,CAA7B;AACD;AAED;;;;AAGA,OAAM,SAAUC,SAAV,CAA0BH,IAA1B,EAA8CI,CAA9C,EAA4D;EAChE,OAAQC,CAAD,IAAOL,IAAI,CAACI,CAAC,CAACC,CAAD,CAAF,CAAlB;AACD;AAED;;;;AAGA,OAAM,SAAUC,MAAV,CAAoBN,IAApB,EAAsC;EAC1C,OAAQE,CAAD,IAAO,CAACF,IAAI,CAACE,CAAD,CAAnB;AACD;AAED;;;;AAGA,OAAM,SAAUK,EAAV,CAA6BP,IAA7B,EAAiDC,IAAjD,EAAmE;EACvE,OAAQC,CAAD,IAAOF,IAAI,CAACE,CAAD,CAAJ,IAAWD,IAAI,CAACC,CAAD,CAA7B;AACD","names":["and","self","that","a","contramap","f","b","invert","or"],"sourceRoot":"","sources":["../../../_src/data/Predicate/api.ts"],"sourcesContent":[null]}

package/_mjs/data/Predicate/definition.mjs

@@ -0,0 +1,2 @@
+export {};
+//# sourceMappingURL=definition.mjs.map

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

@@ -0,0 +1 @@
+{"version":3,"file":"definition.mjs","mappings":"","names":[],"sourceRoot":"","sources":[],"sourcesContent":[]}

package/_mjs/data/Predicate.mjs

@@ -0,0 +1,4 @@
+// codegen:start { preset: barrel, include: Predicate/*.ts }
+export * from "./Predicate/api.mjs";
+export * from "./Predicate/definition.mjs";
+//# sourceMappingURL=Predicate.mjs.map

package/_mjs/data/Predicate.mjs.map

@@ -0,0 +1 @@
+{"version":3,"file":"Predicate.mjs","mappings":"AAAA;AACA,cAAc,qBAAd;AACA,cAAc,4BAAd","names":[],"sourceRoot":"","sources":["../../_src/data/Predicate.ts"],"sourcesContent":[null]}

package/_mjs/data/Refinement/api.mjs

@@ -0,0 +1,30 @@
+/**
+ * @tsplus fluent fncts.Refinement and
+ * @tsplus operator fncts.Refinement &&
+ */
+export function and(self, that) {
+  return a => self(a) && that(a);
+}
+/**
+ * @tsplus fluent fncts.Refinement contramap
+ */
+
+export function contramap(self, f) {
+  return c => self(f(c));
+}
+/**
+ * @tsplus fluent fncts.Refinement or
+ * @tsplus operator fncts.Refinement ||
+ */
+
+export function or(self, that) {
+  return a => self(a) || that(a);
+}
+/**
+ * @tsplus fluent fncts.Refinement invert
+ */
+
+export function invert(self) {
+  return a => !self(a);
+}
+//# sourceMappingURL=api.mjs.map

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

@@ -0,0 +1 @@
+{"version":3,"file":"api.mjs","mappings":"AAAA;;;;AAIA,OAAM,SAAUA,GAAV,CAA2CC,IAA3C,EAAmEC,IAAnE,EAAyF;EAC7F,OAAQC,CAAD,IAAeF,IAAI,CAACE,CAAD,CAAJ,IAAWD,IAAI,CAACC,CAAD,CAArC;AACD;AAED;;;;AAGA,OAAM,SAAUC,SAAV,CAAiDH,IAAjD,EAAyEI,CAAzE,EAAuF;EAC3F,OAAQC,CAAD,IAAeL,IAAI,CAACI,CAAC,CAACC,CAAD,CAAF,CAA1B;AACD;AAED;;;;;AAIA,OAAM,SAAUC,EAAV,CAA0CN,IAA1C,EAAkEC,IAAlE,EAAwF;EAC5F,OAAQC,CAAD,IAAmBF,IAAI,CAACE,CAAD,CAAJ,IAAWD,IAAI,CAACC,CAAD,CAAzC;AACD;AAED;;;;AAGA,OAAM,SAAUK,MAAV,CAAiCP,IAAjC,EAAuD;EAC3D,OAAQE,CAAD,IAA2B,CAACF,IAAI,CAACE,CAAD,CAAvC;AACD","names":["and","self","that","a","contramap","f","c","or","invert"],"sourceRoot":"","sources":["../../../_src/data/Refinement/api.ts"],"sourcesContent":[null]}

package/_mjs/data/Refinement/definition.mjs

@@ -0,0 +1,2 @@
+export {};
+//# sourceMappingURL=definition.mjs.map

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

@@ -0,0 +1 @@
+{"version":3,"file":"definition.mjs","mappings":"","names":[],"sourceRoot":"","sources":[],"sourcesContent":[]}

package/_mjs/data/Refinement.mjs

@@ -0,0 +1,4 @@
+// codegen:start { preset: barrel, include: Refinement/*.ts }
+export * from "./Refinement/api.mjs";
+export * from "./Refinement/definition.mjs";
+//# sourceMappingURL=Refinement.mjs.map

package/_mjs/data/Refinement.mjs.map

@@ -0,0 +1 @@
+{"version":3,"file":"Refinement.mjs","mappings":"AAAA;AACA,cAAc,sBAAd;AACA,cAAc,6BAAd","names":[],"sourceRoot":"","sources":["../../_src/data/Refinement.ts"],"sourcesContent":[null]}

package/_mjs/data/Struct/api.mjs

@@ -0,0 +1,26 @@
+export const reverseGet = reverseGet_1;
+import { Struct } from "./definition.mjs";
+/**
+ * @tsplus fluent fncts.Struct map
+ */
+
+export function map_(self, f) {
+  const out = {};
+  const keys = Object.keys(self);
+
+  for (let i = 0; i < keys.length; i++) {
+    const k = keys[i];
+    out[k] = f(reverseGet_1(self)[k]);
+  }
+
+  return Struct.get(out);
+}
+/**
+ * @tsplus getter fncts.Struct reverseGet
+ * @tsplus macro identity
+ */
+
+function reverseGet_1(self) {
+  return Struct.reverseGet(self);
+}
+//# sourceMappingURL=api.mjs.map

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

@@ -0,0 +1 @@
+{"version":3,"file":"api.mjs","mappings":"aAmBgBA,UAAU;AAnB1B,SAASC,MAAT,QAAuB,kBAAvB;AAEA;;;;AAGA,OAAM,SAAUC,IAAV,CAAqBC,IAArB,EAAsCC,CAAtC,EAA6D;EACjE,MAAMC,GAAG,GAAI,EAAb;EACA,MAAMC,IAAI,GAAGC,MAAM,CAACD,IAAP,CAAYH,IAAZ,CAAb;;EACA,KAAK,IAAIK,CAAC,GAAG,CAAb,EAAgBA,CAAC,GAAGF,IAAI,CAACG,MAAzB,EAAiCD,CAAC,EAAlC,EAAsC;IACpC,MAAME,CAAC,GAAGJ,IAAI,CAACE,CAAD,CAAd;IACAH,GAAG,CAACK,CAAD,CAAH,GAAUN,CAAC,CAACO,mBAAgBD,CAAhB,CAAD,CAAX;EACD;;EACD,OAAOT,MAAM,CAACW,GAAP,CAAWP,GAAX,CAAP;AACD;AAED;;;;;AAIA,sBAA8BF,IAA9B,EAA6C;EAC3C,OAAOF,MAAM,CAACD,UAAP,CAAkBG,IAAlB,CAAP;AACD","names":["reverseGet","Struct","map_","self","f","out","keys","Object","i","length","k","reverseGet_1","get"],"sourceRoot":"","sources":["../../../_src/data/Struct/api.ts"],"sourcesContent":[null]}

package/_mjs/data/Struct/definition.mjs

@@ -0,0 +1,3 @@
+import * as tsplus_module_1 from "@fncts/base/data/Newtype";
+export const Struct = /*#__PURE__*/tsplus_module_1.newtype();
+//# sourceMappingURL=definition.mjs.map

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

@@ -0,0 +1 @@
+{"version":3,"file":"definition.mjs","mappings":";AAoBA,OAAO,MAAMA,MAAM,gBAAcC,yBAA1B","names":["Struct","tsplus_module_1"],"sourceRoot":"","sources":["../../../_src/data/Struct/definition.ts"],"sourcesContent":[null]}

package/_mjs/data/Tag/constructors.mjs

@@ -0,0 +1,9 @@
+import * as tsplus_module_1 from "@fncts/base/data/Tag/definition";
+/**
+ * @tsplus static fncts.TagOps __call
+ */
+
+export function makeTag() {
+  return new tsplus_module_1.Tag();
+}
+//# sourceMappingURL=constructors.mjs.map

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

@@ -0,0 +1 @@
+{"version":3,"file":"constructors.mjs","mappings":";AAAA;;;;AAGA,OAAM,SAAUA,OAAV,GAAiB;EACrB,OAAO,oBAAIC,GAAJ,EAAP;AACD","names":["makeTag","Tag"],"sourceRoot":"","sources":["../../../_src/data/Tag/constructors.ts"],"sourcesContent":[null]}