@explorable-viz/fluid 0.12.2 → 0.12.4

package/output-es/Web.HTML.HTMLImageElement/foreign.js

@@ -0,0 +1,215 @@
+export function create() {
+  return new Image();
+}
+
+export function createWithDimensions(width) {
+  return function (height) {
+    return function () {
+      return new Image(width, height);
+    };
+  };
+}
+
+// ----------------------------------------------------------------------------
+
+export function alt(image) {
+  return function () {
+    return image.alt;
+  };
+}
+
+export function setAlt(alt) {
+  return function (image) {
+    return function () {
+      image.alt = alt;
+    };
+  };
+}
+
+// ----------------------------------------------------------------------------
+
+export function src(image) {
+  return function () {
+    return image.src;
+  };
+}
+
+export function setSrc(src) {
+  return function (image) {
+    return function () {
+      image.src = src;
+    };
+  };
+}
+
+// ----------------------------------------------------------------------------
+
+export function srcset(image) {
+  return function () {
+    return image.srcset;
+  };
+}
+
+export function setSrcset(srcset) {
+  return function (image) {
+    return function () {
+      image.srcset = srcset;
+    };
+  };
+}
+
+// ----------------------------------------------------------------------------
+
+export function sizes(image) {
+  return function () {
+    return image.sizes;
+  };
+}
+
+export function setSizes(sizes) {
+  return function (image) {
+    return function () {
+      image.sizes = sizes;
+    };
+  };
+}
+
+// ----------------------------------------------------------------------------
+
+export function currentSrc(image) {
+  return function () {
+    return image.currentSrc;
+  };
+}
+
+// ----------------------------------------------------------------------------
+
+export function _crossOrigin(image) {
+  return image.crossOrigin;
+}
+
+export function _setCrossOrigin(crossOrigin, image) {
+  image.crossOrigin = crossOrigin;
+}
+
+// ----------------------------------------------------------------------------
+
+export function useMap(image) {
+  return function () {
+    return image.useMap;
+  };
+}
+
+export function setUseMap(useMap) {
+  return function (image) {
+    return function () {
+      image.useMap = useMap;
+    };
+  };
+}
+
+// ----------------------------------------------------------------------------
+
+export function isMap(image) {
+  return function () {
+    return image.isMap;
+  };
+}
+
+export function setIsMap(isMap) {
+  return function (image) {
+    return function () {
+      image.isMap = isMap;
+    };
+  };
+}
+
+// ----------------------------------------------------------------------------
+
+export function width(image) {
+  return function () {
+    return image.width;
+  };
+}
+
+export function setWidth(width) {
+  return function (image) {
+    return function () {
+      image.width = width;
+    };
+  };
+}
+
+// ----------------------------------------------------------------------------
+
+export function height(image) {
+  return function () {
+    return image.height;
+  };
+}
+
+export function setHeight(height) {
+  return function (image) {
+    return function () {
+      image.height = height;
+    };
+  };
+}
+
+// ----------------------------------------------------------------------------
+
+export function naturalWidth(image) {
+  return function () {
+    return image.naturalWidth;
+  };
+}
+
+export function naturalHeight(image) {
+  return function () {
+    return image.naturalHeight;
+  };
+}
+
+// ----------------------------------------------------------------------------
+
+export function referrerPolicy(image) {
+  return function () {
+    return image.referrerPolicy;
+  };
+}
+
+export function setReferrerPolicy(referrerPolicy) {
+  return function (image) {
+    return function () {
+      image.referrerPolicy = referrerPolicy;
+    };
+  };
+}
+
+// ----------------------------------------------------------------------------
+
+export function _decoding(image) {
+  return image.decoding;
+}
+
+export function _setDecoding(decoding, image) {
+  image.decoding = decoding;
+}
+
+// ----------------------------------------------------------------------------
+
+export function _loading(image) {
+  return image.loading;
+}
+
+export function _setLoading(loading, image) {
+  image.loading = loading;
+}
+
+// ----------------------------------------------------------------------------
+
+export function complete(image) {
+  return function () {
+    return image.complete;
+  };
+}

package/output-es/Web.HTML.HTMLImageElement/index.js

