@explorable-viz/fluid 0.12.2 → 0.12.3

package/website/article/static/fluid/lib/stats.fld

@@ -0,0 +1,83 @@
+def split([]): ([], [])
+def split(x :| xs):
+  def (ys, zs): split(xs)
+  (x :| zs, ys)
+
+def merge(xs, ys):
+  match (xs, ys):
+    case ([], _): ys
+    case (x :| xs_, []): xs
+    case (x :| xs_, y :| ys_):
+      if x < y: x :| merge(xs_, ys)
+      else: y :| merge(xs, ys_)
+
+def mergesort(xs):
+  if length(xs) < 2: xs
+  else:
+    def (ys, zs): split(xs)
+    merge(mergesort(ys), mergesort(zs))
+
+def find_quantile(q, p, xs):
+  def rank:
+    (p / q) * (length(xs) - 1)
+
+  if rank == floor(rank):
+    nth(rank, xs)
+  else:
+    def x1: floor(rank)
+    def x2: ceiling(rank)
+    def left: nth(x1, xs)
+    def right: nth(x2, xs)
+    left + (rank - x1) * (right - left)
+
+def find_percentile: find_quantile(100)
+
+def accum_bins(data, Nil): []
+def accum_bins(data, [l]): []
+def accum_bins(data, l :| r :| es):
+  def (ge, le):
+    split_on(lambda x: x <= r, data)
+  (le, r - l) :| accum_bins(ge, r :| es)
+
+def cut(xs, nbins):
+  def low: minimum(xs)
+  def binwidth:
+    (maximum(xs) - low) / nbins
+  def edges:
+    [low + x * binwidth for x in [0 .. nbins]]
+
+  accum_bins(xs, edges)
+
+def qcut(xs, qs):
+  def (low, high):
+    (minimum(xs), maximum(xs))
+  def edges:
+    append((low :| [find_percentile(x, xs) for x in qs], [high]))
+
+  accum_bins(xs, edges)
+
+def likelihood_le(xs, target):
+  length(filter(lambda x: x <= target, xs)) / length(xs)
+
+def likelihood_ge(xs, target):
+  length(filter(lambda x: x >= target, xs)) / length(xs)
+
+def likelihood_map(table, prob):
+  from_some(find(lambda x: x.prob <= prob, table)).msg
+
+def mk_percent(num):
+  num_to_str(num * 100) ++ "%"
+
+def leq_p(n, m):
+  if n <= m: "less"
+  else: "more"
+
+def graded_leq_p(n, m):
+  def ratio: n / m
+
+  if ratio <= 1.0:
+    if ratio <= 0.5: "much less"
+    else: "less"
+  else:
+    if ratio >= 2.0: "much more"
+    else: "more"

package/website/article/svelte.config.js

@@ -0,0 +1,13 @@
+import adapter from '@sveltejs/adapter-static';
+import { vitePreprocess } from '@sveltejs/vite-plugin-svelte';
+
+/** @type {import('@sveltejs/kit').Config} */
+const config = {
+	preprocess: vitePreprocess(),
+
+	kit: {
+		adapter: adapter()
+	}
+};
+
+export default config;

package/website/article/test.mjs

@@ -1,14 +1,69 @@
-import { runTests, testURL, waitFor } from "./shared/webtest-lib.js"
+import {
+   checkAttribute, checkAttributeContains, checkComputedStyle, checkTextContent,
+   click, clickToggle, testURL, waitFor
+} from "../../script/webtest-lib.mjs"
 
 export const main = async () => {
-   await runTests(testURL("convolution")([ page => waitFor("svg#fig-output")(page) ]))()
-   const point = "div#fig .scatterplot-point"
-   await runTests(testURL("methane")([ page => waitFor("#fig svg:nth-of-type(1)")(page) ]))()
-   await runTests(testURL("moving-average")([ page => waitFor("svg")(page) ]))()
-   await runTests(testURL("non-renewables")([
-      page => waitFor("#fig-output > svg:nth-of-type(1)")(page),
-      page => waitFor("#fig-output > svg:nth-of-type(2)")(page),
-   ]))()
-   await runTests(testURL("renewables-linked")([page => waitFor("#fig-output > svg:nth-of-type(1)")(page)]))()
-   await runTests(testURL("scigen-1805.02474v1-10")([ page => waitFor("div#fig-output")(page) ]))()
+   await testURL("convolution", [
+      async page => await waitFor(page, "svg#fig-output")
+   ])
+
+   await testURL("energy-scatter", [
+      async page => {
+         await waitFor(page, "svg")
+         await clickToggle(page)
+
+         const point = "div#fig .scatterplot-point"
+         await waitFor(page, point)
+         await click(page, point)
+         await checkAttributeContains(page, point, "class", "selected-primary-persistent")
+         await checkAttribute(page, point, "r", "3.2")
+
+         const caption = "div#fig-input-renewables > div.table-caption"
+         await checkTextContent(page, caption, "renewables (40 of 240 × 5 of 5)")
+      }
+   ])
+
+   await testURL("methane", [
+      async page => await waitFor(page, "#fig svg:nth-of-type(1)")
+   ])
+
+   await testURL("moving-average", [
+      async page => await waitFor(page, "svg")
+   ])
+
+   await testURL("non-renewables", [
+      async page => await waitFor(page, "#fig-output > svg:nth-of-type(1)"),
+      async page => await waitFor(page, "#fig-output > svg:nth-of-type(2)"),
+   ])
+
+   await testURL("renewables-linked", [
+      async page => {
+         const barChart = "#fig-output > :nth-child(1)"
+         const lineChart = "#fig-output > :nth-child(2)"
+
+         await waitFor(page, barChart)
+         await waitFor(page, lineChart)
+         await waitFor(page, `${lineChart} g.x-axis`)
+
+         const point = `${lineChart} circle.linechart-point`
+         await waitFor(page, point)
+         await checkAttribute(page, point, "r", "2.0")
+
+         await clickToggle(page)
+
+         const bar = `${barChart} rect.bar`
+         await waitFor(page, bar)
+         await click(page, bar)
+         await checkAttribute(page, bar, "fill", "#57a157")
+
+         const selectedCell = "#fig-input .table-cell.selected-primary-persistent"
+         await waitFor(page, selectedCell)
+         await checkComputedStyle(page, selectedCell, "backgroundColor", "rgb(147, 233, 190)")
+      }
+   ])
+
+   await testURL("scigen-1805.02474v1-10", [
+      async page => await waitFor(page, "div#fig-output")
+   ])
 }

