@explorable-viz/fluid 0.7.61 → 0.7.63

package/.spago/affjax-node/v1.0.0/.editorconfig

@@ -0,0 +1,13 @@
+# https://editorconfig.org
+root = true
+
+[*]
+indent_style = space
+indent_size = 2
+end_of_line = lf
+charset = utf-8
+trim_trailing_whitespace = true
+insert_final_newline = true
+
+[*.md]
+trim_trailing_whitespace = false

package/.spago/affjax-node/v1.0.0/.eslintrc.json

@@ -0,0 +1,30 @@
+{
+  "env": { "browser": true },
+  "extends": "eslint:recommended",
+  "parserOptions": { "ecmaVersion": 6, "sourceType": "module" },
+  "rules": {
+    "block-scoped-var": "error",
+    "consistent-return": "error",
+    "eqeqeq": "error",
+    "guard-for-in": "error",
+    "no-bitwise": "error",
+    "no-caller": "error",
+    "no-constant-condition": ["error", { "checkLoops": false }],
+    "no-extra-parens": "off",
+    "no-extend-native": "error",
+    "no-loop-func": "error",
+    "no-new": "error",
+    "no-param-reassign": "error",
+    "no-return-assign": "error",
+    "no-sequences": "error",
+    "no-unused-expressions": "error",
+    "no-use-before-define": "error",
+    "no-undef": "error",
+    "no-eq-null": "error",
+    "radix": ["error", "always"],
+    "indent": ["error", 2, { "SwitchCase": 0 }],
+    "quotes": ["error", "double"],
+    "semi": ["error", "always"],
+    "strict": ["error", "global"]
+  }
+}

package/.spago/affjax-node/v1.0.0/.gitignore

@@ -0,0 +1,13 @@
+.*
+!.gitignore
+!.github
+!.editorconfig
+!.eslintrc.json
+
+output
+generated-docs
+bower_components
+
+node_modules
+package-lock.json
+*.lock

package/.spago/pathy/v9.0.0/.editorconfig

@@ -0,0 +1,13 @@
+# https://editorconfig.org
+root = true
+
+[*]
+indent_style = space
+indent_size = 2
+end_of_line = lf
+charset = utf-8
+trim_trailing_whitespace = true
+insert_final_newline = true
+
+[*.md]
+trim_trailing_whitespace = false

package/.spago/pathy/v9.0.0/.gitignore

@@ -0,0 +1,9 @@
+.*
+!.gitignore
+!.github
+!.editorconfig
+!.tidyrc.json
+
+output
+generated-docs
+bower_components

package/.spago/pathy/v9.0.0/.tidyrc.json

@@ -0,0 +1,10 @@
+{
+  "importSort": "source",
+  "importWrap": "source",
+  "indent": 2,
+  "operatorsFile": null,
+  "ribbon": 1,
+  "typeArrowPlacement": "first",
+  "unicode": "never",
+  "width": null
+}

package/dist/fluid/fluid/example/linked-inputs/energyscatter.fld

@@ -19,6 +19,5 @@ let plot year countries =
 in ScatterPlot {
   caption: "Clean energy efficiency vs. proportion of renewable energy capacity",
   points: plot 2018 [ "BRA", "CHN", "DEU", "FRA", "EGY", "IND", "JPN", "MEX", "NGA", "USA" ],
-  xlabel: "Renewables/TotalEnergyCap",
-  ylabel: "Clean Capacity Factor"
+  labels: { x: "Renewables/TotalEnergyCap", y: "Clean Capacity Factor" }
 }

package/dist/fluid/fluid/example/linked-inputs/mini-energyscatter.fld

@@ -25,6 +25,5 @@ in ScatterPlot {
                 x: country.nonRenewables / country.totalCap,
                 y: country.renCapFactor
             }| country <- energy 2018 ["USA"]],
-    xlabel: "Renewables/TotalEnergyCap",
-    ylabel: "Clean Capacity Factor"
+    labels: { x: "Renewables/TotalEnergyCap", y: "Clean Capacity Factor" }
 }

package/dist/fluid/fluid/example/plot/non-renewables.fld

@@ -2,8 +2,8 @@ let countries = ["BRA", "EGY", "IND", "JPN"];
 let totalFor year country =
    let [ row ] = [ row | row <- nonRenewables, row.year == year, row.country == country ]
    in row.nuclearOut + row.gasOut + row.coalOut + row.petrolOut;
-    stack year = [ { y: country, z: totalFor year country } | country <- countries ];
-    yearData year = [ row | row <- nonRenewables, row.year == year, row.country `elem` countries ]
+let stack year = [ { y: country, z: totalFor year country } | country <- countries ];
+let yearData year = [ row | row <- nonRenewables, row.year == year, row.country `elem` countries ]
 in MultiView {
    barChart: BarChart {
       caption: "Non-renewables output",
@@ -16,7 +16,6 @@ in MultiView {
          x: sum [ row.nuclearOut | row <- yearData year ],
          y: sum [ row.nuclearCap | row <- yearData year ]
       } | year <- [2014..2018] ],
-      xlabel: "Nuclear capacity",
-      ylabel: "Nuclear output"
+      labels: { x: "Nuclear capacity", y: "Nuclear output" }
    }
 }

package/dist/fluid/fluid/example/slicing/linked-outputs/stacked-bar-scatter-plot.fld

@@ -33,7 +33,6 @@ MultiView {
       in ScatterPlot {
          caption: "Clean energy efficiency vs proportion of renewable energy capacity",
          points: plot 2018 [ "BRA", "CHN", "DEU", "FRA", "EGY", "IND", "JPN", "MEX", "NGA", "USA" ],
-         xlabel: "Renewables/TotalEnergyCap",
-         ylabel: "Clean Capacity Factor"
+         labels: { x: "Renewables/TotalEnergyCap", y: "Clean Capacity Factor" }
       }
 }

package/dist/fluid/fluid/lib/convolution.fld

@@ -2,15 +2,15 @@ let zero n = const n;
     wrap n n_max = ((n - 1) `mod` n_max) + 1;
     extend n = min (max n 1);
 
-let convolve image kernel method =
+let convolve image kernel boundary =
     let ((m, n), (i, j)) = (dims image, dims kernel);
         (half_i, half_j) = (i `quot` 2, j `quot` 2);
         area = i * j
     in  [| let weightedSum = sum [
            image!(x, y) * kernel!(i' + 1, j' + 1)
            | (i', j') <- range (0, 0) (i - 1, j - 1),
-             let x = method (m' + i' - half_i) m,
-             let y = method (n' + j' - half_j) n,
+             let x = boundary (m' + i' - half_i) m,
+             let y = boundary (n' + j' - half_j) n,
              x >= 1, x <= m, y >= 1, y <= n
          ] in weightedSum `quot` area
          | (m', n') in (m, n) |];

package/dist/fluid/shared/fluid.mjs

@@ -222,6 +222,15 @@ var applyMaybe = {
   },
   Functor0: () => functorMaybe
 };
+var altMaybe = {
+  alt: (v) => (v1) => {
+    if (v.tag === "Nothing") {
+      return v1;
+    }
+    return v;
+  },
+  Functor0: () => functorMaybe
+};
 
 // output-es/Data.Either/index.js
 var $Either = (tag, _1) => ({ tag, _1 });
@@ -10170,8 +10179,7 @@ var dataTypes = /* @__PURE__ */ foldrArray(Cons)(Nil)([
     /* @__PURE__ */ $Tuple("Viewport", 9)
   ]),
   /* @__PURE__ */ dataType("Transform")([/* @__PURE__ */ $Tuple("Scale", 2), /* @__PURE__ */ $Tuple("Translate", 2)]),