@@ -0,0 +1,140 @@
+import * as $runtime from "../runtime.js";
+import * as Data$dMaybe from "../Data.Maybe/index.js";
+import * as Data$dNullable from "../Data.Nullable/index.js";
+import * as Effect$dUncurried from "../Effect.Uncurried/index.js";
+import * as Unsafe$dCoerce from "../Unsafe.Coerce/index.js";
+import * as Web$dHTML$dHTMLImageElement$dCORSMode from "../Web.HTML.HTMLImageElement.CORSMode/index.js";
+import * as Web$dHTML$dHTMLImageElement$dDecodingHint from "../Web.HTML.HTMLImageElement.DecodingHint/index.js";
+import * as Web$dHTML$dHTMLImageElement$dLaziness from "../Web.HTML.HTMLImageElement.Laziness/index.js";
+import * as Web$dInternal$dFFI from "../Web.Internal.FFI/index.js";
+import {
+  _crossOrigin,
+  _decoding,
+  _loading,
+  _setCrossOrigin,
+  _setDecoding,
+  _setLoading,
+  alt,
+  complete,
+  create,
+  createWithDimensions,
+  currentSrc,
+  height,
+  isMap,
+  naturalHeight,
+  naturalWidth,
+  referrerPolicy,
+  setAlt,
+  setHeight,
+  setIsMap,
+  setReferrerPolicy,
+  setSizes,
+  setSrc,
+  setSrcset,
+  setUseMap,
+  setWidth,
+  sizes,
+  src,
+  srcset,
+  useMap,
+  width
+} from "./foreign.js";
+const toParentNode = Unsafe$dCoerce.unsafeCoerce;
+const toNonDocumentTypeChildNode = Unsafe$dCoerce.unsafeCoerce;
+const toNode = Unsafe$dCoerce.unsafeCoerce;
+const toHTMLElement = Unsafe$dCoerce.unsafeCoerce;
+const toEventTarget = Unsafe$dCoerce.unsafeCoerce;
+const toElement = Unsafe$dCoerce.unsafeCoerce;
+const toChildNode = Unsafe$dCoerce.unsafeCoerce;
+const setLoading = laziness => Effect$dUncurried.runEffectFn2(_setLoading)((() => {
+  if (laziness === "Eager") { return "eager"; }
+  if (laziness === "Lazy") { return "lazy"; }
+  $runtime.fail();
+})());
+const setDecoding = hint => Effect$dUncurried.runEffectFn2(_setDecoding)((() => {
+  if (hint === "Sync") { return "sync"; }
+  if (hint === "Async") { return "async"; }
+  if (hint === "Auto") { return "auto"; }
+  $runtime.fail();
+})());
+const setCrossOrigin = mode => Effect$dUncurried.runEffectFn2(_setCrossOrigin)((() => {
+  if (mode === "Anonymous") { return "anonymous"; }
+  if (mode === "UseCredentials") { return "use-credentials"; }
+  $runtime.fail();
+})());
+const loading = /* #__PURE__ */ (() => {
+  const $0 = Effect$dUncurried.runEffectFn1(_loading);
+  return x => {
+    const $1 = $0(x);
+    return () => {
+      const a$p = $1();
+      if (a$p === "") { return Web$dHTML$dHTMLImageElement$dLaziness.Eager; }
+      if (a$p === "eager") { return Web$dHTML$dHTMLImageElement$dLaziness.Eager; }
+      if (a$p === "lazy") { return Web$dHTML$dHTMLImageElement$dLaziness.Lazy; }
+      return Web$dHTML$dHTMLImageElement$dLaziness.Eager;
+    };
+  };
+})();
+const fromParentNode = /* #__PURE__ */ Web$dInternal$dFFI.unsafeReadProtoTagged("HTMLImageElement");
+const fromNonDocumentTypeChildNode = /* #__PURE__ */ Web$dInternal$dFFI.unsafeReadProtoTagged("HTMLImageElement");
+const fromNode = /* #__PURE__ */ Web$dInternal$dFFI.unsafeReadProtoTagged("HTMLImageElement");
+const fromHTMLElement = /* #__PURE__ */ Web$dInternal$dFFI.unsafeReadProtoTagged("HTMLImageElement");
+const fromEventTarget = /* #__PURE__ */ Web$dInternal$dFFI.unsafeReadProtoTagged("HTMLImageElement");
+const fromElement = /* #__PURE__ */ Web$dInternal$dFFI.unsafeReadProtoTagged("HTMLImageElement");
+const fromChildNode = /* #__PURE__ */ Web$dInternal$dFFI.unsafeReadProtoTagged("HTMLImageElement");
+const decoding = /* #__PURE__ */ (() => {
+  const $0 = Effect$dUncurried.runEffectFn1(_decoding);
+  return x => {
+    const $1 = $0(x);
+    return () => {
+      const a$p = $1();
+      if (a$p === "") { return Web$dHTML$dHTMLImageElement$dDecodingHint.Auto; }
+      if (a$p === "sync") { return Web$dHTML$dHTMLImageElement$dDecodingHint.Sync; }
+      if (a$p === "async") { return Web$dHTML$dHTMLImageElement$dDecodingHint.Async; }
+      return Web$dHTML$dHTMLImageElement$dDecodingHint.Auto;
+    };
+  };
+})();
+const crossOrigin = /* #__PURE__ */ (() => {
+  const $0 = Effect$dUncurried.runEffectFn1(_crossOrigin);
+  return x => {
+    const $1 = $0(x);
+    return () => {
+      const a$p = $1();
+      const $2 = Data$dNullable.nullable(a$p, Data$dMaybe.Nothing, Data$dMaybe.Just);
+      if ($2.tag === "Just") {
+        if ($2._1 === "") { return Data$dMaybe.$Maybe("Just", Web$dHTML$dHTMLImageElement$dCORSMode.Anonymous); }
+        if ($2._1 === "anonymous") { return Data$dMaybe.$Maybe("Just", Web$dHTML$dHTMLImageElement$dCORSMode.Anonymous); }
+        if ($2._1 === "use-credentials") { return Data$dMaybe.$Maybe("Just", Web$dHTML$dHTMLImageElement$dCORSMode.UseCredentials); }
+        return Data$dMaybe.Nothing;
+      }
+      if ($2.tag === "Nothing") { return Data$dMaybe.Nothing; }
+      $runtime.fail();
+    };
+  };
+})();
+const create$p = createWithDimensions;
+export {
+  create$p,
+  crossOrigin,
+  decoding,
+  fromChildNode,
+  fromElement,
+  fromEventTarget,
+  fromHTMLElement,
+  fromNode,
+  fromNonDocumentTypeChildNode,
+  fromParentNode,
+  loading,
+  setCrossOrigin,
+  setDecoding,
+  setLoading,
+  toChildNode,
+  toElement,
+  toEventTarget,
+  toHTMLElement,
+  toNode,
+  toNonDocumentTypeChildNode,
+  toParentNode
+};
+export * from "./foreign.js";