package/website/article/tsconfig.json

@@ -0,0 +1,20 @@
+{
+	"extends": "./.svelte-kit/tsconfig.json",
+	"compilerOptions": {
+		"rewriteRelativeImportExtensions": true,
+		"allowJs": true,
+		"checkJs": false, // Purescript output doesn't have types
+		"esModuleInterop": true,
+		"forceConsistentCasingInFileNames": true,
+		"resolveJsonModule": true,
+		"skipLibCheck": true,
+		"sourceMap": true,
+		"strict": true,
+		"moduleResolution": "bundler"
+	}
+	// Path aliases are handled by https://svelte.dev/docs/kit/configuration#alias
+	// except $lib which is handled by https://svelte.dev/docs/kit/configuration#files
+	//
+	// To make changes to top-level options such as include and exclude, we recommend extending
+	// the generated config; see https://svelte.dev/docs/kit/configuration#typescript
+}

package/website/article/vite.config.ts

@@ -0,0 +1,6 @@
+import { sveltekit } from '@sveltejs/kit/vite';
+import { defineConfig } from 'vite';
+
+export default defineConfig({
+	plugins: [sveltekit()]
+});

package/.spago/aff/v7.1.0/.editorconfig

@@ -1,13 +0,0 @@
-# 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/aff/v7.1.0/.eslintrc.json

@@ -1,28 +0,0 @@
-{
-  "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-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/aff/v7.1.0/.gitignore

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

package/.spago/aff/v7.1.0/.tidyrc.json

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

package/.spago/affjax/v13.0.0/.editorconfig

@@ -1,13 +0,0 @@
-# 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/v13.0.0/.eslintrc.json

@@ -1,28 +0,0 @@
-{
-  "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-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": 1 }],
-    "quotes": ["error", "double"],
-    "semi": ["error", "always"],
-    "strict": ["error", "global"]
-  }
-}

package/.spago/affjax/v13.0.0/.gitignore

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

package/.spago/affjax/v13.0.0/.tidyrc.json

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

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

@@ -1,13 +0,0 @@
-# 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-web/v1.0.0/.eslintrc.json

@@ -1,30 +0,0 @@
-{
-  "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-web/v1.0.0/.gitignore

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

package/.spago/affjax-web/v1.0.0/.tidyrc.json

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

package/.spago/argonaut-codecs/v9.1.0/.editorconfig

@@ -1,13 +0,0 @@
-# http://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/argonaut-codecs/v9.1.0/.gitignore

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

package/.spago/argonaut-codecs/v9.1.0/.tidyrc.json

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

package/.spago/argonaut-core/v7.0.0/.editorconfig

@@ -1,13 +0,0 @@
-# http://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/argonaut-core/v7.0.0/.eslintrc.json

@@ -1,29 +0,0 @@
-{
-  "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-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": 1 }],
-    "quotes": ["error", "double"],
-    "semi": ["error", "always"],
-    "strict": ["error", "global"]
-  }
-}

package/.spago/argonaut-core/v7.0.0/.gitignore

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

package/.spago/argonaut-core/v7.0.0/.tidyrc.json

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

package/.spago/arraybuffer-types/v3.0.2/.editorconfig

@@ -1,13 +0,0 @@
-# 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/arraybuffer-types/v3.0.2/.gitignore

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

package/.spago/arraybuffer-types/v3.0.2/.tidyrc.json

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

package/.spago/arrays/v7.2.1/.eslintrc.json

@@ -1,26 +0,0 @@
-{
-  "parserOptions": {
-    "ecmaVersion": 6,
-    "sourceType": "module"
-  },
-  "extends": "eslint:recommended",
-  "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/arrays/v7.2.1/.gitignore

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

package/.spago/assert/v6.0.0/.eslintrc.json

@@ -1,26 +0,0 @@
-{
-  "parserOptions": {
-    "ecmaVersion": 6,
-    "sourceType": "module"
-  },
-  "extends": "eslint:recommended",
-  "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/assert/v6.0.0/.gitignore

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

package/.spago/bifunctors/v6.0.0/.gitignore

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

package/.spago/catenable-lists/v7.0.0/.gitignore

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