-  /* @__PURE__ */ dataType("Marker")([/* @__PURE__ */ $Tuple("Arrowhead", 0)]),
-  /* @__PURE__ */ dataType("Explanation")([/* @__PURE__ */ $Tuple("Explained", 2)])
+  /* @__PURE__ */ dataType("Marker")([/* @__PURE__ */ $Tuple("Arrowhead", 0)])
 ]);
 var ctrToDataType = /* @__PURE__ */ (() => fromFoldable2(foldableList)(bindList.bind(listMap((d) => listMap((v) => $Tuple(
   v,
@@ -24822,7 +24830,7 @@ var parse = (dictMonadError) => {
     };
   };
 };
-var parseProgram = (loadFile2) => (folder) => (file) => (dictMonadAff) => (dictMonadError) => dictMonadAff.MonadEffect0().Monad0().Bind1().bind(loadFile2(folder)(file)(dictMonadAff)(dictMonadError))((() => {
+var parseProgram = (loadFile2) => (folders) => (file) => (dictMonadAff) => (dictMonadError) => dictMonadAff.MonadEffect0().Monad0().Bind1().bind(loadFile2(folders)(file)(dictMonadAff)(dictMonadError))((() => {
   const $0 = parse(dictMonadError);
   return (a) => $0(a)(topLevel(expr_));
 })());
@@ -24833,9 +24841,9 @@ var module_2 = (dictMonadAff) => {
   return (dictMonadError) => {
     const parse1 = parse(dictMonadError);
     const desugarModuleFwd = moduleFwd(dictMonadError)(boundedLattice2);
-    return (loadFile2) => (folder) => (file) => (v) => {
+    return (loadFile2) => (folders) => (file) => (v) => {
       const $0 = v.mods;
-      return Bind1.bind(Applicative0.pure())(() => Bind1.bind(loadFile2(folder)(file)(dictMonadAff)(dictMonadError))((src) => Bind1.bind(Bind1.bind(parse1(src)(module_))(desugarModuleFwd))((mod) => Applicative0.pure({
+      return Bind1.bind(Applicative0.pure())(() => Bind1.bind(loadFile2(folders)(file)(dictMonadAff)(dictMonadError))((src) => Bind1.bind(Bind1.bind(parse1(src)(module_))(desugarModuleFwd))((mod) => Applicative0.pure({
         primitives: v.primitives,
         mods: $List("Cons", mod, $0),
         datasets: v.datasets
@@ -24873,7 +24881,7 @@ var prepConfig = (dictMonadAff) => {
   return (dictMonadError) => {
     const desug1 = exprFwd(boundedLattice2)(dictMonadError)(joinSemilatticeUnit);
     const initialConfig1 = initialConfig(dictMonadError)(fVExpr);
-    return (v) => (file) => (progCxt) => $0.bind(parseProgram(v.loadFile)(v.fluidSrcPath)(file)(dictMonadAff)(dictMonadError))((s) => $0.bind(desug1(s))((e) => $0.bind(initialConfig1(e)(progCxt))((gconfig) => Monad0.Applicative0().pure({
+    return (v) => (file) => (progCxt) => $0.bind(parseProgram(v.loadFile)(v.fluidSrcPaths)(file)(dictMonadAff)(dictMonadError))((s) => $0.bind(desug1(s))((e) => $0.bind(initialConfig1(e)(progCxt))((gconfig) => Monad0.Applicative0().pure({
       s,
       e,
       gconfig
@@ -24885,10 +24893,10 @@ var datasetAs = (dictMonadAff) => {
   const $0 = Monad0.Bind1();
   return (dictMonadError) => {
     const desug1 = exprFwd(boundedLattice2)(dictMonadError)(joinSemilatticeUnit);
-    return (loadFile2) => (folder) => (v) => (v1) => {
+    return (loadFile2) => (folders) => (v) => (v1) => {
       const $1 = v1.datasets;
       const $2 = v._1;
-      return $0.bind($0.bind(parseProgram(loadFile2)(folder)(v._2)(dictMonadAff)(dictMonadError))(desug1))((e\u03B1) => Monad0.Applicative0().pure({
+      return $0.bind($0.bind(parseProgram(loadFile2)(folders)(v._2)(dictMonadAff)(dictMonadError))(desug1))((e\u03B1) => Monad0.Applicative0().pure({
         primitives: v1.primitives,
         mods: v1.mods,
         datasets: $List("Cons", $Tuple($2, e\u03B1), $1)
@@ -24909,8 +24917,8 @@ var loadProgCxt = (dictMonadAff) => {
       primitives,
       mods: Nil,
       datasets: Nil
-    }))(concatM1(arrayMap(module_22(v.loadFile)(v.fluidSrcPath))(["lib/prelude", ...mods]))))(concatM1(arrayMap((() => {
-      const $1 = datasetAs2(v.loadFile)(v.fluidSrcPath);
+    }))(concatM1(arrayMap(module_22(v.loadFile)(v.fluidSrcPaths))(["lib/prelude", ...mods]))))(concatM1(arrayMap((() => {
+      const $1 = datasetAs2(v.loadFile)(v.fluidSrcPaths);
       return (x) => $1($Tuple(x._1, x._2));
     })())(datasets)));
   };
@@ -25051,8 +25059,19 @@ var readTextFile = (encoding) => (file) => (cb) => {
   };
   return () => readFile(file, $0, handleCallback(cb));
 };
+var stat2 = (file) => (cb) => () => stat(file, handleCallback(cb));
 
 // output-es/Node.FS.Aff/index.js
+var toAff1 = (f) => (a) => {
+  const $0 = f(a);
+  return makeAff((k) => {
+    const $1 = $0(k);
+    return () => {
+      $1();
+      return nonCanceler;
+    };
+  });
+};
 var toAff2 = (f) => (a) => (b) => {
   const $0 = f(a)(b);
   return makeAff((k) => {
@@ -25064,23 +25083,48 @@ var toAff2 = (f) => (a) => (b) => {
   });
 };
 
+// output-es/Foreign/foreign.js
+var isArray = Array.isArray || function(value) {
+  return Object.prototype.toString.call(value) === "[object Array]";
+};
+
+// output-es/Node.FS.Stats/foreign.js
+var isFileImpl = (s) => s.isFile();
+
 // output-es/Module.Node/index.js
-var loadFile = (v) => (v1) => (dictMonadAff) => {
+var findM = (dictMonad) => {
+  const $0 = dictMonad.Bind1().Apply0();
+  return (dictFoldable) => (xs) => (f) => (base) => dictFoldable.foldr((x) => (acc) => $0.apply($0.Functor0().map(altMaybe.alt)(acc))(f(x)))(dictMonad.Applicative0().pure(base))(xs);
+};
+var loadFile = (folders) => (v) => (dictMonadAff) => {
   const Monad0 = dictMonadAff.MonadEffect0().Monad0();
-  return (dictMonadError) => Monad0.Bind1().bind(dictMonadAff.liftAff(toAff2(readTextFile)(UTF8)(v + "/" + v1 + ".fld")))((buffer) => Monad0.Applicative0().pure(buffer));
+  const $0 = Monad0.Bind1();
+  const findM1 = findM(Monad0)(foldableArray);
+  return (dictMonadError) => $0.bind(findM1(arrayMap((() => {
+    const $1 = v + ".fld";
+    return (a) => a + "/" + $1;
+  })())(folders))((v1) => $0.bind(dictMonadAff.liftAff(toAff1(stat2)(v1)))((stats) => Monad0.Applicative0().pure(isFileImpl(stats) ? $Maybe("Just", v1) : Nothing)))(Nothing))((url) => {
+    if (url.tag === "Nothing") {
+      return throwException(error("File " + v + " not found."))();
+    }
+    if (url.tag === "Just") {
+      return dictMonadAff.liftAff(toAff2(readTextFile)(ASCII)(url._1));
+    }
+    fail();
+  });
 };
 var loadProgCxt2 = (dictMonadAff) => {
   const loadProgCxt1 = loadProgCxt(dictMonadAff);
   return (dictMonadError) => {
     const loadProgCxt22 = loadProgCxt1(dictMonadError);
-    return (fluidSrcPath) => loadProgCxt22({ loadFile, fluidSrcPath });
+    return (fluidSrcPaths) => loadProgCxt22({ loadFile, fluidSrcPaths });
   };
 };
 var prepConfig2 = (dictMonadAff) => {
   const prepConfig1 = prepConfig(dictMonadAff);
   return (dictMonadError) => {
     const prepConfig22 = prepConfig1(dictMonadError);
-    return (fluidSrcPath) => prepConfig22({ loadFile, fluidSrcPath });
+    return (fluidSrcPaths) => prepConfig22({ loadFile, fluidSrcPaths });
   };
 };
 
@@ -28399,7 +28443,8 @@ var parseImports = /* @__PURE__ */ $Parser(
 );
 var evaluate = (v) => {
   const $0 = v._1.fileName;
-  return _bind(loadProgCxt3("fluid")(v._1.imports)(v._1.datasets))((progCxt) => _bind(prepConfig3("fluid")($0)(progCxt))((v1) => _bind(graphEval2(v1.gconfig)(v1.e))((v2) => _pure($Val(
+  const fluidSrcPaths = ["fluid"];
+  return _bind(loadProgCxt3(fluidSrcPaths)(v._1.imports)(v._1.datasets))((progCxt) => _bind(prepConfig3(fluidSrcPaths)($0)(progCxt))((v1) => _bind(graphEval2(v1.gconfig)(v1.e))((v2) => _pure($Val(
     void 0,
     functorBaseVal.map((v$1) => {
     })(v2["out\u03B1"]._2)
@@ -28437,8 +28482,8 @@ var dispatchCommand = (v) => {
     return _bind(evaluate(v._1))((v1) => _liftEffect(log(intercalate4("\n")(removeDocWS(prettyVal(highlightableUnit).pretty(v1)).lines))));
   }
   if (v.tag === "Publish") {
-    return _bind(_map((v$1) => {
-    })(_liftEffect(publish(v._1)(v._2))))(() => _liftEffect(log("Published")));
+    return _map((v$1) => {
+    })(_liftEffect(publish(v._1)(v._2)));
   }
   fail();
 };
@@ -28447,7 +28492,8 @@ var callback = (v) => {
     return log(showErrorImpl(v._1));
   }
   if (v.tag === "Right") {
-    return log("Success");
+    return () => {
+    };
   }
   fail();
 };

package/dist/fluid/shared/load-figure.js

@@ -290,6 +290,15 @@ var applyEither = {
   Functor0: () => functorEither
 };
 var applicativeEither = { pure: Right, Apply0: () => applyEither };
+var altEither = {
+  alt: (v) => (v1) => {
+    if (v.tag === "Left") {
+      return v1;
+    }
+    return v;
+  },
+  Functor0: () => functorEither
+};
 
 // output-es/Effect/foreign.js
 var pureE = function(a) {
@@ -1551,6 +1560,7 @@ var encode2 = /* @__PURE__ */ (() => {
 // output-es/Data.HTTP.Method/index.js
 var $Method = (tag) => tag;
 var GET = /* @__PURE__ */ $Method("GET");
+var HEAD = /* @__PURE__ */ $Method("HEAD");
 var print = (v2) => {
   if (v2.tag === "Left") {
     if (v2._1 === "OPTIONS") {
@@ -27787,8 +27797,7 @@ var dataTypes = /* @__PURE__ */ foldrArray(Cons)(Nil)([
     /* @__PURE__ */ $Tuple("Viewport", 9)
   ]),
   /* @__PURE__ */ dataType("Transform")([/* @__PURE__ */ $Tuple("Scale", 2), /* @__PURE__ */ $Tuple("Translate", 2)]),
-  /* @__PURE__ */ dataType("Marker")([/* @__PURE__ */ $Tuple("Arrowhead", 0)]),
-  /* @__PURE__ */ dataType("Explanation")([/* @__PURE__ */ $Tuple("Explained", 2)])
+  /* @__PURE__ */ dataType("Marker")([/* @__PURE__ */ $Tuple("Arrowhead", 0)])
 ]);
 var ctrToDataType = /* @__PURE__ */ (() => fromFoldable(foldableList)(bindList.bind(listMap((d) => listMap((v) => $Tuple(
   v,
@@ -34840,7 +34849,6 @@ var forDefs = (\u03C1) => (\u03C3) => {
 };
 
 // output-es/Primitive/index.js
-var $Explanation = (_1, _2, _3) => ({ tag: "Explanation", _1, _2, _3 });
 var fanin2 = /* @__PURE__ */ fanin(categoryFn)(choiceFn);
 var isZeroNumber = { isZero: ($0) => 0 === $0 };
 var isZeroInt = { isZero: ($0) => 0 === $0 };
@@ -34916,30 +34924,6 @@ var number5 = {
     return typeError(v)("Float");
   }
 };
-var linkedTextEntry = {
-  pack: (v) => {
-    if (v.tag === "Left") {
-      return $BaseVal("Str", v._1);
-    }
-    if (v.tag === "Right") {
-      return $BaseVal(
-        "Constr",
-        "Explained",
-        $List("Cons", $Val(v._1._1, $BaseVal("Str", v._1._2)), $List("Cons", $Val(v._1._3._1, v._1._3._2), Nil))
-      );
-    }
-    fail();
-  },
-  unpack: (v) => {
-    if (v.tag === "Str") {
-      return $Either("Left", v._1);
-    }
-    if (v.tag === "Constr" && v._2.tag === "Cons" && v._2._1._2.tag === "Str" && v._2._2.tag === "Cons" && v._2._2._2.tag === "Nil" && v._1 === "Explained") {
-      return $Either("Right", $Explanation(v._2._2._1._1, v._2._1._2._1, v._2._2._1));
-    }
-    return typeError(v)("String or Explanation");
-  }
-};
 var intOrNumberOrString = {
   pack: (v) => {
     if (v.tag === "Left") {
@@ -36593,7 +36577,19 @@ var reflectDictSelState\u{1D54A}$x215ValS3 = {
     })()
   })
 };
-var reflectDictSelState\u{1D54A}$x215ValS12 = { from: () => (r) => ({ x: get_intOrNumber("x")(r), y: get_intOrNumber("y")(r) }) };
+var reflectDictSelState\u{1D54A}$x215ValS12 = {
+  from: () => (r) => ({
+    x: (() => {
+      const $0 = $$get2(showString)(mapDictString)("x")(r);
+      return $Tuple($0._2._2.tag === "Str" ? $0._2._2._1 : typeError($0._2._2)("Str"), $0._2._1);
+    })(),
+    y: (() => {
+      const $0 = $$get2(showString)(mapDictString)("y")(r);
+      return $Tuple($0._2._2.tag === "Str" ? $0._2._2._1 : typeError($0._2._2)("Str"), $0._2._1);
+    })()
+  })
+};
+var reflectDictSelState\u{1D54A}$x215ValS23 = { from: () => (r) => ({ x: get_intOrNumber("x")(r), y: get_intOrNumber("y")(r) }) };
 
 // output-es/App.View.LineChart/index.js
 var identity27 = (x2) => x2;
@@ -36622,7 +36618,7 @@ var reflectDictSelState\u{1D54A}$x215ValS4 = {
       const $0 = $$get2(showString)(mapDictString)("name")(r);
       return $Tuple($0._2._2.tag === "Str" ? $0._2._2._1 : typeError($0._2._2)("Str"), $0._2._1);
     })(),
-    points: arrayMap(dict(reflectDictSelState\u{1D54A}$x215ValS12.from()))(reflectValSelState\u{1D54A}ArrayV.from()($$get2(showString)(mapDictString)("points")(r)._2))
+    points: arrayMap(dict(reflectDictSelState\u{1D54A}$x215ValS23.from()))(reflectValSelState\u{1D54A}ArrayV.from()($$get2(showString)(mapDictString)("points")(r)._2))
   })
 };
 var reflectValSelState\u{1D54A}LinePl = {
@@ -36897,114 +36893,84 @@ var drawableLineChart = {
   }
 };
 
-// output-es/App.View.LinkedText/foreign.js
-selection_default.prototype.attrs = function(m) {
-  for (const k in m) {
-    this.attr(k, m[k]);
-  }
-  return this;
+// output-es/App.View.LinkedText/index.js
+var for_4 = /* @__PURE__ */ for_(applicativeEffect)(foldableArray);
+var forWithIndex_2 = /* @__PURE__ */ forWithIndex_(applicativeEffect)(foldableWithIndexArray);
+var reflectValSelState\u{1D54A}Linked = {
+  from: () => (r) => arrayMap((v) => $Tuple(v._2.tag === "Str" ? v._2._1 : typeError(v._2)("Str"), v._1))(reflectValSelState\u{1D54A}ArrayV.from()(r))
 };
-function setSelState3({ accessAnn }, {
-  selState: selState2,
-  selClasses: selClasses2,
-  selClassesFor: selClassesFor2,
-  join: join3
-}, div, view2, selListener2) {
-  div.selectAll("span").each(function(textElem) {
-    var sel;
-    if (textElem.conts.tag == "Left") {
-      sel = accessAnn(view2[textElem.i]);
-    } else {
-      sel = accessAnn(view2[textElem.i]);
-    }
-    select_default2(this).classed(selClasses2, false).classed(selClassesFor2(sel), true).on("mousedown", (e) => {
-      selListener2(e);
-    }).on("mouseenter", (e) => {
-      selListener2(e);
-    }).on("mouseleave", (e) => {
-      selListener2(e);
-    });
-  });
-}
-function drawLinkedText_({
-  explanation,
-  contents,
-  accessAnn
-}, uiHelpers2, {
-  divId,
-  suffix,
-  view: view2
-}, selListener2) {
+var setSelState3 = (v) => (redraw) => (rootElement) => {
+  const $0 = selectAll2(".linked-text")(rootElement);
   return () => {
-    const div = select_default2("#" + divId);
-    const childId = divId + "-" + suffix;
-    let rootElement = div.selectAll("#" + childId);
-    if (rootElement.empty()) {
-      rootElement = div.append("div").attr("id", childId).text(view2._1).attr("class", "linked-text-parent");
-      rootElement.selectAll("span").data([...view2.entries()].map(([i, conts]) => {
-        return { i, conts };
-      })).enter().append("span").attr("id", childId).text((d) => contents(d.conts)).attr("class", "linked-text");
-    }
-    setSelState3({ accessAnn }, uiHelpers2, rootElement, view2, selListener2);
+    const elems$p = $0();
+    return for_4(elems$p)((elem2) => {
+      const $1 = datum2(elem2);
+      return () => {
+        const v1 = $1();
+        const $2 = definitely("index within bounds")(index(v)(v1.i));
+        const $3 = styles(elem2)(fromFoldable10([
+          $Tuple("border-bottom", isTransient($2._2) ? "1px solid blue" : "none"),
+          $Tuple(
+            "background",
+            (() => {
+              if (isPrimary($2._2) && isPersistent($2._2)) {
+                return "#93E9BE";
+              }
+              if (isSecondary($2._2) && isPersistent($2._2)) {
+                return "rgb(226, 226, 226)";
+              }
+              return "white";
+            })()
+          ),
+          $Tuple(
+            "color",
+            (() => {
+              if (isPrimary($2._2) && isTransient($2._2)) {
+                return "blue";
+              }
+              if (isSecondary($2._2) && isTransient($2._2)) {
+                return "royalblue";
+              }
+              return "black";
+            })()
+          )
+        ]))();
+        return for_2(["mousedown", "mouseenter", "mouseleave"])((ev) => on(ev)(redraw)($3))();
+      };
+    })();
   };
-}
-var drawLinkedText = (x1) => (x2) => (x3) => (x4) => drawLinkedText_(x1, x2, x3, x4);
-
-// output-es/App.View.LinkedText/index.js
-var linkedTextHelpers = {
-  explanation: (v) => {
-    if (v.tag === "Left") {
-      return v._1._1;
-    }
-    if (v.tag === "Right") {
-      return v._1._1._2;
-    }
-    fail();
-  },
-  contents: (v) => {
-    if (v.tag === "Left") {
-      return v._1._1;
-    }
-    if (v.tag === "Right") {
-      if (v._1._1._3._2.tag === "Str") {
-        return v._1._1._3._2._1;
-      }
-      return typeError(v._1._1._3._2)("Str");
-    }
-    fail();
-  },
-  accessAnn: (v) => {
-    if (v.tag === "Left") {
-      return v._1._2;
-    }
-    if (v.tag === "Right") {
-      return v._1._1._1;
-    }
-    fail();
-  }
 };
+var createRootElement2 = (v) => (div) => (childId) => {
+  const $0 = createChild(div)(showElementType.show(Text2))(fromFoldable10([
+    classes(["linked-text-parent"]),
+    $Tuple("id", childId)
+  ]));
+  return () => {
+    const rootElement = $0();
+    forWithIndex_2(v)((i) => (elem2) => {
+      const $1 = createChild(rootElement)(showElementType.show(Text2))(fromFoldable10([
+        classes(["linked-text"]),
+        $Tuple("id", childId)
+      ]));
+      return () => {
+        const elem$p = $1();
+        const $2 = setText(elem2._1)(elem$p)();
+        return setDatum({ i })($2)();
+      };
+    })();
+    return rootElement;
+  };
+};
+var drawable2LinkedText = { createRootElement: createRootElement2, setSelState: setSelState3 };
 var drawableLinkedText = {
   draw: (rSpec) => (figVal) => (v) => (redraw) => {
-    const $0 = drawLinkedText(linkedTextHelpers)(uiHelpers)(rSpec);
-    const $1 = selListener(figVal)(redraw)((v1) => (x2) => constrArg("LinkedText")(0)(listElement(v1.i)(x2)));
+    const $0 = selListener(figVal)(redraw)((v1) => (x2) => constrArg("LinkedText")(0)(listElement(v1.i)(x2)));
     return () => {
-      const $2 = $1();
-      return $0($2)();
+      const $1 = $0();
+      return draw$p(drawable2LinkedText)(uiHelpers)(rSpec)($1)();
     };
   }
 };
-var reflectValSelState\u{1D54A}Linked = {
-  from: () => (r) => arrayMap((x2) => {
-    const $0 = linkedTextEntry.unpack(x2._2);
-    if ($0.tag === "Left") {
-      return $Either("Left", $Tuple($0._1, x2._1));
-    }
-    if ($0.tag === "Right") {
-      return $Either("Right", $Tuple($0._1, x2._1));
-    }
-    fail();
-  })(reflectValSelState\u{1D54A}ArrayV.from()(r))
-};
 
 // output-es/App.View.MatrixView/foreign.js
 function setSelState4({
@@ -37188,8 +37154,7 @@ function drawScatterPlot_(scatterPlotHelpers2, uiHelpers2, {
   view: {
     caption,
     points,
-    xlabel,
-    ylabel
+    labels
   }
 }, listener) {
   return () => {
@@ -37215,8 +37180,8 @@ function drawScatterPlot_(scatterPlotHelpers2, uiHelpers2, {
       rootElement.append("g").attr("transform", "translate(0," + height + ")").call(axisBottom(x2).tickSizeOuter(0)).selectAll("text").style("text-anchor", "middle");
       const y2 = linear2().domain([Math.min(0, y_min), y_max]).range([height, 0]);
       rootElement.append("g").call(axisLeft(y2).tickSizeOuter(0));
-      rootElement.append("text").attr("x", width).attr("y", height + 25).style("text-anchor", "end").style("font-size", "10px").text(val(xlabel));
-      rootElement.append("text").attr("transform", "rotate(-90)").attr("x", -margin.top).attr("y", -margin.left + 20).style("text-anchor", "end").style("font-size", "10px").text(val(ylabel));
+      rootElement.append("text").attr("x", width).attr("y", height + 25).style("text-anchor", "end").style("font-size", "10px").text(val(labels.x));
+      rootElement.append("text").attr("transform", "rotate(-90)").attr("x", -margin.top).attr("y", -margin.left + 20).style("text-anchor", "end").style("font-size", "10px").text(val(labels.y));
       rootElement.append("g").selectAll("circle").data([...points.entries()].map(([i, point2]) => {
         return { i, point: point2 };
       })).enter().append("circle").classed("scatterplot-point", true).attr("cx", ({ point: point2 }) => x2(val(point2.x))).attr("cy", ({ point: point2 }) => y2(val(point2.y))).attr("stroke-width", 0.5);
@@ -37236,15 +37201,8 @@ var reflectDictSelState\u{1D54A}$x215ValS5 = {
       const $0 = $$get2(showString)(mapDictString)("caption")(r);
       return $Tuple($0._2._2.tag === "Str" ? $0._2._2._1 : typeError($0._2._2)("Str"), $0._2._1);
     })(),
-    points: arrayMap(dict(reflectDictSelState\u{1D54A}$x215ValS12.from()))(reflectValSelState\u{1D54A}ArrayV.from()($$get2(showString)(mapDictString)("points")(r)._2)),
-    xlabel: (() => {
-      const $0 = $$get2(showString)(mapDictString)("xlabel")(r);
-      return $Tuple($0._2._2.tag === "Str" ? $0._2._2._1 : typeError($0._2._2)("Str"), $0._2._1);
-    })(),
-    ylabel: (() => {
-      const $0 = $$get2(showString)(mapDictString)("ylabel")(r);
-      return $Tuple($0._2._2.tag === "Str" ? $0._2._2._1 : typeError($0._2._2)("Str"), $0._2._1);
-    })()
+    points: arrayMap(dict(reflectDictSelState\u{1D54A}$x215ValS23.from()))(reflectValSelState\u{1D54A}ArrayV.from()($$get2(showString)(mapDictString)("points")(r)._2)),
+    labels: dict(reflectDictSelState\u{1D54A}$x215ValS12.from())($$get2(showString)(mapDictString)("labels")(r)._2)
   })
 };
 var scatterPlotHelpers = {
@@ -37334,12 +37292,12 @@ var toStringWith = (v) => {
 // output-es/App.View.TableView/index.js
 var $Filter = (tag) => tag;
 var toUnfoldable9 = /* @__PURE__ */ toUnfoldable4(unfoldableArray);
-var forWithIndex_2 = /* @__PURE__ */ forWithIndex_(applicativeEffect)(foldableWithIndexArray);
+var forWithIndex_3 = /* @__PURE__ */ forWithIndex_(applicativeEffect)(foldableWithIndexArray);
 var $$for = /* @__PURE__ */ (() => {
   const traverse2 = traversableArray.traverse(applicativeEffect);
   return (x2) => (f) => traverse2(f)(x2);
 })();
-var for_4 = /* @__PURE__ */ for_(applicativeEffect)(foldableArray);
+var for_5 = /* @__PURE__ */ for_(applicativeEffect)(foldableArray);
 var Interactive = /* @__PURE__ */ $Filter("Interactive");
 var prim = (v) => {
   if (v._2.tag === "Int") {
@@ -37363,7 +37321,7 @@ var record_isVisible = (r) => filter((v) => {
   }
   fail();
 })(r).length !== 0;
-var createRootElement2 = (v) => (div) => (childId) => {
+var createRootElement3 = (v) => (div) => (childId) => {
   const $0 = v.colNames;
   const $1 = v.filter;
   const $2 = v.rows;
@@ -37381,7 +37339,7 @@ var createRootElement2 = (v) => (div) => (childId) => {
     const colNames$p = ["__n", ...$0];
     const $4 = createChild(rootElement)(showElementType.show(THead))(fromFoldable10([]))();
     const row = createChild($4)(showElementType.show(TR))(fromFoldable10([]))();
-    forWithIndex_2(colNames$p)((j) => (colName) => {
+    forWithIndex_3(colNames$p)((j) => (colName) => {
       const value = (() => {
         if (colName === "__n") {
           if ($1 === "Relevant") {
@@ -37403,7 +37361,7 @@ var createRootElement2 = (v) => (div) => (childId) => {
       };
     })();
     const body = createChild(rootElement)(showElementType.show(TBody))(fromFoldable10([]))();
-    forWithIndex_2($2)((i) => (row$1) => {
+    forWithIndex_3($2)((i) => (row$1) => {
       const $5 = createChild(body)(showElementType.show(TR))(fromFoldable10([
         classes(["table-row"])
       ]));
@@ -37411,7 +37369,7 @@ var createRootElement2 = (v) => (div) => (childId) => {
       return () => {
         const $7 = $5();
         const row$p = $6($7)();
-        return forWithIndex_2([showIntImpl(i + 1 | 0), ...arrayMap(prim)(row$1)])((j) => (value) => {
+        return forWithIndex_3([showIntImpl(i + 1 | 0), ...arrayMap(prim)(row$1)])((j) => (value) => {
           const $8 = createChild(row$p)(showElementType.show(TD))(fromFoldable10([
             classes(j >= 0 ? ["table-cell"] : [])
           ]));
@@ -37487,7 +37445,7 @@ var setSelState6 = (v) => (redraw) => (rootElement) => {
   const $3 = selectAll2(".table-cell")(rootElement);
   return () => {
     const cells = $3();
-    for_4(cells)((cell) => {
+    for_5(cells)((cell) => {
       const $42 = datum2(cell);
       return () => {
         const v12 = $42();
@@ -37545,11 +37503,11 @@ var setSelState6 = (v) => (redraw) => (rootElement) => {
       };
     })();
     const v1 = partition(snd)(a$p);
-    for_4(v1.no)((() => {
+    for_5(v1.no)((() => {
       const $42 = classed("hidden")(true);
       return (x2) => $42(x2._1);
     })())();
-    for_4(v1.yes)((() => {
+    for_5(v1.yes)((() => {
       const $42 = classed("hidden")(false);
       return (x2) => $42(x2._1);
     })())();
@@ -37557,7 +37515,7 @@ var setSelState6 = (v) => (redraw) => (rootElement) => {
     setText($1 + " (" + showIntImpl($0.length - v1.no.length | 0) + " of " + showIntImpl($0.length) + ")")($4)();
   };
 };
-var drawable2TableView = { createRootElement: createRootElement2, setSelState: setSelState6 };
+var drawable2TableView = { createRootElement: createRootElement3, setSelState: setSelState6 };
 var drawableTableView = {
   draw: (rSpec) => (figVal) => (v) => (redraw) => {
     const $0 = selListener(figVal)(redraw)((v1) => (x2) => listElement(v1.i)(dictVal(v1.colName)(x2)));
@@ -43650,6 +43608,7 @@ var concatM2 = (dictMonad) => foldrArray((() => {
   const $0 = dictMonad.Bind1();
   return (f) => (g) => (a) => $0.bind(f(a))(g);
 })())(dictMonad.Applicative0().pure);
+var Folder = (x2) => x2;
 var parse = (dictMonadError) => {
   const $0 = dictMonadError.MonadThrow0();
   const $1 = $0.Monad0().Applicative0().pure;
@@ -43667,7 +43626,7 @@ var parse = (dictMonadError) => {
     };
   };
 };
-var parseProgram = (loadFile2) => (folder) => (file) => (dictMonadAff) => (dictMonadError) => dictMonadAff.MonadEffect0().Monad0().Bind1().bind(loadFile2(folder)(file)(dictMonadAff)(dictMonadError))((() => {
+var parseProgram = (loadFile2) => (folders) => (file) => (dictMonadAff) => (dictMonadError) => dictMonadAff.MonadEffect0().Monad0().Bind1().bind(loadFile2(folders)(file)(dictMonadAff)(dictMonadError))((() => {
   const $0 = parse(dictMonadError);
   return (a) => $0(a)(topLevel(expr_));
 })());
@@ -43678,9 +43637,9 @@ var module_2 = (dictMonadAff) => {
   return (dictMonadError) => {
     const parse1 = parse(dictMonadError);
     const desugarModuleFwd = moduleFwd(dictMonadError)(boundedLattice2);
-    return (loadFile2) => (folder) => (file) => (v) => {
+    return (loadFile2) => (folders) => (file) => (v) => {
       const $0 = v.mods;
-      return Bind1.bind(Applicative0.pure())(() => Bind1.bind(loadFile2(folder)(file)(dictMonadAff)(dictMonadError))((src) => Bind1.bind(Bind1.bind(parse1(src)(module_))(desugarModuleFwd))((mod) => Applicative0.pure({
+      return Bind1.bind(Applicative0.pure())(() => Bind1.bind(loadFile2(folders)(file)(dictMonadAff)(dictMonadError))((src) => Bind1.bind(Bind1.bind(parse1(src)(module_))(desugarModuleFwd))((mod) => Applicative0.pure({
         primitives: v.primitives,
         mods: $List("Cons", mod, $0),
         datasets: v.datasets
@@ -43718,7 +43677,7 @@ var prepConfig = (dictMonadAff) => {
   return (dictMonadError) => {
     const desug1 = exprFwd(boundedLattice2)(dictMonadError)(joinSemilatticeUnit);
     const initialConfig1 = initialConfig(dictMonadError)(fVExpr);
-    return (v) => (file) => (progCxt) => $0.bind(parseProgram(v.loadFile)(v.fluidSrcPath)(file)(dictMonadAff)(dictMonadError))((s) => $0.bind(desug1(s))((e) => $0.bind(initialConfig1(e)(progCxt))((gconfig) => Monad0.Applicative0().pure({
+    return (v) => (file) => (progCxt) => $0.bind(parseProgram(v.loadFile)(v.fluidSrcPaths)(file)(dictMonadAff)(dictMonadError))((s) => $0.bind(desug1(s))((e) => $0.bind(initialConfig1(e)(progCxt))((gconfig) => Monad0.Applicative0().pure({
       s,
       e,
       gconfig
@@ -43730,10 +43689,10 @@ var datasetAs = (dictMonadAff) => {
   const $0 = Monad0.Bind1();
   return (dictMonadError) => {
     const desug1 = exprFwd(boundedLattice2)(dictMonadError)(joinSemilatticeUnit);
-    return (loadFile2) => (folder) => (v) => (v1) => {
+    return (loadFile2) => (folders) => (v) => (v1) => {
       const $1 = v1.datasets;
       const $2 = v._1;
-      return $0.bind($0.bind(parseProgram(loadFile2)(folder)(v._2)(dictMonadAff)(dictMonadError))(desug1))((e\u03B1) => Monad0.Applicative0().pure({
+      return $0.bind($0.bind(parseProgram(loadFile2)(folders)(v._2)(dictMonadAff)(dictMonadError))(desug1))((e\u03B1) => Monad0.Applicative0().pure({
         primitives: v1.primitives,
         mods: v1.mods,
         datasets: $List("Cons", $Tuple($2, e\u03B1), $1)
@@ -43754,22 +43713,26 @@ var loadProgCxt = (dictMonadAff) => {
       primitives,
       mods: Nil,
       datasets: Nil
-    }))(concatM1(arrayMap(module_22(v.loadFile)(v.fluidSrcPath))(["lib/prelude", ...mods]))))(concatM1(arrayMap((() => {
-      const $1 = datasetAs2(v.loadFile)(v.fluidSrcPath);
+    }))(concatM1(arrayMap(module_22(v.loadFile)(v.fluidSrcPaths))(["lib/prelude", ...mods]))))(concatM1(arrayMap((() => {
+      const $1 = datasetAs2(v.loadFile)(v.fluidSrcPaths);
       return (x2) => $1($Tuple(x2._1, x2._2));
     })())(datasets)));
   };
 };
 
 // output-es/Module.Web/index.js
-var loadFile = (v) => (v1) => (dictMonadAff) => {
-  const MonadEffect0 = dictMonadAff.MonadEffect0();
-  const Monad0 = MonadEffect0.Monad0();
-  const Bind1 = Monad0.Bind1();
-  const Applicative0 = Monad0.Applicative0();
-  return (dictMonadError) => Bind1.bind(dictMonadAff.liftAff(request(driver)({
-    method: $Either("Left", GET),
-    url: v + "/" + v1 + ".fld",
+var findM = (xs) => (f) => (base2) => foldrArray((x2) => (acc) => applyAff.apply(_map(altEither.alt)(acc))(f(x2)))(_pure(base2))(xs);
+var loadFile = (folders) => (v) => (dictMonadAff) => {
+  const Monad0 = dictMonadAff.MonadEffect0().Monad0();
+  const bindExceptT2 = bindExceptT(Monad0);
+  const applicativeExceptT2 = applicativeExceptT(Monad0);
+  const pure22 = Monad0.Applicative0().pure;
+  return (dictMonadError) => Monad0.Bind1().bind(bindExceptT2.bind(dictMonadAff.liftAff(findM(arrayMap((() => {
+    const $0 = v + ".fld";
+    return (a) => a + "/" + $0;
+  })())(folders))((v1) => _bind(request(driver)({
+    method: $Either("Left", HEAD),
+    url: v1,
     headers: [],
     content: Nothing,
     username: Nothing,
@@ -43777,31 +43740,53 @@ var loadFile = (v) => (v1) => (dictMonadAff) => {
     withCredentials: false,
     responseFormat: $ResponseFormat("String", identity),
     timeout: Nothing
-  })))((result) => {
+  }))((resp) => _pure((() => {
+    if (resp.tag === "Right") {
+      if (resp._1.status === 200) {
+        return $Either("Right", $Tuple(resp._1, v1));
+      }
+      return $Either("Left", RequestFailedError);
+    }
+    if (resp.tag === "Left") {
+      return $Either("Left", resp._1);
+    }
+    fail();
+  })())))($Either("Left", RequestFailedError))))((v1) => {
+    const $0 = v1._2;
+    return bindExceptT2.bind(applicativeExceptT2.pure())(() => bindExceptT2.bind(dictMonadAff.liftAff(request(driver)({
+      method: $Either("Left", GET),
+      url: $0,
+      headers: [],
+      content: Nothing,
+      username: Nothing,
+      password: Nothing,
+      withCredentials: false,
+      responseFormat: $ResponseFormat("String", identity),
+      timeout: Nothing
+    })))((contents) => applicativeExceptT2.pure(contents.body)));
+  }))((result) => {
     if (result.tag === "Left") {
-      const $0 = result._1;
-      return Bind1.bind(MonadEffect0.liftEffect(log2("Failed with " + printError($0))))(() => dictMonadError.MonadThrow0().throwError(error(printError($0))));
+      return dictMonadError.MonadThrow0().throwError(error(printError(result._1)));
     }
     if (result.tag === "Right") {
-      const $0 = result._1;
-      return Bind1.bind(Applicative0.pure())(() => Applicative0.pure($0.body));
+      return pure22(result._1);
     }
     fail();
   });
 };
-var loadFile$p = (folder) => (file) => (dictMonadAff) => (dictMonadError) => dictMonadAff.MonadEffect0().Monad0().Bind1().Apply0().Functor0().map((v) => $Tuple(file, v))(loadFile(folder)(file)(dictMonadAff)(dictMonadError));
+var loadFile$p = (folders) => (file) => (dictMonadAff) => (dictMonadError) => dictMonadAff.MonadEffect0().Monad0().Bind1().Apply0().Functor0().map((v) => $Tuple(file, v))(loadFile(folders)(file)(dictMonadAff)(dictMonadError));
 var loadProgCxt2 = (dictMonadAff) => {
   const loadProgCxt1 = loadProgCxt(dictMonadAff);
   return (dictMonadError) => {
     const loadProgCxt22 = loadProgCxt1(dictMonadError);
-    return (fluidSrcPath) => loadProgCxt22({ loadFile, fluidSrcPath });
+    return (fluidSrcPaths) => loadProgCxt22({ loadFile, fluidSrcPaths });
   };
 };
 var prepConfig2 = (dictMonadAff) => {
   const prepConfig1 = prepConfig(dictMonadAff);
   return (dictMonadError) => {
     const prepConfig22 = prepConfig1(dictMonadError);
-    return (fluidSrcPath) => prepConfig22({ loadFile, fluidSrcPath });
+    return (fluidSrcPaths) => prepConfig22({ loadFile, fluidSrcPaths });
   };
 };
 
@@ -43995,7 +43980,7 @@ var loadFig = (v) => (dictMonadAff) => {
     const prepConfig1 = prepConfig3(dictMonadError);
     const graphEval2 = graphEval(dictMonadError);
     const $1 = v.file;
-    const $2 = v.fluidSrcPath;
+    const $2 = v.fluidSrcPaths;
     const $3 = v.inputs;
     return $0.bind(loadProgCxt3(dictMonadError)($2)(v.imports)(v.datasets))((progCxt) => $0.bind(prepConfig1($2)($1)(progCxt))((v1) => {
       const $4 = v1.s;
@@ -44268,26 +44253,7 @@ var gDecodeJsonCons = (dictDecodeJsonField) => (dictGDecodeJson) => (dictIsSymbo
 var monadAffAff = { liftAff: (x2) => x2, MonadEffect0: () => monadEffectAff };
 
 // output-es/App.LoadFigure/index.js
-var gDecodeJsonCons2 = /* @__PURE__ */ gDecodeJsonCons({
-  decodeJsonField: (j) => {
-    if (j.tag === "Just") {
-      return $Maybe(
-        "Just",
-        _caseJson(
-          (v) => $Either("Left", $JsonDecodeError("TypeMismatch", "String")),
-          (v) => $Either("Left", $JsonDecodeError("TypeMismatch", "String")),
-          (v) => $Either("Left", $JsonDecodeError("TypeMismatch", "String")),
-          Right,
-          (v) => $Either("Left", $JsonDecodeError("TypeMismatch", "String")),
-          (v) => $Either("Left", $JsonDecodeError("TypeMismatch", "String")),
-          j._1
-        )
-      );
-    }
-    return Nothing;
-  }
-});
-var gDecodeJsonCons1 = /* @__PURE__ */ gDecodeJsonCons(/* @__PURE__ */ (() => {
+var gDecodeJsonCons2 = /* @__PURE__ */ gDecodeJsonCons(/* @__PURE__ */ (() => {
   const $0 = decodeArray(caseJsonString($Either(
     "Left",
     $JsonDecodeError("TypeMismatch", "String")
@@ -44314,10 +44280,28 @@ var decodeJson = /* @__PURE__ */ (() => decodeRecord(gDecodeJsonCons((() => {
       return Nothing;
     }
   };
-})())(gDecodeJsonCons2(gDecodeJsonCons2(gDecodeJsonCons1(gDecodeJsonCons1(gDecodeJsonNil)({ reflectSymbol: () => "inputs" })()())({
-  reflectSymbol: () => "imports"
-})()())({ reflectSymbol: () => "fluidSrcPath" })()())({ reflectSymbol: () => "file" })()())({ reflectSymbol: () => "datasets" })()())().decodeJson)();
-var figSpecFromJson = (spec) => ({ fluidSrcPath: spec.fluidSrcPath, datasets: spec.datasets, imports: spec.imports, file: spec.file, inputs: spec.inputs });
+})())(gDecodeJsonCons({
+  decodeJsonField: (j) => {
+    if (j.tag === "Just") {
+      return $Maybe(
+        "Just",
+        _caseJson(
+          (v) => $Either("Left", $JsonDecodeError("TypeMismatch", "String")),
+          (v) => $Either("Left", $JsonDecodeError("TypeMismatch", "String")),
+          (v) => $Either("Left", $JsonDecodeError("TypeMismatch", "String")),
+          Right,
+          (v) => $Either("Left", $JsonDecodeError("TypeMismatch", "String")),
+          (v) => $Either("Left", $JsonDecodeError("TypeMismatch", "String")),
+          j._1
+        )
+      );
+    }
+    return Nothing;
+  }
+})(gDecodeJsonCons2(gDecodeJsonCons2(gDecodeJsonCons2(gDecodeJsonNil)({ reflectSymbol: () => "inputs" })()())({ reflectSymbol: () => "imports" })()())({
+  reflectSymbol: () => "fluidSrcPath"
+})()())({ reflectSymbol: () => "file" })()())({ reflectSymbol: () => "datasets" })()())().decodeJson)();
+var figSpecFromJson = (spec) => ({ fluidSrcPaths: arrayMap(Folder)(spec.fluidSrcPath), datasets: spec.datasets, imports: spec.imports, file: spec.file, inputs: spec.inputs });
 var loadFigure = (fileName) => runAffs_((v) => drawFig(v._1)(v._2))([
   _bind($$get(driver)($ResponseFormat("Json", identity))(fileName))((result) => {
     if (result.tag === "Left") {
@@ -44329,24 +44313,17 @@ var loadFigure = (fileName) => runAffs_((v) => drawFig(v._1)(v._2))([
         return throwException(error("JSON decoding failed with " + showJsonDecodeError.show(v._1)))();
       }
       if (v.tag === "Right") {
-        return _map((v1) => $Tuple("fig", v1))(loadFig({
-          fluidSrcPath: v._1.fluidSrcPath,
-          datasets: v._1.datasets,
-          imports: v._1.imports,
-          file: v._1.file,
-          inputs: v._1.inputs
-        })(monadAffAff)(monadErrorAff));
+        return _map((v1) => $Tuple("fig", v1))(loadFig(figSpecFromJson(v._1))(monadAffAff)(monadErrorAff));
       }
     }
     fail();
   })
 ]);
-var drawCode2 = (folder) => (file) => runAffs_(drawFile)([loadFile$p(folder)(file)(monadAffAff)(monadErrorAff)]);
+var drawCode2 = (folder) => (file) => runAffs_(drawFile)([loadFile$p([folder])(file)(monadAffAff)(monadErrorAff)]);
 export {
   decodeJson,
   drawCode2 as drawCode,
   figSpecFromJson,
   gDecodeJsonCons2 as gDecodeJsonCons,
-  gDecodeJsonCons1,
   loadFigure
 };

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@explorable-viz/fluid",
-  "version": "0.7.61",
+  "version": "0.7.63",
   "description": "Fluid is an experimental programming language which integrates a bidirectional dynamic analysis to connect outputs to data sources in a fine-grained way. Fluid is implemented in PureScript and runs in the browser.",
   "main": "index.js",
   "repository": {

package/script/bundle-website.sh

@@ -12,25 +12,24 @@ done
 
 WEBSITE_LISP_CASE=$(./$PREFIX/script/util/lisp-case.sh "$WEBSITE")
 echo "$WEBSITE -> $WEBSITE_LISP_CASE"
-mkdir -p "dist/$WEBSITE_LISP_CASE"
+echo "Cleaning dist/$WEBSITE_LISP_CASE"
+. "${PREFIX:+$PREFIX}script/util/clean.sh" $WEBSITE_LISP_CASE
 
 . "${PREFIX:+$PREFIX/}script/bundle-page.sh" $WEBSITE ${PREFIX:+$PREFIX}
 
 shopt -s nullglob
 
 # Only support one level of nesting for now
-set +x
 PAGES=($(for FILE in website/$WEBSITE/*.html; do
    basename "$FILE" | sed 's/\.[^.]*$//'
 done | sort -u))
-set -x
 
 for PAGE in "${PAGES[@]}"; do
    . "${PREFIX:+$PREFIX/}script/bundle-page.sh" $WEBSITE.$PAGE ${PREFIX:+$PREFIX}
 done
 
 echo "Processing other static files:"
-set +xu  # try to remove +u
+set +u  # try to remove +u
 TO_COPY=()
 shopt -s extglob
 for CHILD in website/$WEBSITE/!(.|..); do
@@ -40,15 +39,16 @@ for CHILD in website/$WEBSITE/!(.|..); do
    fi
 done
 shopt -u extglob
-set -xu
+set -u
 
 for CHILD in "${TO_COPY[@]}"; do
    cp -rL "$CHILD" dist/$WEBSITE_LISP_CASE
 done
 
 echo "Processing shared js files:"
-cp -r "${PREFIX:+$PREFIX/}dist/fluid/shared" dist/$WEBSITE_LISP_CASE
 cp -r fluid dist/$WEBSITE_LISP_CASE
+cp -r "${PREFIX:+$PREFIX/}dist/fluid/shared" dist/$WEBSITE_LISP_CASE
+
 
 if [[ -e "website/$SRC_PATH/test.mjs" ]]; then
    cp website/$SRC_PATH/test.mjs dist/SRC_PATH_LISP_CASE/test.mjs

package/.spago/node-process/v11.0.0/.eslintrc.json

@@ -1,29 +0,0 @@
-{
-  "parserOptions": {
-    "ecmaVersion": 6,
-    "sourceType": "module"
-  },
-  "extends": "eslint:recommended",
-  "env": {
-    "node": true
-  },
-  "rules": {
-    "strict": [2, "global"],
-    "block-scoped-var": 2,
-    "consistent-return": 2,
-    "eqeqeq": [2, "smart"],
-    "guard-for-in": 2,
-    "no-caller": 2,
-    "no-extend-native": 2,
-    "no-loop-func": 2,
-    "no-new": 2,
-    "no-param-reassign": 2,
-    "no-return-assign": 2,
-    "no-unused-expressions": 2,
-    "no-use-before-define": 2,
-    "radix": [2, "always"],
-    "indent": [2, 2],
-    "quotes": [2, "double"],
-    "semi": [2, "always"]
-  }
-}

package/.spago/node-process/v11.0.0/.gitignore

@@ -1,8 +0,0 @@
-/.*
-!/.gitignore
-!/.eslintrc.json
-!/.github/
-/bower_components/
-/node_modules/
-/output/
-package-lock.json

package/.spago/node-process/v11.1.0/.eslintrc.json

@@ -1,29 +0,0 @@
-{
-  "parserOptions": {
-    "ecmaVersion": 6,
-    "sourceType": "module"
-  },
-  "extends": "eslint:recommended",
-  "env": {
-    "node": true
-  },
-  "rules": {
-    "strict": [2, "global"],
-    "block-scoped-var": 2,
-    "consistent-return": 2,
-    "eqeqeq": [2, "smart"],
-    "guard-for-in": 2,
-    "no-caller": 2,
-    "no-extend-native": 2,
-    "no-loop-func": 2,
-    "no-new": 2,
-    "no-param-reassign": 2,
-    "no-return-assign": 2,
-    "no-unused-expressions": 2,
-    "no-use-before-define": 2,
-    "radix": [2, "always"],
-    "indent": [2, 2],
-    "quotes": [2, "double"],
-    "semi": [2, "always"]
-  }
-}

package/.spago/node-process/v11.1.0/.gitignore

@@ -1,8 +0,0 @@
-/.*
-!/.gitignore
-!/.eslintrc.json
-!/.github/
-/bower_components/
-/node_modules/
-/output/
-package-lock.json

package/.spago/node-process/v11.2.0/.eslintrc.json

@@ -1,29 +0,0 @@
-{
-  "parserOptions": {
-    "ecmaVersion": 6,
-    "sourceType": "module"
-  },
-  "extends": "eslint:recommended",
-  "env": {
-    "node": true
-  },
-  "rules": {
-    "strict": [2, "global"],
-    "block-scoped-var": 2,
-    "consistent-return": 2,
-    "eqeqeq": [2, "smart"],
-    "guard-for-in": 2,
-    "no-caller": 2,
-    "no-extend-native": 2,
-    "no-loop-func": 2,
-    "no-new": 2,
-    "no-param-reassign": 2,
-    "no-return-assign": 2,
-    "no-unused-expressions": 2,
-    "no-use-before-define": 2,
-    "radix": [2, "always"],
-    "indent": [2, 2],
-    "quotes": [2, "double"],
-    "semi": [2, "always"]
-  }
-}

package/.spago/node-process/v11.2.0/.gitignore

@@ -1,8 +0,0 @@
-/.*
-!/.gitignore
-!/.eslintrc.json
-!/.github/
-/bower_components/
-/node_modules/
-/output/
-package-lock.json

package/.spago/optparse/v6.0.0/.gitignore

@@ -1,8 +0,0 @@
-/.*
-!/.github
-!/.gitignore
-!/.npmrc
-!/.travis.yml
-/bower_components/
-/node_modules/
-/output/

package/.spago/optparse/v6.0.0/.npmrc

@@ -1 +0,0 @@
-package-lock=false

package/dist/fluid/fluid/example/linked-outputs/pairs.fld

@@ -1,2 +0,0 @@
-let q = 1 in
-((fun (w, x) -> (w, (w, x))) data)