package/output-es/Web.HTML.HTMLImageElement.CORSMode/index.js

@@ -0,0 +1,43 @@
+import * as $runtime from "../runtime.js";
+import * as Data$dMaybe from "../Data.Maybe/index.js";
+import * as Data$dOrdering from "../Data.Ordering/index.js";
+const $CORSMode = tag => tag;
+const Anonymous = /* #__PURE__ */ $CORSMode("Anonymous");
+const UseCredentials = /* #__PURE__ */ $CORSMode("UseCredentials");
+const showDecodingHint = {
+  show: v => {
+    if (v === "Anonymous") { return "Anonymous"; }
+    if (v === "UseCredentials") { return "UseCredentials"; }
+    $runtime.fail();
+  }
+};
+const print = v => {
+  if (v === "Anonymous") { return "anonymous"; }
+  if (v === "UseCredentials") { return "use-credentials"; }
+  $runtime.fail();
+};
+const parse = v => {
+  if (v === "") { return Data$dMaybe.$Maybe("Just", Anonymous); }
+  if (v === "anonymous") { return Data$dMaybe.$Maybe("Just", Anonymous); }
+  if (v === "use-credentials") { return Data$dMaybe.$Maybe("Just", UseCredentials); }
+  return Data$dMaybe.Nothing;
+};
+const eqCORSMode = {
+  eq: x => y => {
+    if (x === "Anonymous") { return y === "Anonymous"; }
+    return x === "UseCredentials" && y === "UseCredentials";
+  }
+};
+const ordCORSMode = {
+  compare: x => y => {
+    if (x === "Anonymous") {
+      if (y === "Anonymous") { return Data$dOrdering.EQ; }
+      return Data$dOrdering.LT;
+    }
+    if (y === "Anonymous") { return Data$dOrdering.GT; }
+    if (x === "UseCredentials" && y === "UseCredentials") { return Data$dOrdering.EQ; }
+    $runtime.fail();
+  },
+  Eq0: () => eqCORSMode
+};
+export {$CORSMode, Anonymous, UseCredentials, eqCORSMode, ordCORSMode, parse, print, showDecodingHint};

