@explorable-viz/fluid 0.7.94 → 0.7.96
This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
- package/dist/fluid/fluid/lib/matrix.fld +16 -18
- package/dist/fluid/shared/fluid.mjs +311 -474
- package/dist/fluid/shared/load-figure.js +700 -458
- package/package.json +4 -2
- package/script/bundle-website.sh +1 -2
- package/website/article/convolution/index.html +1 -1
- package/website/article/fluid/1805.02474v1-10.fld +33 -0
- package/website/article/fluid/convolution.fld +1 -0
- package/website/article/index.html +1 -1
- package/website/article/transparent-text/index.html +45 -0
- package/website/article/transparent-text/spec.json +9 -0
- package/website/article/image/fluid-logo.png +0 -0
- package/website/article/image/iccs-full-logo.png +0 -0
- package/website/article/image/schmidtsciences_primary_color.png +0 -0
@@ -1851,7 +1851,7 @@ var foldableNonEmptyList = {
|
|
1851
1851
|
};
|
1852
1852
|
var semigroupNonEmptyList = { append: (v) => (as$p) => $NonEmpty(v._1, foldableList.foldr(Cons)($List("Cons", as$p._1, as$p._2))(v._2)) };
|
1853
1853
|
var showList = (dictShow) => {
|
1854
|
-
const
|
1854
|
+
const show4 = dictShow.show;
|
1855
1855
|
return {
|
1856
1856
|
show: (v) => {
|
1857
1857
|
if (v.tag === "Nil") {
|
@@ -1875,7 +1875,7 @@ var showList = (dictShow) => {
|
|
1875
1875
|
}
|
1876
1876
|
return go$r;
|
1877
1877
|
};
|
1878
|
-
return "(" + go({ init: true, acc: "" })(listMap(
|
1878
|
+
return "(" + go({ init: true, acc: "" })(listMap(show4)(v)).acc + " : Nil)";
|
1879
1879
|
}
|
1880
1880
|
};
|
1881
1881
|
};
|
@@ -27828,8 +27828,8 @@ var dataTypes = /* @__PURE__ */ foldrArray(Cons)(Nil)([
|
|
27828
27828
|
/* @__PURE__ */ dataType("View")([
|
27829
27829
|
/* @__PURE__ */ $Tuple("BarChart", 1),
|
27830
27830
|
/* @__PURE__ */ $Tuple("LineChart", 1),
|
27831
|
-
/* @__PURE__ */ $Tuple("Paragraph", 1),
|
27832
27831
|
/* @__PURE__ */ $Tuple("MultiView", 1),
|
27832
|
+
/* @__PURE__ */ $Tuple("Paragraph", 1),
|
27833
27833
|
/* @__PURE__ */ $Tuple("ScatterPlot", 1)
|
27834
27834
|
]),
|
27835
27835
|
/* @__PURE__ */ dataType("Point")([/* @__PURE__ */ $Tuple("Point", 2)]),
|
@@ -36216,7 +36216,7 @@ var unary = (dictBoundedJoinSemilattice) => {
|
|
36216
36216
|
arity: 1,
|
36217
36217
|
op: (dictMonadWithGraphAlloc) => {
|
36218
36218
|
const $$new = dictMonadWithGraphAlloc.new(typeNameVal);
|
36219
|
-
return (dictMonadError) => (v) => {
|
36219
|
+
return (dictMonadError) => (dictLoadFile) => (v) => {
|
36220
36220
|
if (v.tag === "Cons" && v._2.tag === "Nil") {
|
36221
36221
|
const $0 = v._1._2;
|
36222
36222
|
return $$new((a) => Val(a)($0))($$$Map("Two", Leaf2, v._1._1, void 0, Leaf2))(f.o.pack(f.fwd(f.i.unpack(v._1._3))));
|
@@ -36365,7 +36365,7 @@ var binaryZero = (dictBoundedJoinSemilattice) => {
|
|
36365
36365
|
arity: 2,
|
36366
36366
|
op: (dictMonadWithGraphAlloc) => {
|
36367
36367
|
const $$new = dictMonadWithGraphAlloc.new(typeNameVal);
|
36368
|
-
return (dictMonadError) => (v) => {
|
36368
|
+
return (dictMonadError) => (dictLoadFile) => (v) => {
|
36369
36369
|
if (v.tag === "Cons" && v._2.tag === "Cons" && v._2._2.tag === "Nil") {
|
36370
36370
|
const $0 = f.i.unpack(v._1._3);
|
36371
36371
|
const $1 = f.i.unpack(v._2._1._3);
|
@@ -36413,7 +36413,7 @@ var binary = (dictBoundedJoinSemilattice) => {
|
|
36413
36413
|
arity: 2,
|
36414
36414
|
op: (dictMonadWithGraphAlloc) => {
|
36415
36415
|
const $$new = dictMonadWithGraphAlloc.new(typeNameVal);
|
36416
|
-
return (dictMonadError) => (v) => {
|
36416
|
+
return (dictMonadError) => (dictLoadFile) => (v) => {
|
36417
36417
|
if (v.tag === "Cons" && v._2.tag === "Cons" && v._2._2.tag === "Nil") {
|
36418
36418
|
return $$new((a) => Val(a)(None))(insert3(ordVertex)(v._2._1._1)()($$$Map(
|
36419
36419
|
"Two",
|
@@ -36654,7 +36654,7 @@ var runAffs_ = (f) => (as1) => {
|
|
36654
36654
|
$0();
|
36655
36655
|
};
|
36656
36656
|
};
|
36657
|
-
var primary = (dictApply) => (
|
36657
|
+
var primary = (dictApply) => (x2) => dictApply.Functor0().map((v) => {
|
36658
36658
|
if (v.tag === "Inert") {
|
36659
36659
|
return Inert;
|
36660
36660
|
}
|
@@ -36662,7 +36662,7 @@ var primary = (dictApply) => (f) => dictApply.Functor0().map((v) => {
|
|
36662
36662
|
return $SelState("Reactive", v._1 ? Primary : None2);
|
36663
36663
|
}
|
36664
36664
|
fail();
|
36665
|
-
})(
|
36665
|
+
})(x2);
|
36666
36666
|
var get_intOrNumber = (x2) => (r) => {
|
36667
36667
|
const $0 = $$get2(showString)(mapDictString)(x2)(r);
|
36668
36668
|
const $1 = intOrNumber.unpack($0._2._3);
|
@@ -36887,7 +36887,7 @@ var as\u{1D54A} = (v) => (v1) => {
|
|
36887
36887
|
};
|
36888
36888
|
var primaryOrSecondary = (dictApply) => {
|
36889
36889
|
const $0 = dictApply.Functor0();
|
36890
|
-
return (selType) => (
|
36890
|
+
return (selType) => (x2) => (x$p) => dictApply.apply($0.map((a) => (b) => applySelState.apply((() => {
|
36891
36891
|
if (a.tag === "Inert") {
|
36892
36892
|
return Inert;
|
36893
36893
|
}
|
@@ -36895,7 +36895,7 @@ var primaryOrSecondary = (dictApply) => {
|
|
36895
36895
|
return $SelState("Reactive", as\u{1D54A}(a._1));
|
36896
36896
|
}
|
36897
36897
|
fail();
|
36898
|
-
})())(b))($0.map(getSel(selType))(
|
36898
|
+
})())(b))($0.map(getSel(selType))(x2)))(x$p);
|
36899
36899
|
};
|
36900
36900
|
|
36901
36901
|
// output-es/App.Util.Selector/index.js
|
@@ -37218,10 +37218,12 @@ var $ElementType = (tag) => tag;
|
|
37218
37218
|
var fromFoldable9 = /* @__PURE__ */ fromFoldable(foldableArray);
|
37219
37219
|
var Caption = /* @__PURE__ */ $ElementType("Caption");
|
37220
37220
|
var Circle = /* @__PURE__ */ $ElementType("Circle");
|
37221
|
+
var Div = /* @__PURE__ */ $ElementType("Div");
|
37221
37222
|
var G = /* @__PURE__ */ $ElementType("G");
|
37222
37223
|
var Line2 = /* @__PURE__ */ $ElementType("Line");
|
37223
37224
|
var Path2 = /* @__PURE__ */ $ElementType("Path");
|
37224
37225
|
var Rect = /* @__PURE__ */ $ElementType("Rect");
|
37226
|
+
var Span = /* @__PURE__ */ $ElementType("Span");
|
37225
37227
|
var SVG = /* @__PURE__ */ $ElementType("SVG");
|
37226
37228
|
var Table = /* @__PURE__ */ $ElementType("Table");
|
37227
37229
|
var Text2 = /* @__PURE__ */ $ElementType("Text");
|
@@ -37242,54 +37244,64 @@ var genericElementType_ = {
|
|
37242
37244
|
}
|
37243
37245
|
if (x2._1.tag === "Inr") {
|
37244
37246
|
if (x2._1._1.tag === "Inl") {
|
37245
|
-
return
|
37247
|
+
return Div;
|
37246
37248
|
}
|
37247
37249
|
if (x2._1._1.tag === "Inr") {
|
37248
37250
|
if (x2._1._1._1.tag === "Inl") {
|
37249
|
-
return
|
37251
|
+
return G;
|
37250
37252
|
}
|
37251
37253
|
if (x2._1._1._1.tag === "Inr") {
|
37252
37254
|
if (x2._1._1._1._1.tag === "Inl") {
|
37253
|
-
return
|
37255
|
+
return Line2;
|
37254
37256
|
}
|
37255
37257
|
if (x2._1._1._1._1.tag === "Inr") {
|
37256
37258
|
if (x2._1._1._1._1._1.tag === "Inl") {
|
37257
|
-
return
|
37259
|
+
return Path2;
|
37258
37260
|
}
|
37259
37261
|
if (x2._1._1._1._1._1.tag === "Inr") {
|
37260
37262
|
if (x2._1._1._1._1._1._1.tag === "Inl") {
|
37261
|
-
return
|
37263
|
+
return Rect;
|
37262
37264
|
}
|
37263
37265
|
if (x2._1._1._1._1._1._1.tag === "Inr") {
|
37264
37266
|
if (x2._1._1._1._1._1._1._1.tag === "Inl") {
|
37265
|
-
return
|
37267
|
+
return Span;
|
37266
37268
|
}
|
37267
37269
|
if (x2._1._1._1._1._1._1._1.tag === "Inr") {
|
37268
37270
|
if (x2._1._1._1._1._1._1._1._1.tag === "Inl") {
|
37269
|
-
return
|
37271
|
+
return SVG;
|
37270
37272
|
}
|
37271
37273
|
if (x2._1._1._1._1._1._1._1._1.tag === "Inr") {
|
37272
37274
|
if (x2._1._1._1._1._1._1._1._1._1.tag === "Inl") {
|
37273
|
-
return
|
37275
|
+
return Table;
|
37274
37276
|
}
|
37275
37277
|
if (x2._1._1._1._1._1._1._1._1._1.tag === "Inr") {
|
37276
37278
|
if (x2._1._1._1._1._1._1._1._1._1._1.tag === "Inl") {
|
37277
|
-
return
|
37279
|
+
return Text2;
|
37278
37280
|
}
|
37279
37281
|
if (x2._1._1._1._1._1._1._1._1._1._1.tag === "Inr") {
|
37280
37282
|
if (x2._1._1._1._1._1._1._1._1._1._1._1.tag === "Inl") {
|
37281
|
-
return
|
37283
|
+
return TBody;
|
37282
37284
|
}
|
37283
37285
|
if (x2._1._1._1._1._1._1._1._1._1._1._1.tag === "Inr") {
|
37284
37286
|
if (x2._1._1._1._1._1._1._1._1._1._1._1._1.tag === "Inl") {
|
37285
|
-
return
|
37287
|
+
return TD;
|
37286
37288
|
}
|
37287
37289
|
if (x2._1._1._1._1._1._1._1._1._1._1._1._1.tag === "Inr") {
|
37288
37290
|
if (x2._1._1._1._1._1._1._1._1._1._1._1._1._1.tag === "Inl") {
|
37289
|
-
return
|
37291
|
+
return TH;
|
37290
37292
|
}
|
37291
37293
|
if (x2._1._1._1._1._1._1._1._1._1._1._1._1._1.tag === "Inr") {
|
37292
|
-
|
37294
|
+
if (x2._1._1._1._1._1._1._1._1._1._1._1._1._1._1.tag === "Inl") {
|
37295
|
+
return THead;
|
37296
|
+
}
|
37297
|
+
if (x2._1._1._1._1._1._1._1._1._1._1._1._1._1._1.tag === "Inr") {
|
37298
|
+
if (x2._1._1._1._1._1._1._1._1._1._1._1._1._1._1._1.tag === "Inl") {
|
37299
|
+
return TR;
|
37300
|
+
}
|
37301
|
+
if (x2._1._1._1._1._1._1._1._1._1._1._1._1._1._1._1.tag === "Inr") {
|
37302
|
+
return Pattern;
|
37303
|
+
}
|
37304
|
+
}
|
37293
37305
|
}
|
37294
37306
|
}
|
37295
37307
|
}
|
@@ -37313,19 +37325,19 @@ var genericElementType_ = {
|
|
37313
37325
|
if (x2 === "Circle") {
|
37314
37326
|
return $Sum("Inr", $Sum("Inl", NoArguments));
|
37315
37327
|
}
|
37316
|
-
if (x2 === "
|
37328
|
+
if (x2 === "Div") {
|
37317
37329
|
return $Sum("Inr", $Sum("Inr", $Sum("Inl", NoArguments)));
|
37318
37330
|
}
|
37319
|
-
if (x2 === "
|
37331
|
+
if (x2 === "G") {
|
37320
37332
|
return $Sum("Inr", $Sum("Inr", $Sum("Inr", $Sum("Inl", NoArguments))));
|
37321
37333
|
}
|
37322
|
-
if (x2 === "
|
37334
|
+
if (x2 === "Line") {
|
37323
37335
|
return $Sum(
|
37324
37336
|
"Inr",
|
37325
37337
|
$Sum("Inr", $Sum("Inr", $Sum("Inr", $Sum("Inl", NoArguments))))
|
37326
37338
|
);
|
37327
37339
|
}
|
37328
|
-
if (x2 === "
|
37340
|
+
if (x2 === "Path") {
|
37329
37341
|
return $Sum(
|
37330
37342
|
"Inr",
|
37331
37343
|
$Sum(
|
@@ -37334,7 +37346,7 @@ var genericElementType_ = {
|
|
37334
37346
|
)
|
37335
37347
|
);
|
37336
37348
|
}
|
37337
|
-
if (x2 === "
|
37349
|
+
if (x2 === "Rect") {
|
37338
37350
|
return $Sum(
|
37339
37351
|
"Inr",
|
37340
37352
|
$Sum(
|
@@ -37346,7 +37358,7 @@ var genericElementType_ = {
|
|
37346
37358
|
)
|
37347
37359
|
);
|
37348
37360
|
}
|
37349
|
-
if (x2 === "
|
37361
|
+
if (x2 === "Span") {
|
37350
37362
|
return $Sum(
|
37351
37363
|
"Inr",
|
37352
37364
|
$Sum(
|
@@ -37361,7 +37373,7 @@ var genericElementType_ = {
|
|
37361
37373
|
)
|
37362
37374
|
);
|
37363
37375
|
}
|
37364
|
-
if (x2 === "
|
37376
|
+
if (x2 === "SVG") {
|
37365
37377
|
return $Sum(
|
37366
37378
|
"Inr",
|
37367
37379
|
$Sum(
|
@@ -37379,7 +37391,7 @@ var genericElementType_ = {
|
|
37379
37391
|
)
|
37380
37392
|
);
|
37381
37393
|
}
|
37382
|
-
if (x2 === "
|
37394
|
+
if (x2 === "Table") {
|
37383
37395
|
return $Sum(
|
37384
37396
|
"Inr",
|
37385
37397
|
$Sum(
|
@@ -37400,7 +37412,7 @@ var genericElementType_ = {
|
|
37400
37412
|
)
|
37401
37413
|
);
|
37402
37414
|
}
|
37403
|
-
if (x2 === "
|
37415
|
+
if (x2 === "Text") {
|
37404
37416
|
return $Sum(
|
37405
37417
|
"Inr",
|
37406
37418
|
$Sum(
|
@@ -37424,7 +37436,7 @@ var genericElementType_ = {
|
|
37424
37436
|
)
|
37425
37437
|
);
|
37426
37438
|
}
|
37427
|
-
if (x2 === "
|
37439
|
+
if (x2 === "TBody") {
|
37428
37440
|
return $Sum(
|
37429
37441
|
"Inr",
|
37430
37442
|
$Sum(
|
@@ -37451,7 +37463,7 @@ var genericElementType_ = {
|
|
37451
37463
|
)
|
37452
37464
|
);
|
37453
37465
|
}
|
37454
|
-
if (x2 === "
|
37466
|
+
if (x2 === "TD") {
|
37455
37467
|
return $Sum(
|
37456
37468
|
"Inr",
|
37457
37469
|
$Sum(
|
@@ -37484,7 +37496,7 @@ var genericElementType_ = {
|
|
37484
37496
|
)
|
37485
37497
|
);
|
37486
37498
|
}
|
37487
|
-
if (x2 === "
|
37499
|
+
if (x2 === "TH") {
|
37488
37500
|
return $Sum(
|
37489
37501
|
"Inr",
|
37490
37502
|
$Sum(
|
@@ -37520,6 +37532,87 @@ var genericElementType_ = {
|
|
37520
37532
|
)
|
37521
37533
|
);
|
37522
37534
|
}
|
37535
|
+
if (x2 === "THead") {
|
37536
|
+
return $Sum(
|
37537
|
+
"Inr",
|
37538
|
+
$Sum(
|
37539
|
+
"Inr",
|
37540
|
+
$Sum(
|
37541
|
+
"Inr",
|
37542
|
+
$Sum(
|
37543
|
+
"Inr",
|
37544
|
+
$Sum(
|
37545
|
+
"Inr",
|
37546
|
+
$Sum(
|
37547
|
+
"Inr",
|
37548
|
+
$Sum(
|
37549
|
+
"Inr",
|
37550
|
+
$Sum(
|
37551
|
+
"Inr",
|
37552
|
+
$Sum(
|
37553
|
+
"Inr",
|
37554
|
+
$Sum(
|
37555
|
+
"Inr",
|
37556
|
+
$Sum(
|
37557
|
+
"Inr",
|
37558
|
+
$Sum(
|
37559
|
+
"Inr",
|
37560
|
+
$Sum("Inr", $Sum("Inr", $Sum("Inl", NoArguments)))
|
37561
|
+
)
|
37562
|
+
)
|
37563
|
+
)
|
37564
|
+
)
|
37565
|
+
)
|
37566
|
+
)
|
37567
|
+
)
|
37568
|
+
)
|
37569
|
+
)
|
37570
|
+
)
|
37571
|
+
)
|
37572
|
+
);
|
37573
|
+
}
|
37574
|
+
if (x2 === "TR") {
|
37575
|
+
return $Sum(
|
37576
|
+
"Inr",
|
37577
|
+
$Sum(
|
37578
|
+
"Inr",
|
37579
|
+
$Sum(
|
37580
|
+
"Inr",
|
37581
|
+
$Sum(
|
37582
|
+
"Inr",
|
37583
|
+
$Sum(
|
37584
|
+
"Inr",
|
37585
|
+
$Sum(
|
37586
|
+
"Inr",
|
37587
|
+
$Sum(
|
37588
|
+
"Inr",
|
37589
|
+
$Sum(
|
37590
|
+
"Inr",
|
37591
|
+
$Sum(
|
37592
|
+
"Inr",
|
37593
|
+
$Sum(
|
37594
|
+
"Inr",
|
37595
|
+
$Sum(
|
37596
|
+
"Inr",
|
37597
|
+
$Sum(
|
37598
|
+
"Inr",
|
37599
|
+
$Sum(
|
37600
|
+
"Inr",
|
37601
|
+
$Sum("Inr", $Sum("Inr", $Sum("Inl", NoArguments)))
|
37602
|
+
)
|
37603
|
+
)
|
37604
|
+
)
|
37605
|
+
)
|
37606
|
+
)
|
37607
|
+
)
|
37608
|
+
)
|
37609
|
+
)
|
37610
|
+
)
|
37611
|
+
)
|
37612
|
+
)
|
37613
|
+
)
|
37614
|
+
);
|
37615
|
+
}
|
37523
37616
|
if (x2 === "Pattern") {
|
37524
37617
|
return $Sum(
|
37525
37618
|
"Inr",
|
@@ -37543,7 +37636,13 @@ var genericElementType_ = {
|
|
37543
37636
|
"Inr",
|
37544
37637
|
$Sum(
|
37545
37638
|
"Inr",
|
37546
|
-
$Sum(
|
37639
|
+
$Sum(
|
37640
|
+
"Inr",
|
37641
|
+
$Sum(
|
37642
|
+
"Inr",
|
37643
|
+
$Sum("Inr", $Sum("Inr", $Sum("Inr", NoArguments)))
|
37644
|
+
)
|
37645
|
+
)
|
37547
37646
|
)
|
37548
37647
|
)
|
37549
37648
|
)
|
@@ -37566,38 +37665,66 @@ var showElementType = {
|
|
37566
37665
|
const $2 = (() => {
|
37567
37666
|
const $22 = (() => {
|
37568
37667
|
const $23 = (() => {
|
37569
|
-
const $24 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "
|
37668
|
+
const $24 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "Div" });
|
37570
37669
|
const $3 = (() => {
|
37571
|
-
const $32 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "
|
37670
|
+
const $32 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "G" });
|
37572
37671
|
const $4 = (() => {
|
37573
|
-
const $42 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "
|
37672
|
+
const $42 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "Line" });
|
37574
37673
|
const $5 = (() => {
|
37575
|
-
const $52 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "
|
37674
|
+
const $52 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "Path" });
|
37576
37675
|
const $6 = (() => {
|
37577
|
-
const $62 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "
|
37676
|
+
const $62 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "Rect" });
|
37578
37677
|
const $7 = (() => {
|
37579
|
-
const $72 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "
|
37678
|
+
const $72 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "Span" });
|
37580
37679
|
const $8 = (() => {
|
37581
|
-
const $82 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "
|
37680
|
+
const $82 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "SVG" });
|
37582
37681
|
const $9 = (() => {
|
37583
|
-
const $92 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "
|
37682
|
+
const $92 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "Table" });
|
37584
37683
|
const $10 = (() => {
|
37585
|
-
const $102 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "
|
37684
|
+
const $102 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "Text" });
|
37586
37685
|
const $11 = (() => {
|
37587
|
-
const $112 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "
|
37686
|
+
const $112 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "TBody" });
|
37588
37687
|
const $12 = (() => {
|
37589
|
-
const $122 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "
|
37688
|
+
const $122 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "TD" });
|
37590
37689
|
const $13 = (() => {
|
37591
|
-
const $132 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "
|
37690
|
+
const $132 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "TH" });
|
37592
37691
|
const $14 = (() => {
|
37593
|
-
const $142 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "
|
37692
|
+
const $142 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "THead" });
|
37693
|
+
const $15 = (() => {
|
37694
|
+
const $152 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "TR" });
|
37695
|
+
const $16 = (() => {
|
37696
|
+
const $162 = genericShowConstructor(genericShowArgsNoArguments)({ reflectSymbol: () => "Pattern" });
|
37697
|
+
return {
|
37698
|
+
"genericShow'": (v) => {
|
37699
|
+
if (v.tag === "Inl") {
|
37700
|
+
return $152["genericShow'"](v._1);
|
37701
|
+
}
|
37702
|
+
if (v.tag === "Inr") {
|
37703
|
+
return $162["genericShow'"](v._1);
|
37704
|
+
}
|
37705
|
+
fail();
|
37706
|
+
}
|
37707
|
+
};
|
37708
|
+
})();
|
37709
|
+
return {
|
37710
|
+
"genericShow'": (v) => {
|
37711
|
+
if (v.tag === "Inl") {
|
37712
|
+
return $142["genericShow'"](v._1);
|
37713
|
+
}
|
37714
|
+
if (v.tag === "Inr") {
|
37715
|
+
return $16["genericShow'"](v._1);
|
37716
|
+
}
|
37717
|
+
fail();
|
37718
|
+
}
|
37719
|
+
};
|
37720
|
+
})();
|
37594
37721
|
return {
|
37595
37722
|
"genericShow'": (v) => {
|
37596
37723
|
if (v.tag === "Inl") {
|
37597
37724
|
return $132["genericShow'"](v._1);
|
37598
37725
|
}
|
37599
37726
|
if (v.tag === "Inr") {
|
37600
|
-
return $
|
37727
|
+
return $15["genericShow'"](v._1);
|
37601
37728
|
}
|
37602
37729
|
fail();
|
37603
37730
|
}
|
@@ -38119,7 +38246,9 @@ var setSelStates$p = (v) => (select2) => (rootElement) => {
|
|
38119
38246
|
};
|
38120
38247
|
var createRootElement$p = (v) => (parent) => {
|
38121
38248
|
const $0 = v._2;
|
38122
|
-
const $1 = createChild(parent)(showElementType.show(
|
38249
|
+
const $1 = createChild(parent)(showElementType.show(Div))(fromFoldable9([
|
38250
|
+
$Tuple("class", "para-text")
|
38251
|
+
]));
|
38123
38252
|
return () => {
|
38124
38253
|
const rootElement = $1();
|
38125
38254
|
sequence_2(arrayMap((view2) => view2((dictView) => (v1) => dictView.createElement()(v1)(rootElement)))($0))();
|
@@ -38504,6 +38633,7 @@ function createElement_({ val }, { title: title2, matrix }, parent) {
|
|
38504
38633
|
const vMargin = h / 2;
|
38505
38634
|
const rootElement = parent.append("svg");
|
38506
38635
|
rootElement.attr("width", width + hMargin).attr("height", height + vMargin);
|
38636
|
+
rootElement.append("text").text(title2 === "intermediate" ? " " : title2).attr("x", hMargin / 2).attr("y", vMargin / 2).attr("class", "title-text").attr("dominant-baseline", "middle").attr("text-anchor", "left");
|
38507
38637
|
const matrixGrp = rootElement.append("g").attr("transform", `translate(${highlightStrokeWidth / 2 + hMargin / 2}, ${highlightStrokeWidth / 2 + vMargin})`).attr("fill", "currentColor").attr("stroke", "currentColor").attr("stroke-width", ".25");
|
38508
38638
|
const rowGrp = matrixGrp.selectAll("g").data([...matrix.cells.entries()].map(([i, ns]) => {
|
38509
38639
|
return { i: i + 1, ns };
|
@@ -38604,7 +38734,7 @@ var setSelStates$p2 = (v) => (select2) => (rootElement) => sequence_3((() => {
|
|
38604
38734
|
})());
|
38605
38735
|
var createRootElement$p2 = (v) => (parent) => {
|
38606
38736
|
const views$p = toUnfoldable9(v._1);
|
38607
|
-
const $0 = createChild(parent)(showElementType.show(
|
38737
|
+
const $0 = createChild(parent)(showElementType.show(Div))(fromFoldable9([]));
|
38608
38738
|
return () => {
|
38609
38739
|
const rootElement = $0();
|
38610
38740
|
sequence_3(arrayMap((v1) => v1._2((dictView) => (v2) => dictView.createElement()(v2)(rootElement)))(views$p))();
|
@@ -39027,9 +39157,7 @@ var textAttrs = (dictTextual) => (x2) => {
|
|
39027
39157
|
var viewTextUnit = {
|
39028
39158
|
createElement: (v) => (v1) => (parent) => {
|
39029
39159
|
const $0 = v1._1;
|
39030
|
-
const $1 = createChild(parent)(showElementType.show(
|
39031
|
-
$Tuple("class", "para-text")
|
39032
|
-
]));
|
39160
|
+
const $1 = createChild(parent)(showElementType.show(Span))(fromFoldable9([]));
|
39033
39161
|
return () => {
|
39034
39162
|
const rootElement = $1();
|
39035
39163
|
return setText($0)(rootElement)();
|
@@ -39037,7 +39165,7 @@ var viewTextUnit = {
|
|
39037
39165
|
},
|
39038
39166
|
setSelection: (v) => (v1) => (redraw) => (rootElement) => {
|
39039
39167
|
const $0 = v1._1;
|
39040
|
-
const $1 = select("
|
39168
|
+
const $1 = select(":nth-child(1)")(rootElement);
|
39041
39169
|
return () => {
|
39042
39170
|
const elem2 = $1();
|
39043
39171
|
const listener = eventListener((x2) => redraw(selectionEventData$p(x2)._2))();
|
@@ -39128,18 +39256,26 @@ var viewLinkUnit = {
|
|
39128
39256
|
};
|
39129
39257
|
|
39130
39258
|
// output-es/App.View/index.js
|
39131
|
-
var pack3 = (x2) => (v) => v(
|
39132
|
-
var pack14 = (x2) => (v) => v(
|
39133
|
-
var pack23 = (x2) => (v) => v(
|
39134
|
-
var pack32 = (x2) => (v) => v(
|
39135
|
-
var pack4 = (x2) => (v) => v(
|
39136
|
-
var pack5 = (x2) => (v) => v(
|
39259
|
+
var pack3 = (x2) => (v) => v(viewTextUnit)(x2);
|
39260
|
+
var pack14 = (x2) => (v) => v(viewBarChartUnit)(x2);
|
39261
|
+
var pack23 = (x2) => (v) => v(viewLineChartUnit)(x2);
|
39262
|
+
var pack32 = (x2) => (v) => v(viewScatterPlotUnit)(x2);
|
39263
|
+
var pack4 = (x2) => (v) => v(viewMultiViewUnit)(x2);
|
39264
|
+
var pack5 = (x2) => (v) => v(viewParagraphUnit)(x2);
|
39265
|
+
var pack6 = (x2) => (v) => v(viewLinkUnit)(x2);
|
39137
39266
|
var identity29 = (x2) => x2;
|
39138
|
-
var
|
39139
|
-
var
|
39140
|
-
var pack8 = (x2) => (v) => v(viewTextUnit)(x2);
|
39267
|
+
var pack7 = (x2) => (v) => v(viewTableViewUnit)(x2);
|
39268
|
+
var pack8 = (x2) => (v) => v(viewMatrixViewUnit)(x2);
|
39141
39269
|
var fromFoldable11 = /* @__PURE__ */ (() => fromFoldableImpl(foldableList.foldr))();
|
39142
39270
|
var pack9 = (x2) => (v) => v(viewDocViewUnit)(x2);
|
39271
|
+
var reflectValSelStates\u{1D54A}Text = {
|
39272
|
+
from: () => (v) => {
|
39273
|
+
if (v._3.tag === "Str") {
|
39274
|
+
return $Tuple(v._3._1, v._1);
|
39275
|
+
}
|
39276
|
+
return typeError(v._3)("Text");
|
39277
|
+
}
|
39278
|
+
};
|
39143
39279
|
var reflectValSelStates\u{1D54A}Link = {
|
39144
39280
|
from: () => (v) => {
|
39145
39281
|
if (v._3.tag === "Constr" && v._3._2.tag === "Cons" && v._3._2._2.tag === "Cons" && v._3._2._2._1._3.tag === "Str" && v._3._2._2._2.tag === "Nil" && v._3._1 === "Link") {
|
@@ -39287,14 +39423,17 @@ var view = () => (v) => (v1) => (v2) => {
|
|
39287
39423
|
if (v1._3.tag === "Constr") {
|
39288
39424
|
if (v1._3._2.tag === "Cons") {
|
39289
39425
|
if (v1._3._2._2.tag === "Nil") {
|
39426
|
+
if (v1._3._1 === "Text") {
|
39427
|
+
return pack3(reflectValSelStates\u{1D54A}Text.from()(v1._3._2._1));
|
39428
|
+
}
|
39290
39429
|
if (v1._3._1 === "BarChart") {
|
39291
|
-
return
|
39430
|
+
return pack14(dict(reflectDictSelStates\u{1D54A}$x215Val9.from())(v1._3._2._1));
|
39292
39431
|
}
|
39293
39432
|
if (v1._3._1 === "LineChart") {
|
39294
|
-
return
|
39433
|
+
return pack23(dict(reflectDictSelStates\u{1D54A}$x215Val7.from())(v1._3._2._1));
|
39295
39434
|
}
|
39296
39435
|
if (v1._3._1 === "ScatterPlot") {
|
39297
|
-
return
|
39436
|
+
return pack32(dict(reflectDictSelStates\u{1D54A}$x215Val6.from())(v1._3._2._1));
|
39298
39437
|
}
|
39299
39438
|
if (v1._3._1 === "MultiView") {
|
39300
39439
|
const vws = _fmapObject(
|
@@ -39309,16 +39448,16 @@ var view = () => (v) => (v1) => (v2) => {
|
|
39309
39448
|
),
|
39310
39449
|
view()(v)
|
39311
39450
|
);
|
39312
|
-
return
|
39451
|
+
return pack4($MultiView(intersectionWith_Object(apply)(vws)(_fmapObject(vws, (v$1) => Nothing))));
|
39313
39452
|
}
|
39314
39453
|
if (v1._3._1 === "Paragraph") {
|
39315
39454
|
const vws = arrayMap(view()(v))(reflectValSelStates\u{1D54A}Array.from()(v1._3._2._1));
|
39316
|
-
return
|
39455
|
+
return pack5($Paragraph(false, arrayApply(vws)(arrayMap((v$1) => Nothing)(vws))));
|
39317
39456
|
}
|
39318
39457
|
if (v1._3._1 === "Nil" || v1._3._1 === ":") {
|
39319
39458
|
const records = arrayMap(dict(identity29))(reflectValSelStates\u{1D54A}Array.from()(v1));
|
39320
39459
|
const colNames = headers(records);
|
39321
|
-
return
|
39460
|
+
return pack7({
|
39322
39461
|
title: v,
|
39323
39462
|
filter: Interactive,
|
39324
39463
|
colNames,
|
@@ -39328,13 +39467,13 @@ var view = () => (v) => (v1) => (v2) => {
|
|
39328
39467
|
fail();
|
39329
39468
|
}
|
39330
39469
|
if (v1._3._2._2.tag === "Cons" && v1._3._2._2._2.tag === "Nil" && v1._3._1 === "Link") {
|
39331
|
-
return
|
39470
|
+
return pack6(reflectValSelStates\u{1D54A}Link.from()(v1));
|
39332
39471
|
}
|
39333
39472
|
}
|
39334
39473
|
if (v1._3._1 === "Nil" || v1._3._1 === ":") {
|
39335
39474
|
const records = arrayMap(dict(identity29))(reflectValSelStates\u{1D54A}Array.from()(v1));
|
39336
39475
|
const colNames = headers(records);
|
39337
|
-
return
|
39476
|
+
return pack7({
|
39338
39477
|
title: v,
|
39339
39478
|
filter: Interactive,
|
39340
39479
|
colNames,
|
@@ -39344,7 +39483,7 @@ var view = () => (v) => (v1) => (v2) => {
|
|
39344
39483
|
fail();
|
39345
39484
|
}
|
39346
39485
|
if (v1._3.tag === "Matrix") {
|
39347
|
-
return
|
39486
|
+
return pack8({ title: v, matrix: matrixRep(v1._3._1) });
|
39348
39487
|
}
|
39349
39488
|
fail();
|
39350
39489
|
};
|
@@ -39362,11 +39501,11 @@ var viewPara = () => (v) => {
|
|
39362
39501
|
if (v1._2.tag === "Cons" && v1._2._1.tag === "Token") {
|
39363
39502
|
return formatPara($List("Cons", $DocCommentElem("Token", v1._1._1 + " " + v1._2._1._1), v1._2._2));
|
39364
39503
|
}
|
39365
|
-
return $List("Cons",
|
39504
|
+
return $List("Cons", pack3($Tuple(v1._1._1, Inert)), formatPara(v1._2));
|
39366
39505
|
}
|
39367
39506
|
if (v1._1.tag === "Unquote") {
|
39368
39507
|
if (v1._1._1._3.tag === "Int") {
|
39369
|
-
return $List("Cons",
|
39508
|
+
return $List("Cons", pack3($Tuple(showIntImpl(v1._1._1._3._1), v1._1._1._1)), formatPara(v1._2));
|
39370
39509
|
}
|
39371
39510
|
return $List("Cons", view()("")(v1._1._1)(Nothing), formatPara(v1._2));
|
39372
39511
|
}
|
@@ -39393,6 +39532,17 @@ var applyStateT = (dictMonad) => {
|
|
39393
39532
|
};
|
39394
39533
|
};
|
39395
39534
|
var applicativeStateT = (dictMonad) => ({ pure: (a) => (s) => dictMonad.Applicative0().pure($Tuple(a, s)), Apply0: () => applyStateT(dictMonad) });
|
39535
|
+
var monadEffectState = (dictMonadEffect) => {
|
39536
|
+
const Monad0 = dictMonadEffect.Monad0();
|
39537
|
+
const monadStateT1 = { Applicative0: () => applicativeStateT(Monad0), Bind1: () => bindStateT(Monad0) };
|
39538
|
+
return {
|
39539
|
+
liftEffect: (x2) => {
|
39540
|
+
const $0 = dictMonadEffect.liftEffect(x2);
|
39541
|
+
return (s) => Monad0.Bind1().bind($0)((x$1) => Monad0.Applicative0().pure($Tuple(x$1, s)));
|
39542
|
+
},
|
39543
|
+
Monad0: () => monadStateT1
|
39544
|
+
};
|
39545
|
+
};
|
39396
39546
|
var monadRecStateT = (dictMonadRec) => {
|
39397
39547
|
const Monad0 = dictMonadRec.Monad0();
|
39398
39548
|
const monadStateT1 = { Applicative0: () => applicativeStateT(Monad0), Bind1: () => bindStateT(Monad0) };
|
@@ -39429,6 +39579,23 @@ var monadErrorStateT = (dictMonadError) => {
|
|
39429
39579
|
return { catchError: (v) => (h) => (s) => dictMonadError.catchError(v(s))((e) => h(e)(s)), MonadThrow0: () => monadThrowStateT1 };
|
39430
39580
|
};
|
39431
39581
|
|
39582
|
+
// output-es/Effect.Aff.Class/index.js
|
39583
|
+
var monadAffAff = { liftAff: (x2) => x2, MonadEffect0: () => monadEffectAff };
|
39584
|
+
var monadAffState = (dictMonadAff) => {
|
39585
|
+
const MonadEffect0 = dictMonadAff.MonadEffect0();
|
39586
|
+
const monadEffectState2 = monadEffectState(MonadEffect0);
|
39587
|
+
return {
|
39588
|
+
liftAff: (() => {
|
39589
|
+
const $0 = MonadEffect0.Monad0();
|
39590
|
+
return (x2) => {
|
39591
|
+
const $1 = dictMonadAff.liftAff(x2);
|
39592
|
+
return (s) => $0.Bind1().bind($1)((x$1) => $0.Applicative0().pure($Tuple(x$1, s)));
|
39593
|
+
};
|
39594
|
+
})(),
|
39595
|
+
MonadEffect0: () => monadEffectState2
|
39596
|
+
};
|
39597
|
+
};
|
39598
|
+
|
39432
39599
|
// output-es/Graph.WithGraph/index.js
|
39433
39600
|
var fromFoldable17 = /* @__PURE__ */ (() => {
|
39434
39601
|
const go = (go$a0$copy) => (go$a1$copy) => {
|
@@ -39823,11 +39990,11 @@ var new$p = (dictMonadWithGraphAlloc) => {
|
|
39823
39990
|
const Monad0 = MonadWithGraph2.Monad0();
|
39824
39991
|
const Bind1 = Monad0.Bind1();
|
39825
39992
|
const fresh = dictMonadWithGraphAlloc.MonadAlloc0().fresh;
|
39826
|
-
return (v) => (v1) => (v2) => (v3) => {
|
39993
|
+
return (dictLoadFile) => (v) => (v1) => (v2) => (v3) => {
|
39827
39994
|
if (v2.tag === "None") {
|
39828
39995
|
return $$new((\u03B1s$p) => (u$p) => $Val(\u03B1s$p, None, u$p))(v1)(v3);
|
39829
39996
|
}
|
39830
|
-
return Bind1.bind(fresh)((\u03B1) => Bind1.bind(evalDocOpt(dictMonadWithGraphAlloc)(unionWith((v$1) => identity18)(v)((() => {
|
39997
|
+
return Bind1.bind(fresh)((\u03B1) => Bind1.bind(evalDocOpt(dictMonadWithGraphAlloc)(dictLoadFile)(unionWith((v$1) => identity18)(v)((() => {
|
39831
39998
|
const $0 = {};
|
39832
39999
|
$0.this = $Val(\u03B1, None, v3);
|
39833
40000
|
return $0;
|
@@ -39839,7 +40006,7 @@ var evalDocOpt = (dictMonadWithGraphAlloc) => {
|
|
39839
40006
|
const Applicative0 = Monad0.Applicative0();
|
39840
40007
|
const $0 = Monad0.Bind1().Apply0().Functor0();
|
39841
40008
|
const sequence2 = traversableList.traverse(Applicative0)(identity7);
|
39842
|
-
return (v) => (v1) => {
|
40009
|
+
return (dictLoadFile) => (v) => (v1) => {
|
39843
40010
|
if (v1.tag === "None") {
|
39844
40011
|
return Applicative0.pure(None);
|
39845
40012
|
}
|
@@ -39849,7 +40016,7 @@ var evalDocOpt = (dictMonadWithGraphAlloc) => {
|
|
39849
40016
|
return Applicative0.pure($DocCommentElem("Token", v2._1));
|
39850
40017
|
}
|
39851
40018
|
if (v2.tag === "Unquote") {
|
39852
|
-
return $0.map(Unquote)($$eval(dictMonadWithGraphAlloc)(v)(v2._1)(setSet4.empty));
|
40019
|
+
return $0.map(Unquote)($$eval(dictMonadWithGraphAlloc)(dictLoadFile)(v)(v2._1)(setSet4.empty));
|
39853
40020
|
}
|
39854
40021
|
fail();
|
39855
40022
|
})(v1._1)));
|
@@ -39872,7 +40039,7 @@ var $$eval = (dictMonadWithGraphAlloc) => {
|
|
39872
40039
|
const $$new = dictMonadWithGraphAlloc.new(typeNameVal);
|
39873
40040
|
const match1 = match(dictMonadWithGraphAlloc);
|
39874
40041
|
const closeDefs1 = closeDefs(dictMonadWithGraphAlloc);
|
39875
|
-
return (v) => (v1) => (v2) => {
|
40042
|
+
return (dictLoadFile) => (v) => (v1) => (v2) => {
|
39876
40043
|
if (v1.tag === "Var") {
|
39877
40044
|
return withMsg2("Variable lookup")(lookup$p(MonadThrow0)(showString)(mapEnvStringVal)(v1._1)(v));
|
39878
40045
|
}
|
@@ -39880,23 +40047,23 @@ var $$eval = (dictMonadWithGraphAlloc) => {
|
|
39880
40047
|
return withMsg2("Variable lookup")(lookup$p(MonadThrow0)(showString)(mapEnvStringVal)(v1._1)(v));
|
39881
40048
|
}
|
39882
40049
|
if (v1.tag === "Int") {
|
39883
|
-
return new$p(dictMonadWithGraphAlloc)(v)(insert3(ordVertex)(v1._1)()(v2))(v1._2)($BaseVal("Int", v1._3));
|
40050
|
+
return new$p(dictMonadWithGraphAlloc)(dictLoadFile)(v)(insert3(ordVertex)(v1._1)()(v2))(v1._2)($BaseVal("Int", v1._3));
|
39884
40051
|
}
|
39885
40052
|
if (v1.tag === "Float") {
|
39886
|
-
return new$p(dictMonadWithGraphAlloc)(v)(insert3(ordVertex)(v1._1)()(v2))(v1._2)($BaseVal("Float", v1._3));
|
40053
|
+
return new$p(dictMonadWithGraphAlloc)(dictLoadFile)(v)(insert3(ordVertex)(v1._1)()(v2))(v1._2)($BaseVal("Float", v1._3));
|
39887
40054
|
}
|
39888
40055
|
if (v1.tag === "Str") {
|
39889
|
-
return new$p(dictMonadWithGraphAlloc)(v)(insert3(ordVertex)(v1._1)()(v2))(v1._2)($BaseVal("Str", v1._3));
|
40056
|
+
return new$p(dictMonadWithGraphAlloc)(dictLoadFile)(v)(insert3(ordVertex)(v1._1)()(v2))(v1._2)($BaseVal("Str", v1._3));
|
39890
40057
|
}
|
39891
40058
|
if (v1.tag === "Dictionary") {
|
39892
40059
|
const $1 = v1._2;
|
39893
40060
|
const $2 = v1._1;
|
39894
40061
|
return Bind1.bind($0.map(unzip3)(traverse2(traverse3((() => {
|
39895
|
-
const $3 = $$eval(dictMonadWithGraphAlloc)(v);
|
40062
|
+
const $3 = $$eval(dictMonadWithGraphAlloc)(dictLoadFile)(v);
|
39896
40063
|
return (a) => $3(a)(v2);
|
39897
40064
|
})()))(v1._3)))((v3) => {
|
39898
40065
|
const v4 = unzip(listMap((v$1) => $Tuple(v$1._3.tag === "Str" ? v$1._3._1 : typeError(v$1._3)("Str"), v$1._1))(v3._1));
|
39899
|
-
return new$p(dictMonadWithGraphAlloc)(v)(insert3(ordVertex)($2)()(v2))($1)($BaseVal(
|
40066
|
+
return new$p(dictMonadWithGraphAlloc)(dictLoadFile)(v)(insert3(ordVertex)($2)()(v2))($1)($BaseVal(
|
39900
40067
|
"Dictionary",
|
39901
40068
|
fromFoldable110(zipWith2(Tuple)(v4._1)(zipWith2(Tuple)(v4._2)(v3._2)))
|
39902
40069
|
));
|
@@ -39928,9 +40095,9 @@ var $$eval = (dictMonadWithGraphAlloc) => {
|
|
39928
40095
|
};
|
39929
40096
|
return go(0)($3);
|
39930
40097
|
})()))(() => Bind1.bind(traverse2((() => {
|
39931
|
-
const $5 = $$eval(dictMonadWithGraphAlloc)(v);
|
40098
|
+
const $5 = $$eval(dictMonadWithGraphAlloc)(dictLoadFile)(v);
|
39932
40099
|
return (a) => $5(a)(v2);
|
39933
|
-
})())($3))((vs) => new$p(dictMonadWithGraphAlloc)(v)(insert3(ordVertex)($4)()(v2))($2)($BaseVal("Constr", $1, vs))));
|
40100
|
+
})())($3))((vs) => new$p(dictMonadWithGraphAlloc)(dictLoadFile)(v)(insert3(ordVertex)($4)()(v2))($2)($BaseVal("Constr", $1, vs))));
|
39934
40101
|
}
|
39935
40102
|
if (v1.tag === "Matrix") {
|
39936
40103
|
const $1 = v1._2;
|
@@ -39938,7 +40105,7 @@ var $$eval = (dictMonadWithGraphAlloc) => {
|
|
39938
40105
|
const $3 = v1._4._1;
|
39939
40106
|
const $4 = v1._4._2;
|
39940
40107
|
const $5 = v1._1;
|
39941
|
-
return Bind1.bind($$eval(dictMonadWithGraphAlloc)(v)(v1._5)(v2))((v3) => {
|
40108
|
+
return Bind1.bind($$eval(dictMonadWithGraphAlloc)(dictLoadFile)(v)(v1._5)(v2))((v3) => {
|
39942
40109
|
const v5 = intPair.unpack(v3._3);
|
39943
40110
|
const $6 = v5._1._1;
|
39944
40111
|
const $7 = v5._2._1;
|
@@ -39949,7 +40116,7 @@ var $$eval = (dictMonadWithGraphAlloc) => {
|
|
39949
40116
|
$7
|
39950
40117
|
)) + ")"))(() => Bind1.bind(sequence2(arrayBind(range(1)($6))((i) => [
|
39951
40118
|
sequence2(arrayBind(range(1)($7))((j) => [
|
39952
|
-
$$eval(dictMonadWithGraphAlloc)(unionWith((v$1) => identity18)(v)(disjointUnion2((() => {
|
40119
|
+
$$eval(dictMonadWithGraphAlloc)(dictLoadFile)(unionWith((v$1) => identity18)(v)(disjointUnion2((() => {
|
39953
40120
|
const $10 = {};
|
39954
40121
|
$10[$3] = $Val($8, None, $BaseVal("Int", i));
|
39955
40122
|
return $10;
|
@@ -39959,7 +40126,7 @@ var $$eval = (dictMonadWithGraphAlloc) => {
|
|
39959
40126
|
return $10;
|
39960
40127
|
})())))($2)(v2)
|
39961
40128
|
]))
|
39962
|
-
])))((vss) => new$p(dictMonadWithGraphAlloc)(v)(insert3(ordVertex)($5)()(v2))($1)($BaseVal(
|
40129
|
+
])))((vss) => new$p(dictMonadWithGraphAlloc)(dictLoadFile)(v)(insert3(ordVertex)($5)()(v2))($1)($BaseVal(
|
39963
40130
|
"Matrix",
|
39964
40131
|
$Tuple(vss, $Tuple($Tuple($6, $8), $Tuple($7, $9)))
|
39965
40132
|
))));
|
@@ -39985,7 +40152,7 @@ var $$eval = (dictMonadWithGraphAlloc) => {
|
|
39985
40152
|
if (v1.tag === "Project") {
|
39986
40153
|
const $1 = v1._1;
|
39987
40154
|
const $2 = v1._3;
|
39988
|
-
return Bind1.bind($$eval(dictMonadWithGraphAlloc)(v)(v1._2)(v2))((v3) => {
|
40155
|
+
return Bind1.bind($$eval(dictMonadWithGraphAlloc)(dictLoadFile)(v)(v1._2)(v2))((v3) => {
|
39989
40156
|
if (v3._3.tag === "Dictionary") {
|
39990
40157
|
return Bind1.bind(withMsg2("Dict lookup")(orElse(MonadThrow0)('Key "' + $2 + '" not found')((() => {
|
39991
40158
|
const $3 = _lookup(Nothing, Just, $2, v3._3._1);
|
@@ -39993,7 +40160,7 @@ var $$eval = (dictMonadWithGraphAlloc) => {
|
|
39993
40160
|
return $Maybe("Just", $3._1._2);
|
39994
40161
|
}
|
39995
40162
|
return Nothing;
|
39996
|
-
})())))((v$p) => concatDocs(dictMonadWithGraphAlloc)(v)(v$p)($1));
|
40163
|
+
})())))((v$p) => concatDocs(dictMonadWithGraphAlloc)(dictLoadFile)(v)(v$p)($1));
|
39997
40164
|
}
|
39998
40165
|
return MonadThrow0.throwError(error("Found " + intercalate4("\n")(removeDocWS(prettyVal(highlightableVertex).pretty(v3)).lines) + ", expected dictionary"));
|
39999
40166
|
});
|
@@ -40001,7 +40168,7 @@ var $$eval = (dictMonadWithGraphAlloc) => {
|
|
40001
40168
|
if (v1.tag === "DProject") {
|
40002
40169
|
const $1 = v1._1;
|
40003
40170
|
const $2 = v1._3;
|
40004
|
-
return Bind1.bind($$eval(dictMonadWithGraphAlloc)(v)(v1._2)(v2))((v3) => Bind1.bind($$eval(dictMonadWithGraphAlloc)(v)($2)(v2))((v$p) => {
|
40171
|
+
return Bind1.bind($$eval(dictMonadWithGraphAlloc)(dictLoadFile)(v)(v1._2)(v2))((v3) => Bind1.bind($$eval(dictMonadWithGraphAlloc)(dictLoadFile)(v)($2)(v2))((v$p) => {
|
40005
40172
|
if (v3._3.tag === "Dictionary") {
|
40006
40173
|
if (v$p._3.tag === "Str") {
|
40007
40174
|
return Bind1.bind(withMsg2("Dict lookup")(orElse(MonadThrow0)('Key "' + v$p._3._1 + '" not found')((() => {
|
@@ -40010,7 +40177,7 @@ var $$eval = (dictMonadWithGraphAlloc) => {
|
|
40010
40177
|
return $Maybe("Just", $3._1._2);
|
40011
40178
|
}
|
40012
40179
|
return Nothing;
|
40013
|
-
})())))((v$p$p) => concatDocs(dictMonadWithGraphAlloc)(v)(v$p$p)($1));
|
40180
|
+
})())))((v$p$p) => concatDocs(dictMonadWithGraphAlloc)(dictLoadFile)(v)(v$p$p)($1));
|
40014
40181
|
}
|
40015
40182
|
return MonadThrow0.throwError(error("Found " + intercalate4("\n")(removeDocWS(prettyVal(highlightableVertex).pretty(v$p)).lines) + ", expected string"));
|
40016
40183
|
}
|
@@ -40020,10 +40187,10 @@ var $$eval = (dictMonadWithGraphAlloc) => {
|
|
40020
40187
|
if (v1.tag === "App") {
|
40021
40188
|
const $1 = v1._1;
|
40022
40189
|
const $2 = v1._3;
|
40023
|
-
return Bind1.bind($$eval(dictMonadWithGraphAlloc)(v)(v1._2)(v2))((v3) => Bind1.bind($$eval(dictMonadWithGraphAlloc)(v)($2)(v2))((v$p) => Bind1.bind(apply2(dictMonadWithGraphAlloc)(v3)(v$p))((v4) => {
|
40190
|
+
return Bind1.bind($$eval(dictMonadWithGraphAlloc)(dictLoadFile)(v)(v1._2)(v2))((v3) => Bind1.bind($$eval(dictMonadWithGraphAlloc)(dictLoadFile)(v)($2)(v2))((v$p) => Bind1.bind(apply2(dictMonadWithGraphAlloc)(dictLoadFile)(v3)(v$p))((v4) => {
|
40024
40191
|
const $3 = v4._3;
|
40025
40192
|
const $4 = v4._1;
|
40026
|
-
return Bind1.bind(evalDocOpt(dictMonadWithGraphAlloc)(unionWith((v$1) => identity18)(v)((() => {
|
40193
|
+
return Bind1.bind(evalDocOpt(dictMonadWithGraphAlloc)(dictLoadFile)(unionWith((v$1) => identity18)(v)((() => {
|
40027
40194
|
const $5 = {};
|
40028
40195
|
$5.this = v4;
|
40029
40196
|
return $5;
|
@@ -40033,23 +40200,23 @@ var $$eval = (dictMonadWithGraphAlloc) => {
|
|
40033
40200
|
if (v1.tag === "Let") {
|
40034
40201
|
const $1 = v1._2;
|
40035
40202
|
const $2 = v1._1._1;
|
40036
|
-
return Bind1.bind($$eval(dictMonadWithGraphAlloc)(v)(v1._1._2)(v2))((v3) => Bind1.bind(match1(v3)($2))((v4) => $$eval(dictMonadWithGraphAlloc)(unionWith((v$1) => identity18)(v)(v4._1))($1)(v4._2._2)));
|
40203
|
+
return Bind1.bind($$eval(dictMonadWithGraphAlloc)(dictLoadFile)(v)(v1._1._2)(v2))((v3) => Bind1.bind(match1(v3)($2))((v4) => $$eval(dictMonadWithGraphAlloc)(dictLoadFile)(unionWith((v$1) => identity18)(v)(v4._1))($1)(v4._2._2)));
|
40037
40204
|
}
|
40038
40205
|
if (v1.tag === "LetRec") {
|
40039
40206
|
const $1 = v1._2;
|
40040
40207
|
const $2 = v1._1._1;
|
40041
|
-
return Bind1.bind(closeDefs1(v)(v1._1._2)(insert3(ordVertex)($2)()(v2)))((\u03B3$p) => $$eval(dictMonadWithGraphAlloc)(unionWith((v$1) => identity18)(v)(\u03B3$p))($1)(insert3(ordVertex)($2)()(v2)));
|
40208
|
+
return Bind1.bind(closeDefs1(v)(v1._1._2)(insert3(ordVertex)($2)()(v2)))((\u03B3$p) => $$eval(dictMonadWithGraphAlloc)(dictLoadFile)(unionWith((v$1) => identity18)(v)(\u03B3$p))($1)(insert3(ordVertex)($2)()(v2)));
|
40042
40209
|
}
|
40043
40210
|
fail();
|
40044
40211
|
};
|
40045
40212
|
};
|
40046
40213
|
var concatDocs = (dictMonadWithGraphAlloc) => {
|
40047
40214
|
const Monad0 = dictMonadWithGraphAlloc.MonadWithGraph2().Monad0();
|
40048
|
-
return (\u03B3) => (v) => (doc2) => {
|
40215
|
+
return (dictLoadFile) => (\u03B3) => (v) => (doc2) => {
|
40049
40216
|
const $0 = v._3;
|
40050
40217
|
const $1 = v._2;
|
40051
40218
|
const $2 = v._1;
|
40052
|
-
return Monad0.Bind1().bind(evalDocOpt(dictMonadWithGraphAlloc)(unionWith((v$1) => identity18)(\u03B3)((() => {
|
40219
|
+
return Monad0.Bind1().bind(evalDocOpt(dictMonadWithGraphAlloc)(dictLoadFile)(unionWith((v$1) => identity18)(\u03B3)((() => {
|
40053
40220
|
const $3 = {};
|
40054
40221
|
$3.this = $Val($2, None, $0);
|
40055
40222
|
return $3;
|
@@ -40063,14 +40230,14 @@ var apply2 = (dictMonadWithGraphAlloc) => {
|
|
40063
40230
|
const $$new = dictMonadWithGraphAlloc.new(typeNameVal);
|
40064
40231
|
const MonadError1 = dictMonadWithGraphAlloc.MonadError1();
|
40065
40232
|
const MonadThrow0 = MonadError1.MonadThrow0();
|
40066
|
-
return (v) => (v1) => {
|
40233
|
+
return (dictLoadFile) => (v) => (v1) => {
|
40067
40234
|
const $0 = (v2) => MonadThrow0.throwError(error("Found " + intercalate4("\n")(removeDocWS(prettyVal(highlightableVertex).pretty(v2)).lines) + ", expected function"));
|
40068
40235
|
if (v._3.tag === "Fun") {
|
40069
40236
|
if (v._3._1.tag === "Closure") {
|
40070
40237
|
const $1 = v._1;
|
40071
40238
|
const $2 = v._3._1._1;
|
40072
40239
|
const $3 = v._3._1._3;
|
40073
|
-
return Bind1.bind(closeDefs1($2)(v._3._1._2)($$$Map("Two", Leaf2, $1, void 0, Leaf2)))((\u03B32) => Bind1.bind(match1(v1)($3))((v3) => $$eval(dictMonadWithGraphAlloc)(unionWith((v$1) => identity18)(unionWith((v$1) => identity18)($2)(\u03B32))(v3._1))(v3._2._1.tag === "ContExpr" ? v3._2._1._1 : throwException(error("Expression expected"))())(insert3(ordVertex)($1)()(v3._2._2))));
|
40240
|
+
return Bind1.bind(closeDefs1($2)(v._3._1._2)($$$Map("Two", Leaf2, $1, void 0, Leaf2)))((\u03B32) => Bind1.bind(match1(v1)($3))((v3) => $$eval(dictMonadWithGraphAlloc)(dictLoadFile)(unionWith((v$1) => identity18)(unionWith((v$1) => identity18)($2)(\u03B32))(v3._1))(v3._2._1.tag === "ContExpr" ? v3._2._1._1 : throwException(error("Expression expected"))())(insert3(ordVertex)($1)()(v3._2._2))));
|
40074
40241
|
}
|
40075
40242
|
if (v._3._1.tag === "Foreign") {
|
40076
40243
|
const $1 = v._3._1._1._2;
|
@@ -40101,7 +40268,7 @@ var apply2 = (dictMonadWithGraphAlloc) => {
|
|
40101
40268
|
$Fun("Foreign", $Tuple(v._3._1._1._1, $1), vs$p)
|
40102
40269
|
));
|
40103
40270
|
}
|
40104
|
-
return $1._1.op(dictMonadWithGraphAlloc)(MonadError1)(vs$p);
|
40271
|
+
return $1._1.op(dictMonadWithGraphAlloc)(MonadError1)(dictLoadFile)(vs$p);
|
40105
40272
|
}
|
40106
40273
|
if (v._3._1.tag === "PartialConstr") {
|
40107
40274
|
const $1 = v._1;
|
@@ -40172,25 +40339,28 @@ var eval_module = (dictMonadWithGraphAlloc) => {
|
|
40172
40339
|
const eval1 = $$eval(dictMonadWithGraphAlloc);
|
40173
40340
|
const match1 = match(dictMonadWithGraphAlloc);
|
40174
40341
|
const closeDefs1 = closeDefs(dictMonadWithGraphAlloc);
|
40175
|
-
return (
|
40176
|
-
const
|
40177
|
-
|
40178
|
-
|
40179
|
-
|
40180
|
-
|
40181
|
-
if (v1._1.tag === "Left") {
|
40182
|
-
const $1 = v1._2;
|
40183
|
-
const $2 = v1._1._1._1;
|
40184
|
-
return $0.bind(eval1(unionWith((v$1) => identity18)(\u03B3)(v))(v1._1._1._2)(v2))((v3) => $0.bind(match1(v3)($2))((v4) => go(unionWith((v$1) => identity18)(v)(v4._1))($1)(v4._2._2)));
|
40342
|
+
return (dictLoadFile) => {
|
40343
|
+
const eval2 = eval1(dictLoadFile);
|
40344
|
+
return (\u03B3) => {
|
40345
|
+
const go = (v) => (v1) => (v2) => {
|
40346
|
+
if (v1.tag === "Nil") {
|
40347
|
+
return Monad0.Applicative0().pure(v);
|
40185
40348
|
}
|
40186
|
-
if (v1.
|
40187
|
-
|
40188
|
-
|
40349
|
+
if (v1.tag === "Cons") {
|
40350
|
+
if (v1._1.tag === "Left") {
|
40351
|
+
const $1 = v1._2;
|
40352
|
+
const $2 = v1._1._1._1;
|
40353
|
+
return $0.bind(eval2(unionWith((v$1) => identity18)(\u03B3)(v))(v1._1._1._2)(v2))((v3) => $0.bind(match1(v3)($2))((v4) => go(unionWith((v$1) => identity18)(v)(v4._1))($1)(v4._2._2)));
|
40354
|
+
}
|
40355
|
+
if (v1._1.tag === "Right") {
|
40356
|
+
const $1 = v1._2;
|
40357
|
+
return $0.bind(closeDefs1(unionWith((v$1) => identity18)(\u03B3)(v))(v1._1._1._2)(insert3(ordVertex)(v1._1._1._1)()(v2)))((\u03B3$p$p) => go(unionWith((v$1) => identity18)(v)(\u03B3$p$p))($1)(v2));
|
40358
|
+
}
|
40189
40359
|
}
|
40190
|
-
|
40191
|
-
|
40360
|
+
fail();
|
40361
|
+
};
|
40362
|
+
return go(empty);
|
40192
40363
|
};
|
40193
|
-
return go(empty);
|
40194
40364
|
};
|
40195
40365
|
};
|
40196
40366
|
var eval_progCxt = (dictMonadWithGraphAlloc) => {
|
@@ -40200,18 +40370,21 @@ var eval_progCxt = (dictMonadWithGraphAlloc) => {
|
|
40200
40370
|
const $1 = Monad0.Applicative0();
|
40201
40371
|
const eval1 = $$eval(dictMonadWithGraphAlloc);
|
40202
40372
|
const concatM1 = concatM(Monad0);
|
40203
|
-
return (
|
40204
|
-
const
|
40205
|
-
|
40206
|
-
|
40207
|
-
$
|
40208
|
-
return $
|
40209
|
-
|
40210
|
-
|
40373
|
+
return (dictLoadFile) => {
|
40374
|
+
const eval_module2 = eval_module1(dictLoadFile);
|
40375
|
+
const eval2 = eval1(dictLoadFile);
|
40376
|
+
return (v) => concatM1(foldableList.foldr(Cons)(listMap((v1) => (\u03B3) => {
|
40377
|
+
const $2 = v1._1;
|
40378
|
+
return $0.bind(eval2(\u03B3)(v1._2)(setSet4.empty))((v2) => $1.pure(unionWith((v$1) => identity18)(\u03B3)((() => {
|
40379
|
+
const $3 = {};
|
40380
|
+
$3[$2] = v2;
|
40381
|
+
return $3;
|
40382
|
+
})())));
|
40383
|
+
})(reverse2(v.datasets)))(listMap((mod) => (\u03B3) => $0.bind(eval_module2(\u03B3)(mod)(setSet4.empty))((\u03B3$p) => $1.pure(unionWith((v$1) => identity18)(\u03B3)(\u03B3$p))))(reverse2(v.mods))))(v.primitives);
|
40384
|
+
};
|
40211
40385
|
};
|
40212
|
-
var graphEval = (
|
40213
|
-
const
|
40214
|
-
const Monad0 = MonadThrow0.Monad0();
|
40386
|
+
var graphEval = (dictMonadAff) => {
|
40387
|
+
const Monad0 = dictMonadAff.MonadEffect0().Monad0();
|
40215
40388
|
const bindStateT2 = bindStateT(Monad0);
|
40216
40389
|
const $0 = monadAllocAllocT(Monad0);
|
40217
40390
|
const fresh1 = $0.fresh;
|
@@ -40220,29 +40393,47 @@ var graphEval = (dictMonadError) => {
|
|
40220
40393
|
Applicative0: () => applicativeStateT(Monad0),
|
40221
40394
|
Bind1: () => bindStateT(Monad0)
|
40222
40395
|
})(graphGraphImpl);
|
40223
|
-
const
|
40224
|
-
const
|
40225
|
-
return (
|
40226
|
-
const
|
40227
|
-
|
40228
|
-
|
40229
|
-
|
40230
|
-
|
40231
|
-
|
40232
|
-
|
40233
|
-
|
40234
|
-
|
40235
|
-
|
40236
|
-
|
40237
|
-
|
40238
|
-
|
40239
|
-
|
40240
|
-
|
40241
|
-
|
40242
|
-
|
40243
|
-
"
|
40244
|
-
"
|
40245
|
-
|
40396
|
+
const $1 = monadAffState(dictMonadAff).MonadEffect0().Monad0();
|
40397
|
+
const $2 = dictMonadAff.MonadEffect0().Monad0();
|
40398
|
+
return (dictLoadFile) => (dictMonadError) => {
|
40399
|
+
const eval1 = $$eval(monadWithGraphAllocWithGr(dictMonadError))((() => {
|
40400
|
+
const loadFile1 = dictLoadFile.loadFile(dictMonadError)(dictMonadAff);
|
40401
|
+
return {
|
40402
|
+
loadFile: (dictMonadError1) => (dictMonadAff1) => (folders) => {
|
40403
|
+
const $3 = loadFile1(folders);
|
40404
|
+
return (x2) => {
|
40405
|
+
const $4 = $3(x2);
|
40406
|
+
return (s) => $1.Bind1().bind((s$1) => $2.Bind1().bind($4)((x$1) => $2.Applicative0().pure($Tuple(x$1, s$1))))((x$1) => $1.Applicative0().pure($Tuple(
|
40407
|
+
x$1,
|
40408
|
+
s
|
40409
|
+
)));
|
40410
|
+
};
|
40411
|
+
}
|
40412
|
+
};
|
40413
|
+
})());
|
40414
|
+
const check2 = check(monadThrowStateT(dictMonadError.MonadThrow0()));
|
40415
|
+
return (v) => (e) => {
|
40416
|
+
const $3 = v["\u03B3"];
|
40417
|
+
const $4 = spyFunWhen(false)("fwdSlice")((x2) => $Tuple(showVertices(x2._1), showEdgeList(toEdgeList(graphGraphImpl)(x2._2))))(showGraph(graphGraphImpl))(fwdSlice2);
|
40418
|
+
const $5 = spyFunWhen(false)("bwdSlice")((x2) => $Tuple(showVertices(x2._1), showEdgeList(toEdgeList(graphGraphImpl)(x2._2))))(showGraph(graphGraphImpl))(bwdSlice2);
|
40419
|
+
return Monad0.Bind1().bind(runAllocT(Monad0)(bindStateT2.bind(alloc(e))((e\u03B1) => bindStateT2.bind(runWithGraphT_spy2(eval1($3)(e\u03B1)(Leaf2))(verticesEnvExprVertex.vertices($EnvExpr(
|
40420
|
+
$3,
|
40421
|
+
e\u03B1
|
40422
|
+
))))((v1) => {
|
40423
|
+
const $6 = v1._1;
|
40424
|
+
const $7 = v1._2;
|
40425
|
+
return bindStateT2.bind(check2(difference2(ordDVertex$p)(verticesValVertex.vertices($7))(verticesGraphImpl.vertices($6)).tag === "Leaf")("outputs in graph"))(() => applicativeStateT(Monad0).pure($Tuple(
|
40426
|
+
$6,
|
40427
|
+
$Tuple($EnvExpr($3, e\u03B1), $7)
|
40428
|
+
)));
|
40429
|
+
})))(v.n))((v1) => Monad0.Applicative0().pure({
|
40430
|
+
g: v1._2._2._1,
|
40431
|
+
graph_fwd: (a) => (b) => $4($Tuple(a, b)),
|
40432
|
+
graph_bwd: (a) => (b) => $5($Tuple(a, b)),
|
40433
|
+
"in\u03B1": v1._2._2._2._1,
|
40434
|
+
"out\u03B1": v1._2._2._2._2
|
40435
|
+
}));
|
40436
|
+
};
|
40246
40437
|
};
|
40247
40438
|
};
|
40248
40439
|
|
@@ -43530,7 +43721,7 @@ var matrixUpdate = /* @__PURE__ */ $Tuple(
|
|
43530
43721
|
const $$new = dictMonadWithGraphAlloc.new(typeNameVal);
|
43531
43722
|
return (dictMonadError) => {
|
43532
43723
|
const $$throw2 = $$throw(dictMonadError.MonadThrow0());
|
43533
|
-
return (v) => {
|
43724
|
+
return (dictLoadFile) => (v) => {
|
43534
43725
|
if (v.tag === "Cons" && v._1._3.tag === "Matrix" && v._2.tag === "Cons" && v._2._1._3.tag === "Constr" && v._2._1._3._2.tag === "Cons" && v._2._1._3._2._1._3.tag === "Int" && v._2._1._3._2._2.tag === "Cons" && v._2._1._3._2._2._1._3.tag === "Int" && v._2._1._3._2._2._2.tag === "Nil" && v._2._2.tag === "Cons" && v._2._2._2.tag === "Nil" && v._2._1._3._1 === "Pair") {
|
43535
43726
|
const $0 = v._2._2._1;
|
43536
43727
|
return $$new((a) => Val(a)(None))($$$Map("Two", Leaf2, v._1._1, void 0, Leaf2))($BaseVal(
|
@@ -43550,7 +43741,7 @@ var matrixLookup = /* @__PURE__ */ $Tuple(
|
|
43550
43741
|
arity: 2,
|
43551
43742
|
op: (dictMonadWithGraphAlloc) => (dictMonadError) => {
|
43552
43743
|
const MonadThrow0 = dictMonadError.MonadThrow0();
|
43553
|
-
return (v) => {
|
43744
|
+
return (dictLoadFile) => (v) => {
|
43554
43745
|
if (v.tag === "Cons" && v._1._3.tag === "Matrix" && v._2.tag === "Cons" && v._2._1._3.tag === "Constr" && v._2._1._3._2.tag === "Cons" && v._2._1._3._2._1._3.tag === "Int" && v._2._1._3._2._2.tag === "Cons" && v._2._1._3._2._2._1._3.tag === "Int" && v._2._1._3._2._2._2.tag === "Nil" && v._2._2.tag === "Nil" && v._2._1._3._1 === "Pair") {
|
43555
43746
|
return MonadThrow0.Monad0().Applicative0().pure(matrixGet(v._2._1._3._2._1._3._1)(v._2._1._3._2._2._1._3._1)(v._1._3._1));
|
43556
43747
|
}
|
@@ -43583,7 +43774,7 @@ var error_ = /* @__PURE__ */ $Tuple(
|
|
43583
43774
|
arity: 1,
|
43584
43775
|
op: (dictMonadWithGraphAlloc) => (dictMonadError) => {
|
43585
43776
|
const MonadThrow0 = dictMonadError.MonadThrow0();
|
43586
|
-
return (v) => {
|
43777
|
+
return (dictLoadFile) => (v) => {
|
43587
43778
|
if (v.tag === "Cons" && v._1._3.tag === "Str" && v._2.tag === "Nil") {
|
43588
43779
|
return MonadThrow0.Monad0().Applicative0().pure(throwException(error(v._1._3._1))());
|
43589
43780
|
}
|
@@ -43602,7 +43793,7 @@ var dims = /* @__PURE__ */ $Tuple(
|
|
43602
43793
|
return (dictMonadError) => {
|
43603
43794
|
const MonadThrow0 = dictMonadError.MonadThrow0();
|
43604
43795
|
const $0 = MonadThrow0.Monad0().Bind1();
|
43605
|
-
return (v) => {
|
43796
|
+
return (dictLoadFile) => (v) => {
|
43606
43797
|
if (v.tag === "Cons" && v._1._3.tag === "Matrix" && v._2.tag === "Nil") {
|
43607
43798
|
const $1 = v._1._3._1._2._2._1;
|
43608
43799
|
const $2 = v._1._1;
|
@@ -43637,19 +43828,22 @@ var dict_map = /* @__PURE__ */ $Tuple(
|
|
43637
43828
|
const Monad0 = MonadThrow0.Monad0();
|
43638
43829
|
const Bind1 = Monad0.Bind1();
|
43639
43830
|
const traverse1 = traversableDict.traverse(Monad0.Applicative0());
|
43640
|
-
return (
|
43641
|
-
|
43642
|
-
|
43643
|
-
|
43644
|
-
|
43645
|
-
const $
|
43646
|
-
return Bind1.
|
43647
|
-
|
43648
|
-
|
43649
|
-
d$p
|
43650
|
-
|
43651
|
-
|
43652
|
-
|
43831
|
+
return (dictLoadFile) => {
|
43832
|
+
const apply1 = apply3(dictLoadFile);
|
43833
|
+
return (v) => {
|
43834
|
+
if (v.tag === "Cons" && v._2.tag === "Cons" && v._2._1._3.tag === "Dictionary" && v._2._2.tag === "Nil") {
|
43835
|
+
const $0 = v._1;
|
43836
|
+
const $1 = v._2._1._1;
|
43837
|
+
return Bind1.bind(traverse1((v2) => {
|
43838
|
+
const $2 = v2._1;
|
43839
|
+
return Bind1.Apply0().Functor0().map((v3) => $Tuple($2, v3))(apply1($0)(v2._2));
|
43840
|
+
})(v._2._1._3._1))((d$p) => $$new((a) => Val(a)(None))($$$Map("Two", Leaf2, $1, void 0, Leaf2))($BaseVal(
|
43841
|
+
"Dictionary",
|
43842
|
+
d$p
|
43843
|
+
)));
|
43844
|
+
}
|
43845
|
+
return MonadThrow0.throwError(error("Function and dictionary expected"));
|
43846
|
+
};
|
43653
43847
|
};
|
43654
43848
|
};
|
43655
43849
|
}
|
@@ -43668,31 +43862,34 @@ var dict_intersectionWith = /* @__PURE__ */ $Tuple(
|
|
43668
43862
|
const Bind1 = Monad0.Bind1();
|
43669
43863
|
const Applicative0 = Monad0.Applicative0();
|
43670
43864
|
const $0 = Bind1.Apply0().Functor0();
|
43671
|
-
return (
|
43672
|
-
|
43673
|
-
|
43674
|
-
|
43675
|
-
|
43676
|
-
|
43677
|
-
const $
|
43678
|
-
|
43679
|
-
|
43680
|
-
|
43865
|
+
return (dictLoadFile) => {
|
43866
|
+
const apply1 = apply3(dictLoadFile);
|
43867
|
+
return (v) => {
|
43868
|
+
if (v.tag === "Cons" && v._2.tag === "Cons" && v._2._1._3.tag === "Dictionary" && v._2._2.tag === "Cons" && v._2._2._1._3.tag === "Dictionary" && v._2._2._2.tag === "Nil") {
|
43869
|
+
const $1 = v._1;
|
43870
|
+
const $2 = v._2._1._1;
|
43871
|
+
const $3 = v._2._2._1._1;
|
43872
|
+
return Bind1.bind($0.map(Dictionary3)($0.map(DictRep)(traversableDict.traverse(Applicative0)(identity19)(intersectionWith_Object((v2) => (v3) => {
|
43873
|
+
const $4 = v3._2;
|
43874
|
+
const $5 = v2._1;
|
43875
|
+
const $6 = v3._1;
|
43876
|
+
return Bind1.bind(Bind1.bind(apply1($1)(v2._2))((a) => apply1(a)($4)))((v4) => Bind1.bind($$new((a) => Val(a)(None))(insert3(ordVertex)($6)()($$$Map(
|
43877
|
+
"Two",
|
43878
|
+
Leaf2,
|
43879
|
+
$5,
|
43880
|
+
void 0,
|
43881
|
+
Leaf2
|
43882
|
+
)))(v4._3))((v5) => Applicative0.pure($Tuple(v5._1, v4))));
|
43883
|
+
})(v._2._1._3._1)(v._2._2._1._3._1)))))((v$p) => $$new((a) => Val(a)(None))(insert3(ordVertex)($3)()($$$Map(
|
43681
43884
|
"Two",
|
43682
43885
|
Leaf2,
|
43683
|
-
$
|
43886
|
+
$2,
|
43684
43887
|
void 0,
|
43685
43888
|
Leaf2
|
43686
|
-
)))(
|
43687
|
-
}
|
43688
|
-
|
43689
|
-
|
43690
|
-
$2,
|
43691
|
-
void 0,
|
43692
|
-
Leaf2
|
43693
|
-
)))(v$p));
|
43694
|
-
}
|
43695
|
-
return MonadThrow0.throwError(error("Function and two dictionaries expected"));
|
43889
|
+
)))(v$p));
|
43890
|
+
}
|
43891
|
+
return MonadThrow0.throwError(error("Function and two dictionaries expected"));
|
43892
|
+
};
|
43696
43893
|
};
|
43697
43894
|
};
|
43698
43895
|
}
|
@@ -43704,7 +43901,7 @@ var dict_get = /* @__PURE__ */ $Tuple(
|
|
43704
43901
|
arity: 2,
|
43705
43902
|
op: (dictMonadWithGraphAlloc) => (dictMonadError) => {
|
43706
43903
|
const MonadThrow0 = dictMonadError.MonadThrow0();
|
43707
|
-
return (v) => {
|
43904
|
+
return (dictLoadFile) => (v) => {
|
43708
43905
|
if (v.tag === "Cons" && v._1._3.tag === "Str" && v._2.tag === "Cons" && v._2._1._3.tag === "Dictionary" && v._2._2.tag === "Nil") {
|
43709
43906
|
return orElse(MonadThrow0)('Key "' + v._1._3._1 + '" not found')((() => {
|
43710
43907
|
const $0 = _lookup(Nothing, Just, v._1._3._1, v._2._1._3._1);
|
@@ -43728,15 +43925,18 @@ var dict_foldl = /* @__PURE__ */ $Tuple(
|
|
43728
43925
|
return (dictMonadError) => {
|
43729
43926
|
const MonadThrow0 = dictMonadError.MonadThrow0();
|
43730
43927
|
const Monad0 = MonadThrow0.Monad0();
|
43731
|
-
return (
|
43732
|
-
|
43733
|
-
|
43734
|
-
|
43735
|
-
const $
|
43736
|
-
return Monad0
|
43737
|
-
|
43738
|
-
|
43739
|
-
|
43928
|
+
return (dictLoadFile) => {
|
43929
|
+
const apply1 = apply3(dictLoadFile);
|
43930
|
+
return (v) => {
|
43931
|
+
if (v.tag === "Cons" && v._2.tag === "Cons" && v._2._2.tag === "Cons" && v._2._2._1._3.tag === "Dictionary" && v._2._2._2.tag === "Nil") {
|
43932
|
+
const $0 = v._1;
|
43933
|
+
return foldM4(Monad0)((u1) => (v2) => {
|
43934
|
+
const $1 = v2._2;
|
43935
|
+
return Monad0.Bind1().bind(apply1($0)(u1))((a) => apply1(a)($1));
|
43936
|
+
})(v._2._1)(v._2._2._1._3._1);
|
43937
|
+
}
|
43938
|
+
return MonadThrow0.throwError(error("Function, value and dictionary expected"));
|
43939
|
+
};
|
43740
43940
|
};
|
43741
43941
|
};
|
43742
43942
|
}
|
@@ -43750,7 +43950,7 @@ var dict_disjointUnion = /* @__PURE__ */ $Tuple(
|
|
43750
43950
|
const $$new = dictMonadWithGraphAlloc.new(typeNameVal);
|
43751
43951
|
return (dictMonadError) => {
|
43752
43952
|
const $$throw2 = $$throw(dictMonadError.MonadThrow0());
|
43753
|
-
return (v) => {
|
43953
|
+
return (dictLoadFile) => (v) => {
|
43754
43954
|
if (v.tag === "Cons" && v._1._3.tag === "Dictionary" && v._2.tag === "Cons" && v._2._1._3.tag === "Dictionary" && v._2._2.tag === "Nil") {
|
43755
43955
|
return $$new((a) => Val(a)(None))(insert3(ordVertex)(v._2._1._1)()($$$Map(
|
43756
43956
|
"Two",
|
@@ -43774,7 +43974,7 @@ var dict_difference = /* @__PURE__ */ $Tuple(
|
|
43774
43974
|
const $$new = dictMonadWithGraphAlloc.new(typeNameVal);
|
43775
43975
|
return (dictMonadError) => {
|
43776
43976
|
const $$throw2 = $$throw(dictMonadError.MonadThrow0());
|
43777
|
-
return (v) => {
|
43977
|
+
return (dictLoadFile) => (v) => {
|
43778
43978
|
if (v.tag === "Cons" && v._1._3.tag === "Dictionary" && v._2.tag === "Cons" && v._2._1._3.tag === "Dictionary" && v._2._2.tag === "Nil") {
|
43779
43979
|
return $$new((a) => Val(a)(None))(insert3(ordVertex)(v._2._1._1)()($$$Map(
|
43780
43980
|
"Two",
|
@@ -43796,7 +43996,7 @@ var debugLog = /* @__PURE__ */ $Tuple(
|
|
43796
43996
|
arity: 1,
|
43797
43997
|
op: (dictMonadWithGraphAlloc) => (dictMonadError) => {
|
43798
43998
|
const MonadThrow0 = dictMonadError.MonadThrow0();
|
43799
|
-
return (v) => {
|
43999
|
+
return (dictLoadFile) => (v) => {
|
43800
44000
|
if (v.tag === "Cons" && v._2.tag === "Nil") {
|
43801
44001
|
const $0 = v._1;
|
43802
44002
|
return MonadThrow0.Monad0().Applicative0().pure(_trace($0, (v$1) => $0));
|
@@ -43892,6 +44092,7 @@ var verticesProgCxtVertex = {
|
|
43892
44092
|
};
|
43893
44093
|
var functorProgCxt = {
|
43894
44094
|
map: (f) => (m) => ({
|
44095
|
+
fluidSrcPaths: m.fluidSrcPaths,
|
43895
44096
|
primitives: _fmapObject(m.primitives, functorVal.map(f)),
|
43896
44097
|
mods: listMap(functorModule.map(f))(m.mods),
|
43897
44098
|
datasets: listMap((m$1) => $Tuple(m$1._1, functorExpr.map(f)(m$1._2)))(m.datasets)
|
@@ -43961,7 +44162,7 @@ var traversableProgCxt = {
|
|
43961
44162
|
const traverse7 = traversableExpr.traverse(dictApplicative);
|
43962
44163
|
const traverse8 = traversableModule.traverse(dictApplicative);
|
43963
44164
|
const traverse9 = traversableEnv.traverse(dictApplicative);
|
43964
|
-
return (f) => (m) => Apply0.apply(Apply0.apply(Apply0.Functor0().map((v1) => (v2) => (v3) => ({ primitives: v3, mods: v2, datasets: v1 }))(traverse5(traversableTuple.traverse(dictApplicative)(traverse7(f)))(m.datasets)))(traverse5(traverse8(f))(m.mods)))(traverse9(f)(m.primitives));
|
44165
|
+
return (f) => (m) => Apply0.apply(Apply0.apply(Apply0.Functor0().map((v1) => (v2) => (v3) => ({ fluidSrcPaths: m.fluidSrcPaths, primitives: v3, mods: v2, datasets: v1 }))(traverse5(traversableTuple.traverse(dictApplicative)(traverse7(f)))(m.datasets)))(traverse5(traverse8(f))(m.mods)))(traverse9(f)(m.primitives));
|
43965
44166
|
},
|
43966
44167
|
sequence: (dictApplicative) => (v) => traversableProgCxt.traverse(dictApplicative)(identity32)(v),
|
43967
44168
|
Functor0: () => functorProgCxt,
|
@@ -43974,7 +44175,6 @@ var concatM2 = (dictMonad) => foldrArray((() => {
|
|
43974
44175
|
const $0 = dictMonad.Bind1();
|
43975
44176
|
return (f) => (g) => (a) => $0.bind(f(a))(g);
|
43976
44177
|
})())(dictMonad.Applicative0().pure);
|
43977
|
-
var Folder = (x2) => x2;
|
43978
44178
|
var parse = (dictMonadError) => {
|
43979
44179
|
const $0 = dictMonadError.MonadThrow0();
|
43980
44180
|
const $1 = $0.Monad0().Applicative0().pure;
|
@@ -43992,7 +44192,7 @@ var parse = (dictMonadError) => {
|
|
43992
44192
|
};
|
43993
44193
|
};
|
43994
44194
|
};
|
43995
|
-
var parseProgram = (
|
44195
|
+
var parseProgram = (dictLoadFile) => (folders) => (file) => (dictMonadAff) => (dictMonadError) => dictMonadAff.MonadEffect0().Monad0().Bind1().bind(dictLoadFile.loadFile(dictMonadError)(dictMonadAff)(folders)(file))((() => {
|
43996
44196
|
const $0 = parse(dictMonadError);
|
43997
44197
|
return (a) => $0(a)(topLevel(expr_));
|
43998
44198
|
})());
|
@@ -44003,18 +44203,22 @@ var module_2 = (dictMonadAff) => {
|
|
44003
44203
|
return (dictMonadError) => {
|
44004
44204
|
const parse1 = parse(dictMonadError);
|
44005
44205
|
const desugarModuleFwd = moduleFwd(dictMonadError)(boundedLattice2);
|
44006
|
-
return (
|
44007
|
-
const
|
44008
|
-
return
|
44009
|
-
|
44010
|
-
|
44011
|
-
|
44012
|
-
|
44206
|
+
return (dictLoadFile) => {
|
44207
|
+
const loadFile = dictLoadFile.loadFile(dictMonadError)(dictMonadAff);
|
44208
|
+
return (folders) => (file) => (v) => {
|
44209
|
+
const $0 = v.mods;
|
44210
|
+
return Bind1.bind(Applicative0.pure())(() => Bind1.bind(loadFile(folders)(file))((src) => Bind1.bind(Bind1.bind(parse1(src)(module_))(desugarModuleFwd))((mod) => Applicative0.pure({
|
44211
|
+
fluidSrcPaths: v.fluidSrcPaths,
|
44212
|
+
primitives: v.primitives,
|
44213
|
+
mods: $List("Cons", mod, $0),
|
44214
|
+
datasets: v.datasets
|
44215
|
+
}))));
|
44216
|
+
};
|
44013
44217
|
};
|
44014
44218
|
};
|
44015
44219
|
};
|
44016
|
-
var initialConfig = (
|
44017
|
-
const Monad0 =
|
44220
|
+
var initialConfig = (dictMonadAff) => {
|
44221
|
+
const Monad0 = dictMonadAff.MonadEffect0().Monad0();
|
44018
44222
|
const Bind1 = Monad0.Bind1();
|
44019
44223
|
const Applicative0 = Monad0.Applicative0();
|
44020
44224
|
const $0 = monadAllocAllocT(Monad0);
|
@@ -44025,29 +44229,54 @@ var initialConfig = (dictMonadError) => {
|
|
44025
44229
|
Applicative0: () => applicativeStateT(Monad0),
|
44026
44230
|
Bind1: () => bindStateT(Monad0)
|
44027
44231
|
})(graphGraphImpl);
|
44028
|
-
const
|
44029
|
-
|
44030
|
-
|
44031
|
-
(()
|
44032
|
-
|
44033
|
-
|
44034
|
-
const
|
44035
|
-
return
|
44036
|
-
|
44037
|
-
|
44038
|
-
|
44232
|
+
const $2 = monadAffState(dictMonadAff).MonadEffect0().Monad0();
|
44233
|
+
const $3 = dictMonadAff.MonadEffect0().Monad0();
|
44234
|
+
return (dictMonadError) => {
|
44235
|
+
const eval_progCxt2 = eval_progCxt(monadWithGraphAllocWithGr(dictMonadError));
|
44236
|
+
return (dictLoadFile) => {
|
44237
|
+
const eval_progCxt1 = eval_progCxt2((() => {
|
44238
|
+
const loadFile1 = dictLoadFile.loadFile(dictMonadError)(dictMonadAff);
|
44239
|
+
return {
|
44240
|
+
loadFile: (dictMonadError1) => (dictMonadAff1) => (folders) => {
|
44241
|
+
const $4 = loadFile1(folders);
|
44242
|
+
return (x2) => {
|
44243
|
+
const $5 = $4(x2);
|
44244
|
+
return (s) => $2.Bind1().bind((s$1) => $3.Bind1().bind($5)((x$1) => $3.Applicative0().pure($Tuple(x$1, s$1))))((x$1) => $2.Applicative0().pure($Tuple(
|
44245
|
+
x$1,
|
44246
|
+
s
|
44247
|
+
)));
|
44248
|
+
};
|
44249
|
+
}
|
44250
|
+
};
|
44251
|
+
})());
|
44252
|
+
return (dictFV) => (e) => (progCxt) => Bind1.bind(Applicative0.pure())(() => Bind1.bind(runAllocT(Monad0)($1.bind(alloc(progCxt))((progCxt$p) => $1.bind(runWithGraphT_spy2(eval_progCxt1(progCxt$p))(verticesProgCxtVertex.vertices(progCxt$p)))((v) => applicativeStateT(Monad0).pure($Tuple(
|
44253
|
+
progCxt$p,
|
44254
|
+
(() => {
|
44255
|
+
const $4 = dictFV.fv(e);
|
44256
|
+
return filterWithKey((x2) => {
|
44257
|
+
const $5 = setSet(ordString).member(x2)($4);
|
44258
|
+
return (v$1) => $5;
|
44259
|
+
})(v._2);
|
44260
|
+
})()
|
44261
|
+
)))))(0))((v) => Applicative0.pure({ n: v._1, progCxt: v._2._2._1, "\u03B3": v._2._2._2 })));
|
44262
|
+
};
|
44263
|
+
};
|
44039
44264
|
};
|
44040
44265
|
var prepConfig = (dictMonadAff) => {
|
44041
44266
|
const Monad0 = dictMonadAff.MonadEffect0().Monad0();
|
44042
44267
|
const $0 = Monad0.Bind1();
|
44268
|
+
const initialConfig1 = initialConfig(dictMonadAff);
|
44043
44269
|
return (dictMonadError) => {
|
44044
44270
|
const desug1 = exprFwd(boundedLattice2)(dictMonadError)(joinSemilatticeUnit);
|
44045
|
-
const
|
44046
|
-
return (
|
44047
|
-
|
44048
|
-
e
|
44049
|
-
|
44050
|
-
|
44271
|
+
const initialConfig2 = initialConfig1(dictMonadError);
|
44272
|
+
return (dictLoadFile) => {
|
44273
|
+
const initialConfig3 = initialConfig2(dictLoadFile)(fVExpr);
|
44274
|
+
return (v) => (file) => (progCxt) => $0.bind(parseProgram(dictLoadFile)(v.fluidSrcPaths)(file)(dictMonadAff)(dictMonadError))((s) => $0.bind(desug1(s))((e) => $0.bind(initialConfig3(e)(progCxt))((gconfig) => Monad0.Applicative0().pure({
|
44275
|
+
s,
|
44276
|
+
e,
|
44277
|
+
gconfig
|
44278
|
+
}))));
|
44279
|
+
};
|
44051
44280
|
};
|
44052
44281
|
};
|
44053
44282
|
var datasetAs = (dictMonadAff) => {
|
@@ -44055,10 +44284,11 @@ var datasetAs = (dictMonadAff) => {
|
|
44055
44284
|
const $0 = Monad0.Bind1();
|
44056
44285
|
return (dictMonadError) => {
|
44057
44286
|
const desug1 = exprFwd(boundedLattice2)(dictMonadError)(joinSemilatticeUnit);
|
44058
|
-
return (
|
44287
|
+
return (dictLoadFile) => (folders) => (v) => (v1) => {
|
44059
44288
|
const $1 = v1.datasets;
|
44060
44289
|
const $2 = v._1;
|
44061
|
-
return $0.bind($0.bind(parseProgram(
|
44290
|
+
return $0.bind($0.bind(parseProgram(dictLoadFile)(folders)(v._2)(dictMonadAff)(dictMonadError))(desug1))((e\u03B1) => Monad0.Applicative0().pure({
|
44291
|
+
fluidSrcPaths: v1.fluidSrcPaths,
|
44062
44292
|
primitives: v1.primitives,
|
44063
44293
|
mods: v1.mods,
|
44064
44294
|
datasets: $List("Cons", $Tuple($2, e\u03B1), $1)
|
@@ -44075,84 +44305,19 @@ var loadProgCxt = (dictMonadAff) => {
|
|
44075
44305
|
return (dictMonadError) => {
|
44076
44306
|
const module_22 = module_1(dictMonadError);
|
44077
44307
|
const datasetAs2 = datasetAs1(dictMonadError);
|
44078
|
-
return (
|
44079
|
-
|
44080
|
-
|
44081
|
-
datasets
|
44082
|
-
|
44083
|
-
|
44084
|
-
|
44085
|
-
|
44086
|
-
|
44087
|
-
|
44088
|
-
|
44089
|
-
|
44090
|
-
|
44091
|
-
var loadFile = (folders) => (v) => (dictMonadAff) => {
|
44092
|
-
const Monad0 = dictMonadAff.MonadEffect0().Monad0();
|
44093
|
-
const bindExceptT2 = bindExceptT(Monad0);
|
44094
|
-
const applicativeExceptT2 = applicativeExceptT(Monad0);
|
44095
|
-
const pure22 = Monad0.Applicative0().pure;
|
44096
|
-
return (dictMonadError) => Monad0.Bind1().bind(bindExceptT2.bind(dictMonadAff.liftAff(findM(arrayMap((() => {
|
44097
|
-
const $0 = v + ".fld";
|
44098
|
-
return (a) => a + "/" + $0;
|
44099
|
-
})())(folders))((v1) => _bind(request(driver)({
|
44100
|
-
method: $Either("Left", HEAD),
|
44101
|
-
url: v1,
|
44102
|
-
headers: [],
|
44103
|
-
content: Nothing,
|
44104
|
-
username: Nothing,
|
44105
|
-
password: Nothing,
|
44106
|
-
withCredentials: false,
|
44107
|
-
responseFormat: $ResponseFormat("String", identity),
|
44108
|
-
timeout: Nothing
|
44109
|
-
}))((resp) => _pure((() => {
|
44110
|
-
if (resp.tag === "Right") {
|
44111
|
-
if (resp._1.status === 200) {
|
44112
|
-
return $Either("Right", $Tuple(resp._1, v1));
|
44113
|
-
}
|
44114
|
-
return $Either("Left", RequestFailedError);
|
44115
|
-
}
|
44116
|
-
if (resp.tag === "Left") {
|
44117
|
-
return $Either("Left", resp._1);
|
44118
|
-
}
|
44119
|
-
fail();
|
44120
|
-
})())))($Either("Left", RequestFailedError))))((v1) => {
|
44121
|
-
const $0 = v1._2;
|
44122
|
-
return bindExceptT2.bind(applicativeExceptT2.pure())(() => bindExceptT2.bind(dictMonadAff.liftAff(request(driver)({
|
44123
|
-
method: $Either("Left", GET),
|
44124
|
-
url: $0,
|
44125
|
-
headers: [],
|
44126
|
-
content: Nothing,
|
44127
|
-
username: Nothing,
|
44128
|
-
password: Nothing,
|
44129
|
-
withCredentials: false,
|
44130
|
-
responseFormat: $ResponseFormat("String", identity),
|
44131
|
-
timeout: Nothing
|
44132
|
-
})))((contents) => applicativeExceptT2.pure(contents.body)));
|
44133
|
-
}))((result) => {
|
44134
|
-
if (result.tag === "Left") {
|
44135
|
-
return dictMonadError.MonadThrow0().throwError(error(printError(result._1)));
|
44136
|
-
}
|
44137
|
-
if (result.tag === "Right") {
|
44138
|
-
return pure22(result._1);
|
44139
|
-
}
|
44140
|
-
fail();
|
44141
|
-
});
|
44142
|
-
};
|
44143
|
-
var loadFile$p = (folders) => (file) => (dictMonadAff) => (dictMonadError) => dictMonadAff.MonadEffect0().Monad0().Bind1().Apply0().Functor0().map((v) => $Tuple(file, v))(loadFile(folders)(file)(dictMonadAff)(dictMonadError));
|
44144
|
-
var loadProgCxt2 = (dictMonadAff) => {
|
44145
|
-
const loadProgCxt1 = loadProgCxt(dictMonadAff);
|
44146
|
-
return (dictMonadError) => {
|
44147
|
-
const loadProgCxt22 = loadProgCxt1(dictMonadError);
|
44148
|
-
return (fluidSrcPaths) => loadProgCxt22({ loadFile, fluidSrcPaths });
|
44149
|
-
};
|
44150
|
-
};
|
44151
|
-
var prepConfig2 = (dictMonadAff) => {
|
44152
|
-
const prepConfig1 = prepConfig(dictMonadAff);
|
44153
|
-
return (dictMonadError) => {
|
44154
|
-
const prepConfig22 = prepConfig1(dictMonadError);
|
44155
|
-
return (fluidSrcPaths) => prepConfig22({ loadFile, fluidSrcPaths });
|
44308
|
+
return (dictLoadFile) => {
|
44309
|
+
const module_3 = module_22(dictLoadFile);
|
44310
|
+
const datasetAs3 = datasetAs2(dictLoadFile);
|
44311
|
+
return (v) => (mods) => (datasets) => $0.bind($0.bind(Monad0.Applicative0().pure({
|
44312
|
+
fluidSrcPaths: v.fluidSrcPaths,
|
44313
|
+
primitives,
|
44314
|
+
mods: Nil,
|
44315
|
+
datasets: Nil
|
44316
|
+
}))(concatM1(arrayMap(module_3(v.fluidSrcPaths))(["lib/prelude", ...mods]))))(concatM1(arrayMap((() => {
|
44317
|
+
const $1 = datasetAs3(v.fluidSrcPaths);
|
44318
|
+
return (x2) => $1($Tuple(x2._1, x2._2));
|
44319
|
+
})())(datasets)));
|
44320
|
+
};
|
44156
44321
|
};
|
44157
44322
|
};
|
44158
44323
|
|
@@ -44172,8 +44337,6 @@ var select\u03B1s\u{1D539}Vertex2 = /* @__PURE__ */ select\u03B1s\u{1D539}Vertex
|
|
44172
44337
|
var bwdSlice3 = /* @__PURE__ */ bwdSlice(graphGraphImpl);
|
44173
44338
|
var intersection3 = /* @__PURE__ */ intersection(ordDVertex$p);
|
44174
44339
|
var member5 = /* @__PURE__ */ (() => setSet(ordVertex).member)();
|
44175
|
-
var show4 = /* @__PURE__ */ showArrayImpl(showStringImpl);
|
44176
|
-
var fromFoldable42 = /* @__PURE__ */ (() => fromFoldableImpl(foldableSet.foldr))();
|
44177
44340
|
var runQuery2 = /* @__PURE__ */ runQuery(ordVal2);
|
44178
44341
|
var primaryOrSecondary2 = /* @__PURE__ */ primaryOrSecondary(applyEnv);
|
44179
44342
|
var primaryOrSecondary1 = /* @__PURE__ */ primaryOrSecondary(applyVal);
|
@@ -44495,116 +44658,127 @@ var lift = (dictApply) => (dictApply1) => {
|
|
44495
44658
|
return $Tuple(dictApply.apply(selState_f)($1._1), $1._2);
|
44496
44659
|
};
|
44497
44660
|
};
|
44498
|
-
var lift1 = /* @__PURE__ */ lift(
|
44499
|
-
var lift2 = /* @__PURE__ */ lift(
|
44500
|
-
var loadFig = (
|
44661
|
+
var lift1 = /* @__PURE__ */ lift(applyEnv)(applyVal);
|
44662
|
+
var lift2 = /* @__PURE__ */ lift(applyVal)(applyEnv);
|
44663
|
+
var loadFig = (dictMonadAff) => {
|
44501
44664
|
const Monad0 = dictMonadAff.MonadEffect0().Monad0();
|
44502
44665
|
const $0 = Monad0.Bind1();
|
44503
|
-
const
|
44504
|
-
const
|
44666
|
+
const loadProgCxt2 = loadProgCxt(dictMonadAff);
|
44667
|
+
const prepConfig2 = prepConfig(dictMonadAff);
|
44668
|
+
const graphEval2 = graphEval(dictMonadAff);
|
44505
44669
|
return (dictMonadError) => {
|
44506
|
-
const
|
44507
|
-
const
|
44508
|
-
|
44509
|
-
|
44510
|
-
|
44511
|
-
|
44512
|
-
|
44513
|
-
|
44514
|
-
const $
|
44515
|
-
const $
|
44516
|
-
const $
|
44517
|
-
|
44518
|
-
|
44519
|
-
|
44520
|
-
|
44521
|
-
|
44522
|
-
|
44523
|
-
|
44524
|
-
|
44525
|
-
|
44526
|
-
|
44527
|
-
|
44528
|
-
|
44529
|
-
|
44530
|
-
|
44531
|
-
|
44532
|
-
|
44533
|
-
|
44534
|
-
|
44535
|
-
|
44536
|
-
|
44537
|
-
|
44538
|
-
|
44539
|
-
|
44540
|
-
|
44541
|
-
|
44542
|
-
|
44543
|
-
|
44544
|
-
|
44545
|
-
|
44546
|
-
|
44547
|
-
|
44548
|
-
|
44549
|
-
|
44550
|
-
|
44551
|
-
|
44552
|
-
|
44553
|
-
|
44554
|
-
|
44555
|
-
|
44556
|
-
|
44557
|
-
|
44558
|
-
|
44559
|
-
|
44560
|
-
|
44561
|
-
|
44562
|
-
|
44563
|
-
|
44564
|
-
|
44565
|
-
|
44566
|
-
|
44567
|
-
|
44568
|
-
|
44569
|
-
|
44570
|
-
|
44571
|
-
|
44572
|
-
const $
|
44573
|
-
|
44574
|
-
|
44575
|
-
|
44576
|
-
|
44577
|
-
|
44578
|
-
|
44579
|
-
|
44580
|
-
|
44581
|
-
|
44582
|
-
|
44583
|
-
|
44584
|
-
|
44585
|
-
|
44586
|
-
|
44587
|
-
|
44588
|
-
|
44589
|
-
|
44590
|
-
|
44591
|
-
|
44592
|
-
|
44593
|
-
|
44594
|
-
|
44595
|
-
|
44596
|
-
|
44597
|
-
|
44598
|
-
|
44599
|
-
|
44600
|
-
|
44601
|
-
|
44602
|
-
|
44603
|
-
|
44604
|
-
|
44605
|
-
|
44606
|
-
|
44607
|
-
|
44670
|
+
const loadProgCxt1 = loadProgCxt2(dictMonadError);
|
44671
|
+
const prepConfig1 = prepConfig2(dictMonadError);
|
44672
|
+
return (dictLoadFile) => {
|
44673
|
+
const loadProgCxt22 = loadProgCxt1(dictLoadFile);
|
44674
|
+
const prepConfig22 = prepConfig1(dictLoadFile);
|
44675
|
+
const graphEval1 = graphEval2(dictLoadFile)(dictMonadError);
|
44676
|
+
return (v) => {
|
44677
|
+
const $1 = v.file;
|
44678
|
+
const $2 = v.fluidSrcPaths;
|
44679
|
+
const $3 = v.inputs;
|
44680
|
+
const $4 = v.linking;
|
44681
|
+
return $0.bind(loadProgCxt22({ fluidSrcPaths: $2 })(v.imports)(v.datasets))((progCxt) => $0.bind(prepConfig22({ fluidSrcPaths: $2 })($1)(progCxt))((v1) => {
|
44682
|
+
const $5 = v1.s;
|
44683
|
+
return $0.bind(graphEval1(v1.gconfig)(v1.e))((v2) => {
|
44684
|
+
const $6 = v2.g;
|
44685
|
+
const $7 = v2["out\u03B1"];
|
44686
|
+
const $8 = v2["in\u03B1"]._1;
|
44687
|
+
const opEval = {
|
44688
|
+
g: $GraphImpl({ out: v2.g._1.in_, in_: v2.g._1.out, sinks: v2.g._1.sources, sources: v2.g._1.sinks, vertices: v2.g._1.vertices }),
|
44689
|
+
graph_fwd: v2.graph_fwd,
|
44690
|
+
graph_bwd: v2.graph_bwd,
|
44691
|
+
"in\u03B1": v2["out\u03B1"],
|
44692
|
+
"out\u03B1": v2["in\u03B1"]
|
44693
|
+
};
|
44694
|
+
const inputs$p = fromFoldable25($3);
|
44695
|
+
const v3 = functorEnvExpr.map((v$1) => {
|
44696
|
+
})(v2["in\u03B1"]);
|
44697
|
+
const $9 = unrestrictGC(boundedMeetSemilatticeBoo)(v3._1)(inputs$p);
|
44698
|
+
const $10 = unprojExpr(boundedMeetSemilatticeBoo)($EnvExpr(v3._1, v3._2));
|
44699
|
+
const $11 = filterWithKey((x2) => {
|
44700
|
+
const $112 = setSet(ordString).member(x2)(inputs$p);
|
44701
|
+
return (v$1) => $112;
|
44702
|
+
})($8);
|
44703
|
+
const $12 = _fmapObject($8, functorVal.map((v$1) => false));
|
44704
|
+
const $13 = functorVal.map((v$1) => false)($7);
|
44705
|
+
const graphgc_op = graphGC1(opEval);
|
44706
|
+
const graphgc = graphGC22(v2);
|
44707
|
+
const inertFwd = verticesGraphImpl.vertices(graphgc.fwd($10.fwd($9.fwd($12)))._2);
|
44708
|
+
const inertBwd = setSet5.difference(verticesGraphImpl.vertices($6))(verticesGraphImpl.vertices(graphgc.bwd(functorVal.map((v$1) => true)($7))._2));
|
44709
|
+
const $14 = select\u03B1s\u{1D539}Vertex2["select\u{1D539}s"]($8)(inertBwd);
|
44710
|
+
const $15 = select\u{1D539}s($7)(inertFwd);
|
44711
|
+
const $16 = _fmapObject($14, functorVal.map(selState));
|
44712
|
+
const $17 = functorVal.map(selState)($15);
|
44713
|
+
const demands = lift1($16)((v6) => {
|
44714
|
+
const $18 = graphgc.bwd(v6);
|
44715
|
+
return $Tuple($9.bwd($10.bwd($18._1)), $18._2);
|
44716
|
+
});
|
44717
|
+
const demandedBy = lift2($17)((\u03B31) => graphgc_op.bwd(deMorgan((x2) => $10.fwd($9.fwd(x2)))(\u03B31)));
|
44718
|
+
return Monad0.Applicative0().pure({
|
44719
|
+
spec: v,
|
44720
|
+
s: $5,
|
44721
|
+
"\u03B3": intersectionWith_Object(apply)(_fmapObject(
|
44722
|
+
intersectionWith_Object(apply)(_fmapObject(
|
44723
|
+
_fmapObject($14, functorVal.map(selStates)),
|
44724
|
+
applyVal.apply
|
44725
|
+
))($12),
|
44726
|
+
applyVal.apply
|
44727
|
+
))($12),
|
44728
|
+
v: applyVal.apply(applyVal.apply(functorVal.map(selStates)($15))($13))($13),
|
44729
|
+
"\u03B9": empty,
|
44730
|
+
linkedOutputs: (selType) => (v6) => {
|
44731
|
+
const v$p = functorVal.map(getSel(selType))(v6);
|
44732
|
+
const v7 = demands(v$p);
|
44733
|
+
return $Tuple(v7._1, $Tuple($4 ? demandedBy(v7._1)._1 : v$p, verticesGraphImpl.vertices(v7._2)));
|
44734
|
+
},
|
44735
|
+
linkedInputs: (selType) => (\u03B31) => {
|
44736
|
+
const \u03B3$p = _fmapObject(\u03B31, functorVal.map(getSel(selType)));
|
44737
|
+
const v6 = demandedBy(\u03B3$p);
|
44738
|
+
return $Tuple($4 ? demands(v6._1)._1 : \u03B3$p, $Tuple(v6._1, verticesGraphImpl.vertices(v6._2)));
|
44739
|
+
},
|
44740
|
+
linkIntermediates: (\u03B9) => {
|
44741
|
+
const \u03B1s = select\u03B1s\u{1D539}Vertex2["select\u03B1s"](_fmapObject(
|
44742
|
+
\u03B9,
|
44743
|
+
functorVal.map((x2) => {
|
44744
|
+
const $18 = getSel(Transient)(x2);
|
44745
|
+
if ($18.tag === "Inert") {
|
44746
|
+
return false;
|
44747
|
+
}
|
44748
|
+
if ($18.tag === "Reactive") {
|
44749
|
+
return $18._1;
|
44750
|
+
}
|
44751
|
+
fail();
|
44752
|
+
})
|
44753
|
+
))(\u03B9from\u03B1s(graphGraphImpl)($6)(mapObjectString.keys(\u03B9)));
|
44754
|
+
return $Tuple(
|
44755
|
+
intersectionWith_Object(apply)(_fmapObject($16, applyVal.apply))(select\u03B1s\u{1D539}Vertex2["select\u{1D539}s"]($8)(verticesGraphImpl.vertices(bwdSlice3($Tuple(
|
44756
|
+
\u03B1s,
|
44757
|
+
v2.g
|
44758
|
+
))))),
|
44759
|
+
$Tuple(
|
44760
|
+
applyVal.apply($17)(select\u{1D539}s($7)(verticesGraphImpl.vertices(bwdSlice3($Tuple(\u03B1s, opEval.g))))),
|
44761
|
+
map2(ordDVertex$p)((\u03B1) => $Tuple(
|
44762
|
+
\u03B1,
|
44763
|
+
definitely("in graph")(_lookup(Nothing, Just, \u03B1, $6._1.out))._2
|
44764
|
+
))(\u03B1s)
|
44765
|
+
)
|
44766
|
+
);
|
44767
|
+
},
|
44768
|
+
dir: { persistent: LinkedOutputs, transient: LinkedOutputs },
|
44769
|
+
in_views: _fmapObject($11, (v$1) => Nothing),
|
44770
|
+
out_view: Nothing,
|
44771
|
+
intermediate_views: empty,
|
44772
|
+
in_roots: fold((z) => (v$1) => (a) => insert3(ordVertex)(a)()(z))(Leaf2)(_fmapObject(
|
44773
|
+
$11,
|
44774
|
+
(v6) => v6._1
|
44775
|
+
)),
|
44776
|
+
inerts: intersection3(inertFwd)(inertBwd)
|
44777
|
+
});
|
44778
|
+
});
|
44779
|
+
}));
|
44780
|
+
};
|
44781
|
+
};
|
44608
44782
|
};
|
44609
44783
|
};
|
44610
44784
|
var intermediates = (v) => (\u03B1s) => {
|
@@ -44615,7 +44789,7 @@ var intermediates = (v) => (\u03B1s) => {
|
|
44615
44789
|
return rebuild\u03B9(v.inerts)(\u03B1s)(filterWithKey((x2) => {
|
44616
44790
|
const $0 = !member5(x2)(v.in_roots);
|
44617
44791
|
return (v$1) => $0;
|
44618
|
-
})(
|
44792
|
+
})(runQuery2(v.spec.query._1)(setSet5.union(\u03B1s.persistent)(\u03B1s.transient))));
|
44619
44793
|
}
|
44620
44794
|
fail();
|
44621
44795
|
};
|
@@ -44711,7 +44885,7 @@ var drawIntermediates = (divId) => (v) => (unused) => (redraw) => {
|
|
44711
44885
|
(\u03B1) => (v1) => drawView({
|
44712
44886
|
divId: prefix,
|
44713
44887
|
suffix: \u03B1,
|
44714
|
-
view: view$p()(
|
44888
|
+
view: view$p()("intermediate")(functorVal.map(functorSelStates.map(to\u{1D54A}))(v1))(Nothing)
|
44715
44889
|
})(selectIntermediate(\u03B1))(setIntermediateView(\u03B1))(redraw)
|
44716
44890
|
))();
|
44717
44891
|
};
|
@@ -44930,8 +45104,65 @@ var gDecodeJsonCons = (dictDecodeJsonField) => (dictGDecodeJson) => (dictIsSymbo
|
|
44930
45104
|
}
|
44931
45105
|
});
|
44932
45106
|
|
44933
|
-
// output-es/
|
44934
|
-
var
|
45107
|
+
// output-es/File/index.js
|
45108
|
+
var Folder = (x2) => x2;
|
45109
|
+
|
45110
|
+
// output-es/Module.Web/index.js
|
45111
|
+
var findM = (xs) => (f) => (base2) => foldrArray((x2) => (acc) => applyAff.apply(_map(altEither.alt)(acc))(f(x2)))(_pure(base2))(xs);
|
45112
|
+
var loadFileWebT = (dictMonadAff) => {
|
45113
|
+
const Monad0 = dictMonadAff.MonadEffect0().Monad0();
|
45114
|
+
const bindExceptT2 = bindExceptT(Monad0);
|
45115
|
+
const applicativeExceptT2 = applicativeExceptT(Monad0);
|
45116
|
+
const pure22 = Monad0.Applicative0().pure;
|
45117
|
+
return (dictMonadError) => ({
|
45118
|
+
loadFile: (dictMonadError1) => (dictMonadAff1) => (folders) => (v) => Monad0.Bind1().bind(bindExceptT2.bind(dictMonadAff1.liftAff(findM(arrayMap((() => {
|
45119
|
+
const $0 = v + ".fld";
|
45120
|
+
return (a) => a + "/" + $0;
|
45121
|
+
})())(folders))((v1) => _bind(request(driver)({
|
45122
|
+
method: $Either("Left", HEAD),
|
45123
|
+
url: v1,
|
45124
|
+
headers: [],
|
45125
|
+
content: Nothing,
|
45126
|
+
username: Nothing,
|
45127
|
+
password: Nothing,
|
45128
|
+
withCredentials: false,
|
45129
|
+
responseFormat: $ResponseFormat("String", identity),
|
45130
|
+
timeout: Nothing
|
45131
|
+
}))((resp) => _pure((() => {
|
45132
|
+
if (resp.tag === "Right") {
|
45133
|
+
if (resp._1.status === 200) {
|
45134
|
+
return $Either("Right", $Tuple(resp._1, v1));
|
45135
|
+
}
|
45136
|
+
return $Either("Left", RequestFailedError);
|
45137
|
+
}
|
45138
|
+
if (resp.tag === "Left") {
|
45139
|
+
return $Either("Left", resp._1);
|
45140
|
+
}
|
45141
|
+
fail();
|
45142
|
+
})())))($Either("Left", RequestFailedError))))((v1) => {
|
45143
|
+
const $0 = v1._2;
|
45144
|
+
return bindExceptT2.bind(applicativeExceptT2.pure())(() => bindExceptT2.bind(dictMonadAff1.liftAff(request(driver)({
|
45145
|
+
method: $Either("Left", GET),
|
45146
|
+
url: $0,
|
45147
|
+
headers: [],
|
45148
|
+
content: Nothing,
|
45149
|
+
username: Nothing,
|
45150
|
+
password: Nothing,
|
45151
|
+
withCredentials: false,
|
45152
|
+
responseFormat: $ResponseFormat("String", identity),
|
45153
|
+
timeout: Nothing
|
45154
|
+
})))((contents) => applicativeExceptT2.pure(contents.body)));
|
45155
|
+
}))((result) => {
|
45156
|
+
if (result.tag === "Left") {
|
45157
|
+
return dictMonadError.MonadThrow0().throwError(error(printError(result._1)));
|
45158
|
+
}
|
45159
|
+
if (result.tag === "Right") {
|
45160
|
+
return pure22(result._1);
|
45161
|
+
}
|
45162
|
+
fail();
|
45163
|
+
})
|
45164
|
+
});
|
45165
|
+
};
|
44935
45166
|
|
44936
45167
|
// output-es/App.LoadFigure/index.js
|
44937
45168
|
var gDecodeJsonCons2 = /* @__PURE__ */ gDecodeJsonCons(/* @__PURE__ */ (() => {
|
@@ -44948,6 +45179,25 @@ var gDecodeJsonCons2 = /* @__PURE__ */ gDecodeJsonCons(/* @__PURE__ */ (() => {
|
|
44948
45179
|
}
|
44949
45180
|
};
|
44950
45181
|
})());
|
45182
|
+
var gDecodeJsonCons1 = /* @__PURE__ */ gDecodeJsonCons({
|
45183
|
+
decodeJsonField: (j) => {
|
45184
|
+
if (j.tag === "Just") {
|
45185
|
+
return $Maybe(
|
45186
|
+
"Just",
|
45187
|
+
_caseJson(
|
45188
|
+
(v) => $Either("Left", $JsonDecodeError("TypeMismatch", "Boolean")),
|
45189
|
+
Right,
|
45190
|
+
(v) => $Either("Left", $JsonDecodeError("TypeMismatch", "Boolean")),
|
45191
|
+
(v) => $Either("Left", $JsonDecodeError("TypeMismatch", "Boolean")),
|
45192
|
+
(v) => $Either("Left", $JsonDecodeError("TypeMismatch", "Boolean")),
|
45193
|
+
(v) => $Either("Left", $JsonDecodeError("TypeMismatch", "Boolean")),
|
45194
|
+
j._1
|
45195
|
+
)
|
45196
|
+
);
|
45197
|
+
}
|
45198
|
+
return Nothing;
|
45199
|
+
}
|
45200
|
+
});
|
44951
45201
|
var decodeJson = /* @__PURE__ */ (() => decodeRecord(gDecodeJsonCons((() => {
|
44952
45202
|
const $0 = decodeArray(decodeTuple(caseJsonString($Either(
|
44953
45203
|
"Left",
|
@@ -44979,34 +45229,21 @@ var decodeJson = /* @__PURE__ */ (() => decodeRecord(gDecodeJsonCons((() => {
|
|
44979
45229
|
}
|
44980
45230
|
return Nothing;
|
44981
45231
|
}
|
44982
|
-
})(gDecodeJsonCons2(gDecodeJsonCons2(gDecodeJsonCons2(
|
44983
|
-
|
44984
|
-
|
44985
|
-
|
44986
|
-
|
44987
|
-
|
44988
|
-
|
44989
|
-
|
44990
|
-
|
44991
|
-
|
44992
|
-
|
44993
|
-
|
44994
|
-
|
44995
|
-
|
44996
|
-
|
44997
|
-
}
|
44998
|
-
return Nothing;
|
44999
|
-
}
|
45000
|
-
})(gDecodeJsonNil)({ reflectSymbol: () => "query" })()())({ reflectSymbol: () => "inputs" })()())({ reflectSymbol: () => "imports" })()())({
|
45001
|
-
reflectSymbol: () => "fluidSrcPath"
|
45002
|
-
})()())({ reflectSymbol: () => "file" })()())({ reflectSymbol: () => "datasets" })()())().decodeJson)();
|
45003
|
-
var figSpecFromJson = (spec) => ({
|
45004
|
-
fluidSrcPaths: arrayMap(Folder)(spec.fluidSrcPath),
|
45005
|
-
datasets: spec.datasets,
|
45006
|
-
imports: spec.imports,
|
45007
|
-
file: spec.file,
|
45008
|
-
inputs: spec.inputs,
|
45009
|
-
query: spec.query ? $Maybe(
|
45232
|
+
})(gDecodeJsonCons2(gDecodeJsonCons2(gDecodeJsonCons2(gDecodeJsonCons1(gDecodeJsonCons1(gDecodeJsonNil)({ reflectSymbol: () => "query" })()())({
|
45233
|
+
reflectSymbol: () => "linking"
|
45234
|
+
})()())({ reflectSymbol: () => "inputs" })()())({ reflectSymbol: () => "imports" })()())({ reflectSymbol: () => "fluidSrcPath" })()())({ reflectSymbol: () => "file" })()())({
|
45235
|
+
reflectSymbol: () => "datasets"
|
45236
|
+
})()())().decodeJson)();
|
45237
|
+
var loadFileWebT2 = /* @__PURE__ */ loadFileWebT(monadAffAff)(monadErrorAff);
|
45238
|
+
var loadFig2 = /* @__PURE__ */ loadFig(monadAffAff)(monadErrorAff)(loadFileWebT2);
|
45239
|
+
var loadFile$p = (folders) => (file) => (dictMonadAff) => (dictMonadError) => dictMonadAff.MonadEffect0().Monad0().Bind1().Apply0().Functor0().map((v) => $Tuple(file, v))(loadFileWebT2.loadFile(dictMonadError)(dictMonadAff)(folders)(file));
|
45240
|
+
var figSpecFromJson = (v) => ({
|
45241
|
+
fluidSrcPaths: arrayMap(Folder)(v.fluidSrcPath),
|
45242
|
+
datasets: v.datasets,
|
45243
|
+
imports: v.imports,
|
45244
|
+
file: v.file,
|
45245
|
+
inputs: v.inputs,
|
45246
|
+
query: v.query ? $Maybe(
|
45010
45247
|
"Just",
|
45011
45248
|
(a) => {
|
45012
45249
|
const $0 = asVal(a);
|
@@ -45021,7 +45258,8 @@ var figSpecFromJson = (spec) => ({
|
|
45021
45258
|
}
|
45022
45259
|
fail();
|
45023
45260
|
}
|
45024
|
-
) : Nothing
|
45261
|
+
) : Nothing,
|
45262
|
+
linking: v.linking
|
45025
45263
|
});
|
45026
45264
|
var loadFigure = (fileName) => runAffs_((v) => drawFig(v._1)(v._2))([
|
45027
45265
|
_bind($$get(driver)($ResponseFormat("Json", identity))(fileName))((result) => {
|
@@ -45034,7 +45272,7 @@ var loadFigure = (fileName) => runAffs_((v) => drawFig(v._1)(v._2))([
|
|
45034
45272
|
return throwException(error("JSON decoding failed with " + showJsonDecodeError.show(v._1)))();
|
45035
45273
|
}
|
45036
45274
|
if (v.tag === "Right") {
|
45037
|
-
return _map((v1) => $Tuple("fig", v1))(
|
45275
|
+
return _map((v1) => $Tuple("fig", v1))(loadFig2(figSpecFromJson(v._1)));
|
45038
45276
|
}
|
45039
45277
|
}
|
45040
45278
|
fail();
|
@@ -45046,5 +45284,9 @@ export {
|
|
45046
45284
|
drawCode2 as drawCode,
|
45047
45285
|
figSpecFromJson,
|
45048
45286
|
gDecodeJsonCons2 as gDecodeJsonCons,
|
45049
|
-
|
45287
|
+
gDecodeJsonCons1,
|
45288
|
+
loadFig2 as loadFig,
|
45289
|
+
loadFigure,
|
45290
|
+
loadFile$p,
|
45291
|
+
loadFileWebT2 as loadFileWebT
|
45050
45292
|
};
|