diff --git a/packages/fjl/src/list/scanl.ts b/packages/fjl/src/list/scanl.ts
index cfca43ba..9d1d8840 100644
--- a/packages/fjl/src/list/scanl.ts
+++ b/packages/fjl/src/list/scanl.ts
@@ -1,4 +1,3 @@
-import {curry} from "../function/curry";
import {length} from "./length";
import {Slice} from "../types";
@@ -32,4 +31,6 @@ export const
return out;
},
- $scanl = curry(scanl);
+ $scanl = (fn: ScanlOp) =>
+ (zero: B) =>
+ (xs: Slice): B[] => scanl(fn, zero, xs);
diff --git a/packages/fjl/src/list/scanl1.ts b/packages/fjl/src/list/scanl1.ts
index c786861a..0deb2c23 100644
--- a/packages/fjl/src/list/scanl1.ts
+++ b/packages/fjl/src/list/scanl1.ts
@@ -1,4 +1,3 @@
-import {curry} from "../function/curry";
import {scanl, ScanlOp} from "./scanl";
import {head} from "./head";
import {tail} from "./tail";
@@ -17,4 +16,5 @@ export const
* `scanl1` is a variant of `scanl` that has no starting value argument:
* `shallowCompare(scanl1(fn, [x1, x2, ...]), [x1, fn(x1, x2), ...]) // true`
*/
- $scanl1 = curry(scanl1);
+ $scanl1 = (fn: ScanlOp) =>
+ (xs: Slice): T[] => scanl1(fn, xs);
diff --git a/packages/fjl/src/list/scanr.ts b/packages/fjl/src/list/scanr.ts
index 779d34a3..f5ba2f15 100644
--- a/packages/fjl/src/list/scanr.ts
+++ b/packages/fjl/src/list/scanr.ts
@@ -27,4 +27,6 @@ export const
return out;
},
- $scanr = curry(scanr);
+ $scanr = (fn: ScanrOp) =>
+ (zero: B) =>
+ (xs: Slice): B[] => scanr(fn, zero, xs);
diff --git a/packages/fjl/src/list/scanr1.ts b/packages/fjl/src/list/scanr1.ts
index 6eaa1235..8108a87d 100644
--- a/packages/fjl/src/list/scanr1.ts
+++ b/packages/fjl/src/list/scanr1.ts
@@ -16,4 +16,5 @@ export const
return scanr(fn, last(xs), init(xs));
},
- $scanr1 = curry(scanr1);
+ $scanr1 = (fn: ScanrOp) =>
+ (xs: Slice): T[] => scanr1(fn, xs);