package/output-es/Web.HTML.HTMLImageElement.DecodingHint/index.js

@@ -0,0 +1,53 @@
+import * as $runtime from "../runtime.js";
+import * as Data$dMaybe from "../Data.Maybe/index.js";
+import * as Data$dOrdering from "../Data.Ordering/index.js";
+const $DecodingHint = tag => tag;
+const Sync = /* #__PURE__ */ $DecodingHint("Sync");
+const Async = /* #__PURE__ */ $DecodingHint("Async");
+const Auto = /* #__PURE__ */ $DecodingHint("Auto");
+const showDecodingHint = {
+  show: v => {
+    if (v === "Sync") { return "Sync"; }
+    if (v === "Async") { return "Async"; }
+    if (v === "Auto") { return "Auto"; }
+    $runtime.fail();
+  }
+};
+const print = v => {
+  if (v === "Sync") { return "sync"; }
+  if (v === "Async") { return "async"; }
+  if (v === "Auto") { return "auto"; }
+  $runtime.fail();
+};
+const parse = v => {
+  if (v === "") { return Data$dMaybe.$Maybe("Just", Auto); }
+  if (v === "sync") { return Data$dMaybe.$Maybe("Just", Sync); }
+  if (v === "async") { return Data$dMaybe.$Maybe("Just", Async); }
+  if (v === "auto") { return Data$dMaybe.$Maybe("Just", Auto); }
+  return Data$dMaybe.Nothing;
+};
+const eqDecodingHint = {
+  eq: x => y => {
+    if (x === "Sync") { return y === "Sync"; }
+    if (x === "Async") { return y === "Async"; }
+    return x === "Auto" && y === "Auto";
+  }
+};
+const ordDecodingHint = {
+  compare: x => y => {
+    if (x === "Sync") {
+      if (y === "Sync") { return Data$dOrdering.EQ; }
+      return Data$dOrdering.LT;
+    }
+    if (y === "Sync") { return Data$dOrdering.GT; }
+    if (x === "Async") {
+      if (y === "Async") { return Data$dOrdering.EQ; }
+      return Data$dOrdering.LT;
+    }
+    if (y === "Async") { return Data$dOrdering.GT; }
+    if (x === "Auto" && y === "Auto") { return Data$dOrdering.EQ; }
+    $runtime.fail();
+  },
+  Eq0: () => eqDecodingHint
+};
+export {$DecodingHint, Async, Auto, Sync, eqDecodingHint, ordDecodingHint, parse, print, showDecodingHint};

package/output-es/Web.HTML.HTMLImageElement.Laziness/index.js

@@ -0,0 +1,43 @@
+import * as $runtime from "../runtime.js";
+import * as Data$dMaybe from "../Data.Maybe/index.js";
+import * as Data$dOrdering from "../Data.Ordering/index.js";
+const $Laziness = tag => tag;
+const Eager = /* #__PURE__ */ $Laziness("Eager");
+const Lazy = /* #__PURE__ */ $Laziness("Lazy");
+const showDecodingHint = {
+  show: v => {
+    if (v === "Eager") { return "Eager"; }
+    if (v === "Lazy") { return "Lazy"; }
+    $runtime.fail();
+  }
+};
+const print = v => {
+  if (v === "Eager") { return "eager"; }
+  if (v === "Lazy") { return "lazy"; }
+  $runtime.fail();
+};
+const parse = v => {
+  if (v === "") { return Data$dMaybe.$Maybe("Just", Eager); }
+  if (v === "eager") { return Data$dMaybe.$Maybe("Just", Eager); }
+  if (v === "lazy") { return Data$dMaybe.$Maybe("Just", Lazy); }
+  return Data$dMaybe.Nothing;
+};
+const eqDecodingHint = {
+  eq: x => y => {
+    if (x === "Eager") { return y === "Eager"; }
+    return x === "Lazy" && y === "Lazy";
+  }
+};
+const ordDecodingHint = {
+  compare: x => y => {
+    if (x === "Eager") {
+      if (y === "Eager") { return Data$dOrdering.EQ; }
+      return Data$dOrdering.LT;
+    }
+    if (y === "Eager") { return Data$dOrdering.GT; }
+    if (x === "Lazy" && y === "Lazy") { return Data$dOrdering.EQ; }
+    $runtime.fail();
+  },
+  Eq0: () => eqDecodingHint
+};
+export {$Laziness, Eager, Lazy, eqDecodingHint, ordDecodingHint, parse, print, showDecodingHint};